home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Debilizator 3
/
Debilizator_3_1998_AIDS_PL_Side_B.atr
/
maprot.arc
/
MAPROT.ASM
< prev
next >
Wrap
Assembly Source File
|
2000-06-03
|
19KB
|
2 lines
û´ϕβ≡¡≥∩⌠β⌠Θ∈º´é¢ûףβ≥≤βΘΣ≤§¨õõ¨¨é¢¢ opt %100101¢new1 equ $4d40¢new2 equ $5d80¢new3 equ $3d00¢new4 equ $6dc0¢tabl equ $5e80¢tabl2 equ $3d00¢¢_std equ $ff-1¢prm equ $ff-1¢_lst equ $ff-1¢_alf equ $eb-1¢_k1 equ $e7-1¢_k2 equ $e3-1¢¢_k3 equ $cf-1¢_k4 equ $cb-1¢_k5 equ $c7-1¢_c3 equ $c3-1¢_c4 equ $af-1¢_c5 equ $ab-1¢_m1 equ $a7-1¢¢ttex equ $4000¢¢* tex_twst --- $8000-$c3ff¢¢scr equ $700 $1040¢scr2 equ $1750 $820¢map_ equ $4000¢map equ scr¢texh equ $c400 $200¢scr3 equ $c600 $820¢¢nak1 equ scr2+1040+14¢nak2 equ scr3+1040+14¢¢logo equ $3000¢¢inc1 equ $d800¢dec1 equ $e800¢dl equ $f800 $1a2¢dl2 equ $fa00 $1a2¢texl equ $fc00 $200¢lo2 equ $fe00 $32¢hi2 equ $fe32 $32¢lo2_ equ $fe64 $32¢hi2_ equ $fe96 $32¢lo3_ equ $fec8 $11¢hi3_ equ $fed9 $11¢¢ org $80¢p3 org *+2¢p0 org *+2¢p1 org *+2¢p2 org *+2¢¢h0 org *+2¢h1 org *+2¢h2 org *+2¢¢p_0 org *+2¢p_1 org *+2¢p_2 org *+2¢p_3 org *+2¢p_4 org *+2¢p_5 org *+2¢p_6 org *+2¢p_7 org *+2¢p_8 org *+2¢p_9 org *+2¢p_a org *+2¢p_b org *+2¢p_c org *+2¢p_d org *+2¢p_e org *+2¢p_f org *+2¢p_10 org *+2¢¢bb org *+1¢bb2 org *+1¢bb2_ org *+1¢iley org *+1¢lft org *+1¢nr org *+1¢off org *+1¢¢prmm equ $d0 ($30)¢conb equ $c0 ($10)¢¢ org $2000¢rn sei¢ lda #0¢ sta $d40e¢ lda #$fe¢ sta $d301¢¢ jsr mkdl¢ jsr init¢ jsr calc¢¢ jsr makc¢ jsr mkc2¢ jsr mknak¢¢pp lda #_alf¢ sta $d301¢ ldx #0¢wps lda #0¢ pha¢ lda #_alf¢ sta $d301¢ lda lo2,x¢ sta p0¢ lda hi2,x¢ sta p0+1¢ pla¢ tay¢ lda (p0),y¢ sta prmm,x¢ lda lo2_,x¢ sta p0¢ lda hi2_,x¢ sta p0+1¢ lda (p0),y¢ beq spx¢ txa¢ sec¢ sbc #31¢ tay¢ lda lo3,y¢ sta aad+1¢ lda hi3,y¢ sta aad+2¢ lda #_k1¢ sta $d301¢ lda tabb,x¢ bne spx¢aad jsr $ffff¢ lda #$ff¢ sta tabb,x¢spx inx¢ cpx #48¢ bne wps¢ inc wps+1¢ inc wps+1¢ lda wps+1¢ cmp #181¢ bcc zpp¢ lda #0¢ sta wps+1¢¢ ldy #0¢ tya¢kas2 sta tabb,y¢ iny¢ cpy #49¢ bne kas2¢ ldy #1¢kaz lda lo3_,y¢ sta aad_+1¢ lda hi3_,y¢ sta aad_+2¢ lda #_k1¢ sta $d301¢aad_ jsr $ffff¢ iny¢ cpy #$10¢ bne kaz¢ jmp pp¢zpp lda #_k1¢ sta $d301¢ jsr $4000¢ lda #_k2¢ sta $d301¢ jsr $4000¢¢flag lda #0¢ bne __2¢¢ inc flag+1¢ lda $d40b¢ bne *-3¢ lda <dl2¢ sta $d402¢ lda >dl2¢ sta $d403¢ lda #_k3¢ sta $d301¢ jsr $4000¢ lda #_k4¢ sta $d301¢ jsr $4000¢ lda #_k5¢ sta $d301¢ jsr $4000¢¢ lda stat ;shft¢ beq enda¢¢ lda #_m1¢ sta $d301¢__x2 ldx #0¢ jsr $4000¢ jmp enda¢¢__2 dec flag+1¢ lda $d40b¢ bne *-3¢ lda <dl¢ sta $d402¢ lda >dl¢ sta $d403¢ lda #_c3¢ sta $d301¢ jsr $4000¢ lda #_c4¢ sta $d301¢ jsr $4000¢ lda #_c5¢ sta $d301¢ jsr $4000¢¢ lda stat ;shft¢ beq enda¢¢ lda #_m1¢ sta $d301¢_xx1 ldx #0¢ jsr $6000¢¢enda inc off¢ inc off¢¢ lda $d20f¢ and #8¢ bne git¢¢ lda #1¢ sta stat¢git lda #41¢ sta _xx1+1¢ jmp pp¢tabb org *+50¢¢kk1 brk¢stat brk¢¢ûϕδπ∩Σσ½≥σ≤⌠é¢mkc2 lda <scr¢ sta p2¢ lda >scr¢ sta p2+1¢ lda #0¢ sta nr¢mkcd lda #26¢ sta _py¢kka lda #_k1¢ sta kk1¢ jsr makk¢ jsr putd¢ lda #26¢ sta _py¢ lda #_k2¢ sta kk1¢ jsr makk¢ lda #_k2¢ sta bank¢ lda <inc1¢ sta p0¢ lda >inc1¢ sta p0+1¢ lda <dec1¢ sta p1¢ lda >dec1¢ sta p1+1¢ ldy #0¢k2_ lda p0¢ sta lo3,y¢ lda p0+1¢ sta hi3,y¢ lda p0¢ clc¢ adc lo4,y¢ sta p0¢ bcc *+4¢ inc p0+1¢ lda p0+1¢ clc¢ adc hi4,y¢ sta p0+1¢ lda p1¢ sta lo3_,y¢ lda p1+1¢ sta hi3_,y¢ lda p1¢ clc¢ adc lo4,y¢ sta p1¢ bcc *+4¢ inc p1+1¢ lda p1+1¢ clc¢ adc hi4,y¢ sta p1+1¢ iny¢ cpy #$11¢ bne k2_¢ ldy #0¢ tya¢kas sta tabb,y¢ iny¢ cpy #49¢ bne kas¢ ldx #$f¢ ldy #0¢mv1 lda inc1,y¢mv2 sta dec1,y¢ iny¢ bne mv1¢ inc mv1+2¢ inc mv2+2¢ dex¢ bpl mv1¢ lda <dec1¢ sta p0¢ lda >dec1¢ sta p0+1¢ ldy #0¢ptl lda (p0),y¢ cmp #$ee¢ beq decc¢ cmp #$ad¢ beq ldaa¢ inc p0¢ bne *+4¢ inc p0+1¢ jmp rs¢ldaa clc¢ lda #6¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢ jmp rs¢decc lda #$ce¢ sta (p0),y¢ lda #3¢ clc¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢rs lda p0+1¢ cmp >dec1+$ff4¢ bne ptl¢ lda p0¢ cmp <dec1+$ff4¢ bne ptl¢ rts¢¢ûϕβδσáπ∩Σσé¢makk lda <ttex¢ sta p0¢ lda >ttex¢ sta p0+1¢mcd2 lda #40¢ sta _px¢mcd1 equ *¢ ldy #0¢ ldx #prm¢ stx $d301¢adr1 lda new1¢ ldx kk1¢ stx $d301¢ cmp nr¢ beq sikp¢ sta nr¢ lda #$a4¢ sta (p0),y¢ lda nr¢ clc¢ adc #prmm¢ iny¢ sta (p0),y¢ iny¢ jmp noc¢sikp sta nr¢noc lda #$b9¢ sta (p0),y¢ iny¢ ldx nr¢ lda lo1,x¢ sta p1¢ lda hi1,x¢ sta p1+1¢ ldx #prm¢ stx $d301¢adr2 lda new2¢ clc¢ adc p1¢ sta p1¢ bcc *+4¢ inc p1+1¢adr5 lda new3¢ clc¢ adc p1+1¢ sta p1+1¢¢ jsr spec¢¢ ldx kk1¢ stx $d301¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #$8d¢ sta (p0),y¢ iny¢ lda p2¢ sta (p0),y¢ iny¢ lda p2+1¢ sta (p0),y¢ iny¢ inc p2¢ bne *+4¢ inc p2+1¢ ldx #prm¢ stx $d301¢adr3 lda new1+1¢ ldx kk1¢ stx $d301¢ cmp nr¢ beq okje¢ sta nr¢ lda #$a4¢ sta (p0),y¢ lda nr¢ clc¢ adc #prmm¢ iny¢ sta (p0),y¢ iny¢ jmp noc2¢okje sta nr¢noc2 ldx nr¢ lda lo1,x¢ sta p1¢ lda hi1,x¢ sta p1+1¢ ldx #prm¢ stx $d301¢adr4 lda new2+1¢ clc¢ adc p1¢ sta p1¢ bcc *+4¢ inc p1+1¢adr6 lda new3+1¢ clc¢ adc p1+1¢ sta p1+1¢¢ ldx kk1¢ stx $d301¢ lda #$b9¢ sta (p0),y¢ iny¢ jsr spec¢¢ ldx kk1¢ stx $d301¢¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #$8d¢ sta (p0),y¢ iny¢ lda p2¢ sta (p0),y¢ iny¢ lda p2+1¢ sta (p0),y¢ iny¢ tya¢ clc¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢ inc p2¢ bne *+4¢ inc p2+1¢ lda #2¢ clc¢ adc adr1+1¢ sta adr1+1¢ bcc *+5¢ inc adr1+2¢ lda #2¢ clc¢ adc adr2+1¢ sta adr2+1¢ bcc *+5¢ inc adr2+2¢ lda #2¢ clc¢ adc adr3+1¢ sta adr3+1¢ bcc *+5¢ inc adr3+2¢ lda #2¢ clc¢ adc adr4+1¢ sta adr4+1¢ bcc *+5¢ inc adr4+2¢ lda #2¢ clc¢ adc adr5+1¢ sta adr5+1¢ bcc *+5¢ inc adr5+2¢ lda #2¢ clc¢ adc adr6+1¢ sta adr6+1¢ bcc *+5¢ inc adr6+2¢ dec _px¢ beq *+5¢ jmp mcd1¢ dec _py¢ beq *+5¢ jmp mcd2¢ ldy #0¢ lda #$60¢ sta (p0),y¢ sta (p_0),y¢ sta (p_1),y¢ sta (p_2),y¢ sta (p_3),y¢ sta (p_4),y¢ sta (p_5),y¢ sta (p_6),y¢ sta (p_7),y¢ sta (p_8),y¢ sta (p_9),y¢ sta (p_a),y¢ sta (p_b),y¢ sta (p_c),y¢ sta (p_d),y¢ sta (p_e),y¢ sta (p_f),y¢ sta (p_10),y¢ rts¢_py brk¢_px brk¢_flg brk¢_fl2 brk¢bank brk¢¢putd ldy #0¢ lda #$ad¢ jsr pag0¢ iny¢ lda <bank¢ jsr pag0¢ iny¢ lda >bank¢ jsr pag0¢ iny¢ lda #$8d¢ jsr pag0¢ iny¢ lda <$d301¢ jsr pag0¢ iny¢ lda >$d301¢ jsr pag0¢ iny¢ tya¢ clc¢ adc p_0¢ sta p_0¢ bcc *+4¢ inc p_0+1¢ tya¢ clc¢ adc p_1¢ sta p_1¢ bcc *+4¢ inc p_1+1¢ tya¢ clc¢ adc p_2¢ sta p_2¢ bcc *+4¢ inc p_2+1¢ tya¢ clc¢ adc p_3¢ sta p_3¢ bcc *+4¢ inc p_3+1¢ tya¢ clc¢ adc p_4¢ sta p_4¢ bcc *+4¢ inc p_4+1¢ tya¢ clc¢ adc p_5¢ sta p_5¢ bcc *+4¢ inc p_5+1¢ tya¢ clc¢ adc p_6¢ sta p_6¢ bcc *+4¢ inc p_6+1¢ tya¢ clc¢ adc p_7¢ sta p_7¢ bcc *+4¢ inc p_7+1¢ tya¢ clc¢ adc p_8¢ sta p_8¢ bcc *+4¢ inc p_8+1¢ tya¢ clc¢ adc p_9¢ sta p_9¢ bcc *+4¢ inc p_9+1¢ tya¢ clc¢ adc p_a¢ sta p_a¢ bcc *+4¢ inc p_a+1¢ tya¢ clc¢ adc p_b¢ sta p_b¢ bcc *+4¢ inc p_b+1¢ tya¢ clc¢ adc p_c¢ sta p_c¢ bcc *+4¢ inc p_c+1¢ tya¢ clc¢ adc p_d¢ sta p_d¢ bcc *+4¢ inc p_d+1¢ tya¢ clc¢ adc p_e¢ sta p_e¢ bcc *+4¢ inc p_e+1¢ tya¢ clc¢ adc p_f¢ sta p_f¢ bcc *+4¢ inc p_f+1¢ tya¢ clc¢ adc p_10¢ sta p_10¢ bcc *+4¢ inc p_10+1¢ rts¢pag0 sta (p_0),y¢ sta (p_1),y¢ sta (p_2),y¢ sta (p_3),y¢ sta (p_4),y¢ sta (p_5),y¢ sta (p_6),y¢ sta (p_7),y¢ sta (p_8),y¢ sta (p_9),y¢ sta (p_a),y¢ sta (p_b),y¢ sta (p_c),y¢ sta (p_d),y¢ sta (p_e),y¢ sta (p_f),y¢ sta (p_10),y¢ rts¢¢spec ldx #_lst¢ stx $d301¢adr7 lda new4¢ bne *+5¢ jmp sk1¢¢ pha¢ lda p0¢ sta p3¢ lda p0+1¢ sta p3+1¢¢ sty _fl2¢¢ tya¢ clc¢ adc p3¢ sta p3¢ bcc *+4¢ inc p3+1¢ inc p3¢ bne *+4¢ inc p3+1¢¢ ldx #_std¢ stx $d301¢¢ pla¢ tax¢ dex¢ lda pg0,x¢ sta adra+1¢ sta adra2+1¢ sta adra3+1¢ sta adra4+1¢ sta adra5+1¢ clc¢ adc #1¢ sta adra6+1¢¢ ldy #0¢ lda #$ee¢adra sta (p2),y¢ iny¢ lda p3¢adra2 sta (p2),y¢ iny¢ lda p3+1¢adra3 sta (p2),y¢ iny¢ tya¢ clc¢adra4 adc p2¢adra5 sta p2¢ bcc *+4¢adra6 inc p2+1¢¢ ldy _fl2¢sk1 inc adr7+1¢ bne *+5¢ inc adr7+2¢ ldx #_std¢ stx $d301¢ rts¢¢init lda $d40b¢ bne *-3¢ lda #$22¢ sta $d400¢ lda #$40¢ sta $d01b¢ lda <dl¢ ldy >dl¢ sta $d402¢ sty $d403¢ rts¢¢mkdl lda #$70¢ sta dl¢ lda #$70¢ sta dl+1¢ lda <dl+2¢ sta p0¢ lda >dl+2¢ sta p0+1¢ lda <scr2¢ sta p1¢ lda >scr2¢ sta p1+1¢ jsr makr¢ lda <dl¢ sta (p0),y¢ iny¢ lda >dl¢ sta (p0),y¢¢ lda #$70¢ sta dl2¢ lda #$70¢ sta dl2+1¢ lda <dl2+2¢ sta p0¢ lda >dl2+2¢ sta p0+1¢ lda <scr3¢ sta p1¢ lda >scr3¢ sta p1+1¢ jsr makr¢ lda <dl2¢ sta (p0),y¢ iny¢ lda >dl2¢ sta (p0),y¢ rts¢¢makr ldx #51¢rb1 ldy #0¢ lda #$4f¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #0¢ sta (p0),y¢ iny¢ lda #$4f¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #0¢ sta (p0),y¢ clc¢ lda #8¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢ clc¢ lda #40¢ adc p1¢ sta p1¢ bcc *+4¢ inc p1+1¢ dex¢ bpl rb1¢ ldy #0¢ lda #$41¢ sta (p0),y¢ iny¢ rts¢¢calc ldy #0¢kkj tya¢ asl @¢ asl @¢ asl @¢ asl @¢ sta conb,y¢ iny¢ cpy #$10¢ bne kkj¢ ldy #0¢ tya¢clr sta prmm,y¢ iny¢ cpy #$30¢ bne clr¢ ldy #0¢k lda hi1,y¢ clc¢ adc #$80¢ sta hi1,y¢ iny¢ cpy #48¢ bne k¢ ldy #0¢czs lda wzr,y¢ pha¢ and #$f¢ sta texl,y¢ sta texl+$100,y¢ pla¢ and #$f0¢ sta texh,y¢ sta texh+$100,y¢ iny¢ bne czs¢ lda <tabl¢ sta p0¢ lda >tabl¢ sta p0+1¢ lda <tabl2¢ sta p1¢ lda >tabl2¢ sta p1+1¢ ldy #0¢kal lda p0¢ sta lo2,y¢ lda p0+1¢ sta hi2,y¢ clc¢ lda p0¢ adc #180¢ sta p0¢ bcc *+4¢ inc p0+1¢ lda p1¢ sta lo2_,y¢ lda p1+1¢ sta hi2_,y¢ clc¢ lda p1¢ adc #180¢ sta p1¢ bcc *+4¢ inc p1+1¢ iny¢ cpy #$32¢ bne kal¢ lda <inc1¢ sta p0¢ lda >inc1¢ sta p0+1¢ ldy #0¢k2 lda p0¢ sta lo3,y¢ lda p0+1¢ sta hi3,y¢ lda p0¢ clc¢ adc lo4,y¢ sta p0¢ bcc *+4¢ inc p0+1¢ lda p0+1¢ clc¢ adc hi4,y¢ sta p0+1¢ iny¢ cpy #$11¢ bne k2¢ ldy #0¢ ldx #0¢int lda lo3,x¢ sta p_0,y¢ iny¢ lda hi3,x¢ sta p_0,y¢ iny¢ inx¢ cpx #$11¢ bne int¢ rts¢¢lo3 dta l(0),l(337),l(373),l(373),l(313)¢ dta l(373),l(349),l(349),l(349)¢ dta l(325),l(229),l(205),l(145)¢ dta l(109),l(73),l(61),l(25)¢ dta a(0)¢hi3 dta h(0),h(337),h(373),h(373),h(313)¢ dta h(373),h(349),h(349),h(349)¢ dta h(325),h(229),h(205),h(145)¢ dta h(109),h(73),h(61),h(25)¢ dta a(0)¢lo4 dta l(337+6),l(373+6),l(373+6),l(313+6)¢ dta l(373+6),l(349+6),l(349+6),l(349+6)¢ dta l(325+6),l(229+6),l(205+6),l(145+6)¢ dta l(109+6),l(73+6),l(61+6),l(25+6)¢ dta a(0)¢hi4 dta h(337+6),h(373+6),h(373+6),h(313+6)¢ dta h(373+6),h(349+6),h(349+6),h(349+6)¢ dta h(325+6),h(229+6),h(205+6),h(145+6)¢ dta h(109+6),h(73+6),h(61+6),h(25+6)¢ dta a(0)¢pg0 dta b(p_0),b(p_1),b(p_2),b(p_3)¢ dta b(p_4),b(p_5),b(p_6),b(p_7)¢ dta b(p_8),b(p_9),b(p_a),b(p_b)¢ dta b(p_c),b(p_d),b(p_e),b(p_f)¢ dta b(p_10)¢lo1 dta c'
$Nêאå è④®x2µαם⌠HÆ∮Vס:גn(ΓóîvÇèñ∧⑧R¼⑥Éəñ^⑧ΓÜ'¢hi1 dta c' ⇧⇧⇩⇩⇨⇨⇦❎╱╱◆✓ ♪⓪①③④⑥⑧⑨!#%''*,.1368;>@C'¢¢makc lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ lda <map¢ sta h1¢ lda >map¢ sta h1+1¢ lda <scr2¢ sta h2¢ lda >scr2¢ sta h2+1¢ lda #17¢ sta bb¢ ldx #_k3¢ stx $d301¢ jsr makz¢ jsr spe2¢ lda #17¢ sta bb¢ ldx #_k4¢ stx $d301¢ lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ jsr makz¢ jsr spe2¢ lda #17¢ sta bb¢ ldx #_k5¢ stx $d301¢ lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ jsr makz¢ jsr spe3¢¢ lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ lda <map¢ sta h1¢ lda >map¢ sta h1+1¢ lda <scr3¢ sta h2¢ lda >scr3¢ sta h2+1¢ lda #17¢ sta bb¢ ldx #_c3¢ stx $d301¢ jsr makz¢ jsr spe2¢ lda #17¢ sta bb¢ ldx #_c4¢ stx $d301¢ lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ jsr makz¢ jsr spe2¢ lda #17¢ sta bb¢ ldx #_c5¢ stx $d301¢ lda <map_¢ sta h0¢ lda >map_¢ sta h0+1¢ jsr makz¢ jsr spe3¢ rts¢spe2 lda #15¢ sta cn2+1¢ lda #1¢ sta bb¢ jsr makz¢ lda #40¢ sta cn2+1¢ rts¢spe3 lda #10¢ sta cn2+1¢ lda #1¢ sta bb¢ jsr makz¢ lda #40¢ sta cn2+1¢ rts¢makz equ *¢cn2 ldx #40¢cn1 ldy #0¢ lda #$ad¢ sta (h0),y¢ iny¢ lda h1¢ sta (h0),y¢ iny¢ lda h1+1¢ sta (h0),y¢ iny¢ inc h1¢ bne *+4¢ inc h1+1¢ lda #$18¢ sta (h0),y¢ iny¢ lda #$65¢ sta (h0),y¢ iny¢ lda #off¢ sta (h0),y¢ iny¢ lda #$aa¢ sta (h0),y¢ iny¢ lda #$ad¢ sta (h0),y¢ iny¢ lda h1¢ sta (h0),y¢ iny¢ lda h1+1¢ sta (h0),y¢ iny¢ inc h1¢ bne *+4¢ inc h1+1¢ lda #$18¢ sta (h0),y¢ iny¢ lda #$65¢ sta (h0),y¢ iny¢ lda #off¢ sta (h0),y¢ iny¢ lda #$a8¢ sta (h0),y¢ iny¢ lda #$bd¢ sta (h0),y¢ iny¢ lda <texh¢ sta (h0),y¢ iny¢ lda >texh¢ sta (h0),y¢ iny¢ lda #$19¢ sta (h0),y¢ iny¢ lda <texl¢ sta (h0),y¢ iny¢ lda >texl¢ sta (h0),y¢ iny¢ lda #$8d¢ sta (h0),y¢ iny¢ lda h2¢ sta (h0),y¢ iny¢ lda h2+1¢ sta (h0),y¢ iny¢ tya¢ clc¢ adc h0¢ sta h0¢ bcc *+4¢ inc h0+1¢ inc h2¢ bne *+4¢ inc h2+1¢ dex¢ beq *+5¢ jmp cn1¢ dec bb¢ beq *+5¢ jmp cn2¢ ldy #0¢ lda #$60¢ sta (h0),y¢ rts¢wzr dta c' ①"3DUfwwfUD3"① '¢ dta c'①"3DUfwêêwfUD3"①'¢ dta c'"3DUfwêÖÖêwfUD3"'¢ dta c'3DUfwêÖ¬¬ÖêwfUD3'¢ dta c'DUfwêÖ¬††¬ÖêwfUD'¢ dta c'UfwêÖ¬†ככ†¬ÖêwfU'¢ dta c'fwêÖ¬†כ§§כ†¬Öêwf'¢ dta c'wêÖ¬†כ§∈∈§כ†¬Öêw'¢ dta c'wêÖ¬†כ§∈∈§כ†¬Öêw'¢ dta c'fwêÖ¬†כ§§כ†¬Öêwf'¢ dta c'UfwêÖ¬†ככ†¬ÖêwfU'¢ dta c'DUfwêÖ¬††¬ÖêwfUD'¢ dta c'3DUfwêÖ¬¬ÖêwfUD3'¢ dta c'"3DUfwêÖÖêwfUD3"'¢ dta c'①"3DUfwêêwfUD3"①'¢ dta c' ①"3DUfwwfUD3"① '¢¢mknak lda #_m1¢ sta $d301¢ lda <$4000¢ sta p0¢ lda >$4000¢ sta p0+1¢ lda <nak1¢ sta p1¢ lda >nak1¢ sta p1+1¢ jsr makn¢ lda <$6000¢ sta p0¢ lda >$6000¢ sta p0+1¢ lda <nak2¢ sta p1¢ lda >nak2¢ sta p1+1¢ jsr makn¢ rts¢¢makn lda <logo¢ sta log1+1¢ lda >logo¢ sta log1+2¢ lda #25¢ sta bb2¢pet2 lda #28¢ sta bb¢pet1 equ *¢log1 lda logo¢ pha¢ and #$f0¢ beq lewe0¢ pla¢ and #$0f¢ beq prfe0¢¢¬á∮σ≈σõá∩≥β·á≡≥β≈σõ¢ ldy #0¢ lda #$ad¢ sta (p0),y¢ iny¢ lda log1+1¢ sta (p0),y¢ iny¢ lda log1+2¢ sta (p0),y¢ iny¢ lda #$9d¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ tya¢ clc¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢ jmp cont¢¢prfe0 equ *¢¬á∮σ≈σõá∩≥β·á≡≥β≈σ㢠ldy #0¢ lda #$ad¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #$29¢ sta (p0),y¢ iny¢ lda #$f¢ sta (p0),y¢ iny¢ lda #$d¢ sta (p0),y¢ iny¢ lda log1+1¢ sta (p0),y¢ iny¢ lda log1+2¢ sta (p0),y¢ iny¢ lda #$9d¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ tya¢ clc¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢ jmp cont¢¢lewe0 pla¢ and #$f0¢ beq prwe0¢¬á∮σ≈σãá∩≥β·á≡≥β≈σõᢠldy #0¢ lda #$ad¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ lda #$29¢ sta (p0),y¢ iny¢ lda #$f0¢ sta (p0),y¢ iny¢ lda #$d¢ sta (p0),y¢ iny¢ lda log1+1¢ sta (p0),y¢ iny¢ lda log1+2¢ sta (p0),y¢ iny¢ lda #$9d¢ sta (p0),y¢ iny¢ lda p1¢ sta (p0),y¢ iny¢ lda p1+1¢ sta (p0),y¢ iny¢ tya¢ clc¢ adc p0¢ sta p0¢ bcc *+4¢ inc p0+1¢¢¬á∮σ≈σãá∩≥β·á≡≥β≈σãá¢cont equ *¢prwe0 inc p1¢ bne *+4¢ inc p1+1¢ inc log1+1¢ bne *+5¢ inc log1+2¢ dec bb¢ beq *+5¢ jmp pet1¢ clc¢ lda #40-28¢ adc p1¢ sta p1¢ bcc *+4¢ inc p1+1¢ dec bb2¢ beq *+5¢ jmp pet2¢ ldy #0¢ lda #$60¢ sta (p0),y¢ inc p0¢ bne *+4¢ inc p0+1¢ rts¢¢ org $2e0¢ dta a(rn)¢ end¢