Sayfa 39

cmp.b bne.s sub.w sub.w add.w add.w move.İl

Hove

Kx6 movel

Bekle2 dbf dbf

Accc

move.l cmp.b bne.s sub.w sub.w add.w add.w move.l

KxB f

Bekle22 dbf dbf

RenkAc cmp.b

move.l move.l move.l move.l move.l move.l move.l move.l bsr.W move.l

KXI OF

bne.s add.w move.l

HizAz abyel

move.l

Seroller cmp.l

ne.s cmp.l beg.s bne.w

Basma bsr.W

Bas

move.l

Kayma rts Kapanmaca

KXI

mOvel

KX4

move.l cmp.b bne.s sub.w

cc #$0100,CI #$0100,C2 #$0100,C3 #$0100,C4 #$5TEf,d6 d6,Bekle2 d7,Acc #80,d7 #S$İf,SAfFfOOG Accc #$0100,C11 #$0100,C12 #$0100,C13 #$0100,C14 #$1fff,d6 d6,Bekle22 d7,Accc #LBitMap,a0 #DBitMap,al #0,Sx #0,Sy #90,Dx #40,Dy #160,Nx #140,Ny Copy #4,d7 RenkAc #$0030,RX1 #S$8ffEf,d6 d6,HizAz d7,RenkAc #$ff,ScrollOnOff

#$ff,ScrollOnOff Kayma #4,ScrollFlag Bas Basma SerollDatas Scroll #1,ScrollFlag

ScrollDatas Scroll Decode

CocoliFaS

#10,d7 KXI #$0110,ScrollRengi

d6,KX2 d7,KXI

#3,d7 KX3 #$0030,RX1 #STEf,d6 d6,KX4

d7,KX3 Clear

#SEF,SAffOOG KX5

KX6

KX7

KX9

KX10

KXI12

Init

move.l move.l move.l move.l lea move.l move.l move.l jsr lea

#$0100,C11 #$0100,C12 #$0100,C13 #$0100,C14 #$1fff,d6 d6,KX6 d7,KX5 #5,d7 KX7

#$0100,CI #$0100,C2 #$0100,C3 #$0100,C4 #$5fff,d6 d6,KX8 d7,KX7 #S3ffff,d6 d6,KX9

#2,d7 KK10 #$0300,R1 #$0300,R11 #$0111,R2 #$0300,R3 #$0300,R13 d6,KX11 d7,KX10

d6,KX12 Xxx onoff $dffOa6 $dffOb6 $dff0Oc6 $dffOd6 $dffOa8 $AffOb8 $dff0c8 $dffOd8 #$f,$dff096 #1,$bfe00l Kapanmaca GfxBase,a6 SysCop,50(a6) 4,a6 -138(a6) -414(a6) (a7)4,a0-a6/d0-d7

4,a6 -132(a6) GfxName,al -408(a6) d0,a6 d0,GfxBase 50(a6),SysCop #Copper,50(a6) SBitMap,a0 #1,d0 #496,d1 #8,d2 -390(a6)

-198(a6)

SatirSonu

move.l

rts

add.l

Decode lea

lea move.l move.b cmp.b beg.b cmp.b bne.b move.l bra.b

Devam sub.b

Copy

Scroll

mulu move.l move.l lea lea move.l move.l move.l move.l add.l TİS move.l move.l move.l move.l move.l move.l move.l move.l move.l move.l jsr rts cmp.b bne.s move.l move.l move.l move.l move.l move.l move.l move.l

#SBitMap,SRast44 SBitMap,a0 #Buffer,8(a0) LBitMap,a0 0

#160,d1 #140,d2 -390(a6) LRast,al -198(a6) #LBitMap,LRast44 LBitMap,a0 #LBuffer,8(a0) #LBuffer4(20*140),12(a DBitMap,a0 #1,d0 #360,d1 #256,d2 -390(a6) DRast,al -198(a6) #DBitMap,DRast44 DBitMap,a0 #$70000,8(a0)

#1,ScrollTextPointer ScrollTextPointer,a0 Tablo,al (a0),a0 (a0),d0 #$0a,d0 satirsonu #"a",d0

devam #$7a000,ScrollTextPoint Decode #$20,d0 #8,d0 O(al,d0),Sx 4(al,d0),Sy SBitMap,a0 DBitMap,al #350,Dx #240,Dy

#8,Ny #1,ScrollTextPointer

GfxBase,a6 Sx,d0 Sy,d1 Dx,d2 Dy,d3 Nx,d4 Ny,d5 #$c0,d6 #255,d7 #0,a2 -30(a6)

#0,$dff006 Scroll GfxBase,a6 #DRast,al DeltaX,d0 FirstX,d2 FirstY,d3 SecondX,d4 SecondY,d5