; track number 4 - the hole

Track4::

	start	10000,-200000,$100
	flaginit	%011110000000100000001	; long white lines, warnings, barriers both sides and carpet tiles
;	flags are	:CCLDW----PTTB----PTTB

;============= STARTING STRAIGHT

;	manbars		0,0
	straight	Obstrw
	park		7500,10000,0
	objrel		Obskid,-1000,0,$40
;	objrel		Obroadblock,-16000,6500,$280
	objrel	Oblamp2,14000,0,$100

;	manbars		0,0
	straight	Obstrw
	park		7500,0,0
	park		7500,10000,0
	objrel	Oblamp2,14000,0,$100

	straight	Obstrw
	park		7500,0,0
	park		7500,10000,0
	objrel	Obstadium,-20000,0,$200
	objrel	Oblamp2,14000,0,$100

	straight	Obpit03
	park		7500,0,0
	objlong		Obminehead,0,50000,0
	 objrel		Obskid3,-2000,0,-$20

	viewmax		3
	manbars		Obdhill01j,0
	straight	Obpit03
	pitmark
	objrel	Obroadblock,-16000,-6500,$380

	manbars		Obdhill01,Obdhill01k
	straight	Obstrw
	objrel		Obroadblock,16000,6500,$180
	objrel		Obroadblock,16000,-6500,$80
	objrel		Obroadblock,-16000,6500,$280

;============= TUNNEL STRAIGHT LEADING INTO RIGHT TURN

	setbit		0		; bit zero signifies tunnel - and hence no rain - and possibly changed lighting
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obskid,-3000,0,-$20
	 objrel		Obtun1,0,0,$200
	 objrel		Obsurround,0,0,$200
	manbars		0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	 objrel		Obskid3,3000,0,$10
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	objrel		Obrarrow,-5000,0,$200
	objrel		Obrarrow,5000,0,$200
	 objrel		Obtun1s,0,0,0
	 objrel		Obskid3,-6000,0,-$40
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	 objrel		Obskid2,-6000,0,$10
	right		Obcorw40t
	 objrel		Obskid3,2000,0,-$20
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obskid,-5000,0,-$40
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	 objrel		Obskid3,5000,0,$30

;============= LONG TUNNEL STRAIGHT

	manbars		0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	objrel		Obarrow,5000,0,$200
	objrel		Obarrow,-5000,0,$200
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obskid3,7000,0,$200
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obskid3,-2000,0,-$10
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obskid,-1000,0,$10
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0

	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	 objrel		Obskid3,3000,0,$30
	straight	Ob4z
	objrel		Obarrow,5000,0,$200
	objrel		Obarrow,-5000,0,$200
	 objrel		Obtun1s,0,7939,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obtun1,0,0,0
	 objrel		Obsurround,0,0,0
	clrbit		0		; no longer in tunnel
	manbars		Obdhill01,Obdhill01
	straight	Obstrw
	 objrel		Obskid3,-5000,0,-$50
	objrel		Obroadblock,-16000,-6500,$380
	objrel		Obroadblock,16000,-6500,$80
	viewmax		0
	straight	Obstrw
	straight	Obstrw
	twisttgt		16,-$80					;hill
	twistinc		8,-$20
	manbars		Obdhill01,Obdhill01l
	straight	Obstrw
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	objrel		Obrarrow,-5000,0,$200
	objrel		Obrarrow,5000,0,$200
	manbars		Obdmt01l,Obmt01r
	straight	Obstrw
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	 objrel		Obskid,-5000,0,$40
	
;============= RIGHT TURN, SHORT STRAIGHT, RIGHT BEND

	manbars		Obdmt04,Obmt05
	right		Obcorw40

	manbars		Obdmt04y,Obmt05
	right		Obcorw40
	 objrel		Obskid2,-5000,0,-$20

	manbars		Obdmt04x,Obmt05
	right		Obcorw40
	 objrel		Obskid3,-2000,0,$10

	manbars		Obdmt04y,Obmt05
	right		Obcorw40
	manbars		Obdmt01,Obmt01

	twisttgt		16,-$180
	twistinc		0,-$40

	straight	Obstrw
	 objrel		Obskid,4000,0,-$20

  
	straight	Obstrw
	manbars		Obdmt01x,Obmt01
	straight	Obstrw
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	objrel		Obrarrow,-5000,0,$200
	objrel		Obrarrow,5000,0,$200
	manbars		Obdmt01,Obmt01
	straight	Ob4x
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200

	manbars		Obdmt03,Obmt02
	right		Obcorw20
	 objrel		Obskid3,-2000,0,-$20

	manbars		Obdmt03y,Obmt02
	right		Obcorw20

	manbars		Obdmt03x,Obmt02
	right		Obcorw20
	 objrel		Obskid2,-7000,0,$0

	manbars		Obdmt03x,Obmt02
	right		Obcorw20
	 objrel		Obskid3,4000,0,$20

	manbars		Obdmt03,Obmt02
	right		Obcorw20

	manbars		Obdmt03y,Obmt02
	right		Obcorw20
	twisttgt		-16,-$180
	twistinc		-8,0					;hilll

;============= MEDIUM STRAIGHT, WIDE LEFT BEND

	manbars		Obdmt01r,Obmt01l
	straight	Obstrw
	manbars		Obdhill01z,Obcut01
	straight	Obstrw
	 objrel		Obskid3,4000,0,$30
	manbars		Obdhill01x,Obcut01y
	straight	Obstrw
	manbars		Obdhill01,Obdhill01r
	straight	Obstrw
	objrel		Oblarrow,-5000,0,$200
	objrel		Oblarrow,5000,0,$200
	manbars		Obdmt01l,Obdmt01r
	straight	Obstrw
	 objrel		Obskid,6000,0,-$20
	 objrel		Obskid3,-2000,6000,$40
	objrel		Obsignl,12000,3300,$200
	objrel		Obsignl,12000,-3300,$200
	manbars		Obdmt03,Obdmt02
	left		Obcorw20

	manbars		Obdmt03y,Obdmt02
	left		Obcorw20
	 objrel		Obskid3,-4000,0,$20

	manbars		Obdmt03x,Obdmt02
	left		Obcorw20

	manbars		Obdmt03,Obdmt02
	left		Obcorw20
	 objrel		Obskid2,3000,0,-$30

	manbars		Obdmt03y,Obdmt02
	left		Obcorw20
	 objrel		Obskid3,-2000,1000,$20

	manbars		Obdmt03y,Obdmt02
	left		Obcorw20
	twisttgt		0,-$100
	twistinc		8,$40



;============= MEDIUM STRAIGHT INTO TUNNEL, RIGHT TURN
	viewmax		3
	manbars		Obdmt01x,Obdmt01z
	straight	Obstrw
	 objrel		Obskid,-2000,0,-$20
	manbars		Obdmt01q,Obdmt01p
	straight	Obstrw
	objrel		Obroadblock,16000,6500,$180
	objrel		Obroadblock,-16000,6500,$280
	setbit		0
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obtun1b,0,0,$200
	manbars	0,0
	straight	Obstrwt
	objrel		Obarrow,5000,0,$200
	objrel		Obarrow,-5000,0,$200
	 objrel		Obskid2,-1000,0,$20
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obskid3,7000,0,-$20
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obskid,-1000,0,$40
	 objrel		Obskid3,4000,3000,-$20
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	objrel		Obrarrow,-5000,0,$200
	objrel		Obrarrow,5000,0,$200
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	 objrel		Obtun1s,0,0,0
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	 objrel		Obskid2,-2000,0,$10
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200

;============= SHORT STRAIGHT, RIGHT TURN, STRAIGHT INTO START

	straight	Obstrwt
	 objrel		Obskid,-3000,0,-$30
	 objrel		Obtun1s,0,0,0
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obtun1,0,0,0
	 objrel		Obsurround,0,0,0
	clrbit		0
	manbars		Obdhill01,Obdhill01
	straight	Obstrw
	objrel		Obrarrow,-5000,0,$200
	objrel		Obrarrow,5000,0,$200
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	 objrel		Obskid3,-2000,0,-$20
	objrel		Obroadblock,-16000,-6500,$380
	objrel		Obroadblock,16000,-6500,$80
	objrel		Obroadblock,16000,6500,$180
	objrel		Obroadblock,-16000,6500,$280
	setbit		0
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obtun1,0,0,$200
	 objrel		Obsurround,0,0,$200
	objrel		Obsignr,-12000,3300,$200
	objrel		Obsignr,-12000,-3300,$200
	manbars		0,0
	right		Obcorw40t
	 objrel		Obskid2,5000,0,-$80
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obskid3,-2000,0,$20
	 objrel		Obtun1c40,0,0,$200
	right		Obcorw40t
	 objrel		Obtun1c40,0,0,$200
	manbars		0,0
	straight	Obstrwt
	 objrel		Obskid,-1000,0,$40
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	objrel		Obarrow,5000,0,$200
	objrel		Obarrow,-5000,0,$200
	 objrel		Obtun1s,0,0,0
	straight	Obstrwt
	 objrel		Obtun1s,0,0,0
	manbars		Obbar01t,Obbar01t
	straight	Obstrwt
	 objrel		Obskid3,7000,0,-$20
	 objrel		Obtun1,0,0,0
	 objrel		Obsurround,0,0,0
	clrbit		0
	manbars		Obdhill01,Obdhill01j
	straight	Obstrw
;	objrel		Obroadblock,-16000,-6500,$380
	objrel		Obbar01,-11000,0,$300
	objrel		Obbar01,11000,0,$100		; block it.

	manbars		Obdmt01l,0
	straight	Obstrw
	objrel		Obbar01,-11000,0,$300
	viewmax		0

;============= 

	manbars		Obdmt01r,0
	straight	Obstrw
	 objrel		Obskid2,-2000,0,$20
	objrel		Obbar01,-11000,0,$300

	manbars		Obdmt01l,0
	straight	Obpit03  
	objrel		Obbar01,-11000,0,$300
	pushpos

	manbars		Obdmt01x,0
	straight 	Obpit03
	objrel		Obbar01,-11000,0,$300

	manbars		Obdmt01r,0
	straight	Obstrw
	 objrel	Oblamp2,14000,0,$100
	objrel		Obbar01,-11000,0,$300

	manbars		Obdhill01x,0
	straight	Obstrw
	 objrel		Obskid,3000,0,$40
	 objrel	Oblamp2,14000,0,$100
	objrel		Obbar01,-11000,0,$300

	manbars		Obdhill01k,0
	straight	Obstrw
	 objrel		Obgrid,5000,9000,0
	 objrel		Obgrid,-5000,4000,0
	 objrel		Obgrid,5000,-1000,0
	 objrel	Oblamp2,14000,0,$100
	objrel		Obbar01,-11000,0,$300

	manbars		0,0
	straight	Obstrw
	 objrel		Obstart,0,6000,0
	 objrel		Obgantry,-18500,12000,$200
 	 objrel	Oblamp2,14000,0,$100
	 objrel		Obgrid,-5000,4000,0
	 objrel		Obgrid,5000,-1000,0
	 objrel		Obgrid,-5000,-6000,0
	objrel		Obbar01,-11000,0,$300

;	manbars		0,0

	poppos		; recover position
	moveit		10000,0,0
	flagoff		DOT
	flagoff		LINE
	 straight	Obpit04
	 straight	Obpit05
	 straight	Obpit06
	 straight	Obstrnp
	 straight	Obstrnp
	 straight	Obstrnp
	 straight	Obstrnp
	objrel	Obpitbuild,20000,0,$100
	 straight	Obstrnp
	 straight	Obpit07	
	 straight	Obpit08
	 straight	Obpit09

	endtrack


