home *** CD-ROM | disk | FTP | other *** search
- 0 poke53280,0:poke53281,6:poke646,1
- 1 print"[147]commodares problem #30-42
- 2 [153]" color bars":[153]
- 3 [143] solution by
- 4 [143] bing perry
- 5 [143]
- 10 clmem[178]241 : [139] [195](ds$)[178]0 [167] clmem[178]646
- 20 hld[178]0:rep[178]1:ctr[178]1
- 30 rnr[178][181]([187](0)[172]16)
- 40 [151] clmem,rnr:[129] i[178]1 [164] rep:[153] [199](65[170]rnr);:[130]
- 50 [139] rnr[178]hld [167] ctr[178]ctr[170]1:[137] 70
- 60 ctr[178]1
- 70 [139] ctr[177]rep [167] rep[178]ctr
- 80 hld[178]rnr : [137] 30
-