Constants:

PlayerVol	EQU 1936
TileVol		EQU 256
TileSize	EQU 16
ObjectVol	EQU 576
BulletVol	EQU 400
ObjImages	EQU 20
BullImages	EQU 20
delayconst	EQU 100
PinkPix		EQU 046h	;pink pixel
WhitePix	EQU 0Fh		;white pixel

HELLO		EQU 33
OUPDATE		EQU 21
PUPDATE		EQU 22
GOODBYE		EQU 23
MAXOBJ		EQU 4
MAXBULL		EQU 30
INACTIVE	EQU 0
ACTIVE		EQU 1
DEPARTING	EQU 2
PLAYER		EQU 41
OBJECT		EQU 21
BULLET		EQU 15
REALTYPE	EQU 4

OBJECTDISTANCE	EQU 25
BULLETDISTANCE	EQU 25
BULLETOBJECTDISTANCE	EQU 15

General Variables:

grp_name	db	'HCTIBFinalProj$$'

my_name		db	'HCTIB_Player00$$'

Tiles		db	'tiles.bmp',0
Objects		db	'objects.bmp',0
Bullets		db	'bullets.bmp',0
Divers		db	'divers.bmp',0

Menu0		db	'Menu0.bmp',0
Menu1		db	'Menu1.bmp',0
Menu2		db	'Menu2.bmp',0
Menu3		db	'Menu3.bmp',0
Menu4		db	'Menu4.bmp',0
MenuHelp	db	'MenuHelp.bmp',0
MenuCred	db	'MenuCred.bmp',0
Black		db	'Black.bmp',0

intro00		db	'intro00.bmp',0 
intro01		db	'intro01.bmp',0
intro02		db	'intro02.bmp',0
intro03		db	'intro03.bmp',0
intro04		db	'intro04.bmp',0
intro05		db	'intro05.bmp',0
intro06		db	'intro06.bmp',0
intro07		db	'intro07.bmp',0
intro08		db	'intro08.bmp',0
intro09		db	'intro09.bmp',0
intro10		db	'intro10.bmp',0
intro11		db	'intro11.bmp',0


TSTMSG		db	'file_error$'

count1		db	0
count2		db	0
count3		db	0
temp1		dw	0

MyNum		db	0
MyXPos		dw	400
MyYPos		dw	300
MyExactX	Real4	400.0
MyExactY	Real4	300.0
MyXSpeed	Real4	0.0
MyYSpeed	Real4	0.0
MyLife		db	9
MyWeapon	db	0
MyPoints	db	0
MyOrientation	db	?
Deceleration	Real4	0.1
Acceleration	Real4	0.3
MaxSpeed	dw	5
MyThrust	dw	0

Network		db	1

REALTYPE	EQU	4

ThirtyHzCtr	dw	0
TwelveHzCtr	dw	0
TwoSecCtr	dw	0

pbuf	db	7 dup(?)
crlf	db	CR,LF,'$'

OldKbdV		dd	?
OldPicV		dd	?
UpdateCtr	db	0
HelloCtr	db	0
UpKey		db	0
DownKey		db	0
EnterKey	db	0
LeftKey		db	0
RightKey	db	0
EscKey		db	0
LeftKeyCtr		db	0
RightKeyCtr		db	0

MyPlayerArray	PlayerType 4 dup (< >)
MyObjectArray	ObjectType MAXOBJ dup(< >) ; Object Array
MyBulletArray	BulletType MAXBULL dup (< >)
reverseObjectX	db	0

reverseObjectY	db	0

Variables within Segments:

• BMPSeg

  bmp			bmptype < >
  

• ImageSeg

  PlayerImageArray	DB		16 dup( 1936 dup(4) )
  ObjectImageArray	DB		20 dup( 484 dup(4) )
  BulletImageArray	DB		20 dup( 400 dup(4) )
  TileImageArray		DB		20 dup( 256 dup(4) )
  

• SndSeg

  • sndbuf			DB		2048 dup(10,20,50,80,90,80,50,20)
    

• MidiSeg

  • midibuf			DB		65535dup(0)
    

• ScreenBuffSeg

  • ScreenBuff		DB		65535 dup(0)

• TempBuffSeg

  • TempBuff		DB		65535 dup(0)

Structures:

• BMPTYPE STRUC

  BFType              DB		 'BM'
  BFSize              DD		 ?
  BFReserved1         DW		 0
  BFReserved2         DW		 0
  BFOffBits           DD		 ?
  BISize              DD		 ?
  BIWidth             DD		 ?
  BIHeight            DD		 ?
  BIPlanes            DW		 1
  BIBitCount          DW		 ?
  BICompression       DD		 0
  BISizeImage         DD		 ?
  BIXPelsPerMeter     DD		 ?
  BIYPelsPerMeter     DD		 ?
  BIColorsUsed        DD		 0
  BIColorsImportant   DD		 0
  RGBQuad             DB		 256 dup ( 4 dup(?) )
  ImageData           DB		 1681 dup(0)
  

  
  
• WAVEHDR STRUC

  format              DB		'RIFF'
  filelen             DD		?
  wavefmt             DB		'WAVEfmt_'
  fmt_len             DD		?
  fmt_tag             DW		?
  channel             DW		?
  samples             DD		?
  bytesps             DD		?
  bkalign             DW		?
  bitsps              DW		?
  data                DB		'data'
  datalen             DD		?
  

  
  
• PLAYERTYPE STRUC

  PlayerNum           DB		?
  XPos                DW		?
  YPos                DW		?
  Orientation         DB		?
  Status              DB		INACTIVE
  

  
  
• OBJECTTYPE STRUC

  OType               DB		?
  XPos                DB		?
  YPos                DB		?
  Orientation         DB		?
  Speed               DB		?
  

  
  
• BULLETTYPE STRUC

  BType               DB		?
  XPos                DB		?
  YPos                DB		?
  Orientation         DB		?
  Speed               DB		?
  Status              DB		INACTIVE
  

  
  
• GENERICMSG STRUC

  MsgType             DB		?
  PlayerNum           DB		3
  

  
  
• HELLOMSG STRUC

  MsgType             DB		HELLO
  PlayerNum           DB		3
  XPos                DW		?
  YPos                DW		?
  

  
  
• OUPDATEMSG STRUC

  MsgType             DB		OUPDATE
  PlayerNum           DB		3
  ObjectArray         ObjectType	MAXOBJ dup (< >)
  BulletArray         BulletType	MAXBULL dup (< >)
  

  
  
• PUPDATEMSG STRUC

  MsgType             DB		PUPDATE
  PlayerNum           DB		3
  XPos                DW		?
  YPos                DW		?
  Orientation         DB		?
  

  
  
• GOODBYEMSG STRUC

  MsgType             DB		GOODBYE
  PlayerNum           DB		3