Text preview for : Lisa_BASIC-Plus_2.0_Language_Jan84.pdf part of apple Lisa BASIC-Plus 2.0 Language Jan84 apple lisa basic-plus_2.0 Lisa_BASIC-Plus_2.0_Language_Jan84.pdf



Back to : Lisa_BASIC-Plus_2.0_Langu | Home

'-
Lisar, BASIC-Plus 2.0 Language


BEGIN SORT LOOP

Need Not Agree FOR X1% = 1% TO X%(11%)
V3% = X%(36% + X1%)
' - - - -........- .. X2$ = SPACE$(V3%)
W7" = 110" - 365lii + X"(ffi) \ W9% = V3% + 4%
\ V2" = FNI/!I( W7!I, 1804(11) \ V4% = 509% I W9%
\ Vi" = INSTR(l", X '
$,
\ V2" = FNUll( 611. 18040!1, W7!I, \ W7% = 46% + (X1%-1%)