Simulate input/Keyboard: Difference between revisions

Content added Content deleted
(Applesoft BASIC)
Line 43: Line 43:
=={{header|BASIC}}==
=={{header|BASIC}}==
==={{header|Applesoft BASIC}}===
==={{header|Applesoft BASIC}}===
EXEC KB executes the text file KB from disk as if you had typed everything that is in the KB text file. MON I will MONitor Input from disk.

<lang basic> 100 REM SIMULATE KEYBORD INPUT
<lang basic> 100 REM SIMULATE KEYBORD INPUT
110 GOSUB 170"OPEN&WRITE KB
110 GOSUB 170"OPEN&WRITE KB
Line 54: Line 54:
180 M$ = CHR$ (13):O$ = "OPEN"
180 M$ = CHR$ (13):O$ = "OPEN"
190 F$ = "KB":A$ = F$ + M$ + D$
190 F$ = "KB":A$ = F$ + M$ + D$
200 PRINT D$"MONI"M$D$O$A$C$;
200 PRINT D$"MON I"M$D$O$;
210 PRINT A$"DELETE"A$O$A$;
210 PRINT A$C$A$"DELETE"A$O$;
220 PRINT "WRITE"F$: RETURN</lang>
220 PRINT A$"WRITE"F$: RETURN </lang>


{{Out}}
{{Out}}