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$" |
200 PRINT D$"MON I"M$D$O$; |
||
210 PRINT A$"DELETE"A$O |
210 PRINT A$C$A$"DELETE"A$O$; |
||
220 PRINT "WRITE"F$: RETURN</lang> |
220 PRINT A$"WRITE"F$: RETURN </lang> |
||
{{Out}} |
{{Out}} |