30a31,33
> 	.extern BZINTRO_SIZE
> 	.extern BZINTRO
> 
123,124c126,127
< ;	.extern cpitsize
< ;	.extern COCKPIT1
---
> 	.extern cpitsize
> 	.extern COCKPIT1
127,130c130,133
< 
< 	.extern _inptr
< 	.extern _outptr
< 
---
> 	.extern _extrnflag		; External view?
> 	.extern _extrndist
> 	.extern _extrnpitch
> 	.extern	_extrnyaw
132d134
< 
173,180d174
< 	.extern	_init_alloc,_inflate	; C functions
< 
< 	.extern _InitWTList
< 	.extern	_UnZipWorld
< 	.extern _memzero
< 	.extern _memcpy
< 	.extern COCKPIT
< 
200,202c194,195
< ;	.globl	_CopyCockpit
< 	.globl	_UnZipCockpit
< 	
---
> 	.globl	_CopyCockpit
> 
208d200
< 
256,257d247
< 	jsr	_init_alloc
< 
263,264d252
< ;	jsr	_CopyCockpit	
< 	jsr	_UnZipCockpit		; Decompress Cockpit ONCE...
276,277d263
< 
< 
281c267
< 	jsr	_on_music
---
> ;	jsr	_on_music
286,287d271
< ;	jsr	_UnZipWorld		; Decompress World and Height Maps
< 
292a277
> 	move.w	d0,_extrnflag
314a300
> 	jsr	_CopyCockpit
316d301
< 
319d303
< 
341d324
< 
494d476
< 
496,500c478,479
< 
< 	beq	.skp
< 
< .skp:
< 	moveq	#0,d1
---
> 	btst.l	#KEY_4,d0
> 	beq	.no_key4
502,503c481,544
< 	beq	.noup
< 
---
> 	beq	.nju1
> 	move.l	_extrndist,d1
> 	cmp.l	#300,d1
> 	beq	.no_key4
> 	addq.l	#4,d1
> 	move.l	d1,_extrndist
> .nju1:
> 	btst.l	#JOY_DOWN,d0
> 	beq	.no_key4
> 	move.l	_extrndist,d1
> 	cmp.l	#100,d1
> 	beq	.no_key4
> 	subq.l	#4,d1
> 	move.l	d1,_extrndist
> .no_key4:
> ;
> ;
> 	btst.l	#KEY_5,d0
> 	beq	.no_key5
> 	btst.l	#JOY_UP,d0
> 	beq	.nju2
> 	move.l	_extrnpitch,d1
> 	cmp.l	#32,d1
> 	beq	.no_key5
> 	addq.l	#4,d1
> 	move.l	d1,_extrnpitch
> .nju2:
> 	btst.l	#JOY_DOWN,d0
> 	beq	.no_key5
> 	move.l	_extrnpitch,d1
> 	cmp.l	#0,d1
> 	beq	.no_key5
> 	subq.l	#4,d1
> 	move.l	d1,_extrnpitch
> .no_key5:
> ;
> ;
> 	btst.l	#KEY_6,d0
> 	beq	.no_key6
> 	btst.l	#JOY_LEFT,d0
> 	beq	.nju3
> 	move.l	_extrnyaw,d1
> 	cmp.l	#255,d1
> 	beq	.no_key6
> 	addq.l	#4,d1
> 	move.l	d1,_extrnyaw
> .nju3:
> 	btst.l	#JOY_RIGHT,d0
> 	beq	.no_key6
> 	move.l	_extrnyaw,d1
> 	cmp.l	#0,d1
> 	beq	.no_key6
> 	subq.l	#4,d1
> 	move.l	d1,_extrnyaw
> .no_key6:
> ;
> ;
> ;	beq	.skp
> ;
> ;.skp:
> 	moveq	#0,d1
> ;	btst.l	#JOY_UP,d0
> ;	beq	.noup
> ;
506,507c547,548
< 	bra	.noup
< .up:
---
> ;	bra	.noup
> ;.up:
509,510c550,551
< 	subq	#4,yposn(a2)
< 
---
> ;	subq	#4,yposn(a2)
> ;
616c657
< ;	jsr	_ClearCockpit
---
> 	jsr	_ClearCockpit
696a738,745
> 	btst.l	#KEY_3,d0
> 	beq	.no_extrn_toggle
> 	eor.w	#1,_extrnflag		; Toggle the external view flag
> 	beq	.no_extrn_toggle
> 	move.l	#100,_extrndist		; Set distance
> 	move.l	#0,_extrnpitch
> 	move.l	#0,_extrnyaw
> .no_extrn_toggle:
1029a1079,1080
> 	move.l	_DataTable,-(sp)
> 	move.l	#_tank,_DataTable
1041a1093
> 	move.l	(sp)+,_DataTable
1087,1088c1139
< ;	move.l	cpitsize,d0
< 	move.l	#69120,d0
---
> 	move.l	cpitsize,d0
1101c1152
< .if 0
---
> 
1118d1168
< .endif
1120,1128c1170
< _UnZipCockpit:
< 	movem.l	d0-d1/a0-a1,-(sp)
< 	move.l  #COCKPIT,_inptr
< 	move.l  #_rcockpit1,_outptr
< 	move.w	#1,-(sp)	; load gpu
< 	jsr	_inflate
< 	addq	#2,sp
< 	movem.l (sp)+,d0-d1/a0-a1
< 	rts
---
> 
