Sayfa 28

POKE 53281,8 POKE PESPEEK (45) *256*PEEK (46) DIM APP s8 1 EPP (56 ) PRİNT PİNKY COPY RECTORY" PRİNT >COP Y DISK" PRİNT PRG M. END<CTRL-8>" PRİNT SPC<210)"<RYSON><ISPACE )SELEC T TASK<3SPACE>" GET IF DC<İ OR DC>5 THEN 138 ON DCGOTO 778,178,590 #PRIİNT "<Cz7>"

PRİNT >İNSERT SOÜRCE DİSK" REM FİLES EİNLESEN* OPEN 1,8,0,"$0" GOSUB IF THEN 218 THEN 2818 THEN PRİNT > <RYSON>DISK-EMPTY< RVSOFF 850:RUN

PRİNT PROGRAM <ESPACE FOR Isi TO 198,0 WATT 198,1:GET A$z"Y” THEN CF 318 GOTO PRİNT > 348 THEN 238 PRİNT NEKT IF THEN 560

PRINT "<CLR>"," <RVSON><3SPACE ORK ING ÜN PRINT "<4SPACE><RYSON>İNSERT SOURCE -DISK AND 85a FOR Izi TO PASIF NOT CFACİ) THEN 43 a FOR TÜ 450:1F ST-8 OR

POKE ND OF PROGRAM": END

PRİNT "<CLR>” ÖPEN GET #3,AS,AS,BLS,BH$ IF THEN CLOSE 3:G60T0 848 PRINT SYS MDiGOTO 730 GOSUB 858:60T0 88 PRINT