GameGlobals.p

unit GameGlobals;
interface
	uses
		QDOffscreen,
		Icons;
	type
		car = record
				BaseIcon: integer;
				Crash, Drawn: integer;
				Speed, Acc, Brakes: integer;
				Steering: integer;
				Frames: integer;
				Bumping, OffRoad: integer;
			end;
		CarPtr = ^Car;
		CarHandle = ^CarPtr;

		LevelInfo = record
				DataID, RoadID, ObjID, StopAt, Bonus: integer;
				Name:string
			end;
		LevelPtr = ^LevelInfo;
		LevelHandle = ^LevelPtr;

		RoadInfo = record
				RoadPat, BackPat, BarrPat,ClutCol: integer;
				Road: RGBColor;
				X2:integer;
				Back: RGBColor;
				X3:integer;
				Barr: RGBColor;
				Slide, Acc, Speed: integer;
				Flags: Byte;
			end;


 		RoadPtr = ^RoadInfo;
		RoadHandle = ^RoadPtr;

		LevelFormat = array[0..maxint] of array[1..4] of integer;
		DataPtr = ^LevelFormat;
		DataHandle = ^DataPtr;

		Animation = record
				On: Boolean;
				Frame: integer;
				Pos: Rect;
				Data: Handle;
			end;

		OBJ = record
				ID, Scroll, LR: integer;
			end;
		Objects = array[1..150] of OBJ;
		ObjectPtr = ^Objects;
		ObHandle = ^ObjectPtr;

		ObjSoft = record
				LR, UD: integer;
			end;


		REB = record
				SCR, LRP: integer;
			end;
		Rebirth = array[1..15] of REB;
		Rebptr = ^Rebirth;
		RebHandle = ^RebPtr;

		Sprite=record
			SpriteWorld:GworldPtr;
			MaskPort:GrafPtr;
		end;
			
	
	
	var
		AccKey, BrakKey, LKey, RKey: Boolean;
		ScreenWorld, Backworld: GWorldPtr;
		UDSpeed, LRSpeed, UDPos, LRPos, CarDirection: integer;
		MyCar: Car;
		MyRoad: RoadHandle;
		Scroll, OldScroll, BackScroll: integer;
		Info: LevelHandle;
		Data: DataHandle;
		BrakeDone: Boolean;
		Animations: array[1..10] of Animation;
		Dead, GameOver: Boolean;
		OldSpeed, wait: integer;
		Items: ObHandle;
		ItemInfo: array[1..150] of ObjSoft;
		LastObj: integer;
		CarRect: Rect;
		Jump, MaxJump: Byte;
		Lives, DeadCount, DoneCount, GameOCount: integer;
		Score:longint;
		MultiBonus, BonPos, BonLR: integer;
		Rebirthes: RebHandle;
		URects: array[1..15] of rect;
		RectCount: integer;
		Clip:rgnHandle;
		RoadColData:Handle;
		Sprites: array[1001..1821] of Sprite;
		oldScore,oldLives,oldBonus,Lastlive:integer;
		StandartCLUT:boolean;
		ScreenCT:ctabHandle;
implementation
end.