10 REM PUSH "START" CONSOL KEY TO 20 REM ADD THE SYNC MARK ONTO THE TAPE 30 REM 40 REM 50 IO=53760:CONSOLE=53279:CASS=54018 100 FOR I=0 TO 8 110 READ J:POKE IO+I,J 120 NEXT I 125 REM THE FOR LOOP SETS THE AUDIO FREQUENCY & CHANNEL 130 DATA 5,160,7,160,5,160,7,160,0 140 REM 150 REM I/O IS SETUP; NOW START THE CASSETTE 160 POKE CASS,52 200 POKE CONSOLE,8 210 IF PEEK(CONSOLE)=7 THEN 230:REM CONSOLE=7 MEANS WRITE MARK, 220 POKE IO+15,11:GOTO 200:REM CONSOLER KEYS NOT PRESSED 230 POKE IO+15,128+11:GOTO 200:REM IF CONSOLE=7 WRITE "SPACE"
Back to previous page