8-Bit Software Online Conversion
The Radio Star - Listing
20SP=20
30*LOAD BUGGLE2 2000
40HIMEM=&2000
50DIMZ%300
60FORA%=0TO2STEP2:P%=Z%:[OPTA%:LDY#&F
F:STY&FE43:STA&FE4F:INY:STY&FE40:NOP:NOP
:NOP:NOP:LDY#&08:STY&FE40:RTS:.MAIN LDA#
&90:JSRZ%:LDA#&81:JSRZ%:LDA#0:JSRZ%:LDA#
&B0:JSRZ%:LDA#&A1:JSRZ%:LDA#0:JSRZ%:LDA#
&D0:JSRZ%:LDA#&C1:JSRZ%:LDA#0:JSRZ%
70SEI:.L1 LDA#0:STA&70:LDA#32:STA&71:
.L2 LDY#SP:.L6 DEY:BNEL6:LDA#&9F:SEC:SBC
(&70),Y:JSRZ%:CLC:ADC#32:JSRZ%:CLC:ADC#3
2:JSRZ%:NOP:JMPFINE:.FINE INC&70:BNELK:I
NC&71:BCCLX:.LK NOP:NOP:.LX LDA&71:CMP#&
7C:BNEL2:RTS
80]:NEXT
90CALLMAIN:GOTO90