Jeremy FLEURY 45e980b4e3 push
2019-07-17 11:51:13 +02:00

79 lines
1.6 KiB
ArmAsm

#
# Warrior qui a gagne
# l'annee derniere
# VOALA
#
.name "Celebration Funebre v0.99pl42"
.comment "Jour J"
ld %0,r3
label: zjmp %:avantdebt
zjmp %0 # pour eviter ecrasement
# de l'instruction suivante
code: live %42 # 5
sti r15,%0,r14 # 6
zjmp %-200 # 3
live %42 # 5
sti r15,%0,r14 # 6
zjmp %-200 # 3
live %42 # 5
sti r15,%0,r14 # 6
zjmp %-200 # 3
live %42 # 5
sti r15,%0,r14 # 6
zjmp %-200 # 3
sti r15,%0,r14 # 6
zjmp %-200 # 3
sti r15,%0,r14 # 6
zjmp %-200
avantdebt: sti r1,%:code,%1 # # mets a jour le live
sti r1,%:code,%15 # # mets a jour le live
sti r1,%:code,%29 # # mets a jour le live
sti r1,%:code,%43 # # mets a jour le live
sti r1,%:code,%57 # # mets a jour le live
sti r1,%:code,%71 # # mets a jour le live
init: ld %393216,r4 #7
ld %917504,r12 #7
ld %1,r11 #7
ld %6,r10 #7
debt: live %42 #5
sti r4,%:label,%1 #7
add r4,r12,r4 #5
sub r10,r11,r10 #5
zjmp %:init #3
fork %:debt
live %3
level0: fork %:level10
level11: live %4
fork %:level111
level110: live %42
ldi %8,%:code,r15 #set des octets 9-12
ld %-186,r14 #=$A-6-8
ld %0,r2
zjmp %:label
level10: live %42
fork %:level100
level101: live %42
ldi %4,%:code,r15 #set des octets 5-8
ld %-190,r14 #=$A-6-4
ld %0,r2
zjmp %:label
level111: live %42
ldi %12,%:code,r15 #set des octets 13-16
ld %-182,r14 # $A -6 -12
ld %0,r2
zjmp %:label
level100: live %42
ldi %0,%:code,r15 #set des octets 1-4
ld %-194,r14 # $A -6 -0
ld %0,r2 #
zjmp %:label #