Lisa . BASIC-Plus 2.0 User's Guide BEGIN SORT LOOP FOR X1% = 1% TO X%( ll%) V3% = X%(36% + X1%) ' - - - - - -....- . , X2$ = SPACE$(V3%) \ W9% = V3% + 4% ~7" : 110" - 385!1i • X. (13") \ V2!1i : FNV!Ii(W ~, 18041J!1i) \ V4% = 509% I W9% \ Vi" : INSTR(1lt X$, ' \ W7% = 46% + (X 1%-1%) • 7% \ V2" : FNU!Ii(6" . 180ao.. W~. \U7$ = SPACE$ (511%-V4%*W9%) \ V2" : FNU"( 7., 18040", W7!Ii, IF (VO!li-365!1) \ FIELD 111%, W9% * (W4%-1%) AS X4$, W9% AS U$ CALC ADDRESS OF I,Il FOR W4% = 1% TO V4% GET ~ eUOCK CHECK FOR AVAI LABUE ERROR IF NONE ERROR IF OVER LIMIT 1540 FOR W4% = 7% TO 1% STEP -1% \ W1% = X% (W7% + W4%) \ IF W1% THEN LSET X2$ = MID rV$, V2%(W 1%), X%( 129% + (W 1% I STEP THROUGH' FIELD NUMBERS I IF NOT ZERO THEN ADD APPROPRIATE Workshop User's Guide for the Lisa'" Licensing Re(JJiremenu for Software Oevel~n Apple has a low-cost Ucenslng program, which permits developers of software for the Lisa to incorporate Apple-developed libraries and object code fUes into their prOducts. Both in-house and external distribution require a license. Before distributing any products that incorporate Apple software, please contact Software Licensing at the address below for both licensing and technical information. @1983 by Apple Computer, Inc. 20525 Mariani Avenue CUpertino, california 95014 (408) .996-1010 Apple, Usa and the Apple logo are trademarks of Apple Computer, Inc. Simultaneously published In the USA and Canada customer satisfactioo If you discover physical defects in the manuals distributed with a Usa product or in the media on which a software product is distributed, ~ple will replace the documentation or media at no charge to you during the 90-day period after you purchased the product. Pro<lJct Revisions Unless you have purchased the product update service available through your authorized Lisa dealer, Apple cannot guarantee that you will receIve notice of a revision to the software described in this manual, even if you have returned a registration card received with the product. You should check periodically with your authorized Lisa dealer. Umltatlon on Wanmtles cnj Llcnllity All lmplled warranties concernlng this manual and media, including implled warranties of merchantabiUty and fitness for a particular purpose, are limited in duration to ninety (90) days from the date of original retail purchase of this prodUcL Even though Apple has tested the software described In this manual and reviewed its contents, neither Apple nor its software suppl1ers maKe any warranty or representation, eIther express or Implled, with respect to this manual or to the software described in this manual, their quallty, performance, merChantablllty, or fitness for any partiCular purpose. ~ a result, this software and manual are sold "as is," and you the purchaser are assuming the enUre risk as to theIr quaUty and performance. In no event will Apple or its soft'Nare suppliers be liable for direct, indirect, special, incidental, or consequential damages…

'- Lisar, BASIC-Plus 2.0 Language BEGIN Need Not Agree ' - - - -........W7" = 110" - 365lii + X"(ffi) \ V2" = FNI/!I( W7!I, 1804(11) \ Vi" = INSTR(l", X$, ' \ V2" = FNUll( 611. 18040!1, W7!I, \ V2" = FNUll( 7", 18040", W7!I, IF (VO~385lii) CA LC ADDRESS Of I<Il GET IIfl BLDCK CNECK FOR AVAI LABLE ERROR IF NONE ERROR IF OVER LIMIT SORT LOOP FOR X1% = 1% TO X%(11%) V3% = X%(36% + X1%) .. X2$ = SPACE$(V3%) \ W9% = V3% + 4% \ V4% = 509% I W9% \ W7% = 46% + (X1%-1%) • 7% \U7$ = SPACE$ (511%-V4%*W9%) \ FIELD 81%, W9% + (W4%-1%) AS X4$, W9% AS U$ FOR W4% = 1% TO V4% . 1540 - FOR W4% = 7% TO 1% STEP -1% \ W1% = X% (W7% + W4%) \ IF W1% THEN LSET X2$ = MID tV$, V2%(W1%), X%(129% + (W1% I STEP THROUGH FIELD NUMBERS . ! IF NOT ZERO THEN ADD APPROPRIATE BASIC-Plus for the Usa Release 2.0 Notes What's In the BASlC-PlUS Release Notes? These notes deSCribe situations that were brOt.qlt to our attention after it was too late to dOCt.ment them In tile BASIC-PIUS rncruals. Insert tt.ese notes In tne baCI< of their respective rncnJals, so that you can refer to tnem as necessary. InCI~ In tJleSe notes are revised versions Of the WOIkSl1qJ user's GuIde Appendix B end the B4SlC-PJus user's GuIde Appendix E to repl~ the copies bOUld In your mcn.aals; take a moment now to make tile St.btltutlons. If you haVe a question or a problem that you can't find the a'lSwer to, eltner In Ute mcn.tals or In theSe notes, you shoUld call the Lisa TelephOne ~rt line, (800) 553-4000. J/nI8ry 1984 WOrkstlJp Chapter 1 TO Install tne Pasoal·ICllgU8ge tI'ld WOrkShOp software from tne set Of micro diskettes packaged In your ICllgU8ge rnc:nJal binder, refer to InstalllrYJ the Office system SOftware In ~Ix G, set Up Proceda'es,ln the LIsa 2 owner's QlJde If you plcrl to use the Office System, you rrust first Install Ule Office system 2.0 mIcro diskettes. You do not need to Install tile Office System SOftware If you Intend to do only ICllgU8ge deVelopment work. Before you Insert the micro diskettes, make sure you CCfl see the red tabS from the front of the micro diskettes. Start lnStalllng with steps 1, 2, crld 3 on page G31. Then follow tills ~ 4> Tum the Usa on by pressing the on-off bUtton once. After a feW secondS, you'l hear a 01101<.; Inmed1ately press the spaa!Dar. 5) The Usa goes tflrOUtIl a self-test. When a meru Of symbOls appears In tne ~r left-hcl'ld comer of tne screen, press 8'ld hOld doWn the ~le key While you type a 2 -- on the main keyboard, not on the runerlo keypad. 6> When the maln meR.I snown (J'I page G32 8R)ears, cliCk the mouse once on the Install Dox. 7> When the alert box with the message "TIle Usa Is Installlng s~ SOftware version 2.11' appears, cllCk Don't Erase. When the first mIcro diskette Is Installed, It Will eject. COI'ltll"lJ9 Installation by fOllowing the owner's Qdde Instrootlons frmI step 6, 1nse~ the remaining l~ diSkettes In Order. WOrkstlOp Olapter 1 After SOOC8SSfUlly addlrYJ Pascal to a ProFile conta1n1ng the Office System, If t…