modify warrior set
This commit is contained in:
parent
d97c1a6497
commit
caceb8b8b0
4 changed files with 27 additions and 57 deletions
|
@ -1,5 +1,5 @@
|
|||
;author Benji Dial
|
||||
;name Big Nothing
|
||||
;name Bait
|
||||
|
||||
start
|
||||
for 19
|
|
@ -1,55 +0,0 @@
|
|||
;author Benji Dial
|
||||
;name Dwarf Replicator
|
||||
|
||||
;not a particularly good warrior, but is sufficient to test a few things
|
||||
|
||||
start
|
||||
mov 0, 2908
|
||||
nop }start, >start
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
seq.a #the_end - start, start
|
||||
jmp start
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
sub.ab #the_end - start, start
|
||||
spl @start
|
||||
jmp 2, <start
|
||||
|
||||
dat
|
||||
|
||||
dwarf
|
||||
mov the_end, the_end + 4
|
||||
add.ab #4, dwarf
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
seq.ab #start + 723 - dwarf, dwarf
|
||||
jmp dwarf
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
core_clear
|
||||
mov the_end, the_end + 1
|
||||
add.ab #1, -1
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
seq.a #0-1, core_clear
|
||||
jmp core_clear
|
||||
jmp 2
|
||||
|
||||
dat
|
||||
|
||||
mov.ab #the_end + 1, core_clear
|
||||
jmp core_clear
|
||||
dat
|
||||
|
||||
the_end
|
|
@ -2,5 +2,5 @@
|
|||
;name Dwarf
|
||||
|
||||
mov 3, 7
|
||||
add.ab #4, -1
|
||||
add.ab #4948, -1
|
||||
jmp -2
|
||||
|
|
25
warriors/train.red
Normal file
25
warriors/train.red
Normal file
|
@ -0,0 +1,25 @@
|
|||
;author Benji Dial
|
||||
;name Train
|
||||
|
||||
step equ 4943
|
||||
|
||||
spl 1
|
||||
spl 1
|
||||
spl 1
|
||||
|
||||
paper
|
||||
mov.f var + 1, var
|
||||
spl @var
|
||||
mov }var, >var
|
||||
|
||||
mov.a #step / 2, the_end + 2
|
||||
|
||||
stone
|
||||
mov the_end + 1, }the_end + 2
|
||||
jmp stone, }the_end + 2
|
||||
|
||||
var
|
||||
dat
|
||||
dat paper + 1, paper + step + 1
|
||||
|
||||
the_end
|
Loading…
Add table
Reference in a new issue