1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75
|
sub_48EE: ;
;initialise à 0 la variable $2147
ldd #0
std $2147
brclr <byte_A9 $20 loc_4904 ; ' '
;If
;des arguments pour la fonction je suppose
ldy #$8C19
ldd $2036
jsr sub_B2AB ; appel de fonction
bra Else
; ---------------------------------------------------------------------------
loc_4904: ;
; On gros ici il test pour que X fasse $8A69 ou $8B41 (tout dépend de la valeur de la variable à $20B1)
;{
ldx #$8A69
tst $20B1
bne loc_490F
ldx #$8B41
;}
loc_490F:
; variable $213A = $2034(variable)
;{
ldy #$213A
ldd $2034
std 0,y
;}
; variable $213C = $2036(variable)
;{
ldd $2036
std 2,y
;}
; variable $213E = X(voir plus haut)
stx 4,y ;
; variable $2140 = #9
;{
ldaa #9
staa 6,y
;}
jsr sub_B2D6 ; appel de fonction
brclr <byte_A2 2 Else
;Test la variable $8A68 et fait soit fait com ou l'envoie a l'adresse $2147+1
ldab $8A68
bpl Else2
;If2
com $2147
Else2:
stab $2147+1
Else:
tab
;cela fait variable $2147 += $2147&0xff
;{
clra
addd $2147
std $2147
;}
rts
; End of function sub_48EE |
Partager