@@%: 5: 47,0: 48,132:: CO1 8: X,Y:XP%(CO)X: YP%(CO)Y::XOVF(1)5:XOVF(2)5:XOVF(3)638:YOVF(1)5:YOVF(2)5:YOVF(3)198@ P%(638),Q%(198)+A "NTER 1 FOR HITE ON LACK OR LACK ON HITE:": A$:BG6: FG0:MODE1:C1%1:C2%0: A$"1" BG0:FG6:C1%0:C2%1: 10?A A$(13) 5gA 5:@,BG,FG:@,0:X320:Y100: 300Ac: " AIN PROGRAMME LOOP.WBd:@,16100,X5,Y5,10,10:@,X1,Y1,X1,Y1,C1%: @,X1,Y1,X1,Y1,C2%:@!,16100,X5,Y5:P%(X)Q%(Y)BeHA%(2):XXXP%(HA% 127):YYYP%(HA% 127): (128 HA%) @,X2CR,YCR,X2CR,YCR,MODE:::0C+ " COMMAND LOOP.UC, ER30 300: COM$:: 1000C- ("U1234567890",COM$,1)0 @,0,0,0,640,200C. ("ABDR",COM$,1)0 @T,X,Y,MODEC/@!,16100,X5,Y53D0 EL100 EL101 EL450 EL450 EL451 EL452 EL460 EL461 EL462 zD1 COM$"I" MODE0:@,55296,0,192,1,1,"NVERSE.NVERSE."D6 COM$"N" MODE1:@,55296,0,192,1,1,"ORMAL.ORMAL."MTX1:X1X:XT:TY1:Y1Y:YT:iMY1Y:@,55296,0,192,1,1,"ET RADIUS."M:@,16100,X5,Y5,10,10:@T,X,Y,0:@T,X,Y,1:@!,16100,X5,Y5 NHA(2):DW128 HA:HAHA 127:YYYP%(HA):P%(X)Q%(Y): DW: Y(YY1):@,55296,0,192,1,1,"ET RADIUS."4NTY1:Y1Y:YT:N " AREA.N@TEXT: "LTRA ! ELP ERSION 3.7 ELEASE 1.1 PRODUCTIONS UBLIC OMAIN"OO ""O ", CURRENT MODE: OYSTICK OR MOUSE IN PORT .": "HANGE ! CURSOR SIZE: / FOLLOWED BY 0 (TINY) TO 9 (HUGE)."wP "AST CURSOR MOVEMENT: /, ANY 'ARROW' KEY (REPEATABLE), .": "LL FOLLOWING COMMANDS ARE PRECEEDED BY THE / KEY:"Q " : , MOVE CURSOR, : , MOVE CURSOR, ": " : , MOVE CURSOR, : AME AS "Q " : , TEXT, . : ": "  DRAW:  DRAW: "4R " : /, : , ": " : , FILENAME, : , FILENAME, "R " (LINE): , MOVE CURSOR, : ": " (COPY): , SET RANGE, SET NEW LOCATION, "R " : ? OR /"'S "RESS ANY KEY TO RETURN TO DRAWING.": A$:@,BG,FG: @!,0,0,0:S " RROR HANDLING.S (ER14 ER18) (EL100 EL451 EL461) X5 X635 XXOVF((X5)2)FT (ER14 ER18) (EL100 EL451 EL461) Y5 Y195 YYOVF((Y5)2)T (ER14 ER18) (EL100 EL451 EL461) 300:T ER23 300:T 5:@TEXT: ER,EL,(ER):T ˃ 0,-1,1,-1,1,0,1,1,0,1,-1,1,-1,0,-1,-1