NES@HHH @@ ` ; LA LA ! LZ LZ -    hhh@x   0  0       0  ?    C R5 PG PG!RG!#RG!CPG!cPG!R7 6 8 % &!'!( -. 0/!R)*!r,+"#R5"CPG"cPG"RG"RG"PG"PG#R7"B6"T8""%"4&#'#("R12"r43")*",+ g #H#I     !79:;BCD!W<=>E!w?@AF"8 "w"9:;BCD"<=>E"?@AFL900&00000&000P%xP%@X%xX%P*PP+XX*PX+XP+@`P*@hX+`X*h0,(0,@08-(8-0P-(P-0X,(X,0@,@- H,H- @-8@,@@H-8H,@%x%@%x%)X)`)h)p)X)`)h)p,(,@0-(-0-(-0,(,0,-@ ,- -8,@@-8,@505@5PHPX `h9 %"L9 % e LV@@@@@) @)L )  pF FFF LF L)ѥ F FLJ JUJ JU   ` # ԍ   #   `  @@@ J Jf@ J Jf @)E   E!% E"%`@JJJJJ`@)# #`# #` # #`# #`  %`) %`  ) `8hihi l ȱ ȱ H ) h  JJȱ 8ee л   `@@@@ @`@` C# C#` C# C#` C#DUU C#DUU` C#DUU C#DUU`LLLL %P01  )JJJJHH e % e %hhп %HH ehhL ,L} 'LU0)@1)E@8f0f10)8i8&`L.̍@@@@@ I` %@)`$E5,$03,$44,$55,$55 .BYTE 00 RTS ; ; NOWTE1 LDA TIME CMP #$18 BCC BRTES JMP APR1 BRTES JMP BLK1 ; NOWTE2 LDA TIME CMP #$18 BCC BRTES2 JMP APR2 BRTES2 JMP BLK2 ; ;************************************ ;* * ;* URA ASOBI * ;* * ;************************************ GAME LDA #00 STA TIME2 WAIT1 JSR WNMI LDA TIME2 CMP #$50 BNE WAIT1 ; LDA $500 STA $30 LDA #$F0 STA $31 LDA #$FF STA CONM1 STA CONM2 GAMELO LDA #$FF LDX #00 CLRLO STA $2E1,X INX INX INX INX CPX #$20 BNE CLRLO ; LDX #00 LOMAKE LDA COMCON STA MEMORY AGAIN JSR RUNDOM LDA COMCON CMP MEMORY BEQ AGAIN STA $600,X INX BNE LOMAKE ; LDA #01 STA COUNT NEXTG LDA COUNT AND #$0F STA $2F5 LSR A LSR A LSR A LSR A STA $2ED ; LDY COUNT LDX #00 LODISP LDA #00 STA CONT2 STA EDGE2 ; LDA $600,X STA CONT1 STA EDGE1 STA $F0 TYA PHA TXA PHA LDA #00 STA TIME2 WAIT2 LDA $F0 STA CONT1 JSR CONCH JSR WNMI LDA TIME2 CMP #$10 BNE WAIT2 LDA #00 STA TIME2 STA EDGE1 JSR CONCH WAIT JSR WNMI LDA TIME2 CMP #$1A BNE WAIT PLA TAX PLA TAY INX DEY BNE LODISP ; ;-------------------------------- LDY COUNT LDX #00 WEDGE JSR WNMI TYA PHA TXA PHA ; JSR CONCH ; PLA TAX PLA TAY LDA EDGE1 BEQ WEDGE ; CMP $600,X BEQ OK JMP NG OK INX DEY BNE WEDGE JSR OKSOU INC COUNT JMP NEXTG NG JSR NGSOU JMP GAMELO ;--------------------------- ; GAME SUBLOUTINES ;--------------------------- RUNDOM LDA $30 AND #02 STA $40 LDA $31 AND #02 EOR $40 CLC BEQ BRRUN SEC BRRUN ROR $30 ROR $31 ; LDA $30 AND #$07 ; SEC ADC #00 TAY LDA #00 STA COMCON SEC SHIFT ROL COMCON DEY BNE SHIFT RTS ; NGSOU LDA #$C4 JMP BRSOU OKSOU LDA #$CC BRSOU STA $4001 LDA #$9F STA $4000 LDA #$FF STA $4002 LDA #$01 STA $4015 LDA #$08 STA $4003 ; JSR WSOU ; RTS ; WSOU JSR WNMI LDA $4015 AND #01 BNE WSOU ; RTS  c>6f6f~`~c>~`~c>0`~cc>0`~cc>c c >cc?<>cc?<6cccc6cccc~cc~cc~~cc~cc~3```33```3|fcccf||fcccf|?00>00??00>00?``~`````~```0`gc30`gc3cccccccccccc  c>c>cflx|ngcflx|ng000000?000000?cwkcccwkcccs{ogccs{ogc>ccccc>>ccccc>~ccc~``~ccc~``>cccof=>cccof=~ccg|ng~ccg|ngc>c>? ? cccccc>cccccc>cccw>cccw>cck6"cck6"cw>>wccw>>wc33 33 8p8p????``??gl,Ggl,G|>` 88ppx 0pp8 CCpxxxxppp(0ph pp@8`p@10  @;q@#@0` (+@@@?1!!!!1@@@` 0pp >>` ` >>?> ` x ?( ?@???>@><@@@@@ 8xp  8t|7?` ̈cə6f~`~c>ϟ0`~cc>c Ýð>cc?<ɜ6cc  >c? ə6f~`~ϟ0`~c Ýcc?c6 ?Ïc>cc>OC><~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~FIIIIIIFfffif vvFIIIIIIFffiff vv@8<<<<<<<8DD88DD88DD8`p880 `@`8|? 8>|/hh!.< 88< 88FIIIIIIFFIIIIIIFOHHNAAANOHHNAAANf)If)Io!Ao!Afiffifonnonn&ii)&&ii)&/hh!./hh!.n@HHH @@ ` ; LA LA ! LZ LZ -    hhh@x   0  0       0  ?    C R5 PG PG!RG!#RG!CPG!cPG!R7 6 8 % &!'!( -. 0/!R)*!r,+"#R5"CPG"cPG"RG"RG"PG"PG#R7"B6"T8""%"4&#'#("R12"r43")*",+ g #H#I     !79:;BCD!W<=>E!w?@AF"8 "w"9:;BCD"<=>E"?@AFL900&00000&000P%xP%@X%xX%P*PP+XX*PX+XP+@`P*@hX+`X*h0,(0,@08-(8-0P-(P-0X,(X,0@,@- H,H- @-8@,@@H-8H,@%x%@%x%)X)`)h)p)X)`)h)p,(,@0-(-0-(-0,(,0,-@ ,- -8,@@-8,@505@5PHPX `h9 %"L9 % e LV@@@@@) @)L )  pF FFF LF L)ѥ F FLJ JUJ JU   ` # ԍ   #   `  @@@ J Jf@ J Jf @)E   E!% E"%`@JJJJJ`@)# #`# #` # #`# #`  %`) %`  ) `8hihi l ȱ ȱ H ) h  JJȱ 8ee л   `@@@@ @`@` C# C#` C# C#` C#DUU C#DUU` C#DUU C#DUU`LLLL %P01  )JJJJHH e % e %hhп %HH ehhL ,L} 'LU0)@1)E@8f0f10)8i8&`L.̍@@@@@ I` %@)`$E5,$03,$44,$55,$55 .BYTE 00 RTS ; ; NOWTE1 LDA TIME CMP #$18 BCC BRTES JMP APR1 BRTES JMP BLK1 ; NOWTE2 LDA TIME CMP #$18 BCC BRTES2 JMP APR2 BRTES2 JMP BLK2 ; ;************************************ ;* * ;* URA ASOBI * ;* * ;************************************ GAME LDA #00 STA TIME2 WAIT1 JSR WNMI LDA TIME2 CMP #$50 BNE WAIT1 ; LDA $500 STA $30 LDA #$F0 STA $31 LDA #$FF STA CONM1 STA CONM2 GAMELO LDA #$FF LDX #00 CLRLO STA $2E1,X INX INX INX INX CPX #$20 BNE CLRLO ; LDX #00 LOMAKE LDA COMCON STA MEMORY AGAIN JSR RUNDOM LDA COMCON CMP MEMORY BEQ AGAIN STA $600,X INX BNE LOMAKE ; LDA #01 STA COUNT NEXTG LDA COUNT AND #$0F STA $2F5 LSR A LSR A LSR A LSR A STA $2ED ; LDY COUNT LDX #00 LODISP LDA #00 STA CONT2 STA EDGE2 ; LDA $600,X STA CONT1 STA EDGE1 STA $F0 TYA PHA TXA PHA LDA #00 STA TIME2 WAIT2 LDA $F0 STA CONT1 JSR CONCH JSR WNMI LDA TIME2 CMP #$10 BNE WAIT2 LDA #00 STA TIME2 STA EDGE1 JSR CONCH WAIT JSR WNMI LDA TIME2 CMP #$1A BNE WAIT PLA TAX PLA TAY INX DEY BNE LODISP ; ;-------------------------------- LDY COUNT LDX #00 WEDGE JSR WNMI TYA PHA TXA PHA ; JSR CONCH ; PLA TAX PLA TAY LDA EDGE1 BEQ WEDGE ; CMP $600,X BEQ OK JMP NG OK INX DEY BNE WEDGE JSR OKSOU INC COUNT JMP NEXTG NG JSR NGSOU JMP GAMELO ;--------------------------- ; GAME SUBLOUTINES ;--------------------------- RUNDOM LDA $30 AND #02 STA $40 LDA $31 AND #02 EOR $40 CLC BEQ BRRUN SEC BRRUN ROR $30 ROR $31 ; LDA $30 AND #$07 ; SEC ADC #00 TAY LDA #00 STA COMCON SEC SHIFT ROL COMCON DEY BNE SHIFT RTS ; NGSOU LDA #$C4 JMP BRSOU OKSOU LDA #$CC BRSOU STA $4001 LDA #$9F STA $4000 LDA #$FF STA $4002 LDA #$01 STA $4015 LDA #$08 STA $4003 ; JSR WSOU ; RTS ; WSOU JSR WNMI LDA $4015 AND #01 BNE WSOU ; RTS  c>6f6f~`~c>~`~c>0`~cc>0`~cc>c c >cc?<>cc?<6cccc6cccc~cc~cc~~cc~cc~3```33```3|fcccf||fcccf|?00>00??00>00?``~`````~```0`gc30`gc3cccccccccccc  c>c>cflx|ngcflx|ng000000?000000?cwkcccwkcccs{ogccs{ogc>ccccc>>ccccc>~ccc~``~ccc~``>cccof=>cccof=~ccg|ng~ccg|ngc>c>? ? cccccc>cccccc>cccw>cccw>cck6"cck6"cw>>wccw>>wc33 33 8p8p????``??gl,Ggl,G|>` 88ppx 0pp8 CCpxxxxppp(0ph pp@8`p@10  @;q@#@0` (+@@@?1!!!!1@@@` 0pp >>` ` >>?> ` x ?( ?@???>@><@@@@@ 8xp  8t|7?` ̈cə6f~`~c>ϟ0`~cc>c Ýð>cc?<ɜ6cc  >c? ə6f~`~ϟ0`~c Ýcc?c6 ?Ïc>cc>OC><~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~FIIIIIIFfffif vvFIIIIIIFffiff vv@8<<<<<<<8DD88DD88DD8`p880 `@`8|? 8>|/hh!.< 88< 88FIIIIIIFFIIIIIIFOHHNAAANOHHNAAANf)If)Io!Ao!Afiffifonnonn&ii)&&ii)&/hh!./hh!.n6ccc66ccc6  ?  ?>cc? c>6f6f~`~c>~`~c>0`~cc>0`~cc>c c >cc?<>cc?<6cccc6cccc~cc~cc~~cc~cc~3```33```3|fcccf||fcccf|?00>00??00>00?``~`````~```0`gc30`gc3cccccccccccc  c>c>cflx|ngcflx|ng000000?000000?cwkcccwkcccs{ogccs{ogc>ccccc>>ccccc>~ccc~``~ccc~``>cccof=>cccof=~ccg|ng~ccg|ngc>c>? ? cccccc>cccccc>cccw>cccw>cck6"cck6"cw>>wccw>>wc33 33 8p8p?8p`88?`p8??????pppppppp??I1I1̊̊00~F~F!Af 1!Af 1``8``8vffFFvffFF``````p8``p8 8p 8p | |  `0 3>  F 2~<8>44,>4@@  B 2~<<<<<<   a2 2> <<6ffF<<6f$  8<|`p88<|X88<P ;3cB;c=@:~<<=:~<<=@>~<<=>~<<=9`< f|=9< f||==`<$f|==<$f||<<~<<<c6b|><B<~<<|F|<<66 <6D"< a<>6lf"6lf0x80x<.6ll66ll6<<~|lld@ll ``p`8|n>~l&>~ a<A<>~>>|n | <<l6>l! 0<<< ~<<~$$<<f<$f~<>66ccc">66c"c   <|tp< ,8 <~~R ` <||<<>;2b@<>:0`<8<<,$<8@@&<<6v<<6<<~~664$<>66XHH>wccc">wcc<<~~<<|l662 |l64D0<<~~4<<~v20 <~u10<~B>4444<@8< >><,6<,6C<~<<<~Ld >~$<<~C>~ ^L`  >000`0@L~>  >4lfb 4l`@<08<||<<9<0xxx<~B~~<~B~$<~fLf<0 <  !;0|s370 @@><7n ,>|`f۽<~~>~f$>~f88*8$~<8<|c!`<|b 88*k8$~<<<8 <8888$|<<8<6$`<<8 4 8*+)+8@d?><<6:((((8Bf<<<<8***.8d~><0<888((x<88((88|888>>>>>>>"6>>><<2<$f~ $<~<$$$<~~<0x0x|~~>0x`0x|~0x2`0x|~ ? p0?   ??p8p88pp8pp>6ww>6wwΎΎ  ****  NHHNBBNNHHNBBN  6ccc66ccc6  ?  ?>cc? c>6f6f~`~c>~`~c>0`~cc>0`~cc>c c >cc?<>cc?<6cccc6cccc~cc~cc~~cc~cc~3```33```3|fcccf||fcccf|?00>00??00>00?``~`````~```0`gc30`gc3cccccccccccc  c>c>cflx|ngcflx|ng000000?000000?cwkcccwkcccs{ogccs{ogc>ccccc>>ccccc>~ccc~``~ccc~``>cccof=>cccof=~ccg|ng~ccg|ngc>c>? ? cccccc>cccccc>cccw>cccw>cck6"cck6"cw>>wccw>>wc33 33 8p8p????``??gl,Ggl,G|>` 88ppx 0pp8 CCpxxxxppp(0ph pp@8`p@10  @;q@#@0` (+@@@?1!!!!1@@@` 0pp >>` ` >>?> ` x ?( ?@???>@><@@@@@ 8xp  8t|7?` ̈cə6f~`~c>ϟ0`~cc>c Ýð>cc?<ɜ6cc  >c? ə6f~`~ϟ0`~c Ýcc?c6 ?Ïc>cc>OC><~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~FIIIIIIFfffif vvFIIIIIIFffiff vv@8<<<<<<<8DD88DD88DD8`p880 `@`8|? 8>|/hh!.< 88< 88FIIIIIIFFIIIIIIFOHHNAAANOHHNAAANf)If)Io!Ao!Afiffifonnonn&ii)&&ii)&/hh!./hh!.