/
CVS/
boards/CVS/
clans/
gmc/CVS/
help/CVS/
include/CVS/
players/
progs/CVS/
races/CVS/
system/CVS/
text/
text/CVS/
todo/
todo/CVS/
units/CVS/
$DATA 0
$SYMBOL terminate L1
$SYMBOL isevil L6
$SYMBOL isgood L7
$SYMBOL onAct L8
L1:
PUSHBP
MSPBP
HALT
MBPSP
POPBP
RET
L6:
PUSHBP
MSPBP
PUSHDISP -2
PUSHS alignment
GET
PUSHI 0
LT
TOI
POPDISP -2
MBPSP
POPBP
RET
L7:
PUSHBP
MSPBP
PUSHDISP -2
PUSHS alignment
GET
PUSHI 0
GTE
TOI
POPDISP -2
MBPSP
POPBP
RET
L8:
PUSHBP
MSPBP
ADDSP 1
PUSHDISP -2
CALL L6
CALLE random
POPDISP 1
MBPSP
POPBP
MTSD 3
SUBSP 3
RET