1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
; Simple example spectrum code ; ; To use: ; ; LOAD "" CODE ; RANDOMIZE USR 32768 ; option output-file,spectrum.tap option output-format,spectrum org 32768 ld a,0 loop: out ($fe), a inc a and 7 jp loop