Atari 400

H-10 Appendix
510 IF PEEK( 764 > =255 THEt-i 5W
515 F.:EM OPEN TE.> : :T l· Ht · iOOi, J l·liTHOUT CLEA RH ~
G SCREEt·i
520 GRAPHIc:; 7 + 32
525 F~81 CHAt~GE COLOk::: ; BACK
530 SET COLOR 0 J 4 J 4: :3ETCOLOP L 0 J 14
550 STOP
1000 R81 ORA~,~ 1 STAR CENTERED AT i·L \'
1010 PLOT :x:-L"f':[!RA~JTO >::+L'r'
1020 PLOT >Vi' -1 : PLOT :=( .'l + 1
1030 RETURN