The Resource Magazine For Apple, Atari, and Commodore ...
The Resource Magazine For Apple, Atari, and Commodore ...
The Resource Magazine For Apple, Atari, and Commodore ...
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
44 COMPUTE) September/October, 198O. Issue 6<br />
1000<br />
1017<br />
1020<br />
1030<br />
1035<br />
PRINT"fi":NR=INT{RND(TI)*4)<br />
IFC=1THENR1=R:R=R+NR<br />
IFC=2THENR2=RR:RR=RR+NR<br />
IFR>9THENR=9:NR=R-Rl<br />
IFRR>9THENRR=9:NR=RR-R2<br />
1040 PRINT'^WWlNCREASE IN YOUR RESOURCE -<br />
1060<br />
-.UNITS: f ";NR<br />
GOSUB19000:GOTO15 0<br />
2000 PRINT"fi";Nl$;" CANDIDATE LEADS:*":<br />
->FORZ = lTO51<br />
2020 IFT% ( Z ) >TT% ( Z) THENPRINT"jl" ; ST$ ( Z ) ; EL%<br />
-.(Z) :CT=CT+1<br />
2030<br />
2040<br />
2050<br />
IFCT=20THENGOSUB19000:CT=0:PRINT"fi"<br />
NEXTZ<br />
CT=0:GOSUB190 00:GOTO150<br />
3000 PRINT"fi";N2$;n CANDIDATE LEADS:*":<br />
-.FORZ = 1TO51<br />
3020 IFT%(Z)TT%(Z)THENT1=T1+EL%(Z)<br />
IFT%(Z)T2THENPRINT"fit^r";NlS;"»<br />
-.CANDIDATE WINS!!":END<br />
4037 IFTU=10ANDTl