џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ5F3D2BL17U2E3R5FS—E‡@256," YOU MUST BE CAREFUL WITH YOUR INSERTIONS HERE. LINES ARE NOW SUPERIMPOSED AND NO ERASURES OCCUR WHEN IS PRESSED."SШFXГ128:YГ96:SГ8:I$Гџ’:…I$Г""Ї326:„…I$Г"C"Ї340SсG…I$Г"1"ЇZ$ГL1$:Ѕ333SњH…I$Г"2"ЇZ$ГL2$:Ѕ333TI…I$Г"3"ЇZ$ГL3$:Ѕ333T0J…I$Г"4"ЇZ$ГL4$:SГ6:Ѕ333T:KЅ326TDMІ600TTN…J$Г"R"Ї320TdO…J$Г"C"Ї340TnPЅ333TџTž:‡" PRESS

TO PRINT AND/OR TO START AFRESH ON A NEW FACE":€IГ1Ѕ3:Щ"O1L15GL10AL15BO2L6CCCCL10CL15EL10DL6C":‹I:Щ"P10O2L10EL6GGFO1AG"UUI$Гџ’:…I$Г""Ї341:„…I$Г"C"ЇŽUЉVП1,0:‡#Ќ2,џ‹(18):€YГ0Ѕ191Љ7:€XГ0Ѕ255:VГџ (X,Y)Ћ(џ (X,YЋ1)­2)Ћ(џ (X,YЋ2)­4)Ћ(џ (X,YЋ3)­8)Ћ(џ (X,YЋ4)­16)Ћ(џ (X,YЋ5)­32)Ћ(џ (X,YЋ6)­64)UРWVГЈV:…VД0ЇVГ256ЋV UяX‡#Ќ2,џ‹(V);:‹X:‡#Ќ2,џ‹(13);:‹Y:‡#Ќ2,џ‹(30)VTYž:Л‰" enter THE NAME OF THE PERSON YOU HAVE DRAWN. THEN PRESS TO DRAW A NEW FACE. ";FC$VsZ‡#Ќ2," "ЋFC$V†[…џ’Г"C"ЇŽ:„347VЎє‡@420,"PRESS YOUR CHOICE NUMBER";:VМXШ4,1:П1,1VЦYІ610VлZJ$Гџ’:…J$Г""Ї602Vі[…J$Гџ‹(94)ЇІ611:YГYЌ1W\…J$Гџ‹(10)ЇІ611:YГYЋ1W+]…J$Гџ‹(9)ЇІ611:XГXЋ1WE^…J$Гџ‹(8)ЇІ611:XГXЌ1Wf_…J$Г"E"ЇІ611:SГSЋ1:…SВ9ЇSГ9W‡`…J$Г"S"ЇІ611:SГSЌ1:…SД4ЇSГ4WaWМbЦ"BM"Ћџˆ(X)Ћ","Ћџˆ(Y)Ћ"C0S"Ћџˆ(S)Ћ"XZ$;":WыcЦ"BM"Ћџˆ(X)Ћ","Ћџˆ(Y)Ћ"C1S"Ћџˆ(S)Ћ"XZ$;":PЅ X†C8R6C6R2C8R2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџLU2D4G3L8H3U5D2L8U2D5G3L8H3U4D2LHL2HL2HL2U2R2FR2FR2FR14ER4"Jk XГ128:YГ79:SГ8:I$Гџ’:…I$Г""Ї266:„…I$Г"C"Ї280J„ …I$Г"1"ЇZ$ГS1$:Ѕ273J …I$Г"2"ЇZ$ГS2$:Ѕ273JЖ …I$Г"3"ЇZ$ГS3$:Ѕ273JЯ…I$Г"4"ЇZ$ГS4$:Ѕ273Jш…I$Г"5"ЇZ$ГS5$:Ѕ273JђЅ266JќІ600K…J$Г"R"ЇІ611:Ѕ260K$…J$Г"C"Ї280K.Ѕ273KOž0:‡@43,"BEARD STYLE";:І500KХ‡@105,"(1) FULL SET";:B1$Г"BR25BU20U6D6G12D2G2L4HL12GL4H2U2H12U6L2D23F3D3F2D2F11R3F2R5R7E2R3E11U2E2U3E3U23L2"L;‡@137,"(2) FRANZ JOSEPH";:B2$Г"BR25BU20U6D6G12D2G2L4HL12GL4H2U2H12U6L2D23F3D5F2R2E6R5ER4ER6FR4FR5F6R2E2U5E3U23L2"LЉ‡@169,"(3) GOATEE BEARD";:B3$Г"BR25BU20U6D6GD6GD8GD4G10L5H2L10G2L5H10U4HU8HU6HU6L2D20F2D7F25E25U7E2U20L2"M ‡@201,"(4) SIDEBURNS ";:B4$Г"BR25BU20U6D6GD6GD4GD4R2F3RU26L3BL50BD6U6D6FD6FD4FD4L2G3LU26R3"Mј‡@233,"(5) BUSHY BEARD";:B5$Г"BR25BU20U6D6G12D2G2L4H2L10G2L4H2U2H12U6L2D23FD12F3D2F3D3F3R3F3R3F2R12E2R3E3R3E3U3E3U2E3U12EU23L2":‡@288,"MOVE THE BEARD 3 SPACES TO LEFT AND 3 SPACES TO RIGHT BEFORE YOU PRESS FOR NEXT FEATURE."N*XГ128:YГ126:SГ8:I$Гџ’:…I$Г""Ї286:„…I$Г"C"Ї300NC…I$Г"1"ЇZ$ГB1$:Ѕ293N\ …I$Г"2"ЇZ$ГB2$:Ѕ293Nu!…I$Г"3"ЇZ$ГB3$:Ѕ293NŽ"…I$Г"4"ЇZ$ГB4$:Ѕ293NЇ#…I$Г"5"ЇZ$ГB5$:Ѕ293NБ$Ѕ286NЛ%І600Nг&…J$Г"R"ЇІ611:Ѕ280O'…J$Г"C"ЇУ(175,110),0,0:У(75,110),0,0:€TГ1Ѕ2000:‹:Ѕ300O(Ѕ293O8,ž2:‡@43,"MOUSTACHES";:І500O~-‡@103,"(1) SPARSE GROWTH";:U1$Г"BD1R4FR4FR2D2L4HL14GL4U2R2ER4ER4"OЦ.‡@135,"(2) BUSHY GROWTH";:U2$Г"R6FR8FD2G2L5HL3HL8GL3GL5H2U2ER8ER6"P#/‡@167,"(3) FRENCH STYLE";:U3$Г"R6FR4ER3ER3E2D2GDG2L2G2L8HL10GL8H2L2H2UHU2F2R3FR3FR4ER6"P_0‡@199,"(4) ADOLF HITLER";:U4$Г"R4FR2D5L2HL6GL2U5R2ER4"PР1‡@231,"(5) DROOPY STYLE";:U5$Г"R4FR3FR3F4RF2D5LH2U2H2L3HL4HL10GL4GL3G2D2G2LU5E2RE4R3ER3ER4"Pђ2XГ128:YГ114:SГ8:I$Гџ’:…I$Г""Ї306:„…I$Г"C"Ї320Q 3…I$Г"1"ЇZ$ГU1$:Ѕ313Q$4…I$Г"2"ЇZ$ГU2$:Ѕ313Q=5…I$Г"3"ЇZ$ГU3$:Ѕ313QV6…I$Г"4"ЇZ$ГU4$:Ѕ313Qo7…I$Г"5"ЇZ$ГU5$:Ѕ313Qz8Ѕ306 Q…9І600 Q:…J$Г"R"ЇІ611:Ѕ300QЫ;…J$Г"C"ЇУ(128,121),0,0:€TГ1Ѕ1000:‹T:Ѕ320Qе<Ѕ313Qљ@ž3:‡@42,"LINES/WRINKLES";:І500R1A‡@105,"(1) CHEEK DIMPLE";:L1$Г"BD4BR18GD3FBL34EU3H"RB‡@137,"(2) ON CHEEKS";:L2$Г"BR10BD5F4RFRF3D4BU12H2L2H2L2H2BL19G2L2G2L2G2BD12U4E3RERE4"RаC‡@169,"(3) ON FOREHEAD";:L3$Г"BU20R7ER2BD3L6GL7HL6BU3R2FR7"SD‡@201,"(4) DIMPLED CHIN";:L4$Г"BD36D5BU7ERA_о‡@135,"(2) PURSED MOUTH";:M2$Г"RER2FR2F2RFRL5HL8GL5RERE2R2ER2FRBD4R5ER3G2L2GL8HL2H2R3FR5"Aгп‡@167,"(3) WIDE MOUTH";:M3$Г"R4FR4FR3FR2FR6L3GL6HL20GL6HL3R6ER2ER3ER4ER4BD5R5ER3ER2G2L2G2L12H2L2H2R2FR3FR7"B&р‡@199,"(4) NARROW MOUTH";:M4$Г"R3FR3FR3FR2L24R2ER3ER3ER3BD4R5ER2EBL16FR2FR5"BБс‡@231,"(5) NEGROID MOUTH";:M5$Г"BU2R2ER4FR3FR3F2RF2L5HL4HL2GL10HL2GL4GL5E2RE2R3ER3ER4FR2BD7R5ER6ER5G3L2GL2GL3GL12HL3HL2HL2H3R5FR6FR5"BжтXГ128:YГ126:SГ6:I$Гџ’:…I$Г""Ї226Bяу…I$Г"1"ЇZ$ГM1$:Ѕ233Cф…I$Г"2"ЇZ$ГM2$:Ѕ233C!х…I$Г"3"ЇZ$ГM3$:Ѕ233C:ц…I$Г"4"ЇZ$ГM4$:Ѕ233CWч…I$Г"5"ЇZ$ГM5$:SГ5:Ѕ233CaшЅ226CkщІ600Cƒъ…J$Г"R"ЇІ611:Ѕ220C“ы…J$Г"C"Ї240CьЅ233CО№ž7:‡@43,"LONGER HAIR";:І500Dё‡@105,"(1) CHIGNON (BUN)";:A1$Г"R4FR5FR3F4D6GL34HU6E4R3ER5ER4"D ђ‡@137,"(2) BOBBED HAIR ";:A2$Г"BU2R7F3R5F4R3F3R3F3D4F3D6F5D4F4D20F3D3F5L3G3L20H3L3H2U4FD3F2BL40E2U3ED4G2L3G3L20H3L3E5U3E3U20E4U4E5U6E3U4E3R3E3R3E4R5E3R7"E5ѓ‡@169,"(3) AFRO STYLE ";:A3$Г"BU2R7FR9F3R6F6R4F7R3F4D5F3D5F3D10G3D3G4D4G4L3G4L6H3L3H6BL40G6L3G3L6H4L3H4U4H4U3H3U10E3U5E3U5E4R3E7R4E6R6E3R9ER7"EТє‡@201,"(4) WAVY STYLE ";:A4$Г"BU2R5F2R6F3R4F3D3F4R2F2D4F3D4F3D6F4D3F3G4D2G4L4G3L9BL40L9H3L4H4U2H4E3U3E4U6E3U4E3U4E2R2E4U3E3R4E3R6E2R6"Fnѕ‡@233,"(5) PIGTAILS ";:A5$Г"BU2R9FR5F10R3F4D4F6D7F4D4F4D4F4D4F4D4F4R2G7U2H4U4H4U4H4U4H4D3G10L4BL45L3H10U3G4D4G4D4G4D4G4D2H7R2E4U4E4U4E4U4E4U4E4U7E6U4E4R3E10R5ER10"FžіXГ128:YГ5:SГ8:I$Гџ’:…I$Г""Ї246:„…I$Г"C"Ї260FЗї…I$Г"1"ЇZ$ГA1$:Ѕ253Fај…I$Г"2"ЇZ$ГA2$:Ѕ253Fщљ…I$Г"3"ЇZ$ГA3$:Ѕ253Gњ…I$Г"4"ЇZ$ГA4$:Ѕ253Gћ…I$Г"5"ЇZ$ГA5$:Ѕ253G%ќЅ246G/§І600GGў…J$Г"R"ЇІ611:Ѕ240Grџ…J$Г"C"ЇУ(128,7),0,0:€TГ1Ѕ1000:‹:Ѕ260G|Ѕ253Gœž8:‡@44,"SPECTACLES";:І500H)‡@103,"(1) OVAL FRAMES";:S1$Г"R2FR2E3RER8F2R2ER2ED2GL2GL2U2D2D3G3LGL4HL2HLHU3L3HL2GL3D3GLGL2GL4HLH3U5D2L2HL2HU2FR2FR2E2R8FRF3R2ER2"Hž‡@135,"(2) SQUARE FRAMES";:S2$Г"R4UE2R13F2R2ER2ED2GL2GL2U2D6G2L12H3U5L8UHL13G2L2HL2HD2FR2FR2U2D6F2R12E3U5DR4"IA‡@167,"(3) ROUND FRAMES";:S3$Г"R5ERE2RER2ER4FR2FRF2RER2ED2GL2GLU2D5GD2G2DG3LGL6HL2H3U2HU7D3L8U3D7GD2G3L2GL6HLH3UH2U2HU5D2LHL2HU2FR2FRE2RER2ER4FR2FRF2RFR4"IН‡@199,"(4) OCTAGONAL FRAMES";:S4$Г"R5E4R8F4R2ER2E2RD2LG2L2GL2U2D6G4L8H4U6D2L10U2D6G4L8H4U6D2L2HL2H2LU2RF2R2FR2E4R8F4R5"J: ‡@231,"(5) HALF SPECTACLES";:S5$Г"R4FR14ER2ER2ER2D2L2GL2GL2G14GR15FL16GR17"8eЃ‡@168,"(3) FINE BROWS";:W3$Г"BR6E2R13F2LH2L12GR13L13BL12BDH2L13G2RE2R12FL13R13"8 Є‡@200,"(4) SPARSE BROWS";:W4$Г"BR6E2R13F2BL27H2L13G2"9Ѕ‡@232,"(5) SATANIC BROWS";:W5$Г"BF3E7R16EG2L16GR15GL14GR14GL14GR14GL14BL9BD2H7L16HF2R16FL15FR14FL14FR14FL14FR1498ІXГ128:YГ72:SГ7:I$Гџ’:…I$Г""Ї1669QЇ…I$Г"1"ЇZ$ГW1$:Ѕ1739jЈ…I$Г"2"ЇZ$ГW2$:Ѕ1739ƒЉ…I$Г"3"ЇZ$ГW3$:Ѕ1739œЊ…I$Г"4"ЇZ$ГW4$:Ѕ1739ЕЋ…I$Г"5"ЇZ$ГW5$:Ѕ1739ПЌЅ1669Щ­І6009сЎ…J$Г"R"ЇІ611:Ѕ1609ёЏ…J$Г"C"Ї1809ћАЅ173:Дž:‡@43,"EYE SHAPE";:І500:ШЕ‡@103,"(1) AVERAGE EYES";:Y1$Г"BR7E2RER6FR2F2LG2LGL5HLH2ERER6FR2BD4BLGL7H2BE3BRD2FR2EU2HD2LU2LD2LU2BL19BDH2LHL6GL2G2RF2RFR5ERE2HLHL6GL2BD4BRFR7E2BH3BLD2GL2HU2ED2RU2RD2RU2;iЖ‡@135,"(2) NARROW EYES";:Y2$Г"BR7BD2E2R6F2RLG2LGL5HLH2ER2ER6FR2BD4BLGL7H2BE5R2D4GL3U4R3D3L2U2BL18H2L6G2LRF2RFR5ERE2HL2HL6GL2BD4BRFR7E2BH5L2D4FR3U4L3D3R2U2";шЗ‡@167,"(3) WIDE EYES";:Y3$Г"BR10E2RER3FRF3LG2L6H2RE2R4FRBLL3D3R2U3L2D2RU2BL25H2LEL3GLG3RF2R6E2LH2L4GLBRR3D3L2U3R2D2LU2";Щ‡@103,"(1) AVERAGE NOSE";:N1$Г"D15R2E2REUHBG5L2H2LHUEBE6BF2UHU2BL4D2GD">ŒЪ‡@135,"(2) STUBBY NOSE";:N2$Г"D13R2ER2E2ULBL12LDF2R2FR2U10BR4H2U3BL4D3G2">пЫ‡@167,"(3) AQUILINE NOSE";:N3$Г"D15E2UE2RE2UH2BL10G2DF2RF2DF2U13BR3HU3BL4D3G"?8Ь‡@199,"(4) BULBOUS NOSE";:N4$Г"D13BD4R3EUR2EU2H2BL10G2D2FR2DFR3BU12BR2U3HUBL2DGD3"?„Э‡@231,"(5) NARROW NOSE";:N5$Г"D16RE2REHBL8GFRF2BU10BR3U2HU2BL2D2GD2"?ЈЮXГ129:YГ84:SГ8:I$Гџ’:…I$Г""Ї206?СЯ…I$Г"1"ЇZ$ГN1$:Ѕ213?ка…I$Г"2"ЇZ$ГN2$:Ѕ213?ѓб…I$Г"3"ЇZ$ГN3$:Ѕ213@ в…I$Г"4"ЇZ$ГN4$:Ѕ213@%г…I$Г"5"ЇZ$ГN5$:Ѕ213@/дЅ206@9еІ600@Qж…J$Г"R"ЇІ611:Ѕ200@cз…J$Г"C"ЇЅ220@mиЅ213@‘мž6:‡@41,"SHAPE OF MOUTH";:І500@џн‡@103,"(1) AVERAGE MOUTH";:M1$Г"RER2FR2FR2FR3LGL5HL2GL3L3HL2GL5HLR3ER2ER2ER2FRBD3R5ER4G2L3GL8HL3H2R4FR5"GL3GL9H2G6L8G3LGH2U8G6L2D7G4L2G3D8H4U12H2U6E5HU4E4R4ER6U2E4R6FE2R5F3"/хz‡@135,"(2) WAVY HAIR ";:H2$Г"BU12R2F2R10E2F4DFD2R6F8D4F4GDG3D5GD8H4U7EH2LH4L4U5E3L4GL4G2L4G2L4G2L14H6E8L3G8L2D2G7D10G6U4HU4H2U2H2U10E8R2E6R2E4R2E2R12F4"0|{‡@167,"(3) STRAIGHT HAIR ";:H3$Г"BU9R10FR6FR4FR2F2RF2RF7D6GD3GD15L3U12H2L2H8U3H3G2L2GL3GL6G2L6GL9GL9E7L3G4DG8LG3D12L3U13HU4HU8E8RE3R4E2R5E2R8R2F4"1C|‡@199,"(4) FRINGED HAIR ";:H4$Г"BU12R10FR4F2R3F4R4F2RF6D2FD10GD4GD13L3U13H2U3H2UH2U2H3UH4G7LG3L4GL4G2L7E12U2G8LG4L3G4L4E6UE3UE3L2G10L2G2U2E2EU6G2D2G8DG2D4G2D8L3U14HU2HU10E6RE6RE4R3ER2E2R12F2RU"1й}‡@231,"(5) GOING BALD ";:H5$Г"BU8R8FR2FRF2RF3RF5R6F2R2F3D2F2D10GD3GD10L3U12H8U2HUHU8HBL48GD8GDGD2G8D12L3U10HU3HU10E2U2E3R2E2R6E5RE3RE2RER2ER9"1§~XГ130:YГ34:SГ6:I$Гџ’:…I$Г""Ї1262…I$Г"1"ЇZ$ГH1$:Ѕ1332/€…I$Г"2"ЇZ$ГH2$:Ѕ1332H…I$Г"3"ЇZ$ГH3$:Ѕ1332a‚…I$Г"4"ЇZ$ГH4$:Ѕ1332zƒ…I$Г"5"ЇZ$ГH5$:Ѕ1332„„Ѕ1262Ž…І6002І†…J$Г"R"ЇІ611:Ѕ1202Ж‡…J$Г"C"Ї1382РˆЅ1332ёŠУ(88,50),0,0:У(172,50),0,0:€KГ1Ѕ500:‹K:Ѕ1403Œž3:‡@43,"TYPE OF EAR";:І5003З‡@104,"(1) WITH LOBES";:E1$Г"BR27U8E4RFD4GHU4HLDGD2F3E2D2GD2D3GD2GLHUHU3ERF2EBL4UE2BL4UE2UH3BL51BD3H4LGD4FEU4ERDFD2G3H2D2FD2D3FD2FREUEU3HLG2HBR4UH2BR4UH2UE3"48އ@136,"(2) WITHOUT LOBES";:E2$Г"BR27U6E4RFD4GHU4HLDGD2F3E2D2GD2G4LU3ERFBH3BD3E2H2BL53BD3U6H4LGD4FEU4ERDFD2G3H2D2FD2F4RU3HLG"4§‡@168,"(3) WIDE EARS ";:E3$Г"BR27U10E3R2F2DFD5GD2GBHU4HUHU2H2LGE2R2F3DBD8D4G2DG2DGL2H3F2BE6U3HGLG2UE2UE2H4LBL50BD8U10H3L3G2DGD5FD2FBEU4EUEU2E2RFH2L2G3DBD8D4F2DF2DFR2E3G2BH6U3EFRF2UH2UH2E4R"5Ÿ‡@200,"(4) FLAT EARS ";:E4$Г"BR27U10EUE2RF2D4BL5EUEUF2BRD7GD3GD3G2H4F2BU10R2ED2REU6BG6F3RD2BL56U10HUH2LG2D4BR5HUHUG2BLD7FD3FD3F2E4G2BU10L2HD2LHU6BF6G3LD2"6;‘‡@232,"(5) POINTED EARS ";:E5$Г"BR28U10EU2EUEFDFD8GU7HUGD2GD8EU2EFD8G2D2D2GH2U3H2F2BE3UHUHGBL54U10HU2HUHGDGD8FU7EUFD2FD8HU2HGD8F2D2D2FE2U3E2G2BH3UEUEF"6_’XГ128:YГ94:SГ8:I$Гџ’:…I$Г""Ї1466x“…I$Г"1"ЇZ$ГE1$:Ѕ1536‘”…I$Г"2"ЇZ$ГE2$:Ѕ1536Њ•…I$Г"3"ЇZ$ГE3$:Ѕ1536У–…I$Г"4"ЇZ$ГE4$:Ѕ1536м—…I$Г"5"ЇZ$ГE5$:Ѕ1536ц˜Ѕ1466№™І6007š…J$Г"R"ЇІ611:Ѕ1407›…J$Г"C"Ї1607"œЅ1537@ ž2:‡@44,"EYEBROWS";:І5007—Ё‡@104,"(1) AVERAGE BROWS";:W1$Г"BR6E3R11F3LH3L9GR9FL10UBL14BD2H3L11G3RE3R9FL9GR10U8Ђ‡@136,"(2) BUSHY BROWS";:W2$Г"BR6E4R12F4LH4L12GR12FL13GR14FL15GR16FL17BL12H4L12G4RE4R12FL12GR13FLџ& :ƒEXP&' :ƒTHIS PROGRAM DRAWS A &G:ƒ3-DIMENSIONAL VIEW OF THE&c:ƒFUNCTION EXP(X^2+Y^2)&i(ž&š2‰"GRAPH FROM PROGRAM OR MFILE (P OR M)";AC$&Ў<… AC$Г"M" Ї 420&НFŒ M(256,1)&ЧPШ 4,1&ЮZМ1&иdП 1,0&ъnAГ0:B2Г0:C2Г0'x€ YГ2.2 Ѕ Ќ2.4 Љ Ќ.16'‚B2Г0:C2Г0''Œ€ XГЌ3 Ѕ 3 Љ .06'2–І 200': ‹ X'DЊAГAЋ4'LД‹ Y'WОЅ 330'qШZГџ—(Ќ(XЏ2ЋYЏ2))­5.25'’вB1ГX­20Ћ60ЋA:C1Г(YЌZ)­25Ћ136'Цм… M(B1,1)Г0 А M(B1,0)Г0 Ї M(B1,1)ГC1:M(B1,0)ГC1'ыц… C1ВГM(B1,0)Ї M(B1,0)ГC1:Ѕ 270(№… C1ДГM(B1,1)Ї M(B1,1)ГC1:Ѕ 270(њB2Г0:C2Г0()Ѕ 280(4І 290(:(R"… B2Г0 А C2Г0 Ї 310(i,Л(B2,C2)Ќ(B1,C1),О(y6B2ГB1:C2ГC1(@(ЈJ€ XГ0 Ѕ 256:€ YГ0 Ѕ 1:M(X,Y)Г0:‹ Y,X(НT€ XГ3 Ѕ Ќ3 Љ Ќ.3(Я^AГ0:B2Г0:C2Г0(щh€ YГ2.2 Ѕ Ќ2.4 Љ Ќ.04(єrІ 200(ў|AГAЋ1)†‹ Y)‹ X)šЅ 410)#ЄШ 4,1)*ЎМ1)4ИП 1,0)YТADГ(256­џ†(&HBA)Ћџ†(&HBB))Ќ&HE00)uЬ… ADД0 Ї ADГ&HFFFFЋADЋ1)‡ж—M"SCREEN",AD)’рЅ 480A‡Nz†Ш 4,1:М 1:П1,0’‡Ц "C0;S60;BM10,100"ŸˆAA$Г"YK"Њ‰І 146СŠЦ "C0;S4;BM10,120"й‹AA$Г"ABCDEFGHIJKLM"фŒІ 146ћЦ "C0;S8;BM10,180"ŽAA$Г"ABCDEFGHI"І 146%Ѕ 144+‘Š2’:ƒG“€ XXГ1 Ѕ џ‡(AA$)R”:LLГ0`• LL$,CC$†–… LL$Гџ(AA$,XX,1) Ї Ц CC$:Ѕ 152 —LLГLLЋ1:… LLД48 Ї 149Ј˜‹:Л™† " ","BM+7,0"сš† "A","U4;E2;F2;D2;NL4;D2;BM+3,0"›† "B","U6;R3;F1;D1;G1;NL3;F1;D1;G1;L3;BM+7,0"Kœ† "C","BM+1,-0;H1;U4;E1;R2;F1;BM+0,+4;G1;L2;BM+6,0"p† "D","U6;R3;F1;D4;G1;L3;BM+7,0"•ž† "E","NR4;U3;NR2;U3;R4;BM+3,+6"ЖŸ† "F","U3;NR2;U3;R4;BM+3,+6"ѕ † "G","BM+1,-0;H1;U4;E1;R2;F1;BM+0,+2;NL1;D2;G1;L2;BM+6,0"Ё† "H","U3;NU3;R4;NU3;D3;BM+3,0"EЂ† "I","BM+1,0;R1;NR1;U6;NL1;R1;BM+4,+6"sЃ† "J","BM+0,-1;F1;R1;E1;U5;NL1;R1;BM+3,6"—Є† "K","U3;NU3;R1;NE3;F3;BM+3,0"ЕЅ† "L","NU6;R4;U1;BM+3,+1"иІ† "M","U6;F2;ND1;E2;D6;BM+3,0"Ї† "N","U6;F1;D1;F2;D1;F1;NU6;BM+3,0"1Ј"O","BM+1,0;H1;U4;E1;R2;F1;D4;G1;L2;BM+6,0"\Љ† "Y","BM+0,-6;D2;F2;ND2;E2;U2;BM+3,6",160,2,32,208,167,141,254-лъ† 123,164,141,254,121,230,141,254,117,61,104. є† 141,254,112,31,152,88,52,4,17џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ1ь& •100&Џž4:€KГ0Ѕ11:€JГ0Ѕ14:’1097ЋJЋ32­K,159:‹J,K:’1224,159:’1240,159:’1320,159:’1336,159:’1417,191:’1431,191:’1449,191:’1450,191:’1462,191:’1463,191:’1461,191:’1451,191'€KГ0Ѕ160Љ32:’1097ЋK,128:’1111ЋK,128:‹K:€KГ10Ѕ22:’1088ЋK,128:‹K:’1130,128:’1142,128',€KГ0Ѕ3:’1195ЋK,147:’1202ЋK,147:‹K'X’1229,175:’1236,175:’1228,207:’1235,207'„’1256,154:’1288,154:’1272,149:’1304,149'б ‡@108,"identikit";:‡@240,"b";:‡@272,"y";:‡@303,"r&d";:‡@364,"delbourgo";( Щ"O1L6DL8EL3FL4AL6DL8EL3FL4AL6DL8EL4FL8GL6AL10FGAL4A#O2D":€TГ1Ѕ500:‹T(,(Ш4,1:М1:П1,1(V2ž:‡" *** IDENTIKIT PROCEDURE ***":‡(В4‡" YOU WILL BE ASKED TO DRAW THE FOLLOWING FEATURES IN THE FOLLOWING ORDER:-":‡)86‡" face-shape, hairstyle, ears, eye-brows, eyes, nose, mouth, long hair, spectacles, beard, moustaches, lines/wrinkles.":‡)С8‡" AT EACH STAGE OF THE PROCEDURE YOU WILL BE PRESENTED WITH A SELECTION OF EACH FEATURE.":‡:‡" HIT ANY KEY TO CONTINUE ";)Я9…џ’Г""Ї57*-:ž:‡:‡" AFTER MAKING YOUR SELECTION, USE ARROW KEYS TO MOVE EACH FEATURE AROUND.":‡+ <‡" PRESS TO ENLARGE,":‡" PRESS TO SHRINK.":‡:‡" AFTER DRAWING, PRESS TO CONTINUE TO THE NEXT FEATURE OR TO RETURN TO THE MENU FOR ANOTHER CHOICE. PAINTING, WHEN NECESSARY, IS AUTOMATIC."+/>‡:‡" HIT ANY KEY TO CONTINUE"+=@…џ’Г""Ї64+cdМ1:ž0:‡@42,"SHAPE OF FACE";:І500+гe‡@105,"(1) ROUND FACE";:F1$Г"BR36U20D32GD3GD2GD2G2DG3DG3DG6LG3LGL2GLGL23HLHL2HLH3LH6UH3UH3UH2U2HU2HU3HU32",Af‡@137,"(2) LONG FACE";:F2$Г"BR36U20D28GD4GD3G2D2G2DG4DG3DG8LG6LG2LGL11HLH2LH6LH8UH3UH4UH2U2H2U3HU4HU28",Йg‡@169,"(3) OVAL FACE";:F3$Г"BR36U20D20GD4GD4GD3G2D2G3DG2D3G3DG5DG6LG4LG2L12H2LH4LH6UH5UH3U3H2UH3U2H2U3HU4HU4HU20"-!h‡@201,"(4) SQUARE FACE";:F4$Г"BR36U20D32GD4GD3GD2G3DG8DG3D2G4LG2LGL25HLH2LH4U2H3UH8UH3U2HU3HU4HU32"-ši‡@233,"(5) HEART FACE";:F5$Г"BR36U20D20GD2G2D3G2D2GD2G4DG6DG3DG2D2G4DG4L3GL8HL3H4UH4U2H2UH3UH6UH4U2HU2H2U3H2U2HU20"-ОjXГ128:YГ96:SГ6:I$Гџ’:…I$Г""Ї106-зk…I$Г"1"ЇZ$ГF1$:Ѕ113-№l…I$Г"2"ЇZ$ГF2$:Ѕ113. m…I$Г"3"ЇZ$ГF3$:Ѕ113."n…I$Г"4"ЇZ$ГF4$:Ѕ113.;o…I$Г"5"ЇZ$ГF5$:Ѕ113.EpЅ106.OqІ600.gr…J$Г"R"ЇІ611:Ѕ100.ws…J$Г"C"Ї120.tЅ113.Ёxž4:‡@43,"HAIR STYLE";:І500/Dy‡@103,"(1) CURLY HAIR ";:H1$Г"BU10E3R6F3ER4F4D4E3R6F4D3F5D5GDG2F2D7G2D5G4U11H5U4L4H4U4Э0€ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЙМНОПРСТУФХЧШКЛИЗЖЦо юФ'F1B0DІ€+'ђ јџ&Ц чІ€ ,/„40џЖІ†'!5Ї иМ,'„40џ`І†'5Ї О95†!Ї ЕІ€Ѕ&†Ї І&ъ†‚Ї† Ї ›џ0\-'0S'GW'TX'џ хЖTL'ЗT T|TЖџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ&'ž2:‡@37,"THE TUMBLING UMBRELLA";:&i‡@101,"AN ANIMATION PROBRAM ";:‡@133,"WITH 18 GRAPHIC PAGES";&Л‡@193,"BY r.delbourgo and b.ferguson";:‡@225,"hobart,tasmania,australia7005";&ьЩ"O3L8CL4O4CO3L12AGFL6DP12L8CL4FL12FGAO4L4C"'k‡@352,"you will be asked to choose the polar angle (or latitude) and the azimuth (or longitude) of the rotation axis."'žЩ"O3L8CL4FL12GAO4L4CO3L8AP120O4CL4CL12O3AGL4D"'оPIГ3.141592653:ŒX(20),Y(20),Z(20),NR(20),P(20),Q(20),PG(24)(Cž:‡@2,"** THE TUMBLING UMBRELLA **":‡:‰"POLAR ANGLE (IN DEGREES)";B:BГB­PIЎ180:CBГџ•(B):SBГџ…(B)(~ ‰"AZIMUTH (IN DEGREES)";A:AГA­PIЎ180:CAГџ•(A):SAГџ…(A)(л TГ15­PIЎ180:‡@417,"PRESS AFTER ANIMATION IF":‡@449,"YOU WANT TO CHANGE ORIENTATION";(ї NXГSB­CA:NYГSB­SA:NZГCB)] €UГ1Ѕ8:X(U)Г40­џ•(U­PIЎ4):Y(U)Г40­џ…(U­PIЎ4):Z(U)Г40:X(UЋ8)Г7­X(U)Ў4:Y(UЋ8)Г7­Y(U)Ў4:Z(UЋ8)Г20:‹U)Ъ X(17)Г0:Y(17)Г0:Z(17)Г50:X(18)Г0:Y(18)Г0:Z(18)ГЌ60:X(19)Г0:Y(19)Г10:Z(19)ГЌ70:X(20)Г0:Y(20)Г20:Z(20)ГЌ60)ї€IГ1Ѕ20:NR(I)ГNX­X(I)ЋNY­Y(I)ЋNZ­Z(I):‹I* €MГ18Ѕ1ЉЌ1:І26* Ш0,M:С0,1:М:П1,0*b€IГ1Ѕ20:P(I)Г128ЋX(I)­CTЌNR(I)­(CTЌ1)­NXЌ(NY­Z(I)ЌNZ­Y(I))­ST*›Q(I)Г96ЋY(I)­CTЌNR(I)­(CTЌ1)­NYЌ(NZ­X(I)ЌNX­Z(I))­ST*Ђ‹I+€UГ1Ѕ8:Л(P(U),Q(U))Ќ(P(UЋ1Ќ8­џ(UЎ8)),Q(UЋ1Ќ8­џ(UЎ8))),Н:Л(P(UЋ8),Q(UЋ8))Ќ(P(UЋ9Ќ8­џ(UЎ8)),Q(UЋ9Ќ8­џ(UЎ8))),Н:‹U+Y€UГ1Ѕ8:Л(P(U),Q(U))Ќ(P(UЋ8),Q(UЋ8)),Н:ЛЌ(P(17),Q(17)),Н:‹U+ Л(P(17),Q(17))Ќ(P(18),Q(18)),Н:ЛЌ(P(19),Q(19)),Н:ЛЌ(P(20),Q(20)),Н+БTГTЋPIЎ10:‹M+в€MГ18Ѕ1ЉЌ1:Ш0,M:П1,1:€TГ1Ѕ15+я…џ’ДВ"R"Ї ‹T,M:Ѕ24 :„Ž7,CTГџ•(T):STГџ…(T):S YOUR NEW IMAGINARY LINE.,GД:ƒ******EXAMPLE NO. 4*******,NО:ƒ,tШ‡"4 WHAT TO DO WHEN AN EXTRAORD-",—в‡"INARY SYLLABLE IS BROKEN UP?-м:ƒ***IF YOU PUT THE CLOSING 'QUOTE' AFTER THE BROKEN SYLLA- BLE THE SECOND LINE WILL FOLLOW AS THEџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЬ:ƒ ***** SUBROUTINE TO CHANGE HIGH SPEED INCREMENT *****8?Э:ƒ8[Юž:‰ "NEW INCREMENT ";NI8kЯП 1,џ‰(CS$)8qа8xб:ƒ8Ів:ƒ ***** SUBROUTINE TO CHANGE MODES *****8­г:ƒ8Щдž:‡ "NEW MODE (0-4)? ";8юеNM$Гџ’:… NM$Д"0" Б NM$В"4" Ї 2138ўжШ џ‰(NM$),19зП 1,џ‰(CS$)9и9й:ƒ9Kк:ƒ ***** SUBROUTINE TO DELETE PICTURE *****9Rл:ƒ9wмž:‡ "REALLY DELETE (Y/N)?":П 0,19‘нAA$Гџ’:… AA$Г"" Ї 2219Фо… AA$ДВ"Y" Ї П 1,џ‰ (CS$): :„ М:П 1,џ‰(CS$):9Ып:ƒ9вр:ƒ9ѕс:ƒ ***** START-UP SCREEN *****9ќт:ƒ:уž:ф‡@192,џЁ(32,255):/х‡@234,"COLORSKETCH":Dц‡@256,џЁ(32,175):Xч€ DLГ1 Ѕ 1000:‹:vш‡@232,"BY DARRYL KOTCHER":Šщ€ DLГ1 Ѕ 1000:‹:ъ:–ыŠC":„…LOВ0Ї 50,10:„ 100,2: 50,2.сP…TTД0ЇX$Г"You owe $":„X$Г"You have $"/ZЦ"BM30,102":X$ГX$Ћџ(џˆ(Tџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ   200,1:І 198/,^… A$Г"I" Ї   200,1:І 206/J_… A$Г"M" Ї   200,1:І 212/k`… A$Гџ‹(U) Ї X1ГX:Y1ГY:YГYЌ1/Œa… A$Гџ‹(L) Ї Y1ГY:X1ГX:XГXЌ1/­b… A$Гџ‹(D) Ї X1ГX:Y1ГY:YГYЋ1/Юc… A$Гџ‹(R) Ї Y1ГY:X1ГX:XГXЋ1/ёd… A$Гџ‹(95) Ї Y1ГY:X1ГX:YГYЌNI0e… A$Гџ‹(91) Ї Y1ГY:X1ГX:YГYЋNI07f… A$Гџ‹(21) Ї Y1ГY:X1ГX:XГXЌNI0Zg… A$Гџ‹(93) Ї Y1ГY:X1ГX:XГXЋNI0kh… A$Г"" Ї 810i… XВ255 Ї XГ2550j… XД0 Ї XГ00Ѓk… YВ191 Ї YГ1910Гl… YД0 Ї YГ00Йm0Рn:ƒ0Чo:ƒ0ѕp:ƒ ***** SUBROUTINE TO SAVE PICTURE *****0ќq:ƒ1rž1s’ 65494,01-t‡ "SAVE PICTURE (Y/N)?";17uП 0,11[vS$Гџ’:… S$ДВ"Y" А S$ДВ"N" Ї 1181nw… S$Г"Y" Ї 1221{x‡ " ";S$1†yЅ 1341“zMГџ‰(M$)1 {‡ " ";S$1А|… MГ0 Ї MГ11Ж}‡1ф~‡ "POSITION TAPE":‡ "HIT ANY KEY TO TAPE"1юП 0,12€T$Гџ’:… T$Г"" Ї 1282‡:‰ "NAME";NM$2-‚LTHГ1536­MЋ15352Mƒ‡:‡ "SAVING WITH NAME=";NM$2W„П 0,12p…˜M NM$,1536,LTH,15362v†2}‡:ƒ2„ˆ:ƒ2Ж‰:ƒ ***** SUBROUTINE TO LOAD OLD PICTURE *****2НŠ:ƒ2ц‹‡:‡ "SET UP TAPE, HIT ENTER TO LOAD"2№ŒП 0,13T$Гџ’:… T$Г"" Ї 1413ŽП 1,џ‰(CS$)3М3,’ 65494,033‘—M3A’’ 65495,03G“3N”:ƒ3U•:ƒ3Š–:ƒ ***** SUBROUTINE TO INPUT STARTING DATA *****3‘—:ƒ3І˜‡ "MODE (0-4)?";3А™M$Гџ’3Ьš… M$В"4" Б M$Д"0" Ї 1533雇 џ‰(M$)3шœШ џ‰(M$),14‡ "COLOR SET (0/1)?";4)žCS$Гџ’:… CS$ДВ"0" А CS$ДВ"1" Ї 15847Ÿ‡ џ‰(CS$)4X ‡ "FOREGROUND COLOR (0-8)?";4}ЁFG$Гџ’:… FG$Д"0" Б FG$В"8" Ї 1614‹Ђ‡ џ‰(FG$)4™ЃCГџ‰(FG$)4КЄ‡ "BACKGROUND COLOR (0-8)?";4пЅBG$Гџ’:… BG$Д"0" Б BG$В"8" Ї 1654эІ‡ џ‰(BG$)5ЇС џ‰(FG$),џ‰(BG$)5 Ј‡5#Љ‰"STARTING POINT";X,Y5)Њ50Ћ:ƒ5\Ќ:ƒ ***** SUBROUTINE TO DRAW LINES *****5c­:ƒ5sЎС C,џ‰(BG$)5‹ЏЛ (SX,SY)Ќ(TX,TY),Н5ЁАС џ‰(FG$),џ‰(BG$)5ЇБ5ЎВ:ƒ5лГ:ƒ ***** SUBROUTINE TO DRAW CIRCLE *****5тД:ƒ5шЕž6Ж‰ "RADIUS OF CIRCLE ";RD61З‰ "HEIGHT TO WIDTH RATIO (0.0-4.0) ";HW6IИ… HWД0 Б HWВ4 Ї 1836iЙ‡ "COLOR OF CIRCLE (0-8)?";6‹КC$Гџ’:… C$Д"0" Б C$В"8" Ї 1866˜Л‡ " ";C$6НМ‰ "CIRCLE START POINT (0-1) ";SP6еН… SPД0 Б SPВ1 Ї 1886јО‰ "CIRCLE END POINT (0-1) ";EP7П… EPД0 Б EPВ1 Ї 1907/РТ (X,Y),RD,џ‰(C$),HW,SP,EP7?СП 1,џ‰(CS$)7EТ7LУ:ƒ7Ф:ƒ ***** SUBROUTINE TO CHANGE CURSOR COLOR *****7ˆХ:ƒ7ŽЦž7ЏЧ‡ "NEW CURSOR COLOR (0-8)? "7дШCC$Гџ’:… CC$Д"0" Б CC$В"8" Ї 2007юЩCГџ‰(CC$):П 1,џ‰(CS$)7єЪ7ћЫ:ƒ88џ&=:ƒCOPYRIGHT 1983 BY BILL NOLAN. ALL RIGHTS RESERVED!!!&KXГџ„(ЌџŸ)&\ Œ C(8),C$(8)&t€ XГ1 Ѕ 8: C$(X):‹&Нdž:‡" PRESS ANY KEY TO ROLL":K$Гџ’:І 9000:‡" COMPUTING ROLL";:І 199&нnž:€ XГ1 Ѕ 8:‡C$(X),C(X):‹ X' pHPГC(3)ЋC(7)ЋC(8):‡"HIT POINTS",HP:CCГ0'^s… C(1)В9 А C(2)В9 А C(4)В7 А C(5)В8 А C(6)В9 А C(7)В8 А C(8)В8 Ї ‡" ROGUE",:CCГ1'‘v… C(5)В6 А C(7)В8 А C(8)В8 Ї ‡" WARRIOR",:CCГ1'Ыx… C(2)В7 А C(4)В7 А C(5)В8 А C(6)В9 Ї ‡" THIEF",:CCГ1(z… C(2)В9 А C(3)В8 А C(6)В8 А C(7)В7 Ї ‡" ARCANIST",:CCГ1(4|… C(2)В8 А C(3)В11 Ї ‡" GUARDIAN",:CCГ1(„~… C(2)В9 А C(3)В10 А C(4)В9 А C(5)В9 А C(7)В9 А C(8)В9 Ї ‡" CHAMPION",:CCГ1(Ÿ… CCГ0 Ї ‡" COMMONER",(г€… C(1)В10 А C(2)В9 А C(5)В9 А C(6)В9 Ї ‡" ELF",(э… C(8)В7 Ї ‡" DWARF",)%‚‡:‡"PRESS 'R' TO REROLL OR 'G'":‡"TO GO ON.";:K$Гџ’)cŒK$Гџ’:… K$ДВ"R" А K$ДВ"G" Ї 140 :„   150,1:… K$Г"R" Ї 100)ЉЧ€CГ1Ѕ8:C(C)Г0:€CГ1Ѕ8:D1Гџ„(4):D2Гџ„(4):D3Гџ„(4):D4Гџ„(4):D5Гџ„(4))ѓШHH$(1)Гџˆ(D1):HH$(2)Гџˆ(D2):HH$(3)Гџˆ(D3):HH$(4)Гџˆ(D4):HH$(5)Гџˆ(D5)*в€ XГ1 Ѕ 4:… HH$(X)ВHH$(XЋ1) Ї 250*!м‹ X*MцC(C)Г(џ‰(HH$(3))Ћџ‰(HH$(4))Ћџ‰(HH$(5)))*]№‡".";:‹ C:*њX$ГHH$(X):HH$(X)ГHH$(XЋ1):HH$(XЋ1)ГX$:Ѕ210*И#(… џ’Г"" Ї XГџ„(0):Ѕ 9000::„   150,1:+ '† PHYSICAL BEAUTY,INTELLIGENCE,FAITH,SPEED,AGILITY,MANIPULATION,STAMINA,STRENGTHU4D1E1R2F1BD3BR3" :ƒrKšA$(83)Г"R3E1H1L2H1E1R3BD4BR3" :ƒsrЄA$(84)Г"BU5R4L2U1D5F1E1BD1BR3" :ƒt•ЎA$(85)Г"BU4D3F1R2NU4R1BR3" :ƒuПИA$(86)Г"BU4F1D1F1ND1E1U1E1BD4BR3" :ƒvщТA$(87)Г"BU4D3F1E1NU2F1E1U3BD4BR3" :ƒw ЬA$(0)Г"BR3":ƒSPACџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ—& :ƒ ***** COLORSKETCH *****&':ƒ&5’ 65495,0&=Р 4&O• 1200,&H7EFF&_Й џƒГ&H7F00&f:ƒ&m:ƒ&Ѕ :ƒ ***** MACHINE LANG. ROUTINE FOR KEY REPEAT *****&Ќ :ƒ&Х € MMГ&H7F00 Ѕ &H7F1B&Я  DT$&р DT$Г"&H"ЋDT$&ё’ MM,џ‰(DT$)&ї‹'I† CC,0,0,8E,1,55,A6,80,8D,9,8C,1,59,26,F7,4F,7E,B4,F4,81,FF,2D,1,39,CC,0,1,39'P:ƒ'W:ƒ'w:ƒ ***** MAIN PROGRAM *****'~:ƒ'ŽA$Г"":NIГ10'›І 227:ž'ІІ 152'АІ 63'Жž'ж‡ "LOAD OLD PICTURE (Y/N)?"'рП 0,1(AN$Гџ’:… AN$ДВ"Y" А AN$ДВ"N" Ї 28(#… AN$Г"Y" Ї І 139:Ѕ 32()М(9П 1,џ‰(CS$)(G UГ94:DГ10(^!LГ8:RГ9:RPTГ0:RFГ0(l"Н (X,Y,C)(ƒ#… FLГ1 Ї О (X1,Y1)($І 78(—%Ѕ 34(Ђ&І 114(Ј'Š(Џ(:ƒ(Ж):ƒ(н*:ƒ ***** SUBROUTINE TO PAINT *****(ф+:ƒ(ћ,‡ "COLOR","NUMBER")-‡ "-----","------")q.‡ "BLACK",0,"GREEN",1,"YELLOW",2,"BLUE",3,"RED",4,"BUFF",5,"CYAN",6,"MAGENTA",7,"ORANGE",8)Ъ/‡:‡ "COLOR SET 0=1ST 4 COLORS";" PM=";M$:‡ "COLOR SET 1=2ND 4 COLORS";" CS=";CS$)я0‡ "ONLY 0 OR 5 IN 2 COLOR MODES"*1‡ "TYPE NO. OF DESIRED COLOR";*2П 0,1*@3CR$Гџ’:… CR$Д"0" Б CR$В"8" Ї 51*m4‡@480, "BORDER COLOR TO STOP AT (0-8)?";*w5П 0,1*›6ST$Гџ’:… ST$Д"0" Б ST$В"8" Ї 54*Њ7BDГџ‰(ST$)*К8П 1,џ‰(CS$)*д9У(XЋ2,YЋ2),џ‰(CR$),BD*к:*с;:ƒ*ш<:ƒ+=:ƒ ***** SUBROUTINE TO PRINT TABLE *****+>:ƒ+"?ž+F@‡ " **** COMMAND TABLE ****"+ЂA‡"B-BLANK DRAW":‡ "C-RESUME COLOR":‡ "P-PAINT ENCLOSED SECTION":‡ "E-EXIT FROM DRAWING"+љB‡ "-CLEAR SCREEN":‡ "R-ENGAGE KEY REPEAT":‡ "N-DISENGAGE KEY REPEAT",qC‡ "S-LINE STARTING POINT":‡ "T-LINE TERMINATING POINT":‡ "O-ORIGIN OF CIRCLE TO BE DRAWN":‡ "X-CHANGE CURSOR COLOR",‘D‡ "H-DISPLAY COMMAND TABLE",ЇE‡ "M-CHANGE MODE",шF‡ "I-ALTER CURSOR MOVE INCREMENT":‡ "HIT ANY KEY TO RESUME";,ђGП 0,1- HH$Гџ’:… H$Г"" Ї 72-I-J:ƒ-K:ƒ-JL:ƒ ***** SUBROUTINE TO MOVE CURSOR *****-QM:ƒ-aN… RFГ0 Ї 81-oORPTГџƒ(0)-€P… RPTГ1 Ї 96-ŠQA$Гџ’-ЇR… A$Г"P" Ї   200,1:І 44-УS… A$Г"R" Ї   200,1:RFГ1-пT… A$Г"N" Ї   200,1:RFГ0-ћU… A$Г"B" Ї   200,1:FLГ1.*V… A$Г"H" Ї П 0,1:  200,1:І 63:П 1,џ‰(CS$).GW… A$Г"E" Ї   200,1:Ѕ 38.cX… A$Г"C" Ї   200,1:FLГ0.ˆY… A$Г"\" Ї   200,1:І 220:Н(X,Y).ЉZ… A$Г"S" Ї SXГX:SYГY:  200,1.в[… A$Г"T" Ї TXГX:TYГY:  200,1: І 174.№\… A$Г"O" Ї   200,1:І 181/]… A$Г"X" Їџl&$ :ƒ MEAN AND STANDARD DEVIATION&+:ƒ&F:ƒ BY STAN PEPPENHORST&^(:ƒ GERMANTOWN HS&}2:ƒ GERMANTOWN, TN 38138&„<:ƒ&ŒFž:‡&ВP‡ " STUDENT SCORES, THE MEAN,"&еZ‡ " AND STANDARD DEVIATION"&нd‡:‡&њn‚ MAXIMUM CLASS SIZE=50' xŒ N$(50),S(50)'<‚‡ "HOW MANY STUDENTS TOOK THE EXAM";:‰ C:‡'™Œ‡ "ENTER THE NAME OR INITIALS FOR EACH STUDENT FOLLOWED BY A COMMA AND THE EXAM SCORE."'К–‡:€ IГ1 Ѕ C:‰ N$(I),S(I):‹ I'Ц І 1000($Њ‡ "WOULD YOU LIKE THE NAMES AND SCORES PRINTED? (Y OR N)":‰ A$:… A$Г"Y" Ї 180 :„ 2000(`Д‡:€ IГ1 Ѕ C:‡ N$(I);S(I),:‹ I:€ XГ1 Ѕ 10000:‹ X:Ѕ 2000(fШ‘(Ёш:ƒ SUBROUTINE FOR MEAN AND STANDARD DEVIATION(Пђ‚ COMPUTE AND PRINT MEAN(цќ‡:€ IГ1 Ѕ C:TГTЋS(I):‹ I:‡:‡:AГTЎC(џAГџ(A­10Џ2Ћ.5)Ў10Џ2)$‡ "THE CLASS AVERAGE IS";A;".":‡)U‚ COMPUTE AND PRINT THE STANDARD DEVIATIONS)‡€ IГ1 Ѕ C:SГS(I)Џ2:S1ГS1ЋS:‹ I:DГџ›(S1ЎCЌAЏ2)) DГџ(D­10Џ2Ћ.5)Ў10Џ2)Ш$‡ "THE STANDARD DEVIATION IS";D;".")ю.P1ГAЋD:P2ГAЋ2­D:M1ГAЌD:M2ГAЌ2­D:‡*&8‡ " THE VALUES FOR THE STANDARD DEVIATIONS ARE:"*_B‡ " +2",P2," +1",P1," MEAN",A," -1",M1," -2",M2*eL*kаŠ)Г"BR3L2H1U2E1R2F1D1NL4BD2BR3" :ƒeБrA$(72)Г"U6D3E1R2F1D3BR3" :ƒhк|A$(73)Г"BU6BR1R1BD2NL1D4L1R2BR4" :ƒi†A$(79)Г"BU1U2E1R2F1D2G1L2NH1BR7"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџz&’ 150,1:ƒWRKSHT 2/15/83&@ ž:‡@136,"VIDEO WORKSHEET":GГ0&_‡@230,"NUMBER OF COPIES:";&g‰ Q&•(… GВ0 Ї ‡@423,"COPY#";:‡@428,G;"COMPLETE"&Њ2‡@331,"PRINTING"&Й<… GВГQ Ї Š&ЧFGГGЋ1:CГ0&фP‡#Ќ2:‡#Ќ2,Є30)џЁ(19,"*")'Z‡#Ќ2,Є30)"* VIDEO WORKSHEET *"')d‡#Ќ2,Є30)џЁ(19,"*"):‡#Ќ2:‡#Ќ2'dn‡#Ќ2,Є30)"1 1 1 1 1 1 1 1 1 1 2 2 2 2 2 2 2 2 2 2 3 3"'Гx‡#Ќ2,Є10)"0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1 2 3 4 5 6 7 8 9 0 1"'ѓ‚€ TГ1 Ѕ 17:‡#Ќ2,Є7)џЁ(67,"-"):… TВГ17 Ї ‡#Ќ2,џ‹(140);:Ѕ 40(Œ… CД32 Ї YГ6(–… CВГ32 А CДГ96 Ї YГ5(/ … CВ96 Ї YГ4(>Њ‡#Ќ2,ЄY)C;(eД€ NГ1 Ѕ 33:A$Г": ":‡#Ќ2,Є9)A$;:‹ N(yОCГCЋ32:‡#Ќ2:‹ TR MEAN AND STANDARD DEVIATION(Пђ‚ COMPUTE AND PRINT MEAN(цќ‡:€ IГ1 Ѕ C:TГTЋS(I):‹ I:‡:‡:AГTЎC(џAГџ(A­10Џ2Ћ.5)Ў10Џ2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџњ† "V","BM+0,-6;D2F1D1F1ND1E1U1E1U2;BM+3,+6"JK† "W","NU6E2NU1F2U6;BM+3,6"Js† "X","U1E4U1;BM-4,0;D1F4D1;BM+3,0"Jš† "Y","BM+0,-6;D2F2ND2E2U2;BM+3,6"JЙ"† "Z","NR4U1E4U1L4;BM+7,6"Jи,† "-","BM+0,-3;R4;BM+3,+3"B$ГL$(0)ЋL$(0):„… LXГ2 Ї B$ГL$(0)ЋL$џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЬС8:Л(136,96)Ќ(244,150),Н:Л(152,93)Ќ(255,144),Н:У(188,117),8,8A’жС7:Л(146,93)Ќ(248,144),Н:ЛЌ(240,144),Н:ЛЌ(138,93),Н:ЛЌ(146,93),Н:У(196,120),7,7AбрС8:Л(136,75)Ќ(236,25),Н:Л(152,78)Ќ(246,31),Н:У(188,54),8,8B"ъС7:Л(238,26)Ќ(246,26),Н:ЛЌ(145,77),Н:ЛЌ(138,77),Н:ЛЌ(240,26),Н:У(188,54),7,7B_єС8:Л(118,96)Ќ(14,148),Н:Л(99,93)Ќ(3,141),Н:У(64,117),8,8BАўС7:Л(116,94)Ќ(17,144),Н:ЛЌ(10,144),Н:ЛЌ(110,94),Н:ЛЌ(116,94),Н:У(48,126),7,7BЮС6:Л(9 ,25)Ќ(247,145),Н,BBщЛ(10,25)Ќ(246,145),Н,BCУ(10,146),5,6:У(4,140),5,6:У(248,140),5,6C4&С5:Л(8,25)Ќ(246,145),Н,BC—0A$Г"UNITED KINGDOM":B$Г"S8C8BM40,165":І 5080:A$Г"-ENGLAND-":B$Г"S8C8BM73,185":І 5080:Ѕ 1960CЌ::ƒ UNITED STATESCТDШ4,1:М0:П1,1:Ш3,1DNС8:Л(10,25)Ќ(245,150),Н,BF:С7:€ YГ34.6 Ѕ 141 Љ9.6:Л(11,Y)Ќ(244,Y),Н:‹ YDSXС7:Л(10,25)Ќ(245,150),Н,B:€ YГ30.6 Ѕ 146 Љ 19.2:У(128,Y),7,7:‹ YDqbС6:Л(10,25)Ќ(108,92),Н,BFDlС5:Л(10,25)Ќ(245,150),Н,BDдv€ YГ31 Ѕ 94 Љ 14:€ XГ18 Ѕ 98 Љ 16:Н(X,Y,8):… XД96 Ї Н(XЋ8,YЋ8,8)D X,YEAŠA$Г"UNITED STATES OF":B$Г"C6S8BM18,168":І 5080:A$Г"AMERICA":B$Г"C7S8BM87,188":І 5080:Ѕ 1960EH”:ƒEOž:ƒEЈ… JPГ1 Ї 220 :„ K$Гџ’:… K$Г"" Ї 1960 :„ Ѕ 80EЖˆ:ƒ ***CHRACTER GEN.<2>*** *SUBROUTINE*EН’:ƒFœ:ƒSUBROUTINE MAIN PROGRAM BY J.S.PARAVATI DATA FROM TRS-80 MICROCOMPUTER NEWS 4/82F#І:ƒF7АŒ X$(28),Y$(28)FFК€ NГ1 Ѕ 28FXФ X$(N),Y$(N)FbЮ‹ N:FkиЦ B$F~т€ JГ1 Ѕ џ‡(A$)Fь€ LГ1 Ѕ 28FЎі… џ(A$,J,1)ГX$(L) Ї Ц Y$(L)FЖ‹ LFО ‹ JFФFз† " ","BM+7,0"Fј(† "A","U4E2F2D2NL4D2;BM+3,0"G!2† "B","U6R3F1D1G1NL3F1D1G1L3;BM+7,0"GT<† "C","BM+1,-0;H1U4E1R2F1;BM+0,+4;G1L2;BM+6,0"GtF† "D","U6R3F1D4G1L3;BM+7,0"G•P† "E","NR4U3NR2U3R4;BM+3,+6"GГZ† "F","U3NR2U3R4;BM+3,+6"Gыd† "G","BM+1,-0;H1U4E1R2F1;BM+0,+2;NL1D2G1L2;BM+6,0"H n† "H","U3NU3R4NU3D3;BM+3,0"H3x† "I","BM+1,0;R1NR1U6NL1R1;BM+4,+6"H\‚† "J","BM+0,-1;F1R1E1U5NL1R1;BM+3,6"H|Œ† "K","U3NU3R1NE3F3;BM+3,0"H˜–† "L","NU6R4U1;BM+3,+1"HЗ † "M","U6F2ND1E2D6;BM+3,0"HкЊ† "N","U6F1D1F2D1F1NU6;BM+3,0"IД† "O","BM+1,0;H1U4E1R2F1D4G1L2;BM+6,0"I%О† "P","U6R3F1D1G1L3;BM+7,3"IXШ† "Q","BM+1,0;H1U4E1R2F1D3G1NH1NF1G1L1;BM+6,0"I}в† "R","U6R3F1D1G1L2NL1F3;BM+3,0"IАм† "S","BM+0,-1;F1R2E1U1H1L2H1U1E1R2F1;BM+3,+5"Iдц† "T","BM+2,+0;U6NL2R2;BM+3,+6"Iћ№† "U","BM+0,-1;NU5F1R2E1U5;BM+3,6"J+TьС2:Л(10,25)Ќ(245,150),Н,BF:С 3:Л(10,99)Ќ(246,123),Н,BF:С4:Л(10,124)Ќ(246,150),Н,BF8ˆіA$Г"COLOMBIA":B$Г"S8C3BM80,175":І 5080:Ѕ 19608™:ƒCOSTA RICA9 ‡:ž0:€ YГ4 Ѕ 7:€ XГ2 Ѕ 61:œ(X,Y,3):œ(X,YЋ4,5):œ(X,YЋ8,4):œ(X,YЋ12,4):œ(X,YЋ16,5):œ(X,YЋ20,3):‹ X,Y9!‡ @492,"COSTA RICA";:Ѕ 196097:ƒ CZECHOSLOVAKIA9I(Ш 3,1:М6:П1,19ƒ2С5:Л(10,25)Ќ(245,150),Н,BF:С8:Л(10,90)Ќ(245,150),Н,BF9Ф<С7:Л(10,25)Ќ(100,90),Н:ЛЌ(10,150),Н:ЛЌ(10,25),Н:У(44,90),3,39ўFA$Г"CZECHOSLOVAKIA":B$Г"S8C5BM35,175":І 5080:Ѕ 1960: P:ƒDENMARK:ŸZ‡:ž4:€ XГ2 Ѕ 61:œ(X,16,5):‹ X:€ YГ4 Ѕ 26:œ(20,Y,5):‹ Y:€ YГ0 Ѕ 31:€ XГ0 Ѕ 2:(X,Y):(XЋ61,Y):‹ X,Y:€ YГ0 Ѕ 3:€ XГ0 Ѕ 63:(X,Y):(X,YЋ28):‹ X,Y:Нd‡ @493,"DENMARK";:Ѕ 1960:Ыn:ƒFINLAND:мxШ3,1:М6:П1,1;A‚С5:Л(10,25)Ќ(245,150),Н,BF:Ц"S4C7BM10,81;R58BR14R162D14L162BL14L58U14BR58U56R14D56BD14D56L14U56";RŒУ(76,90),7,7;…–A$Г"FINLAND":B$Г"S8C5BM84,175":І 5080:Ѕ 1960;’ :ƒFRANCE;иЊ‡:ž2:€ YГ4 Ѕ 24:€ XГ2 Ѕ 20:œ(X,Y,3):œ(XЋ21,Y,5):œ(XЋ41,Y,4):‹ X,Y;ѕД‡ @493,"FRANCE";:Ѕ 1960<О:ƒWEST GERMANYШ3,1:М5:П1,1=ŒС7:Л(10,25)Ќ(245,150),Н,B:Л(10,32)Ќ(245,50),Н,BF:Л(10,144)Ќ(245,126),Н,BF=С"Л(128,60)Ќ(100,105),Н:ЛЌ(155,105),Н:ЛЌ(128,60),Н>,Л(128,118)Ќ(100,75),Н:ЛЌ(156,75),Н:ЛЌ(128,118),Н:У(128,190),6,7>76A$Г"ISRAEL":B$Г"S8C5BM90,175":І 5080:Ѕ 1960>C@:ƒITALY>‰J‡:ž3:€ YГ4 Ѕ 24:€ XГ4 Ѕ 21:œ(X,Y,1):œ(XЋ19,Y,5):œ(XЋ38,Y,4):‹ X,Y>ЅT‡ @493,"ITALY";:Ѕ 1960>Б^:ƒJAPAN>ЦhШ4,1:М:П1,1:Ш3,1?rС8:Л(10,25)Ќ(245,150),Н,BF:С7:Т(128,90),40,,.9:У(128,90),7,7?8|A$Г"JAPAN":B$Г"S8C7BM98,175":І 5080:Ѕ 1960?U†:ƒENGLAND-UNITED KINGDOM?jШ4,1:М:П1,1:Ш3,1?аšС6:Л(10,25)Ќ(246,145),Н,BF:Ц"S4C7BM122,25;D55L112D10R112D55R12U55R112U10L112U55L12":У(128,90),7,7@CЄС8:Ц"S4C8BM121,25;ND52L1D52BD1L110D1R110BR1BD13D53L1U53L110U1R110BR14D53R1U53R110D1L110BU13R110U1L111U53R1D53"@aЎС8:Л(10,25)Ќ(246,145),Н,B@ЏИС8:Л(16,25)Ќ(122,78),Н:ЛЌ(100,78),Н:ЛЌ(10,33),Н:У(108,72),8,8:Н(123,78,4)@ќТС7:Л(10,26)Ќ(115,78),Н:ЛЌ(106,78),Н:ЛЌ(10,30),Н:ЛЌ(10,26),Н:У(80,63),7,7A>(245,66),Н/#ВЛ(10,107)Ќ(245,107),Н/RМУ(128,38),7,5:У(128,145),7,5:У(128,96),5,5/‡ЦA$Г"ARGENTINA":B$Г"C5S8BM75,170":І 5080:Ѕ 1960/˜а:ƒ AUSTRALIA/БкШ4,1:М:П 1,1:Ш3,1:С6/ЬфЛ(10,25)Ќ(245,150),Н,B/їюС 8:Л(10,25)Ќ(125,94),Н,B:У(15,90),7,80/јЦ"S4C8BM64,26;D30NL54BD7NL54D30R7U30NR54BU7NR54U30"0FЛ(10,25)Ќ(65,56),Н0] Л(10,29)Ќ(61,56),Н0uЛ(125,25)Ќ(72,55),Н0 Л(125,29)Ќ(76,55),Н0Ѕ*Л(72,63)Ќ(124,93),Н0Н4Л(72,67)Ќ(120,93),Н0д>Л(64,63)Ќ(12,93),Н0ыHЛ(64,67)Ќ(16,93),Н0ќRУ(68,90),7,71’\У(48,33),6,8:У(20,42),6,8:У(80,36),6,8:У(108,51),6,8:У(104,75),6,8:У(80,84),6,8:У(48,84),6,8:У(28,72),6,8:С6:Л(10,25)Ќ(125,94),Н,B:У(136,120),6,62+fС 8:Т(68,120),8:У(68,120),8,8:Т(195,141),5:У(195,141),8,8:Т(195,33),5:У(195,33),8,8:Т(148,87),5:У(148,87),8,8:Т(232,87),5:У(232,87),8,8:Т(216,108),32`pA$Г"AUSTRALIA":B$Г"C7S8BM75,170":І 5080:Ѕ 19602oz:ƒ AUSTRIA2„„‡:ž 3:€ YГ4 Ѕ 112“Ž€ XГ2 Ѕ 612Н˜œ(X,Y,4):œ(X,YЋ8,5):œ(X,YЋ16,4):‹ X,Y2лЂ‡ @492,"AUSTRIA";:Ѕ 19602ъЌ:ƒ BELGIUM38Ж‡:ž 6:€ YГ4 Ѕ 24:€ XГ4 Ѕ 21:(X,Y):œ(XЋ19,Y,2):œ(XЋ38,Y,4):(X,YЋ1):‹ X,Y3VР‡ @493,"BELGIUM";:Ѕ 19603eЪ:ƒ BOLIVIA3Ћд‡:ž 5:€ YГ4 Ѕ 11:€ XГ2 Ѕ 61:œ(X,Y,4):œ(X,YЋ8,2):œ(X,YЋ16,1):‹ X,Y3Що‡ @492,"BOLIVIA";:Ѕ 19603зш:ƒ BRAZIL3ыђШ 3,1:М 2:П 1,04 ќС 1:Л(10,25)Ќ(245,150),Н,B4#Л(128,40)Ќ(228,90),Н45ЛЌ(128,140),Н4EЛЌ(28,90),Н4V$ЛЌ(128,40),Н4l.Т(128,90),30,3,.94t8С 34BЛ(107,76)Ќ(156,90),Н4ІLЛ(105,80)Ќ(154,94),Н4еVУ(124,98),3,3:У(124,80),3,3:У(128,144),1,15c`С 2:Т(116,105),5,,.9:Т(108,99),3:Т(140,81),4:Н(104,97):Н(106,99):Н(120,90):Н(128,99):Н(132,103):Н(140,108):Н(144,112):Н(104,90):Н(144,99)5•jA$Г"BRAZIL":B$Г"S8C1BM90,175":І 5080:Ѕ 19605Ђt:ƒCANADA5Д~Ш 3,1:М6:П1,15ЯˆЛ(10,25)Ќ(245,150),Н,B5ъ’Л(72,25)Ќ(184,150),Н,B69œУ(28,147),8,8:У(220,147),8,8:У(128,147),5,8:С 5:Л(72,25)Ќ(184,150),Н,B:С 86ЙІЛ(128,40)Ќ(118,50),Н:ЛЌ(108,42),Н:ЛЌ(120,75),Н:ЛЌ(108,68),Н:ЛЌ(104,72),Н:ЛЌ(92,68),Н:ЛЌ(100,78),Н:ЛЌ(78,75),Н:ЛЌ(116,114),Н7FАЛЌ(104,120),Н:ЛЌ(128,117),Н:ЛЌ(128,138),Н:ЛЌ(130,138),Н:ЛЌ(130,117),Н:ЛЌ(152,120),Н:ЛЌ(140,111),Н:ЛЌ(180,75),Н:ЛЌ(156,78),Н:ЛЌ(168,69),Н7˜КЛЌ(152,72),Н:ЛЌ(148,69),Н:ЛЌ(140,75),Н:ЛЌ(152,44),Н:ЛЌ(140,51),Н:ЛЌ(128,40),Н7ЋФУ(128,108),8,87нЮA$Г"CANADA":B$Г"S8C5BM90,175":І 5080:Ѕ 19607ьи:ƒCOLOMBIA7§тШ 3,1:М:П1,08SRestore U register88ѕdSTSSTACK,PCR Save stack pointer8YѕnJMP[8,S] Return to caller8_ѕx­8eѕ‚­8ѕŒ­If an error occurs, control will pass8Гѕ–­to our error handling routine8Йѕ ­8гѕЊERRORLSRBBГError code8юѕДINCBDivide by 2, add 19 ѕОBRAEXITGo to exit routine9ѕШ­9ѕв­9Dѕм­If the function is completed properly,9cѕц­control will pass to DONE9iѕ№­9‰ѕњDONECLRBZero means no error9ЇіBRAEXITGo to exit routine9­і­9Гі­9пі"­Routine to restore registers and error:і,­vector, and return to the calling program:і6­:7і@EXITLDASAVE,PCR Restore the:WіJLDUSAVEЋ1,PCR Error vector:vіTSTA$18E To its original:‹і^STU$18F Value:ДіhLDSSTACK,PCR Restore stack pointer:кіrPULSA,DP,U,Y,X Restore registers:јі|LEAS2,SClean up the stack;і†TSTBSet flags if no error;.іRTSReturn to caller;4іš­;_іЄ­Your program supplies the label START;jіЎŠSTART0;U6;R6;D3;L6;BM+12,+3;U6;R6;D3;L6;R3;F3;BM+6,+0;R6;U6;L6;D6";дd’ 65494,0:JГџ(0):…JВ41ЇCXГ216:Ѕ1400;ьn…JВ21ЇCXГ144:„CXГ48<+xХ(CX,180)Ќ(CXЋџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџColor Basic is required)/5ёў­ XГAddress of filename/Mђ­ YГFirst address/dђ­ UГLast address/€ђ­ DГExecution address/†ђ&­/ђ0˜MLBSRBEGINPrepare/Лђ:PSHSY,D,USave information/нђDLBSRFNAMEProcess the filename/ўђNPULSU,D,YRestore information0&ђXLEAXDONE,PCR When save is complete0GђbPSHSXControl will go to DONE0cђlPSHSYPush start address0ђvSTY$1E7Save start address0›ђ€PSHSUPush end address0ЙђŠPSHSDPush execute address0йђ”STD$1E5Save execute address0ѕђžJMP$833DGo save program0ћђЈ­1ђВ­10ђМ­Routine to control tape recorder:ƒs motor1JђЦ­ BГFF (Turn it on)1eђа­ BГ0 (Turn it off)1kђк­1ђфŸLBSRBEGINPrepare1˜ђюTSTBTurn on motor‡1КђјBNEMOTORNIf so, go turn it on1иѓJSR$A7EBGo turn off motor1іѓ LBRADONEFunction complete2ѓŸNJSR$A7CAGo turn on motor23ѓ LBRADONEFunction complete29ѓ*­2?ѓ4­2jѓ>­Routine to control the cassette audio2„ѓH­ BГFF (Turn it on)2ŸѓR­ BГ0 (Turn it off)2Ѕѓ\­2ЛѓfЁLBSRBEGINPrepare2жѓpTSTBTurn on the audio‡2јѓzBNEAUDIONIf so, go turn it on3ѓ„JSR$A974Go turn off audio34ѓŽLBRADONEFunction complete3Qѓ˜ЁNCLRBMust clear B first3nѓЂJSR$A99DGo turn on audio3ŒѓЌLBRADONEFunction complete3’ѓЖ­3˜ѓР­3ХѓЪ­The routines below are for internal use3ёѓд­only, and are not to be called by your4ѓо­program directly!4ѓш­4ѓђ­47ѓќ­Routine to process a filename4=є­4^єЬAMESTB$68Set display status4|єLDU#$1D1Name storage area4”є$CLR,UЋName lengthГ04Гє.LDB#$20џŠII code for blank4Ює8•STB,UЋClear name area4эєBCMPU#$1DAEnd of name area‡5єLBLOCLEARLoop back until done5-єVLDU#$1D2Start of name area5Pє`NAMELDB,XЋGet part of filename5pєjCMPB#$20A null or CЎR marks5єtBLORETURNEnd of the name5Ћє~STB,UЋStore the character5ЬєˆINC$1D1Increment name length5ђє’CMPU#$1DALoop back if we haven:ƒt6єœBLONAMEExceeded maximum length6.єІRTSReturn to caller64єА­6:єК­6^єФ­Routine to prepare everything:6єЮ­(Save registers, set up error vector, etc.)6•єи­6НєтBEGINPSHSX,Y,U,DP,A Save registers6зєьCLRAROM routines need6єєіTFRA,DPThe DP to be zero7ѕLDA$18EGet the contents7/ѕ LDU$18FOf the error vector7NѕSTASAVE,PCR And save it7iѕSTUSAVEЋ1,PCR For now7ƒѕ(LDA#$7E Now set up7Єѕ2LEAUERROR,PCR Error vector7МѕёЄLBSRFNAMEProcess the filename.^ёЎJSR$A648Do some of the work.wёИPULSXPut offset in X.”ёТJSR$A511Load the program.ВёЬLBRADONEFunction complete.Иёж­.Оёр­.юёъ­Routine to save a machine language program/ёє­ (Extended џ$й&/ :ƒ ***FLAGS*** BY J.S.PARAVATI 12/82&Zž:‡ @7,"***COLOR TEST***":‡ џЁ(32,"*")'!‡:‡ "PRESS ANY KEY. IF SCREEN IS NOT BLUE PRESS RESET BUTTON ON BACK OF COMPUTER AND RE-RUN PROGRAM. DO THIS UNTIL SCREEN IS BLUE.":‡ "WHEN SCREEN IS OK(BLUE) THEN PRESS ANY KEY TO CONTINUE."'8(K$Гџ’:… K$Г"" Ї 40'P2Ш4,1:М:П1,1:Ш3,1:М6'gAFGHANISTAN","<13>CZECH"'јn‡ "<2>ALBANIA","<14>DENMARK"(x‡ "<3>ALGERIA","<15>FINLAND"(;‚‡ "<4>ARGENTINA","<16>FRANCE"(`Œ‡ "<5>AUSTRALIA","<17>GERMANY(W)(€–‡ "<6>AUSTRIA","<18>GREECE"(  ‡ "<7>BELGIUM","<19>ISRAEL"(ПЊ‡ "<8>BOLIVIA","<20>ITALY"(нД‡ "<9>BRAZIL","<21>JAPAN")О‡ "<10>CANADA","<22>ENGLAND (UK)";)%Ш‡ "<11>COLOMBIA","<23>U.S.A")Kв‡ "<12>COSTA RICA","<0>AUTOMATIC")vм… JPГ1 Ї KГKЋ1:€ TГ1 Ѕ 2000:‹ T:Ѕ 250)Иц‰ "ENTER NUMBER FOR FLAG. TO RETURN TO MENU PRESS ANY KEY ";K)Э№… KГ0 Ї JPГ1:KГ1)рњ… KВ23 Ї Ѕ 80*Vˆ K Ѕ 290,400,560,660,730,900,950,980,1010,1150,1250,1290,1320,1370,1400,1450,1480,1510,1550,1610,1640,1680,1860*p:ƒ GRAPHICS FOR FLAGS*ƒ:ƒ AFGHANISTAN*Œ"‡:ž2*›,€ YГ4 Ѕ 10*Њ6€ XГ2 Ѕ 61*Ю@(X,YЌ1):œ(X,YЋ7,4):œ(X,YЋ14,1)*иJ‹ X,Y+ T‡ @67,џ‹(134Ћ16)Ћџ‹(128)Ћџ‹(128)Ћџ‹(137Ћ16);+:^‡ @99,џ‹(137Ћ16)Ћџ‹(128)Ћџ‹(128)Ћџ‹(134Ћ16);+\h‡ @132,џ‹(140Ћ16)Ћџ‹(140Ћ16);+~r‡ @100,џ‹(132Ћ16)Ћџ‹(136Ћ16);+ |‡ @491,"AFGHANISTAN";:Ѕ 1960+Џ†:ƒ ALBANIA+И‡:ž2+Чš€ YГ4 Ѕ 24+жЄ€ XГ2 Ѕ 61+уЎœ(X,Y,4)+эИ‹ X,Y,Т‡ @175,џ‹(130Ћ48)Ћџ‹(143Ћ48)Ћџ‹(129Ћ48);,DЬ‡ @207,џ‹(138Ћ48)Ћџ‹(128)Ћџ‹(133Ћ48);,‡ж‡ @238,џ‹(137Ћ48)Ћџ‹(143Ћ48)Ћџ‹(143Ћ48)Ћџ‹(143Ћ48)Ћџ‹(134Ћ48);,Бр‡ @269,џ‹(137Ћ48);:‡ @275,џ‹(134Ћ48);,еъ‡ @240,џ‹(128);:‡ @272,џ‹(128);,џє‡ @303,џ‹(137Ћ48);:‡ @305,џ‹(134Ћ48);-ў‡ @336,џ‹(131Ћ48);-f‡ @206,џ‹(134Ћ48);:‡ @210,џ‹(137Ћ48);:‡ @173,џ‹(134Ћ48);:‡ @179,џ‹(137Ћ48);-tœ(32,6,2)-’‡ @493,"ALBANIA";:Ѕ 1960-Ё&:ƒ ALGERIA-И0Ш 3,1:М7:П 1,1:С 6-г:Л(10,25)Ќ(245,150),Н,B-эDЛ(128,25)Ќ(128,150),Н.NУ(50,140),6,6:У(140,140),5,6.+XТ(135,82),24,8,1,.12,.88.GbТ(128,82),30,8,1,.1,.90.]lУ(104,81),4,4:С 4.{vТ(140,81),7:У(140,81),4,4.Ў€A$Г"ALGERIA":B$Г"S8C5BM85,170":І 5080:Ѕ 1960.ПŠ:ƒ ARGENTINA.ж”Ш 3,1:М6:П 1,1:С 5.ёžЛ(10,25)Ќ(245,150),Н,B/ ЈЛ(10,66)Ќџn>:ƒRAINDROP>#:ƒBY MIKE HALL>>:ƒ3019 SYLVESTER DRIVE>W:ƒHARTLAND, WI 53029>‡ :ƒDELETE LINE 110 FOR A REALLY NEAT EFFECT!>Ž Р8>Ѓ€XГ1Ѕ8:Ш0,X:М:‹X>зž:‡"PLEASE WAIT WHILE THE raindrop IS CREATED">ч(€XГ1Ѕ8:Ш0,X>њ2€YГX­2Ѕ180 Љ16? <Т(128,96),Y?F‹Y:TГџ„(255)?1PЩ"T"Ћџˆ(T)Ћ";ABC"?8Z‹X?Md€XГ1Ѕ8:Ш0,X:П1,1?\n€ZГ1Ѕ30:‹Z?cx‹X?m‚Ѕ100,82,71,46,21,10,3,0'Щd† 3,18,37,60,97,134,157,176,191,194,191,176,157,134,97,60,37,18,3(n† 3,21,47,78,123,168,199,225,243,250,243,225,199,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџZ>:ƒQUADDRAW>#:ƒBY MIKE HALL>>:ƒ3019 SYLVESTER DRIVE>W:ƒHARTLAND, WI 53029>g Ш4,1:М:П1,1>vXГ128:YГ96>ŠJГџ(0):KГџ(1)>š(…JГ0 ЇXГXЌ1>Ћ2…JГ63 ЇXГXЋ1>Л<…KГ0 ЇYГYЌ1>ЬF…KГ63 ЇYГYЋ1>мP…XД0 ЇXГ255>ьZ…XВ255 ЇXГ0>ќd…YД0 ЇYГ191? n…YВ191 ЇYГ0?xН(X,Y,1)?*‚Н(X,191ЌY,1)??ŒН(255ЌX,191ЌY,1)?P–Н(255ЌX,Y,1)?Y Ѕ30?cx‹X?m‚Ѕ100,82,71,46,21,10,3,0'Щd† 3,18,37,60,97,134,157,176,191,194,191,176,157,134,97,60,37,18,3(n† 3,21,47,78,123,168,199,225,243,250,243,225,199,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8ˆ T Ѕ 57,58,57,58J[9ICГLC(0)ЌNЋџ(NЎLC(0))­LC(0):… ICГLC(0) Ї  :„ €IГ1Ѕ IC:ЂA(T):‹I:JЁ:ICГLC(1)ЌNЋџ(NЎLC(1))­LC(1):… ICГLC(1) Ї  :„ €IГ1ЅIC:ЂA(T):‹I:K;B$Г"":S$Гџˆ(S):LXГџ‡(S$):… LXГ4 Ї B$ГL$(0):„… LXГ3 Ї B$ГL$(0)ЋL$(0):„… LXГ2 Ї B$ГL$(0)ЋL$(0)ЋL$(0)K€<€IГ2ЅLX:B$ГB$ЋL$(џ‰(џ(S$,I,1))):‹I:… IHГ1 Ї61 :„ Х(107,91)Ќ(185,97),XM,Н:Ц"BM107,91;XN$;BM143,91;XB$;XL$(0);":Ѕ62KЩ=Х(107,81)Ќ(185,87),XM,Н:Ц"BM107,81;XNX$;BM143,81;XB$;XL$(0);":IHГ0:Kї>… SXВГS Ї  :„ IHГ1:SXГS:SГSX:NX$ГN$:Ѕ59L?ˆ T Ѕ 64,65,66,67,72LŒ@Ф(82,103)Ќ(92,111),P,G:’ADЋ301,0:’ADЋ302,8:’ADЋ303,53:’ADЋ304,30:DXГ5:DYГ8:LBГ10:UBГ175:STГ1:Х(30,10)Ќ(40,18),P,Н:Ѕ68M/AФ(82,113)Ќ(92,121),P,G:’ADЋ301,1:’ADЋ302,125:’ADЋ303,176:’ADЋ304,140:DXГ11:DYГ4:LBГ65:UBГ180:STГ1:Х(64,140)Ќ(74,148),P,Н:… DFГ4 Ї Т(152,138),10,1:Ѕ68 :„ Ѕ68MДBФ(138,103)Ќ(148,111),P,G:’ADЋ301,0:’ADЋ302,192:’ADЋ303,237:’ADЋ304,220:DXГ5:DYГ0:LBГ174:UBГ8:STГЌ1:Х(220,174)Ќ(230,182),P,Н:Ѕ68N0CФ(138,113)Ќ(148,121),P,G:’ADЋ301,1:’ADЋ302,18:’ADЋ303,55:’ADЋ304,38:DXГ0:DYГ4:LBГ181:UBГ64:STГЌ1:Х(181,38)Ќ(191,46),P,БNIDXDГ82:… TВ2 Ї XDГ138NoEYDГ103:… (TЎ2Ќџ(TЎ2))Г0 Ї YDГ113OGFХ(69,98)Ќ(75,122),XM,Н:Ц"BM69,98;XL$(28);BM69,106;XL$(14);BM69,114;XL$(35);":€IГ0Ѕ20:Х(XD,YD)Ќ(XDЋ10,YDЋ8),P,Ј:  џ„(235),1:Х(XD,YD)Ќ(XDЋ10,YDЋ8),P,Н:‹I:Х(69,98)Ќ(76,122),XM,Н:Ц"BM69,98;XL$(17);BM69,106;XL$(25);"OMGOИH… (SЌRS)ВГ0 Ї 73 :„ Х(69,98)Ќ(75,122),XM,Н:Ц"BM69,98;XL$(15);BM69,106;XL$(24);BM69,114;XL$(14);":NГ0:P0IRSГRSЋ540:Х(69,98)Ќ(75,122),XM,Н:Ц"BM69,98;XL$(12);BM69,106;XL$(24);BM69,114;XL$(29);":TГ1:€IГ1Ѕ200 Љ4: I,1:‹I:Ѕ63PtJ‚ MARATHON FROM afabear software BY JOHN FRAYSSE COPYRIGHT 19833">Ж P† "Q","BM+1,0;H1;U4;E1;R2;F1;D3;G1;NH1;NF1;G1;L1;BM+6,0">т Z† "R","U6;R3;F1;D1;G1;L2;NL1;F3;BM+3,0"? d† "S","BM+0,-1;F1;R2;E1;џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ+3,-6":L$(24)Г";D6U6F6U6;BM+3,0":L$(25)Г";R6D6L6U6;BM+9,0":L$(26)Г";R6D3L6U3D6;BM+9,-6":L$(27)Г";R6D6H3F3L6U6;BM+9,0":L$(28)Г";R6D4L2F2H2L4D2U6;BM+9,0":L$(29)Г";R6L6D3R6D3L6;BM+9,-6":L$(30)Г";R6L3D6;BM+6,-6"BГ+L$(31)Г";D6R6U6;BM+3,0":L$(32)Г";D3F3E3U3;BM+3,0":L$(33)Г";D6E3F3U6;BM+3,0":L$(34)Г";F6H3G3E6;BM+3,0":L$(35)Г";F3E3G3D3;BM+6,-6":L$(36)Г";D1U1R6G6R6U1;BM+3,-5":L$(10)Г";BM+4,0":L$(37)Г";ND1R4D1G2BD2D1":Ф(195,54)Ќ(211,62),H,GC™,Ц"BM84,81C1;XL$(18);XL$(19);BM143,81;XL$(0);XL$(0);XL$(0);XL$(0);XL$(0);BM84,91;XL$(19);XL$(14);BM143,91;XL$(0);XL$(0);XL$(0);XL$(0);XL$(0);BM100,104;XL$(29);XL$(22);XL$(15);XL$(14);BM155,104;XL$(11);XL$(31);XL$(30);XL$(25);"Dy-Л(88,69)Ќ(169,77),Н,BF:Ц"BM100,114;XL$(16);XL$(22);XL$(35);BM155,114;XL$(29);XL$(31);XL$(12);BM94,70C0;XL$(23);XL$(11);XL$(28);XL$(11);XL$(30);XL$(18);XL$(25);XL$(24);C1;BM185,145NH2NE2BG4NH2E2":Х(208,130)Ќ(224,138),H,НEf.Ф(117,150)Ќ(123,156),M,G:Ф(83,135)Ќ(97,144),B,G:Ф(205,150)Ќ(215,163),H,G:Ф(38,76)Ќ(58,87),TR,G:RSГ500:TX(0)Г33:TY(0)Г17:TX(1)Г11:TY(1)Г130:TX(2)Г40:TY(2)Г125:MX(0)Г122:MY(0)Г45:MX(1)Г165:MY(1)Г32:MX(2)Г95:MY(2)Г40:HX(0)Г220:HY(0)Г13F3/HX(1)Г221:HY(1)Г46:HX(2)Г222:HY(2)Г88:BX(0)Г165:BY(0)Г156:BX(1)Г125:BY(1)Г167:BX(2)Г101:BY(2)Г141:A(1)ГADЋ177:A(2)ГADЋ126:A(3)ГADЋ239:A(4)ГADЋ73:LC(0)Г88:LC(1)Г64:Х(71,26)Ќ(77,32),M,Н:П1,1:€IГ0Ѕ700:‹IF€0… џ’Гџ‹(32) Ї 49 :„ Щ"V31T255L255O5A":ЂA(1):ЂA(2):ЂA(3):ЂA(4):NГNЋ1:Ѕ48FИ1TГ1:І56:TГ2:І56:TГ3:І56:TГ4:І56:І50:TГ1:І63:G;2N$Г"":IГ0:Х(68,88)Ќ(75,94),XM,Н:Х(69,98)Ќ(75,122),XM,Н:Ц"BM69,88C1;XL$(37);BM69,98;XL$(14);BM69,106;XL$(19);BM69,114;XL$(16);"Gп3Щ"V31T10L10O5AO1C":B$Гџ’:…B$Г""Ї51:„…џŠ(B$)Д49БџŠ(B$)В52Ї51:„DFГџ‰(B$):Х(68,88)Ќ(75,94),XM,Н:Ц"BM68,88;XL$(DF);":Х(107,91)Ќ(185,97),XM,Н:Х(69,98)Ќ(75,122),XM,НHV4Ц"BM69,98;XL$(28);BM69,106;XL$(31);BM69,114;XL$(12);BM102,91;XL$(37);BM143,91;XL$(0);XL$(0);XL$(0);XL$(0);XL$(0);"I5Щ"O5AO1C":B$Гџ’:… B$Г""Ї53:„… џŠ(B$)Д65 Б џŠ(B$)В90 Ї53:„ N$ГN$ЋL$(џŠ(B$)Ќ54):Ц"BM109,91;XN$;":IГIЋ1:…IГ3Ї Х(69,98)Ќ(75,122),XM,Н:Х(102,91)Ќ(108,97),XM,Н:Х(69,98)Ќ(75,122),XM,Н :„ 53IУ6… DFД2 Ї  :„ €IГ0Ѕ DFЌ2:Х(TX(I),TY(I))Ќ(TX(I)Ћ20,TY(I)Ћ11),TR,Н:Щ"L12O2AB":Х(MX(I),MY(I))Ќ(MX(I)Ћ6,MY(I)Ћ6),M,Н:Щ"L12O2AB":Х(HX(I),HY(I))Ќ(HX(I)Ћ10,HY(I)Ћ13),H,Н:Щ"L12O2AB"I§7Х(BX(I),BY(I))Ќ(BX(I)Ћ14,BY(I)Ћ9),B,Н:Щ"L12O2AB":‹I:J104,111,1108iCKГ0:€IГAD Ѕ ADЋ300:J:CKГCKЋJ:’I,J:‹I:… CKДВ31681 Ї ž:‡ "ERROR IN DATA STATEMENTS",CK;J:‘9e† 173,159,160,10,230,141,1,37,39,5,246,1,91,32,3,246,1,90,203,8,84,84,84,84,192,2,235,141,1,18,225,141,1,12,37,13,225,141,1,7,34,18,231,141,1,2,79,32,20,230,141,0,249,231,141,0,247,79,32,9,230,141,0,239,231,141,0,236,79,189,180,244,57,142,7,87,198:6 † 15,166,132,70,70,70,132,192,52,2,166,132,68,68,52,2,166,31,70,70,70,132,192,170,224,167,132,48,31,90,38,234,166,132,68,68,170,224,167,132,48,136,47,140,14,55,47,207,57,142,21,232,198,15,166,132,73,73,73:њ!† 132,3,52,2,166,132,72,72,52,2,166,1,73,73,73,132,3,170,224,167,128,90,38,236,166,132,72,72,170,224,167,132,48,136,17,140,29,40,38,209,57,142,7,1,198,7,166,128,52,2,90,38,249,48,136,25,140,7;а"† 65,38,239,142,7,65,198,7,166,128,167,136,191,90,38,248,48,136,25,140,29,1,38,238,142,28,232,198,7,53,2,167,130,90,38,249,48,136,231,140,28,168,38,239,57,142,28,248,198,7,166,128,52,2,90,38,249,48,136,217,140$&Œ L$(37),XM(13),P(2),PR(2),TR(6),B(3),H(3),M(1),EX(2),TX(2),TY(2),BX(2),BY(2),HX(2),HY(2),MX(2),MY(2),A(4),LC(1):Ц"BM125,50NH4NU4NE4NR4NF4ND4NG4NL4":Ф(120,46)Ќ(130,54),EX,G:Х(120,46)Ќ(130,54),XM,Н:Йџƒ0ГAD?'L$(1)Г"BM+2,0;R1D6L3R6;BM+3,-6":L$(2)Г";D1U1R6D3L6D3R6;BM+3,-6":L$(3)Г";R6D3L4R4D3L6;BM+9,-6":L$(4)Г";D3R6L1U3D6;BM+3,-6":L$(5)Г";R6L6D3R6D3L6U1;BM+9,-5":L$(6)Г";D6R6U3L6;BM+9,-3":L$(7)Г";D1U1R6D6;BM+3,-6":L$(8)Г";R6D6L6U3R6L6U3;BM+9,0"?ќ(L$(9)Г";R6D6U3L6U3;BM+9,0":L$(0)Г";R6D6L6U6;BM+9,0":L$(11)Г";BM+0,+6;U3E3F3L6R6D3;BM+3,-6":L$(12)Г";R6D3L6R6D3L6U6;BM+9,0":L$(13)Г"BM+6,+1;U1L6D6R6U1;BM+3,-5":L$(14)Г";R4F2D2G2L3U6L1D6;BM+9,-6":L$(15)Г";R6L6D3R3L3D3R6;BM+3,-6"@ф)L$(16)Г";R6L6D3R3L3D3;BM+9,-6":L$(17)Г";BM+6,+1;U1L6D6R6U3L3D1;BM+6,-4":L$(18)Г";BM+0,+0;D6U3R6U3D6;BM+3,-6":L$(19)Г";R6L3D6L3R6;BM+3,-6":L$(20)Г";R6L3D6L3U2;BM+9,-4":L$(21)Г";D6U1E5;BM+1,+6;H3F3;BM+3,-6":L$(22)Г";D6R6;BM+3,-6"AЮ*L$(23)Г";D6U6F3E3D6;BM),5,1,1,.5,.75/ИТ(85,140),5,1,1,.75,1:Т(83,144),7,1,1,.75,1:Т(97,144),7,1,1,.5,.75:Ц"BM218,72NU2E2F2E2F2E2F2U2BM27,160M43,160":€IГ0Ѕ9:Л(143ЋI,138ЋI)Ќ(152ЋI,129ЋI),Н:‹I:Т(152,138),9,10E€IГ232Ѕ104ЉЌ2:‡@I,B$;:‹I:B$Г"PRESENTS":€IГ428Ѕ172ЉЌ32:‡@I,B$;:‡@IЋ32,џ‹(191);џ‹(191);џ‹(191);џ‹(191);џ‹(191);џ‹(191);џ‹(191);џ‹(191);:‹I1&Ц"BM95,135M97,137BM85,135M83,137BM143,140M147,155NR10M150,160R4M157,155M161,140BM120,156D2BM125,129U2L5R10BM125,129M129,131R6L1U1D2U1L1M121,135NH1R9BM89,107L4R1U2L2U1R6D1L2D2":Т(129,158),9,1,1,.37,.5:Т(87,107),3,1,1,0,.52Ц"BM92,117NU1ND2L3H1L2D1L2U2L1D3R3NU2R6BM143,103NG1ND7F1D7L2U7D1L1R4BD5L4BL1BD1U2BU3U2BR6D2BD3D2BM138,117NE1NR9F1R7E2NU1ND1L5U2L2D2L1BM204,20NR12D2R1NU1D2L1D2R1NU2D6R2G2L1D2R1NU2D2R10U2R1U2L1NL10ND2H2R2U6R1U2L1ND2U2R1U2D2BM207,22D8R6U8L6"2њЦ"BM211,104D1L1D3R1D1L1D3R1D4L1D3R3D1R4U1R3U3L1U4R1U3L1U1R1U3L1U1L8BM220,116L10BU4M214,106R2M219,112L8BM233,135NR10D2R1D2L1D2R1D10L1D2R1D2R3D3L5D2R2D6L1D2R10U2L1U6R2U2L5U3R3U2R1U2L1U10R1U2L1U2R1U2":Т(111,158),9,1,1,0,.153ЧШ3:Ц"BM86,21C2R56BM171,21R18BM64,20C3M191,20":У(90,10),4,3:У(115,30),2,2:У(150,60),2,2:У(180,25),2,2:У(105,15),3,3:У(175,18),3,3:Ш4:€IГ0Ѕ80:Н(65Ћџ„(60)­2,22Ћџ„(43),0):‹I:Ц"BM75,12C0NH2E2BM150,12NH2E2"4€JГ0Ѕ14Љ2:C:€IГJЋ457 Ѕ JЋ265 ЉЌ32:‡@I,џ‹(C);:‡@IЋ32,џ‹(191);:‹I,J:Ц"BM120,62C1NL4R2M120,60M123,57M116,57H3G3L5M99,51M103,59M101,62M108,60M120,62":У(113,58),1,1:Н(119,58,0):Ц"BM108,59C0E1BR3G1"5ZЦ"BR3BG1E2C1":Ш3:Ц"BM245,8C2D60":У(242,35),2,2:У(198,95),2,2:Ш4:У(224,67),1,1:Н(222,68,0):Н(226,68,0):У(203,58),1,1:У(210,36),1,1:Ц"BM210,150C1F4L2D2R2D2L2D3R3D2L10U2R3U7L2E4BM201,59C0NH2BR3NH2BR3NH2"6У(240,145),1,1:У(210,155),1,1:У(210,118),1,1:У(215,118),1,1:Ц"BM237,138C0D15BR2U15BM208,154R4BD7L4BM236,162R4BD2L4C1":У(125,132),1,1:У(120,153),1,1:У(93,137),1,1:У(87,137),1,1:У(152,157),1,16иН(125,132,0):Ш3:У(80,170),3,3:У(170,178),3,3:У(47,85),3,3:У(145,180),3,3:У(30,107),2,2:У(42,113),2,2:У(35,113),2,2:Ш4:У(45,52),1,1:У(20,25),1,1:У(20,32),1,1:У(20,61),1,1:Т(45,50),2,078Ц"BM28,108NU5R2NU5E1U5BM40,110C1NE4ND10L20BM18,32C0R4BM63,60D8L1C1U8BM22,110D10":Н(20,25,0)7Э‡@367,"BY";:‡@426,"JOHN"Ћџ‹(191)Ћџ‹(191)Ћ"FRAYSSE";:‡@492,"1983"Ћџ‹(191)Ћ"(C)";:€IГ0Ѕ480Љ32:‡@I,џ‹(150);:‡@IЋ31,џ‹(150);:‹I:€IГ0Ѕ30:‡@I,џ‹(150);8 ‡@IЋ480,џ‹(150);:‹I:П0,1:† 109,97,114,97,116,џ*u&•360,23999:ADГ24000:І11&C… TГ5 Ї8 :„ … TГ1 Б TГ3 Ї 2 :„ 4'Х(џ†(ADЋ304),LB)Ќ(џ†(ADЋ304)Ћ10,LBЋ8),XM,Н:€NГLB Ѕ UB Љ ST:XГџƒ0(X):Ф(X,N)Ќ(XЋ10,NЋ8),PR,G:… џ (XЋDX,NЋDY)ДВ0 Б џ (XЋDXЋ1,NЋDY)ДВ0Ї6:„Х(X,N)Ќ(XЋ10,NЋ8),P,Б:Х(X,N)Ќ(XЋ10,NЋ8),PR,А:ЂA(T):Щ"V31T255L255O5A"'f‹N:NГџ‚(NЌLB):Щ"V31O2T2L4AL8O3DEF+L4EC+":SГSЋџ(N­.93):І56:І59:TГTЋ1:І63:Ѕ1( Х(LB,џ†(ADЋ304))Ќ(LBЋ10,џ†(ADЋ304)Ћ8),XM,Н:€NГLB Ѕ UB Љ ST:YГџƒ0(Y):Ф(N,Y)Ќ(NЋ10,YЋ8),PR,G:…џ (NЋDX,YЋDY)ДВ0Ї6:„ Х(N,Y)Ќ(NЋ10,YЋ8),P,Б:Х(N,Y)Ќ(NЋ10,YЋ8),PR,А:ЂA(T):Щ"T255L255O5A":‹N(qNГџ‚(NЌLB):SГSЋџ(N­.93):Щ"V31O2T2L4AL8O3DEF+L4EC+":І56:І59:TГTЋ1:І63:Ѕ1(š… TГ1 Б TГ3 Ї DXГX:DYГN :„ DXГN:DYГY)4€JГ0Ѕ3:Х(DX,DY)Ќ(DXЋ10,DYЋ8),EX,Б:Щ"V2L30T20O5":€IГ0Ѕ13:Щ"V+AA+V+":‹I:Х(DX,DY)Ќ(DXЋ10,DYЋ8),PR,А:‹J:NГџ‚(NЌLB):SГSЋџ(N­.93):І56:І59:TГTЋ1:І63:Ѕ1)… џ’Гџ‹(32) Ї 9 :„ Щ"V31T255L255O5A":ЂA(1):ЂA(2):ЂA(3):ЂA(4):NГNЋ1:Ѕ8*I RSГ500:SГ0:N$Г"":TГ1:І56:TГ2:І56:TГ3:І56:TГ4:І56:€IГ0Ѕ DFЌ2:Х(TX(I),TY(I))Ќ(TX(I)Ћ20,TY(I)Ћ11),XM,Н:Х(MX(I),MY(I))Ќ(MX(I)Ћ6,MY(I)Ћ6),XM,Н:Х(HX(I),HY(I))Ќ(HX(I)Ћ10,HY(I)Ћ13),XM,Н:Т(152,138),10,0*‰ Х(BX(I),BY(I))Ќ(BX(I)Ћ14,BY(I)Ћ9),XM,Н:‹I:І50:TГ1:І63:Ѕ1+m Ш3,1:М:Ц"BM1,2C2R252D187L252U187BM4,4C4R246D183L246U183BM8,6C3R239D179L239U179BM63,7D177BM192,184U177BM192,20M64,20BM85,20M105,10M125,20M135,15M145,20C2M130,35M115,45L5M85,20BM170,20C3E5F5M185,10M190,20C2M185,30G5H5M170,20"+Ъ ž4:B$Г"AFABEAR"Ћџ‹(191)Ћџ‹(191)Ћ"SOFTWARE"Ћџ‹(191)Ћџ‹(191):€IГ488Ѕ232 ЉЌ32:ž4:‡@I,B$;:‹I,Н Ц"BM62,68C2NU8R128M191,60L6M180,45M170,60M155,35L5M130,60M120,65M90,60M85,45M80,55M77,40L4M70,60L6BM64,78C3R128BD1L111D10NR111D10NR111BD3NR111D10NR111D10R111BM95,102D20BR41U20BR14D20BM67,86R10D10L10U10BM192,176L8M172,170M152,180BM154,184"-ИЦ"M149,174M129,184M109,174M99,179M94,169M89,174M81,150L4M68,176L4BM245,8C2M235,28D20M245,68BM194,70ND60M204,89D20M194,130BM49,76C3M45,78R2M43,80R4M41,83R6M39,87R20M51,83R6M51,80R4M51,78R2M49,76BM20,110C2NE5NR20D10R20NE5U10E5ND10L20BM28,120U5R4D5".pЦ"BM64,124C3R126":Ш4,1:Ц"BM43,160C1L2M32,145BR2M37,160L4M36,145BR2M29,160BM27,65L14R12M20,55M15,65BM20,59NL2NR2BD4NL4R4BM43,41M50,48M57,41BM15,36R10BU10BR1G3BL6H3BU4BR2R8L3U2L2D2"/ Т(20,25),3,1:Т(20,32),4,1:Т(50,48),10,1,1,.875,.625:Т(125,132),3,1,1,.25,.75:Т(120,153),3,1:Т(203,58),8,1,.5:Т(224,70),6,1,1,.5,1:Т(95,140џX&D :ƒ THIS PROGRAM WILL CREATE THE PROGRAM TO INITIALIZE TRACK 36&ˆ:ƒ AFTER YOU RUN IT TYPE SAVEM"INIT36.BIN",&H1000,&H11A6,&H1000&М:ƒ YOU CAN THEN TYPE LOADM"INIT36" AND EXEC IT.&а(€ XГ4096 Ѕ 4518&и2 A&т<’ X,A&ъF‹ X'd† 189,169,40,48,141,1,53,32,3,189'=n† 162,130,166,128,38,249,189,161,177,129'ex† 13,38,249,134,0,151,235,134,2,151'‚† 234,134,34,151,236,134,18,151,237,48'ЛŒ† 141,1,124,159,238,189,214,108,13,240'т–† 39,5,198,40,126,172,70,182,9,134(  † 138,16,183,255,64,134,83,183,255,72(7Њ† 30,136,30,136,189,214,222,38,229,189(_Д† 214,253,12,236,48,141,1,79,204,32(„О† 78,141,47,95,52,4,51,141,0,174(­Ш† 230,197,215,237,51,141,0,184,134,3(кв† 141,34,150,236,167,128,111,128,150,237)м† 167,128,134,9,141,20,53,4,92,193)(ц† 18,37,217,204,200,78,141,2,32,18)P№† 231,128,74,38,251,57,52,2,236,193)wњ† 141,244,53,2,74,38,245,57,16,142)ž† 255,75,26,80,190,9,131,182,9,130)У† 52,18,48,141,0,34,191,9,131,48)ь† 141,0,240,182,255,72,134,255,183,9*"† 130,134,244,183,255,72,182,9,134,138*C,† 128,183,255,64,166,128,167,164,32,250*k6† 53,18,191,9,131,183,9,130,182,255*•@† 72,28,175,132,124,151,240,16,38,255*НJ† 77,48,141,0,188,159,238,134,2,151*хT† 234,134,35,151,236,51,141,0,25,95+^† 166,197,151,237,189,214,108,13,240,16+:h† 38,255,45,92,193,18,37,238,189,169+[r† 40,126,192,0,1,12,5,16,9,2+{|† 13,6,17,10,3,14,7,18,11,4+š†† 15,8,8,0,3,245,1,254,1,1+Н† 1,247,22,78,12,0,3,245,1,251+сš† 0,255,1,247,24,78,32,32,32,32,Є† 32,32,73,78,73,84,73,65,76,73,)Ў† 90,69,32,84,82,65,67,75,32,51,MИ† 54,13,32,32,32,32,32,32,32,32,qТ† 66,89,58,32,72,65,82,82,89,32,•Ь† 72,65,82,68,89,13,13,32,32,32,Йж† 32,32,73,78,83,69,82,84,32,68,нр† 73,83,75,32,73,78,32,68,82,73-ъ† 86,69,32,48,13,13,32,32,32,32-%є† 32,72,73,84,32,69,78,84,69,82-Iў† 32,87,72,69,78,32,82,69,65,68-W† 89,13,0R6M39,87R20M51,83R6M51,80R4M51,78R2M49,76BM20,110C2NE5NR20D10R20NE5U10E5ND10L20BM28,120U5R4D5".pЦ"BM64,124C3R126":Ш4,1:Ц"BM43,160C1L2M32,145BR2M37,160L4M36,145BR2џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџХШСЧУ Ц ХУСФТТЧШ#СХЦЦ()ЦЦСХЧФ0У2С456Ф8ЦТХЩФЦџџџџџџMENU1083BAS"uMARATHONBAS xINIT36 BAS![HIDEDIR BAS$ЃSLOPAINTBAS%пFSTPAINTBAS&ёSHUTRBUGBAS'URAINDROPBASqQUADDRAWBAS]ILLUSIONBAS*TWIRLER BAS+єMLCASSETBASnFLAGS BASм178 POKEBAS,яLICENSE BAS-LICEN-LRBAS.CREATE BAS/dGLOMMER BAS1BLKJACK BAS3STATS BASoWRKSHEETBAS}DRAGBYTEBASCSKETCH BASšTUTORIALBAS7ШDISKDABLBIN9PMC10CONVBIN зTUMBRELABAS CMERGE BAS:ЌGRAFDUMPBAS;ЦGRAFDMP3BAS’IDENTKITBAS яCONVERT BAS<64KBASICBAS=hџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ r$ :ƒRAINBOW ON TAPE MONTHLY MENU7Ш3,1:М:П0,1:ž0ЊRB$Г"U8R4FD2GNL4FD3BR5U6E2R2F2D2NL6D4BR5NU8BR5U8F7NDU7BR5D8R4EU2HNL4EU2HNL4BR6NR4GD6FR4EU6HBR5D6F2E2NU4F2E2U6"ч(Т(256,130),168,3,.7,.50,.25:Т(256,126),142,3,.75,.50,.25џ2Ц"S4BM116,126C3L50"<У(100,124),3,3NF€IГ0Ѕ30Љ30:€YГ0Ѕ1:Т(256ЌI,130ЋY),168,2,.7,.50,.25:‹Y:‹IdPЦ"BM20,132C2R161"vZУ(75,130),2,2–dТ(256,130),257,4,.45,.5,.25ЖnТ(256,138),226,4,.56,.5,.25ЪxЦ"BM0,128C4R45"м‚У(15,126),4,4јŒЛ(0,126)Ќ(256,147),О,BF –Л(0,0)Ќ(256,192),О,B * Л(0,0)Ќ(256,22),О,BF iЊЦ"S20BM150,124C3R20EU10HL20GD10FR3UE2L5U7ER18FD7L5NL12F2D" …ДТ(176,90),8:Т(220,90),8 ГОЛ(176,82)Ќ(220,82),Н:Л(176,98)Ќ(220,98),Н ХШУ(176,70),3,3!вП1,1:€IГ1Ѕ8:R$Гџˆ(IЋ10)Ћ","Ћџˆ(IЋ168):Ц"S12BM"ЋR$Ћ"C4"ЋRB$:‹!мЦ"S12BM19,177C3"ЋRB$!\цШ3,1:П1,1:€IГ1Ѕ300:‹:П1,0:€IГ1Ѕ300:‹:П1,1:€ IГ1 Ѕ 500:‹I!b№ž!rњ• 200,16352!–€ RГ16352 Ѕ 16380: P:’ R,P:‹ R!ЅЙџƒ0Г16352!ж† 189, 179, 237, 31, 152, 142, 4, 0, 16, 142""† 4, 31, 237, 137, 1, 224, 237, 164, 49, 168"3,† 32, 237, 129, 140, 4, 32, 38, 240, 57"G6ž 4 :XГџƒ0(180)"d@‡@72, "RAINBOW ON TAPE";"uJ‡@142,"FOR";"T‡@201," OCTOBER 1983";"Љ^‡@426, "HIT A KEY.";"ИhXГџƒ0(180)"Ъr€ R Г 1 Ѕ I:‹"й|XГџƒ0(177)"ъ†€ TГ 1 Ѕ I:‹#… IВ1 Ї IГIЌ1 :„ IГ50#š… џ’Г"" Ї 360#Єž#;Ў‡" RAINBOW ON TAPE"#[И‡" (C) FALSOFT, 1983"#Ÿр‡ " (XX)=PAGE NUMBER OF LISTING IN OCTOBER'S RAINBOW"#Ѕъ‡#Эє‡ " (21) MARATHON", " (51) INIT36"#ѕў‡" (52) HIDEDIR", " (62) SLOPAINT"$‡" (64) FSTPAINT", " (70) SHUTRBUG"$G‡" (77) RAINDROP", " (77) QUADDRAW"$o‡" (78) ILLUSION", " (78) TWIRLER"$•&‡" (86) MLCASSET*", " (92) FLAGS"$М0‡"(104) 178 POKE", "(107) LICENSE"$т:‡"(107) LICEN-LR", "(118) CREATE"$шN‡% X‡" PRESS ANY KEY TO CONTINUE"%b… џ’Г""Ї610%"lž%Iv‡ " (XX)= PAGE NUMBER OF LISTING"%O€‡%wЇ"(124) GLOMMER", "(137) BLKJACK" %”‡"(144) STATS", "(148) WRKSHEET"%Хž‡"(156) DRAGBYTE", "(161) CLRSKTCH"%яЈ‡"(184) TUTORIAL", "(192) DISKDABL*"&В‡"(199) MC10CONV*", "(204) TUMBRELA"&>М‡"(206) CMERGE", "(303) GRAFDUMP"&fЦ‡"(304) GRAFDMP3", "(307) IDENTKIT"&а‡"(318) CONVERT", "(319) 64KBASIC"&Бк‡" *=MACHINE LANGUAGE PROGRAM"&Зф‡&њю‡ " PRESS ANY KEY TO RETURN TO FIRST PAGE OF MENU"'"ј‡ "PRESS ^ (UP ARROW) TO EXIT MENU"'a… џ’Гџ‹(94) Ї ’ 113,0:Ђ 40999 :„ … џ’Г"" Ї 770 :„ ž:Ѕ 430'q ‡џЁ(32,45); :„ … C(5)В11 Ї STГSTЋ10/™tHIГSTЌ100~‡"LOCK PICKING CHANCE =";LP:‡"POCKET PICKING CHANCE =";PP:‡"STALKING CHANCE =";ST:‡"HIDING CHANCEџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ &E :ƒ THIS PROGRAM WILL CREATE THE PROGRAM TO HIDE THE DIRECTORY&:ƒ AFTER YOU RUN IT TYPE IN SAVEM"HIDEDIR.BIN",&H1000,&H10F5,&H1000&С:ƒ YOU CAN THEN LOADM"HIDEDIR" AND EXEC IT.&е(€ XГ4096 Ѕ 4341&н2 A&ч<’ X,A&яF‹ X'd† 189,169,40,134,0,151,235,134,2,151'An† 234,134,1,151,237,48,141,0,114,141'ix† 96,141,99,189,162,130,129,82,39,6'’‚† 198,17,215,236,32,4,198,35,215,236'МŒ† 51,141,0,202,95,223,238,189,214,108'у–† 13,240,38,74,12,237,92,193,18,39( † 6,51,201,1,0,32,234,12,234,198(/Њ† 1,215,237,51,141,0,169,129,82,39(VД† 6,198,35,215,236,32,4,198,17,215(О† 236,95,223,238,189,214,108,13,240,38(ЈШ† 27,12,237,92,193,18,39,13,51,201(ав† 1,0,32,234,189,162,130,166,128,38(њм† 249,57,189,161,177,39,251,57,198,40) ц† 126,172,70,72,73,68,69,32,68,73)D№† 82,69,67,84,79,82,89,32,84,82)hњ† 65,67,75,32,79,78,32,84,82,65)Œ† 67,75,32,51,54,32,32,32,32,32)А† 32,32,32,66,89,58,32,72,65,82)д† 82,89,32,72,65,82,68,89,13,13)ј"† 32,32,32,32,82,69,83,84,79,82*,† 69,32,79,82,32,83,65,86,69,32*@6† 68,73,82,69,67,84,79,82,89,13*d@† 13,32,32,32,32,32,32,32,32,69*ˆJ† 78,84,69,82,32,32,82,32,32,79*ŸT† 82,32,32,83,13,0141,0,188,159,238,134,2,151*хT† 234,134,35,151,236,51,141,0,25,95+^† 166,197,151,237,189џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџм&" :ƒ*** PMODE4 SLOW-PAINT DEMO&):ƒ&?Р 4:Ш 4,1:М:П 1,1&c(Т (128,96),20,,.9 :ƒDRAW CIRCLE&r2У (128,96)&z<С 0&ЕFЦ "BM128,96;NE12NF12NG12NH12" :ƒDIVIDE INTO 4 SECTIONS&иP€ IГ1 Ѕ 4 :ƒPAINT EACH SECTION&эZ H1,V1,M1,M2,SI&љdІ 2000'n‹ I' ШЅ 200'!в† 128,79,85,85,0'8м† 114,85,170,170,0'Mц† 128,97,17,17,2'b№† 142,85,34,34,2'lш:ƒ***'ђ:ƒ*** PMODE4 SLOW-PAINT ROUTINE'—ќ:ƒ'Џ:ƒGLOBAL VARIABLES:'У:ƒ M1 - MASK 1'з:ƒ M2 - MASK 2'ё$:ƒ SI - SHIFT AMOUNT(.:ƒ H1,V1 - START PAINT POSITION(-8:ƒLOCAL VARIABLES:(GB:ƒ QM - CURRENT MASK(gL:ƒ QS - MASK SELECT SWITCH(…V:ƒ QP - MASK BIT POINTER(Џ`:ƒ QB - MASK BIT PTR. START POSITION(жj:ƒ QX,QY - POSITION TO TEST/RESET(јt:ƒ QD - X DIRECTION OF PAINT)~:ƒ Q1,Q3 - LOOP VARIABLES)ˆ:ƒ),а’ 65495,0)@кQMГM1:QSГ1:QBГ1)Sф€ QYГV1 Ѕ 1000)sю… џ (H1,QY)Г0 Ї ’ 65494,0:)ˆјQPГQB:QXГЌ1:QDГ1)—€ Q3Г1 Ѕ 2)Њ € Q1Г0 Ѕ 1 Љ 0)ЗQXГQXЋQD)г … џ (H1ЋQX,QY)Г0 Ї Q1Г1)ћ*… (QM А (2Џ(8ЌQP)))Г0 Ї О(H1ЋQX,QY)*'4QPГQPЋQD:… QPВ8 Ї QPГ1 :„ … QPД1 Ї QPГ8*0>‹ Q1*YHQDГЌ1:QXГ0:QPГQBЌ1: … QPД1 Ї QPГQPЋ8*bR‹ Q3*Ђ\… QSГ1 Ї QSГ2:QMГM2 :„ QSГ1:QMГM1:QBГQBЋSI:… QBВ8 Ї QBГQBЌ8*Ћf‹ QYџ…(&Hџ”(‡#Ќ2,Ф(Х(Л(НШџ (Ц٘џ(Єџ™(џŠ(ŽžЕ:„ЙџƒЅџœ(‘џ“ЉЫ€[™’Л‰"†џˆ(ŸЊџ‰(Иџž(ЁЊџ‡(џ•(џ—(џ–(‡Э"СУТ(ПОЧМ —џ‚(џ„(џ›(џ‹(•џ(ŒЇЙЬІ“џ(Гџ’”‹]šџ†(‰џЁ(џŸŸˆџ(Зџ(ЁˆџŽ(ЊЊ”›,32,Є† 32,32,73,78,73,84,73,65џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџю&" :ƒ*** PMODE4 FAST-PAINT DEMO&):ƒ&?Р 4:Ш 4,1:М:П 1,1&U(€ YГ50 Ѕ 100 Љ 50&r2V1ГY: V2ГYЋ20 :ƒY LIMITS&ˆ<€ XГ32 Ѕ 200 Љ 24&ЄFH1ГX:H2ГXЋ16 :ƒX LIMITS&ЫPЛ (X,Y)Ќ(XЋ16,YЋ20),Н,B :ƒDRAW BOX&лZУ (XЋ1,YЋ1)'d M1,M2,SI :ƒGET MASKS, INCREMENT'nІ 2000 :ƒDO IT'x‹ X,Y'*‚Ѕ 130'UШ† 85,85,0,170,170,0,85,255,0,170,255,0'в† 17,17,2,34,34,2,187,187,2,119,119,2'Ќм† 153,102,0,204,51,0,238,238,0,119,119,0'иц† 238,187,0,119,221,0,170,85,0,136,68,2'тш:ƒ***(ђ:ƒ*** FAST PMODE4 PAINT ROUTINE( ќ:ƒ(%:ƒGLOBAL VARIABLES:(9:ƒ M1 - MASK 1(M:ƒ M2 - MASK 2(u$:ƒ SI - MASK SHIFT AMOUNT (0 OR 2)(œ.:ƒ H1,V1,H2,V2 - PAINT BOUNDARIES(В8:ƒLOCAL VARIABLES(вB:ƒ Q1,Q2 - "WORKING" MASKS(ђL:ƒ QW - MASK SELECT SWITCH) V:ƒ QM - CURRENT MASK)"`:ƒ QA,QB - TEMPS)Aj:ƒ QX,QY - LOOP VARIABLES)Ht:ƒ)cаQ1ГM1:Q2ГM2:QMГM1:QWГ0)tк€ QYГV1 Ѕ V2)†фQBГ1536ЋQY­32)Їю€ QXГџ(H1Ў8) Ѕ џ((H2Ћ8)Ў8))ЩјQAГQXЋQB :ƒCALC. BYTE ADDRESS)ѕ’ QA,QM А џ†(QA) :ƒ"AND" BYTE WITH MASK)ў ‹ QX*>… QWГ0 Ї QWГ1: QMГQ2: Ѕ 2090 :„ QWГ0: QMГQ1 :ƒSWITCH MASKS*Ў … SIДВ0 Ї Q1Гџ(Q1Ў4)Ћ(Q1Ќџ(Q1Ў4)­4)­64: Q2Гџ(Q2Ў4)Ћ(Q2Ќџ(Q2Ў4)­4)­64: QMГQ1 :ƒROTATE MASKS RIGHT 2 BITS*З*‹ QY*Н4џ…(&Hџ”(‡#Ќ2,Ф(Х(Л(НШџ (Ц٘џ(Єџ™(џŠ(ŽžЕ:„ЙџƒЅџœ(‘џ“ЉЫ€[™’Л‰"†џˆ(ŸЊџ‰(Иџž(ЁЊџ‡(џ•(џ—(џ–(‡Э"СУТ(ПОЧМ —џ‚(џ„(џ›(џ‹(•џ(ŒЇЙЬІ“џ(Гџ’”‹]šџ†(‰џЁ(џŸŸˆџ(Зџ(ЁˆџŽ(ЊЊ”›,78,73,84,73,65џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџR& GT$Г"SHUTTER BUG"&vŒ U(1,23),BC(1),YC(1),PT(9,19),N0(1),N1(1),N2(1),N3(1),N4(1),N5(1),N6(1),N7(1),N8(1),N9(1)&“’ 65495,0:ž:Ш 3,1:І1020&Џ(YГ12365:ZГ57:CГ1:І1460&Р2І1070:П 1,0&мјM1(4)ГMЌ(M1(1)­1000ЋM1(2)­100ЋM1(3)­10)0P€ZГP1 ЅP2 Љ160k M2Г(ZЌP3)Ў16:M3ГM1(M2)0}’ MA(2),48ЋM30— Х(Z,182)Ќ(ZЋ7,189),N00 *‹Z:0Г4:ƒ END ROUTINE0ѕ>ЦJK$:Ц"C3;L4;D3;BM+0,+10;D3;R4;BM+32,+0;R4;U3;BM+0,-10;U3;L4"1$H…YД3Ї850:„YГYЌ6:Х(X,Y)Ќ(XЋ56,YЋ29),U:Ѕ8401XR€ZГ1Ѕ6:Ф(X,6)Ќ(XЋ56,35),U:Х(X,0)Ќ(XЋ56,29),U:‹Z1Ъ\Ц"C2;BM30,80;U6;R6;D6;U3;L6;BM+18,+3;U6;F6;U6;BM+12,+0;D6;R6;U6;L6;BM+17,+0;R7;L3;D6;BM+15,+0;U6;D3;R6;D3;U6"2#fЦ"BM+18,+0;L6;D3;R4;L4;D3;R6;BM+12,+0;U6;R6;D3;L6;R3;F3;BM+30,-6;L6;D6;R6;U3;R2;L4;"2rpЦ"BM+12,+3;U6;R6;D6;U3;L6;BM+16,+3;U6;F4;E4;D6;BM+16,+0;L6;U3;R4;L4;U3;R6"2СzЦ"BM33,100;U2;H4;F4;E4;BM+18,+0;L6;D3;R4;L4;D3;R6;BM+18,-6;L6;D3;R6;D3;L6"2№„Ц"BM201,100;U6;F6;U6;BM+12,+0;D6;R6;U6;L6"3 Ž€ZГ1Ѕ500:‹Z:’ 65494,0:Ф(48,120)Ќ(55,129),BC3@˜JГџ(0):…JВ31ЇCXГ208:„CXГ483ЂХ(CX,120)Ќ(CXЋ5,125),YC:€ZГ1Ѕ50:‹Z:Х(CX,120)Ќ(CXЋ7,129),BC3 ЌPГџ†(65280):…PГ126БPГ254Ї9603ЊЖЅ9203ЦР…JВ31Ї ’ MA(2),48:М:ž:Š3жЪ…CДHSЋ1Ї2003ыд…DDГ1ЇH1ГC:Ѕ1904о…DDГ2ЇH2ГC :„H3ГC4 шЅ2004ђ:ƒ DRAW LOGO4†ќМ(4):Ц"C2;BM126,20;L60;D74;R60;U28;D27;L59;U72;R59;BM-22,+38;R80;D52;L40;D1;R41;U54;L81;BM+36,+7;D80"4шЦ"BM126,23;L56;D68;R52;U25;D24;L51;U66;R55;BM-22,+38;R76;D46;L36;D1;R37;U48;L77;BM+32,+4;D80"5JЦ"BM126,26;L52;D62;R44;U22;D21;L43;U60;R51;BM-22,+38;R72;D40;L32;D1;R33;U42;L73;BM+28,+1;D80"5dФ(12,12)Ќ(19,19),BC:5v$:ƒ GAME TITLE6.Ц"C2;BM42,165;L6;D3;R6;D3;L6;BR18;U6;D3;R6;D3;U6;BR12;D6;R6;U6;BR11;R7;L3;D6;BR17;U6;L4;R8;BR17;L6;D3;R4;L4;D3;R6;BR12;U6;R6;D3;L6;R3;F3"6\8Ц"BR22;R7;E1;U1;H1;L5;R5;E1;U1;H1;L7;R2;D6;U6;BR17;D6;R6;U6;BR18;L6;D6;R6;U3;L2;R4"6dBCГ06ˆLЦ"C2;BM8,13;D6;R7;U6;L7":І12206ЁVЦ"BM12,13;D6":І12206Ш`Ц"BM8,14;U1;R7;D3;L7;D3;R7":І12206яjЦ"BM8,13;R7;D3;L4;R4;D3;L7":І12207tЦ"BM8,13;D3;R7;U3;D6":І122075~Ц"BM15,13;L7;D3;R7;D3;L7":І12207ZˆЦ"BM14,13;L6;D6;R6;U3;L7":І12207u’Ц"BM8,13;R7;D6":І12207œœЦ"BM8,13;D6;R7;U6;L7;D3;R7":І12207РІЦ"BM8,19;R7;U6;L7;D3;R7":І12207џАЦ"C3;BM20,20;U20;D20;L20":У(19,19),2,3:Ф(12,12)Ќ(19,19),YC8,КУ(19,19),4,3:Ц"C4;BM20,20;U20;D20;L20":8mФ’ MA(1),CЋ48:Ф(12,12)Ќ(19,19),N9:Х(12,12)Ќ(19,19),BC:CГCЋ1:8Ю:ƒ INSTRUCTIONS8’иМ:ž:‡@11,GT$9т‡:‡" IT'S A LOVELY DAY FOR A STROLL. YOU'RE WALKING ALONG WITH YOUR CAMERA OVER YOUR SHOULDER WHEN SUDDENLY A UFO APPEARS."9Ѓь‡:‡" YOU HAVE 20 PICTURES IN YOUR CAMERA, AND WHO KNOWS HOW LONG THE UFO WILL BE THERE. TRY TO GET AS MANY PICTURES AS YOU CAN."9Иі‡:‡" GOOD LUCK!"9х‡@480,"(PUSH JOYSTICK BUTTON TO START)";9ѕ PГџ†(65280): …PГ126БPГ254Ї1320:Ѕ1290:&(Ш3,1:М:П1,0:K2PГџ†(65280):…PГ126БPГ254Ї1330:„:g<:ƒ DEGREE OF DIFFICULTY:іFЦ"BM20,170;U6;F6;U6;BM+6,+0;D6;R6;U6;L6;BM+12,+0;D2;R2;D2;R1;D2;R2;U2;R1;U2;R2;U2;BM+9,+0;D6;BM+15,+0;L6;U6;R6;BM+12,+0;L6;D3;R4;L4;D3;R6";^PЦ"BM128,170;U6;R6;D3;L6;R6;D3;L6;BM+12,-6;D6;R6;U6;BM+12,+0;L6;D3;R4;L4;D3;BM+12,+0;U3;R4;L4;U3;R6";ЊZЦ"BM203,170;U6;R6;D3;L6;BM+12,+3;U6;R6;D3;L6;R3;F3;BM+6,+0;R6;U6;L6;D6";дd’ 65494,0:JГџ(0):…JВ41ЇCXГ216:Ѕ1400;ьn…JВ21ЇCXГ144:„CXГ48<+xХ(CX,180)Ќ(CXЋ5,185),YC:€ZГ1Ѕ50:‹Z:Х(CX,180)Ќ(CXЋ7,185),BC$&Œ L$(37),XM(13),P(2),PR(2),TR(6),B(3),H(3),M(1),EX(2),TX(2),TY(2),BX(2),BY(2),HX(2),HY(2),MX(2),MY(2),A(4),LC(1):Ц"BM125,50NH4NU4NE4NR4NF4ND4NG4NL4":Ф(120,46)Ќ(130,54)џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ>:ƒOPTICAL ILLUSION>+:ƒBY MIKE HALL>F:ƒ3019 SYLVESTER DRIVE>_:ƒHARTLAND, WI 53029>o Ш3,1:М:П1,0>ˆЛ(50,144)Ќ(40,139),Н>™€ZГ1Ѕ21:X,Y>Љ(ЛЌ(X,Y),Н:‹>Т2Л(81,128)Ќ(50,144),Н>к<Л(50,144)Ќ(50,81),Н>ъF€ZГ1Ѕ7:X,Y>њPЛЌ(X,Y),Н:‹?ZЛ(90,60)Ќ(90,165),Н?)dЛ(40,24)Ќ(81,45),Н?:n€ZГ1Ѕ15:X,Y?JxЛЌ(X,Y),Н:‹?d‚Л(100,108)Ќ(131,92),Н?uŒЛЌ(131,83),Н?†–ЛЌ(100,99),Н?Ÿ Л(131,92)Ќ(123,87),Н?ИЊЛ(141,24)Ќ(101,46),Н?ЩД€ZГ1Ѕ10:X,Y?йОЛЌ(X,Y),Н:‹?ђШЛ(122,67)Ќ(122,44),Н@ вЛ(110,50)Ќ(122,57),Н@мУ(96,72),3,4@-цУ(56,52),3,4@?№У(56,132),3,4@PњУ(76,64),3,4@aУ(44,76),2,4@rУ(84,68),2,4@ƒУ(92,56),2,4@•"У(128,44),2,4@Ж,У(128,88),2,4:У(128,108),2,4@Ю6:ƒfirst coordinates@ь@†40,24,50,18,91,40,131,18AJ†142,24,142,140,90,166AT†81,161,81,65,90,60A;^†100,64,100,151,131,135AXh†131,103,122,107,122,130Aur†100,142,122,130,131,134AŠ|†131,103,100,118AЃ†:ƒsecond coordinatesAМ†81,97,81,118,60,128Aжš†60,119,81,108,60,119AсЄ†60,86AљЎ:ƒthird coordinatesBИ†60,56,60,44,72,50,50,38B3Т†50,72,60,67,60,56,60,67BPЬ†90,50,90,60,69,72,60,67Bgж†81,78,81,87,50,72B€р:ƒfourth coordinatesBšъ†110,50,131,39,131,72BДє†100,88,100,64,114,71BЮў†100,79,122,67,131,72Bй†90,50Bш€XГ1Ѕ999:‹BіШ4,1:П1,1C&Ѕ550XЋ56,YЋ29),U: џŸГ0+1@:ƒ SELECT UFO DIRECTION+bJDXГ(џ„(24)­8)Ћ6:DYГ(џ„(24)­6)Ћ2:MDГџ„(20­DD)+}T…DDД2 Ї MDГMDЋ40:Ѕ440+Œ^…DXВX Ї380+ЉhZГXЌDX:…ZВ100 Ї DXГDXЋ48+ГrЅ390+а|ZГDXЌX:…ZВ100 Ї DXГDXЌ48+п†…DYВY Ї420+ћZГYЌDY:…ZВ70 Ї DYГDYЋ36,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџё>:ƒTWIRLER>":ƒBY MIKE HALL>=:ƒ3019 SYLVESTER DRIVE>V:ƒHARTLAND, WI 53029>k Ш4,1:М:П1,1:Ш3,1>‚Л(0,0)Ќ(255,191),Н>™Л(255,0)Ќ(0,191),Н>Й(SГџ„(100)Ў100:EГџ„(100)Ў100>Я2RГџ„(100):CГџ„(4)>ч<Т(128,96),R,C,1,S,E>№FЅ40,Y),Н:‹?Zџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџь>Р8>:ƒCLS>MГ3:SГ0>. ШM,1:П1,S:М>A2€ XГ12Ѕ255 Љ17>T<€ YГ2Ѕ190 Љ 10>F’ 178,N:NГNЋ1:…NГ256 ЇXГ999:YГ999:Ѕ90>šPЛ(X,Y)Ќ(XЋ10,YЋ6),Н,BF>ЃZ‹Y,X>Ў_ 100,1>КdHГ0:VГ0>бnXГ12ЋH­17:YГ1ЋV­10>ыxЛ(X,Y)Ќ(XЋ12,YЋ8),Н,B>ѕ‚A$Гџ’?ŒЛ(X,Y)Ќ(XЋ12,YЋ8),О,B?–…A$Г""Ї120?+›NГH­19ЋV?H …A$Гџ‹(8)ЇHГHЌ1:…HД0ЇHГ0?gЊ…A$Гџ‹(9)ЇHГHЋ1:…HВ13ЇHГ13?…Д…A$Гџ‹(94)ЇVГVЌ1:…VД0ЇVГ0?ЅО…A$Гџ‹(10)ЇVГVЋ1:…VВ18ЇVГ18?НП…NВ255Ї 200,1:Ѕ110?еУ… A$Г"/"БA$Г"?"Ї300?ъШ…A$Гџ‹(32) Ї 400@3Э…A$Г"B"Ї ШM,5:П1,S:М:’178,N:Л(76,46)Ќ(176,146),Н,BF:€QГ1Ѕ200:‹:Ѕ600@dЯ…A$Г"M"ЇMГMЋ1:…MГ5ЇMГ3:ШM,1:П1,S::„ШM,1:П1,S@‹а…A$Г"S"ЇSГSЋ1:…SГ2ЇSГ0:П1,S :„П1,S@•вЅ110@œ,‡N@З6…џ’Г""Ї310:„П1,S:Ѕ110@лШM,5:П1,S:М:СMЋ1,1:Т(126,96),65@цš’178,N@љЄУ(126,96),,MЋ1AЎЛ(10,10)Ќ(70,40),Н,BFA@И€ JГ0Ѕ180Љ35:Л(40ЋJ,180)Ќ(255,180ЌJ),Н:‹AVТ…џ’Г""Ї450:„Ѕ600AdX€ZГ5Ѕ1ЉЌ1A€bШM,Z:П1,S:€QГ1Ѕ300:‹Q,ZAŠlЅ110џ…(&Hџ”(‡#Ќ2,Ф(Х(Л(НШџ (Ц٘џ(Єџ™(џŠ(ŽžЕ:„ЙџƒЅџœ(‘џ“ЉЫ€[™’Л‰"†џˆ(ŸЊџ‰(Иџž(ЁЊџ‡(џ•(џ—(џ–(‡Э"СУТ(П1,1:Ѕ110ОЧМ —џ‚( Л(X,Y)Ќ(XЋ18,YЋ11),Н,Bџ›(џ‹(•џ(ŒЇЙЬІ“џ(Гџ’”‹]š:…NВ255Ї 200,1:Ѕ120‰џЁ(џŸŸˆ:Ёˆџ(Зџ(ЁˆџŽ(ЊЊ”Ьџ‹(128)Ћџ‹(128)Ћџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ|> ‚"COMPUTER LICENSE">@‚"STEVE BLYN ,COMPUTER ISLAND,1983>K• 1000>V(Ѕ 360>j2Ш 4,1:М:П1,0:С7>‹<‚"DRAW AND PAINT THE BORDER">ЄFЛ(5,5)Ќ(250,185),Н,B>ПPЛ(10,10)Ќ(245,180),Н,B>кZЛ(15,15)Ќ(240,175),Н,B>ыdУ(14,14),7,7?n‚"DRAW THE WORDS"?-xЦ "A2S8BM32,25"ЋC$ЋO$ЋM$ЋP$ЋU$ЋT$ЋE$ЋR$?O‚ЦDD$ЋDD$ЋL$ЋI$ЋC$ЋE$ЋN$ЋS$ЋE$?iŒWI$ГW$ЋI$ЋZ$ЋA$ЋR$ЋD$?–Ц"A2S16BM73,45"ЋWI$?” Ц"BM74,45"ЋWI$?ЇЊЦ"BM75,45"ЋWI$?НД‚"BOX THE WIZARD"?зОЛ(40,40)Ќ(215,70),Н,B?ёШЛ(43,43)Ќ(212,73),Н,B@в‚"DRAW THE REST OF THE WORDS"@WмЦ"A2S4BM30,100"ЋT$ЋH$ЋI$ЋS$ЋDD$:ЦDD$ЋC$ЋE$ЋR$ЋT$ЋI$ЋF$ЋI$ЋE$ЋS$@pцЦDD$ЋDD$ЋT$ЋH$ЋA$ЋT$@‹№Л(160,110)Ќ(220,110),Н@РњЦ"A2S4BM30,120"ЋC$ЋA$ЋN$ЋDD$ЋDD$ЋR$ЋE$ЋA$ЋD$ЋDD$@ъЦЋDD$ЋA$ЋN$ЋD$ЋDD$ЋDD$ЋW$ЋR$ЋI$ЋT$ЋE$AЦЋDD$ЋDD$ЋI$ЋN$ЋDD$ЋDD$ЋB$ЋA$ЋS$ЋI$ЋC$A.Н(225,125):‚"PERIOD"AJ"Ц"BM50,160"ЋD$ЋA$ЋT$ЋE$Ac,Л(35,155)Ќ(85,155),НAš6Ц"BM150,160"ЋA$ЋP$ЋP$ЋR$ЋO$ЋV$ЋE$ЋD$ЋDD$ЋDD$ЋB$ЋY$AЕ@Л(140,155)Ќ(220,155),НAлJ‚"THE LETTERS ARE DRAWN OUT HERE"AјTЅ 340:‚"END OF PROGRAM"B^‚"LETTERING BY J. KOLAR"B4hA$Г"BEHUNU2R4NU2DGL2BGBL6"BRrB$Г"BEHENR3HER3D4L3BGBL6"Bo|C$Г"BU4ER2FD2GL2HBG2BL4"BІD$Г"BEHU2ER3D4L3BGBL6"BЇE$Г"BER3U2NL2U2L4BG5BL2"BТšF$Г"BUR4U2NL3U2BG5BL5"BпЄH$Г"BUU2NU2R4NU2D2BGBL9"BљЎI$Г"BR2BUU4BU2BD7BL8"CИL$Г"BU5R4D4BGBL9"C*ТM$Г"BUNU4E2F2U4BG5BL5"CBЬN$Г"BUU4F4U4BG5BL5"C_жO$Г"BEHU2ER2FD2GL2BGBL6"C}рP$Г"BER3U2NU2L3GNFBG2BL4"CъR$Г"BEHERNH2R2NU2D2L3BGBL6"CМєS$Г"BU2FR2EHL2HER2FBG4BL6"CеўT$Г"BUR2NU4R2BDBL10"CюU$Г"BUU3ER2FD3BGBL9"DV$Г"BUU2E2F2D2BGBL9"D W$Г"BUU4F2E2D4BGBL9"D8&Y$Г"BUE2NU2F2BGBL9"DS0Z$Г"BUNR4E4L4BG4BDBL2"Dq:DD$Г"BE4BUBG5BL5":ƒSPACERD{DЅ 50(134Ћ48);,Бр‡ @269,џ‹(137Ћ48);:‡ @275,џ‹(134Ћ48);,еъ‡ @240,џ‹(128);:‡ @272,џ‹(128);,џє‡ @303,џ‹(137Ћ48);:‡ @305,џ‹(134Ћ48);џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџў&! ‚"COMPUTER LICENSE LOW RES"&C‚"STEVE BLYN,COMPUTER ISLAND"&Iž&x(‡@0,"DO YOU HAVE A PRINTER TURNED ON":‰ A$&А2… џŽ(A$,1)Г"Y" Ї KГЌ2 :„ … џŽ(A$,1)Г"N" Ї KГ0 :„ 40&й<‡#K," -----------------------------"'F‡#K,"! COMPUTER LICENSE !"'-P‡#K,"! ******************* !"'WZ‡#K,"! **** WIZARD *** !"'d‡#K,"! ******************* !"'ŒnІ 220'Жx‡#K,"! THIS CARD CERTIFIES THAT !"'Р‚І220'ъŒ‡#K,"! IS ABLE TO !"(–‡#K,"! -------------- !"(> ‡#K,"! READ AND WRITE IN BASIC. !"(IЊІ 220(sД‡#K,"! ------- ------------ !"(О‡#K,"! DATE APPROVED BY !"(ЦШ‡#K," -----------------------------"(бвЅ 210(§м‡#K,"! !":D$ЋDD$ЋB$ЋA$ЋS$ЋI$ЋC$A.Н(225,125):‚"PERIOD"AJ"Ц"BM50,160"ЋD$ЋA$ЋT$ЋE$Ac,Л(35,155)Ќ(85,155),НAš6Ц"BM150,160"ЋA$ЋP$ЋP$ЋR$ЋO$ЋV$ЋE$ЋD$ЋDD$ЋDD$ЋB$ЋY$AЕ@Л(140,155)Ќ(220,155),НAлJ‚"THE LETTERS ARE DRAWN OUT HERE"AјTЅ 340:‚"END OF PROGRAM"B^‚"џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ a&%d‚ * DIMENSION, READ, AND ASSIGN&@nŒ G(12,8),M(2,7),C$(8)&^x: € XГ0 Ѕ 8:  C$(X):‹ X&™‚† BLACK,GREEN,YELLOW,BLUE,RED,BUFF,CYAN,MAGENTA,ORANGE&ЖŒCSГ0:CCГ1:OCГ1:CXГ1:CYГ1&а–€ XГ1 Ѕ 12: € YГ1 Ѕ 8&о G(X,Y)ГOC&шЊ‹ Y,X&яЧ:ƒ'Ш‚ * DRAW BORDERS *',вž: ‡@4,"FIGURE CREATION PROGRAM";';м€ XГ0 Ѕ 12'aц‡@106ЋX,џ‹(156);:‡@394ЋX,џ‹(147);'i№‹ X'wњ€ YГ0 Ѕ 7'‘‡@128Ћ9Ћ32­Y,џ‹(154);'А‡@128Ћ22Ћ32­Y,џ‹(149);:‹ Y'в‡@105,џ‹(158);:‡@118,џ‹(157);'є"‡@393,џ‹(155);:‡@406,џ‹(151);'ћ+:ƒ( ,‚ * DISPLAY *(6І 5010( :ƒ(6‚ * GET COMMAND *(Wš‡@449,"COMMAND?";џЁ(15," ");(oЄA$Гџ’:… A$Г"" Ї 420(vѓ:ƒ(‰є‚ * UP-ARROW *(ў… A$ДВ"^" Ї 610(А… CYЌ1Д1 Ї 410(дG(CX,CY)ГOC:CYГCYЌ1:OCГG(CX,CY)(є‡@138Ћ32­(CYЌ1)Ћ(CXЌ1),"x";)/&‡@138Ћ32­(CY)Ћ(CXЌ1),џ‹((G(CX,CYЋ1)Ќ1)­16Ћ143);:Ѕ 410)6W:ƒ)KX‚ * DOWN-ARROW *)bb… A$ДВџ‹(10) Ї 710)ul… CYЋ1В8 Ї 410)™vG(CX,CY)ГOC:CYГCYЋ1:OCГG(CX,CY))Й€‡@138Ћ32­(CYЌ1)Ћ(CXЌ1),"x";)іЇ@138Ћ32­(CYЌ2)Ћ(CXЌ1),џ‹((G(CX,CYЌ1)Ќ1)­16Ћ143);:Ѕ 410)§Л:ƒ*М‚ * LEFT-ARROW **(Ц… A$ДВџ‹(8) Ї 810*;а… CXЌ1Д1 Ї 410*_кG(CX,CY)ГOC:CXГCXЌ1:OCГG(CX,CY)*ф‡@138Ћ32­(CYЌ1)Ћ(CXЌ1),"x";*Ию‡@138Ћ32­(CYЌ1)ЋCX,џ‹((G(CXЋ1,CY)Ќ1)­16Ћ143);:Ѕ 410*П:ƒ*е ‚ * RIGHT-ARROW **ы*… A$ДВџ‹(9) Ї 910*џ4… CXЋ1В12 Ї 410+#>G(CX,CY)ГOC:CXГCXЋ1:OCГG(CX,CY)+CH‡@138Ћ32­(CYЌ1)Ћ(CXЌ1),"x";+€R‡@138Ћ32­(CYЌ1)Ћ(CXЌ2),џ‹((G(CXЌ1,CY)Ќ1)­16Ћ143);:Ѕ 410+‡ƒ:ƒ+ „‚ * OTHER COMMANDS *+Цއ@458,A$;:… A$Г" " Ї OCГCC:Ѕ 410+ц˜… A$Г"-" Ї OCГ4­CSЋ1:Ѕ 410+љЂ… A$Г"R" Ї 120, Ќ… A$Г"S" Ї 1010,!Ж… A$Г"C" Ї 1110,5Р… A$Г"T" Ї 1210,IЪ… A$Г"D" Ї 1310,TдЅ 410,[ч:ƒ,Šш‚ * CHANGE COLORSET,VARIABLES, AND ARRAY *,ЊђOCГЌCS­8ЋOCЋ4:CCГЌCS­8ЋCCЋ4,Уќ€ XГ1 Ѕ 12:€ YГ1 Ѕ 8,нG(X,Y)ГЌCS­8ЋG(X,Y)Ћ4,ч‹ Y,X,њCSГ1ЌCS:Ѕ 310-K:ƒ-L‚ * CHANGE COLOR *-=V‡@449,"TYPE NEW COLOR CODE: ";-V`C$Гџ’:… C$Г"" Ї 1120-}j‡@470,C$;:… C$Д"1" Б C$В"8" Ї 1110-žtCГџ‰(C$):… CSГ0 А CВ4 Ї 1110-Ж~… CSГ1 А CД5 Ї 1110-ЦˆCCГC:Ѕ 310-ЭЏ:ƒ-ьА‚ * TEST ON REAL DISPLAY *-џКШ 3,1:П 1,CS:М. ФІ 4010.#Ю€ XГ0 Ѕ 2:€ YГ0 Ѕ 7.?и’ 3072Ћ14ЋXЋ32­Y,M(X,Y).Iт‹ Y,X.bьC$Гџ’:… C$Г"" Ї 1260.uіМ:П 0,0:Ѕ 410.|:ƒ.š‚ *DISPLAY FIGURE BYTES *.ІІ 4010.в(ž:‡"POKE ADDRESS DATA BYTES (HEX)":‡.р2€ YГ0 Ѕ 7.ј<‡"XXXX+";Y­32;Є16);/F€ XГ0 Ѕ 2:H$Гџœ(M(X,Y))//P… џ‡(H$)Г1 Ї H$Г"0"ЋH$/=Z‡ H$;" ";/Md‹ X:‡:‹ Y:‡/zn‰"HIT ENTER TO RETURN TO GRID";H$:Ѕ 210/w:ƒ/  ‚ * CREATE DISPLAY ARRAY */КЊ€ Y1Г1 Ѕ 8:€ X1Г0 Ѕ 2/бДX2Г1:… CSГ1 Ї X2Г5/ћОA1ГG(X1­4Ћ1,Y1)ЌX2:A2ГG(X1­4Ћ2,Y1)ЌX20%ШA3ГG(X1­4Ћ3,Y1)ЌX2:A4ГG(X1­4Ћ4,Y1)ЌX20HвM(X1,Y1Ќ1)ГA1­64ЋA2­16ЋA3­4ЋA40Tм‹ X1,Y10Zц0a:ƒ0zˆ‚ * INSIDE OF GRID *0–’€ Y1Г1 Ѕ 8: € X1Г1 Ѕ 120Ъœ‡@138Ћ32­(Y1Ќ1)Ћ(X1Ќ1),џ‹((G(X1,Y1)Ќ1)­16Ћ143);0жІ‹ X1,Y10њА‡@120,"COLOR";:‡@152,"SET=";CS;1-К‡@248,"COLOR=";:‡@280," ";:‡@280,C$(CC);1MФ‡@138Ћ32­(CYЌ1)Ћ(CXЌ1),"x";1SЮ1Zы:ƒ1`'Š72),6,8:С6:Л(10,25)Ќ(125,94),Н,B:У(136,120),6,62+fС 8:Т(68,120),8:У(68,120),8,8:Т(195,141),5:У(195,141),8,8:Т(195,33),5:У(195,33),8,8:Т(148,87),5:У(148,87џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ &<‚ TO USE WITH UNEXTENDED BASIC ENTER THE FOLLOWING&d‚ BEFORE THE PROGRAM IS LOADED:&‚‚ POKE 2048,0 (ENTER)&ž‚ POKE 25,8 (ENTER)&Д‚ NEW (ENTER)&Ю‚ CLEAR 8 (ENTER)&с‚ **** GLOMMER'‚ **** BY DAVID LIONELL DAWSON'a ‚ARKS SHOULD BE DELETED FOR USE ON A 4K SYSTEM. (THESE 9 LINES + LINES ENDING WITH A 5.)'ь RГ1:BГ4:ž0:‡@236,"glommer";:‡@328,"by";џ‹(128);"david";џ‹(128);"dawson";:Œ A(5),E(5):A(1)Г1172:A(2)Г1632:A(3)Г1220:A(4)Г1996:A(5)Г1940(… џ†(345)ДВ247 Ї 20(‚ SCOREBOARD.(už0:‡@166,"score ";O;:‡@230,"adventurers ";B;:… BГ0 Ї ‡@420,"G A M E O V E R";:OГ0:RГ1:BГ4(#‚ GO TO ALPHANUMERICS.(Ц(’65472,0:’65474,0:’65476,0:’65314,(џ†(65314)А 47)(х2… џ†(341)ДВ247 Ї 50 :„ TГP(ў7‚ SET GRAPHICS MODE.)<’ 65473,0:’65474,0:’65476,0);A‚ SET START OF GRAPHICS.)qF’ 65478,0:’ 65481,0:€ XГ65482 Ѕ 65490 Љ 2:’ X,0:‹)ˆK‚ CHOSE COLOR SET.)˜P’ 65314,136)ЕU‚ CLEAR GRAPHICS SCREEN.)бZ€ XГ1024 Ѕ 2048:’ X,0:‹)ц_‚ PAINT BARRIER.*d€ XГ1056 Ѕ 1167:’X,245:‹*,nPГ1768:NГ1775:SГ1040:EГ5:… RВ5 Ї RГ5*ps‚ INITIALIZE FFLOYD, TOP AND BOTTOM OF SCREEN, AND CHECK ROUND.*Žx€ XГ1 Ѕ R:E(X)ГA(X):‹:JГ1*™‚Ѕ 340*Б‡‚ MONSTER MOVEMENT.*ЦŒ€ XГ1 Ѕ R:MГE(X)+–… џ„(4)Г1 Ї EГMЋ32:€ QГM Ѕ E Љ 16:’Q,0:’QЋ1,0:‹ :„ 190+" … MЌ16Д P Ї MГMЋ16 :„ MГMЌ16+=Њ… MДP Ї MГMЋ2 :„ MГMЌ2+RЏ‚ DRAW GLOMMERS.+ЁДE(X)ГM:’M,2:MГMЋ1:’M,160:MГMЋ15:’M,8:MГMЋ1:’M,72:MГMЋ15:’M,42:MГMЋ1:’M,170+ЉО‹ X+ВШ’T,0+ав… џ†(345)Г247 Ї IГ1:TГPЋ1+см… IДВ1 Ї 300+ѓс‚ MOVE SHOTS.+ўцTГTЌ32,№… TДS Ї IГ0:Ѕ 300,6њ’T,60:KГџ†(TЌ16):… KГ0 Ї 300,bIГ0:’TЌ16,0:€ LГ1 Ѕ R:… TЌ16ДE(L) Ї 290,XГE(L)Ћ48:… XДTЌ16 Ї 290,И 255,10:€ ZГE(L) Ѕ X:’ Z,255:’ Z,0:‹:E(L)ГA(L):OГOЋR,Ы"‹ L: 1,1:OГOЋ1,с'‚ CHECK KEYBOARD.-S,… џ†(341)Г247 Ї NPГPЌ16 :„ … џ†(342)Г247 Ї NPГPЋ16 :„ … џ†(343)Г247 Ї NPГPЌ1 :„ … џ†(344)Г247 Ї NPГPЋ1 :„ 350-z6… NPВN Ї NPГN:Ѕ330 :„ … SДP Ї 330-Ž;‚ END OF ROUND.-б@€ XГ1 Ѕ 9: X­20,1:’65314,128:’65314,136:‹:OГOЋR­100:RГRЋ1:Ѕ20-фE‚ ERASE FFLOYD.J€ XГP Ѕ PЋ112 Љ16:’X,0:‹:PГNP.O‚ DRAW FFLOYD.T’ P,52:’PЋ16,63:’PЋ32,60:’PЋ48,48:’PЋ64,170:’PЋ80,168:’PЋ96,136:… џ„(2)Г1 Ї ’PЋ112,136 :„ ’PЋ112,130.–Y‚ IS FFLOYD HIT?.љ^… џ†(PЌ16)ДВ0 Б џ†(PЋ31)ДВ0 Б џ†(PЋ33)ДВ0Ї BГBЌ1:… BГ0 Ї ’ 65314,128:Ѕ20 :„  100,5: 5,10:Ѕ20/hЅ 140H$Гџœ(M(X,Y))//P… џ‡(H$)Г1 Ї H$Г"0"ЋH$/=Z‡ H$;" ";/Md‹ X:‡:‹ Y:‡/zn‰"HIT ENTER TO RETURN TO GRID";H$:Ѕ 210/w:ƒ/  ‚ * CREATE DISPLAY ARRAY */КЊ€ Y1Г1 Ѕ 8:€ X1Г0 Ѕ 2/бДX2Г1:… CSГ1 Ї X2Г5/ћОA1ГG(X1­4Ћ1,Y1)ЌX2:A2ГG(X1­4Ћ2,Y1)ЌX20%џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ѕ30000:ƒ20FEB835:ƒ*******************O(:ƒ* COLOR BLACKJACK *i2:ƒ* VERSION 1.0 *ƒ<:ƒ* JOSEPH KOHN *F:ƒ*1343 BLOSSOM AVE*ЗP:ƒ*REDLANDS,CA 92373*бZ:ƒ*******************ъdž:Œ A$(89):XГџ„(ЌџŸ)n:ƒ---DRAW STRINGS"xA$(33)Г"U4E2F2D2NL4D2BR3" :ƒAF‚A$(34)Г"RU6LR3FDGNL2FDGL3BR7 'BnŒA$(35)Г"BR3E1BU4H1L2G1D4F1R2BR4":ƒC‘–A$(37)Г"R4BU6L4D3NR2D3BR7" :ƒEВ A$(38)Г"U6NR4D3NR2D3BR7" :ƒFрЊA$(39)Г"BR4BU5H1L2G1D4F1R3U2NL1D2BR3" :ƒGџДA$(40)Г"U6D3R4U3D6BR3" :ƒH$ОA$(41)Г"BU6BR1R2L1D6L1R2BR4" :ƒIHШA$(42)Г"BU1F1R2E1U5BD6BR3" :ƒJhвA$(43)Г"U6D3R1NE3F3BR3" :ƒK‚мA$(44)Г"NU6R4BR3" :ƒLŸцA$(46)Г"U6F4U4D6BR3" :ƒNШ№A$(47)Г"BU1U4E1R2F1D4G1L2NH1BR6" :ƒOьњA$(48)Г"U6R3F1D1G1L3BF3BR4" :ƒPA$(49)Г"BUU4ER2FD3GNHNFGLNHBR6" :ƒQ9A$(50)Г"U6R3F1D1G1L3R1F3BR3" :ƒRcA$(51)Г"R3E1U1H1L2H1U1E1R3BD6BR3" :ƒS"A$(52)Г"BU6R4L2D6BR5" :ƒTЇ,A$(53)Г"BU1U5BR4D5G1L2NH1BR6" :ƒUЯ6A$(54)Г"BU4NU2FDFNDEUEU2BD6BR3" :ƒVю@A$(55)Г"NU6E2F2NU6BR3" :ƒWJA$(57)Г"BU6D1F2E2U1D1G2D3BR5" :ƒY?TA$(65)Г"BU4R2F1D1L2G1F1R2NU2R1BR3" :ƒad^A$(66)Г"U6D2R3F1D2G1L3BR7" :ƒb hA$(69)Г"BR3L2H1U2E1R2F1D1NL4BD2BR3" :ƒeБrA$(72)Г"U6D3E1R2F1D3BR3" :ƒhк|A$(73)Г"BU6BR1R1BD2NL1D4L1R2BR4" :ƒi†A$(79)Г"BU1U2E1R2F1D2G1L2NH1BR7" :ƒo%A$(82)Г"U4D1E1R2F1BD3BR3" :ƒrKšA$(83)Г"R3E1H1L2H1E1R3BD4BR3" :ƒsrЄA$(84)Г"BU5R4L2U1D5F1E1BD1BR3" :ƒt•ЎA$(85)Г"BU4D3F1R2NU4R1BR3" :ƒuПИA$(86)Г"BU4F1D1F1ND1E1U1E1BD4BR3" :ƒvщТA$(87)Г"BU4D3F1E1NU2F1E1U3BD4BR3" :ƒw ЬA$(0)Г"BR3":ƒSPACE !жA$(1)Г"BR1R1BU2U4BD6BR5" :ƒ! OрA$(4)Г"BR2U6D1R2L3G1F1R2F1G1L3BD1BR7" :ƒ$ zъA$(10)Г"BUE4BD4H4BR2D4BH2R4BD3BR3" :ƒ* ЃєA$(16)Г"BU1U4E1R1F1D4G1L1NH1BR6" :ƒ0 ЧўA$(17)Г"BU6BR2NG1D6L1R2BR4" :ƒ1 ёA$(18)Г"BU5E1R2F1D1G1L2G1D2R4BR3" :ƒ2!A$(19)Г"BU5ER2FDGNLFDGL2NHBR6" :ƒ3!>A$(20)Г"BU2U1E3D4NR1NL3D2BR4" :ƒ4!i&A$(21)Г"BU1F1R2E1U2H1L3U2R4BD6BR3" :ƒ5!™0A$(22)Г"BU6BR3L1G2D3F1R2E1U1H1L3BD3BR7" :ƒ6!Й:A$(23)Г"BU6R4D1G4D1BR7" :ƒ7!хDA$(24)Г"BUUER2EUHL2GDFR2FDGL2NHBR6" :ƒ8" NA$(25)Г"BRRE2U3HL2GDFR3BD3BR3" :ƒ9"?XA$(26)Г"BU6NG1D6L1R2BR2BU1U4E1F1D4G1NH1" :ƒ10"cbA$(31)Г"BR1R1BU2E2U1H1L2G" :ƒ? "rl:ƒ---TITLE"№vШ1,1:М2:Ц"BM62,52;S16C1":X$Г"COLOR":І1490:Ц"BM66,52;C3":І1490:Ц"BM6,112;C1":X$Г"BLACKJACK":І1490:Ц"BM10,112;C3":І1490#€:ƒ---CREATE DECK#NŠZГ0:ŒCN(104),CD(2,9),CS(104),CV(104),DD(104),C(12),H(12),S(12),D(12)#ƒ”€IГ0Ѕ1:€XГ1Ѕ4 :ƒ1=CLUB,2=SPADE,3=HEART,4=DIAMOND#­ž€YГ1Ѕ13:ZГZЋ1:CS(Z)ГX:CV(Z)ГY:CN(Z)ГY#ЬЈ… CN(Z)Г1Ї CV(Z)Г11 :ƒACE #їВ… CN(Z)В10Ї CV(Z)Г10 :ƒJACK,QUEEN,KING$М‹Y,X,I$Ц:ƒ---CREATE SYMBOLS$^аЦ"BM68,156;S8C3RURDR2U2LURUR3DRDLD2R2URDRD3LDLUL3D2LU2L3DLULU3"$‡кУ(80,152),3,3:Ф(68,148)Ќ(91,167),C,G$ПфЦ"BM100,156;C4BRRURURURUDRDRDRDRDLDLDLDLDULULULULU"$ыюУ(114,156),4,4:Ф(100,148)Ќ(123,167),D,G%'јЦ"BM132,156;C3BRRURURURURDRDRDRDRD2LDLUL2D3LU3L2DLULU2"%SУ(146,156),3,3:Ф(132,148)Ќ(155,167),S,G% Ц"BM164,156;C4BRU2RURUDRDR3URUDRDRD2LD2LDLDLDLULULULU2L"%МУ(170,152),4,4:Ф(164,148)Ќ(187,167),H,G%ђ П1,0:€XГ1Ѕ1000:‹:Щ"V20T15L1O4CL2O3GP5GL1AGP1BO4C"& *:ƒ---RULES DISPLAY&84ž0:‡џЁ(8,"*")"C0C0 CASINO RULES"џЁ(7,"*")"&Д>‡"DEALER:":‡" STANDS ON 17 OR MORE.":‡" DRAWS ON 16 OR LESS.":‡" HAS 2 DECKS.":‡" SHUFFLES WITH 20 CARDS LEFT.":‡:‡&ёH‡"PLAYER:":‡" MAY SPLIT PAIRS.":‡" STARTS WITH $1000."' RTTГ1000:‡@480,"READY?";'\І 1660:ž'/f:ƒ---START PLAY':pІ1670'RzС4,1:М:…DKД21І1670'І„BTГ100­џ„(10):BT$Гџ(џˆ(BT),2):Ц"BM20,102;C4":X$Г"Your bet is $"ЋBT$Ћ"!":І1490'ЏŽП1,0'ю˜€XГ0Ѕ9:€ HГ0Ѕ2:CD(H,X)Г0:‹ H,X :ƒH=0 DEALER, H=0/1 PLAYER(Ђ:ƒ---INITIAL SET UP(/ЌІ1500:CD(0,0)ГZ :ƒDEALER SHOW CARD(DЖXXГ0:YYГ0:І1520(rРС3,1:Л(16,0)Ќ(42,66),Н,BF:Т(30,32),10,1,2(ЊЪKГ1:€XГ0Ѕ1:І1500:CD(1,X)ГZ:XXГ16­X:YYГ106:І1520:‹(љд…CN(CD(1,0))ГCN(CD(1,1))ЇЦ"BM2,188C2":X$Г"SPLIT?":SPГ1:І1490:„SPГ0:Ѕ1010) оІ1660:І1830))ш…K$Г"N"ЇSPГ0:Ѕ1010:„1150)@ђ:ƒ---PLAYER HAND 1)’ќHГ1:І1770:PT(1)ГT:…PT(1)Г21ЇPT(1)Г99:Ц"BM2,188":X$Г"BLACKJACK":І1490:Ѕ1070)ЭЦ"BM2,188":X$Г"HIT?":І1490:І1660:І1830:…K$Г"N"Ї1070)ўІ1500:KГKЋ1:CD(1,K)ГZ:XXГ16­K:YYГ106:І1520*@HГ1:І1770:Ц"BM2,188":PT(1)ГT:… TВ21ЇX$Г"BUST!":І1490:Ѕ1070*l$…PT(1)Г21ЇX$Г"*21*":І1490:Ѕ1070:„1030*{.…SPГ0Ї1210*’8:ƒ---PLAYER HAND 2*ЅB…PT(2)Г99Ї1210*­LKГ1+VЦ"BM128,188":X$Г"HIT?":І1490:І1660:І1840:…K$ДВ"N"Ї1120:„HГ2:І1770:PT(2)ГT:Ѕ1210+;`І1500:KГKЋ1:CD(2,K)ГZ:XXГ128ЋK­16:YYГ106:І1520+jHГ2:І1770:Ц"BM128,188":PT(2)ГT:… TВ21ЇX$Г"BUST!":І1490:Ѕ1210+Ћt…PT(2)Г21ЇX$Г"*21*":І1490:Ѕ1210:„1110+Х~:ƒ---REDEAL FOR SPLIT+ўˆCD(2,0)ГCD(1,1):І1500:CD(1,1)ГZ:XXГ16:YYГ106:І1520,@’І1500:CD(2,1)ГZ:€IГ0Ѕ1:ZГCD(2,I):XXГ126Ћ16­I:YYГ106:І1520:‹,WœHГ2:І1770:PT(2)ГT,‘І…PT(2)Г21ЇPT(2)Г99:Ц"BM128,188":X$Г"BLACKJACK":І1490,œАЅ1020,КК:ƒ---COMPLETE DEALER HAND,№ФKГ0:…PT(1)В21Ї…SPГ0Ї1290:„…PT(1)В21АPT(2)В21Ї1290-ЮKГKЋ1:І1500:CD(0,K)ГZ:XXГ16­K:YYГ0:І1520-MиHГ0:І1770:CTГT:… CTД17Ї1230:„…CTД21Ї1290-hтЦ"BM128,50":X$Г"BUST!"-‘ь…CTГ21ЇX$Г"*21*":…KГ1ЇX$Г"BLACKJACK"-œіІ1490-­:ƒ---SCORING-Э Л(0,68)Ќ(255,102),О,BF:LOГ0-мHГ1:І1700-ё…SPГ1ЇHГ2:І1700.(Ц"BM20,86":…LOГ0ЇX$Г"BROKE EVEN!":Ѕ1350.H2…LOВ0ЇX$Г"You LOST $":„X$Г"You WON $".c:ƒ***THIS LISTING ALSO PROVIDESEXAMPLES OF HOW TO WRITE 'SSO THEY ARE NEATLY AND LEGIBLY PRESENTED TO AFFORD EASY READ- ING.'E:ƒ'h:ƒ********EXAMPLE NO.1********'ѓ ‡:‡"1 THIS IS A TEST TO DETERMINE JUST HOW TO GO ABOUT MAKING A SECOND LINE THAT LINKS UP TO THEFIRST LINE OF AN EXTRA NUMBER OF";(‡"LINES.(:ƒ**** IF THE LINE ENDS JUST BEFORE THE IMAGINARY LINE, NO LEAD SPACE IS REQUIRED AFTER THEIMAGINARY LINE IN THE NEXT PRO- GRAM LINE.(М(:ƒ***YOUR IMAGINARY LINE WILL BE THE SAME.(У2:ƒ(ц<:ƒ********EXAMPLE NO. 2*******(ьA‡)SF‡"2 WHAT HAPPENS WHEN THE END OF THE WORD DOES NOT COME UP TO THEEND OF THE IMAGINARY LINE? LET")ŸP‡"US CHECK IT OUT! THE IMAGINARY LINE IS ALWAYS AFTER THE 'QUOTE'MARK.)ЛZ‡:‰" PRESS ";O1)Уdž:‡*jn:ƒ***IF THE LINE ENDS ONE SPACE BEFORE THE IMAGINARY LINE, PUT ON THE END <"> AND DO NOT LEAVE A SPACE AFTER THE IM- AGINARY LINE ON THE NEXT PROGRAMLINE.*оx:ƒ***THE SAME RESULT CAN BE ACHIEVED BY PUTTING THE <"> AFTER THE IMAGINARY LINE AND FOLLOW WITH A <;>.*х‚:ƒ+Œ:ƒ*******EXAMPLE NO. 3*******+,–‡"3 WHAT HAPPENS WHEN YOU DON'T"+f ‡"USE THE IMAGINARY LINE IN THE FIRST PROGRAM LINE?+lЅ‡,&Њ:ƒ***SO LONG AS THE FIRST PROGRAM LINE IS LOGICALLY ENDED,WITHOUT A BREAK IN SYLLABLES, YOU CAN USE THE IMAGINARY LINE IN THE SECOND PROGRAM LINE AS YOUR NEW IMAGINARY LINE.,GД:ƒ******EXAMPLE NO. 4*******,NО:ƒ,tШ‡"4 WHAT TO DO WHEN AN EXTRAORD-",—в‡"INARY SYLLABLE IS BROKEN UP?-м:ƒ***IF YOU PUT THE CLOSING 'QUOTE' AFTER THE BROKEN SYLLA- BLE THE SECOND LINE WILL FOLLOW AS THE BEGINNING OF A NEW LINE.-с‡-%ц:ƒ-F№:ƒ******EXAMPLE NO, 5*******-Яњ‡"5 THIS IS ANOTHER TEST TO DETER-MINE THE VALIDITY OF USING THE SPACE AFTER THE IMAGINARY MARK TO GIVE CONTINUITY TO YOUR SYS- ";./‡"TEM THAT MAY BE USED IN EVERY INSTANCE. THE BEST RULE IS ONE THAT HOLDS IN EVERY CASE..K‡:‰" PRESS ";O1.Už:‡:‡.\":ƒ.~,:ƒ********6 FINAL TEST*******/g6‡"6 YOU WILL PLEASANTLY DISCOVER THAT AS YOU PROGRESS, YOU WILL COMMIT MORE AND MORE TO MEMORY. REMEMBER, WITH AVAILABLE REFER- ENCE MATERIAL, IT IS NOT WRITTENIN BLOOD, THAT YOU ARE REQUIRED TO MEMORIZE EVERYTHING. ALL YOU";/‘@‡"NEED TO KNOW IS WHERE TO LOOK ITUP.0IJ:ƒ***IF YOU LEAVE OFF THE <;>YOU WIND UP WITH AN EMPTY ROW, ONLY IN THE CASE WHERE THE LAST LETTER ENDS JUST BEFORE THE IM- AGINARY LINE. IT IS NEEDED TO CLOSE UP THE SENTENCE.0PT:ƒ0q^:ƒ********CONCLUSION********0xh:ƒ1Zr:ƒ***IT HOLDS IN ALL CASES THAT IF YOU REACH THE END OF A MULTIPLE LINE TEXT SENTENCE AND YOU BACK UP TO THE END OF THE LAST LOGICALLY POSITIONED LINE, REGARDLESS OF EXACTLY WHERE IT ENDS, PROVIDED IT DOESN'T CROSS 1и|:ƒTHE IMAGINARY LINE, YOU CANPUT A <"> AFTER, REPEAT, AFTER, THE IMAGINARY LINE FOLLOWED BY A<;> AND YOU ARE IN BUSINESS.1њ†:ƒ***FOR USE WITH ARTICLE 8A.2‹Ѕ 3952‰єž:€ IГ 1 Ѕ 4:‡:‹:‡" THIS PROGRAM EXPLAINS DIFFER- ENT FACETS OF FORMATTING TEXT. REMS ARE USED TO SHOW HOW THISIS ACHIEVED.3 ў‡:‡" YOU ARE REQUIRED TO READ THE LISTING FIRST. WHEN YOU RUN THE PROGRAM, YOU WILL SEE THE RE- SULTANT EXAMPLES 1 THRU 6.3H‡:‡" REMEMBER TO COPY THIS LISTING EXACTLY AS WRITTEN.3d‡:‰" PRESS ";O14ž:‡:‡" NOTE HOW EASY IT IS TO READ THE LISTING FROM THE SCREEN! NOTE HOW DISJOINTED THE TEXT LOOKS ON THE LISTING BUT WHEN YOU THE PROGRAM, IT LOOKS WELL ORGANIZED.4‡:‡" THAT IS WHAT WE WANT TO A- CHIEVE. NICE, READABLE TEXT ON THE SCREEN AND NICE, READABLE S IN THE LISTING.4Й&‡:‰" PRESS ";O14Ф0М:Ѕ 2 BG$Д"0" Б BG$В"8" Ї 1654эІ‡ џ‰(BG$)5ЇС џ‰(FG$),џ‰(џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџFНЉ(Ž *І€'НЃ ї9 disk read TRACK SECTOR Ž%б† НЃ ЖTЗUŽ,П † НЃ /НЁБ0%љ3.ѕНЃ €0Ц =їTНЁБ0%у9.пНЃ €0ЛTЗT9ОР†Ї„oЖUЇЖTЇЮя­ŸРOЗџ@†`З>Ž"ŸˆŽ%Н OіUННЬŽ6ŸˆŽ,Н OіTННЬНЁС;'-'0S'GW'TX'џ хЖTL'ЗT T|TЖUL#'ЗU ыЖTJ'ЗT р†ЗTЖU'жJЗU аОРЮEя­ŸРџ@ ПОР†Ї„ЮEя­ŸР ­lџ*****EXAMPLE NO.1********'ѓ ‡:‡"1 THIS IS A TEST TO DETERMINE JUST HOW TO GO ABOUT MAKING A SECOND LINE THAT LINKS UP TO THEFIRST LINE OF AN EXTRA NUMBER OF";(‡"LINESџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЉ&:ƒ *CMERGE*&2:ƒ BY: JORGE MIR&I:ƒ 1981 (C)&P:ƒ&i… џ†(&H200)Г&H8E Ї 8&ШXГ&H200:’ X,&H8E:’XЋ1,џ†(25):’XЋ2,џ†(26):’XЋ3,&H9F:’XЋ4,&H19:’XЋ5,&H7E:’XЋ6,&HAE:’XЋ7,&H75&о’&H9D,&H2:’&H9E,0&їž:‡ Є10)"*CMERGE*":‡' ‡"MEMORY AVAILABLE:"џ“'7 A1Гџ†(25):A2Гџ†(26):A3ГA1­256ЋA2'\ B1Гџ†(27):B2Гџ†(28):B3ГB1­256ЋB2'” ‡:‡"START OF PROGRAM:";:‡ Э"###### % %";A3;џœ(A3)'Ъ ‡"END OF PROGRAM :";:‡ Э"###### % %";B3;џœ(B3)'ы‡:‡" 1 - MERGE NEW PROGRAM"(‡:‡" 2 - END MERGING ROUTINE"(,‡ @357,"YOUR CHOICE";:‰ I(=ˆ I Ѕ 19,24(FЅ16(Сž:‡:‡" RENUMBER THE NEW PROGRAM WHEN LOADING IS COMPLETED SO AS TO AVOID CONFLICT WITH THE OTHER PROGRAM STEPS.")J‡:‡" TYPE 'EXEC' AFTER THE RENUMBERING IS COMPLETED TO GO BACK TO 'CMERGE' AND CONTINUE OR END THE MERGING PROCEDURE.")Z… B2Д2 Ї 23)p’25,B1:’26,B2Ќ2:—)Š’25,B1Ќ1:’26,B2Ћ254:—)ѕž:‡:‡" YOUR PROGRAMS HAVE BEEN MERGED AND YOU CAN NOW LIST, EDIT, OR SAVE THEM TO CASSETTE OR DISK."*ž‡:‡" YOU SHOULD DELETE THE SECTION OF THE PROGRAM THAT CONTAINS 'CMERGE' AND IN ITS PLACE YOU SHOULD PLACE A MENU TO ACCESS THE VARIOUS MERGED PROGRAMS."*Ј‡:‡:ŠЅ8:Л(P(U),Q(U))Ќ(P(UЋ1Ќ8­џ(UЎ8)),Q(UЋ1Ќ8­џ(UЎ8))),Н:Л(P(UЋ8),Q(UЋ8))Ќ(P(UЋ9Ќ8­џ(UџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџУ&" :ƒAFTER YOU RUN THIS PROGRAM&?:ƒSAVE TO TAPE WITH THIS&N:ƒCOMMAND:&w(:ƒCSAVEM"GRAFDUMP",32143,32593,32144&†2:ƒFOR 16K:&Џ<:ƒCSAVEM"GRAFDUMP",15759,16209,15760&аF:ƒFOR DISK USE SAVEM COMMAND&№P:ƒFOR 16K LINES 130 AND 140'Z:ƒSHOULD READ AS FOLLOWS:'(d:ƒ 5 CLEAR 200,15743'Gn:ƒ 6 FOR X=15759 TO 16209'Nx:ƒ'^‚• 200,32127'tŒ€ XГ32143 Ѕ 32593'|– Y'† ’ X,Y'ŽЊ‹ X'РД† 255,52,18,190,1,107,175,140,233,48,141,0,13'ёО† 191,1,107,134,126,183,1,127,167,140,217,53($Ш† 146,13,111,38,211,52,2,150,182,129,4,53,2,38(Xв† 201,129,21,38,197,134,255,167,140,206,111,140(Œм† 201,134,128,167,140,193,111,140,188,134,1,167(Нц† 140,189,134,254,151,111,134,18,173,159,160(ё№† 2,158,186,48,136,31,175,140,161,48,137,23,224)"њ† 175,140,156,16,142,0,1,141,108,174,140,145)T† 23,0,136,23,1,20,23,0,149,48,136,32,172,140)…† 132,47,239,134,13,173,159,160,2,141,80,174)Й† 141,255,116,156,186,45,91,141,104,23,1,51,141)ы"† 118,48,136,32,172,141,255,100,47,240,134,13*,† 173,159,160,2,174,141,255,86,156,186,45,69*P6† 49,33,16,140,0,8,47,12,16,142,0,1,108,141,255*@† 67,108,141,255,65,174,141,255,58,48,31,175*ГJ† 141,255,52,174,141,255,50,48,31,175,141,255*чT† 44,32,146,134,28,173,159,160,2,134,47,173,159+^† 160,2,134,128,173,159,160,2,57,134,129,167+Kh† 141,255,26,32,157,134,30,173,159,160,2,57,31+}r† 32,231,141,255,5,236,132,106,141,254,255,39+Б|† 4,89,73,32,246,57,168,141,254,251,138,128,164+у†† 141,254,244,167,141,254,236,108,141,254,229,† 161,141,254,227,38,15,230,141,254,219,193,128,Jš† 39,7,172,141,254,209,44,1,57,230,141,254,204,~Є† 93,39,64,134,28,173,159,160,2,166,141,254,191,ЏЎ† 52,2,171,224,173,159,160,2,166,141,254,181,уИ† 173,159,160,2,111,141,254,171,172,141,254,165-Т† 45,19,166,141,254,164,173,159,160,2,173,159-HЬ† 160,2,134,128,167,141,254,149,57,166,141,254-yж† 145,167,141,254,140,57,166,141,254,135,173-Њр† 159,160,2,173,159,160,2,32,208,167,141,254-лъ† 123,164,141,254,121,230,141,254,117,61,104. є† 141,254,112,31,152,88,52,4,171,224,171,141.>ў† 254,100,167,141,254,96,166,141,254,93,129,8.p† 47,17,111,141,254,85,108,141,254,81,166,141.Ё† 254,76,111,141,254,72,57,166,141,254,66,32.Т† 193,68,68,68,141,188,68,57COMMIT MORE AND MORE TO MEMORY. REMEMBER, WITH AVAILABLE Rџ&%:ƒ ****************************&@:ƒ CONVERT.64K&\:ƒ BY: JORGE MIR&€:ƒ ****************************&Я … џ†(&HC000)Г68 Ї SГ&H2601:SSГ&HB2:BSГ&H0E00 :„ SГ&H1E01:SSГ&HA2:BSГ&H0600&эEГџ†(25)­256Ћџ†(26)Ќ2:XГS'A1Гџ†(X):A2Гџ†(XЋ1):AГA1­256ЋA2'(’X,A1ЋSS'-2… AГE Ї 70'::ƒ 64KBASIC&Y:ƒ BY: JORGE MIR&}:ƒ ****************************&Љ ž:‰" PROGRAM NAME";PG$:… џ‡(PG$)В8 Ї 10&ъ‡:‡" INDICATE DEVICE TO BE USED: ASSETTE OR DISK?"&џI$Гџ’:… I$Г""Ї30'(… I$ДВ"C" А I$ДВ"D" Ї 30'A2ž3:‡џЁ(32,128);:‡@32,џЁ(32,163);'p