EIX;X; ********************(X; * *2X; * "KILLER 'THELLO" *<X; * By *FX; * Mark Price *PX; * *ZX; ********************dX;nX; SYSTEM EQUATESxX; --------------X; ATRACTMAUDCTLҠ AUDC1Ҫ AUDF1ҴCHBASECHRBAS COLOR0COLOR1COLOR2COLOR3COLOR4CONSOL DLIST0DMACTL/GPRIORo"GRACTL,HPOSM06HPOSM1@HPOSM2JHPOSM3THPOSP0^KEYCODEyh KEYINr NMIEN|PCOLR0PCOLR1PCOLR2PCOLR3PMBASEԮRANDOM Ҹ RTCLOK SIZEM SIZEP0 SKCTLSTICK0xSTRIG0VCOUNT VDSLSTVVBLKD$ WSYNC XITVBVb&X;0X; PM GRAPHICS AREA:X;DPMAREA8NMISSLESPMAREAXPL0PMAREAbPL1PL0lPL2PL1vPL3PL2X; X; COLORSX; PFCOL0Ĩ PFCOL1  PFCOL2 PFCOL36PLR0COLPLR1COL(PLR2COLXPLR3COLX;X; OTHER CONSTANTSX; #FRSTDSKBOARD4;;1st disk posFRSTIMGX;;1st disk char LOCKED;;Player status*TRIGGER;; bits4BORDER;;Board entries> EMPTYH WHITER BLACK\UP;;Direction bitsf DOWNp LEFTz RIGHTMINX`;;Player/missileMAXX;; X/Y limits MINY@ MAXYROMFONTX;X; ZERO PAGE ALLOCATIONX; --------------------X;X;X; POINTERSX;POINTER;;Genl purposeSCRPTR;;Screen pointerVBIPNTR;;VBI use ONLY$X;.X; VARIABLES8X;BACTIVE;;# of playersLCMPCHK;;Move check flagV!CMPLVL;;Default 'puter lvl`COLOR;;Move colorjCOMPS;;# of 'puterstCOUNT;;Genl counting~DX;;VBI comp moveDY;;VBI comp move GOVRNDX;;Done check indexHOLDIT;;Genl purposeHOLDX;; holding forHOLDY;; A, X, & Y!LASTCMP;;Last comp touchedLASTSPC;;Last move pos#MAPPOSN;;Map position (temp)PLYRS;;# of humansPORT;;Joyport # (temp)SSTAT;;Sound statusTEAM;;Current team #!TTLFLAG;;Doing titles flag VALFLAG;;Valid move flagVBITEMP;;VBI use tempX;(X; TEAM INFO2X;<"SCRPND;;Points to add (+/-)F!TEAMSIZ;;# players on teamPX;ZX; DATA FOR EACH PLAYERdX;nBOX;;Penalty box #xOPLYRY;;Old positionPLYRX;;X position;; for game over checkPLYRY;;Y position;; for game over check$PORTNO;;Human=0-3, 'puter=128STATUS;;What he's doingTEAMNO;;Team afiliation;; for game over checkX;X; DATA USED FOR 'PUTERSX;#CMPLEVL;;Level (0 for human)PARTX;;Partial movesPARTY;; X & YMOVCLK;;Move clockTARGNO;;Target number"TARGX;;Target X & Y,TARGY;; position6X;@X;J TX;^>D:THELCHR.M65h>D:THELSCR.M65r>D:INIT.M65|>D:TITLES.M65>D:SETUP.M65>D:MAIN.M65>D:MOVE.M65>D:INT.M65>D:DATA.M65X; INITX;