Langue…
19 utilisateurs en ligne: Aja, Blaagon, Cal-of-Gearva, crocodileman94, Doublix, DreadementousLR616, Knetog, Laplantestrong, Lucky, margot, Miguel Lutero, Romano338, RZ1, Skulltronixs, solgaleo35, Soul,  Tahixham, TCgamerboy2002, TheJavabrew - Invités: 118 - Robots: 177
Utilisateurs: 55 669 (2 401 actifs)
Dernier utilisateur: ThatBoyJackaboy

$02A547 - Example Code

    jsl $03B69F|!bank    ; Get sprite clipping (sprite B)
ldy #$09
.CheckLoop
lda !extended_num,y ; $170B
cmp #$05 ; check if the slot is not empty
bne .NoContact
phb ; Save DB for later
lda #$02|!bank8 ;\
pha ;| Set DB to $02
plb ;/
phk ;\
pea.w .Return-1 ;|
pea.w $02B889-1 ;| JSL-to-RTS call to the routine
jml $02A519|!bank ;|
.Return ;/
plb ; Restore DB
jsl $03B72B|!bank ; Call "check contact" routine
bcc .NoContact ; Carry clear -> no contact
.Contact
...
.NoContact
dey
cpy #$07
bne .CheckLoop