======== game.def (v1.00) ========
;
; A>vz +game ...
;
; [CTRL]+[HELP]	:start
;
; [4]<-->[6]	:drift
; [5]		:rotate
; [SPACE]	:shoot
; [ESC]		:pause
; [Q]		:panic!

* Macro key

80 ^[HELP] "Game"
	(s)? /
	ax=$2C00, &i($21) rn=cx+dx,	; “ϊ•t₯ŽžŠΤ‚Εrandomize
	(wt)? { #Y >^ }
	(mb)? #b
	mr[, mi[, ei[, es[, wl[, as[, ab[, aw[, dc[, du[,
	mi-, ei+, es-, dc-, du-,
	UU=10, u=20-UU/2, BB=10, f=g=0, wl=12,as=9,ab=10,aw=5,
	>20

1:	(c)?{ &o(c) #s . }
	(cd!='@')?{ e+, &q }

10:	e-, &01 (t)>?{ >+1 >+2 >+3 >+4 >+5 >+6 >+7 }

11:	#d &01 #e &01 #s &01 #x
12:	(d&1)?{ #s &01 #d #d &01 #d &01 #s #s .}
		#x &01 #e #e &01 #e &01 #x #x
13:	(d&1)?{ #d &01 #s #e &01 #s &01 #x #d .}
		#e &01 #d &01 #e &01 #x #s #x
14:	(d&1)?{ #d &01 #s #x &01 #s &01 #d #e .}
		#e &01 #x #d &01 #x &01 #e #s
15:	(d!=0)?{ #d &01 #s } (d!=1)?{ #e &01 #x }
	(d!=2)?{ #s &01 #d } (d!=3)?{ #x &01 #e }
16:	#d (d&1)?? &01 #e (d==0)? &01 #s (d&1)? &01 #s (d==1)? &01
	#x (d&1)?? &01 #x (d==2)? &01 #d (d&1)? &01 #d (d==3)? &01 #e #s
17:	#d (d&1)?? &01 #e (d==3)? &01 #s (d&1)? &01 #s (d==0)? &01
	#x (d&1)?? &01 #x (d==1)? &01 #d (d&1)? &01 #d (d==2)? &01 #e #s

20:	&s #39 #n #18
	(u*2-2){' '}
	'†±' (UU){'†£'} '†΅' #m
	'†₯' (UU){'@'} '†₯' #m
	'†Ή' (UU){'†£'} '†½'
	&d #e #k (wy-5){ #p } #i mi+, >>

21:	vv=40-f/2, (vv<BB)? (vv=BB)
	&m( "Best score %-5u Score %-5u Delay %-5u", h, g, vv ) >>

22:	&s x=u+4, &y(y=4) &x(x*2)
	&r t=r%7, &r d=r&3,
	(c-)&10 (e)?{ (c=' ')&10 >30 } >>

23:	v=vv, >>

24:	xx=yy=dd=0,
	(c=' ')&10 &d &s
:A	&k k=r,
	(k==$1B)?{ &d !02 &s >A }
	(v<0)? >>
	(v--)??{ &b(1) >> }
	(k)?? >B
	&f(k,"Qq645 ")
	(r)>?{ >40 >40 (xx+) (xx--) (dd+) { v=-1, &b(2) >> } } >+2
:B	&w(1) >A

25:	yy+,>>
26:	(v>0)?{ v-=4, (v<1)? (v=1) }
	(c='@')&10
	(yy)?{ &y(y+=yy) }
	(xx)?{ x+=xx, &x(x*2) }
	d=(d+dd)&3,
	(c-)&10 (e)??{ (v)? >-2 >-3 }
	&y(y-=yy)
	x-=xx, &x(x*2)
	d=(d-dd)&3,
	(yy)?? >-3

	(c='‘')&10 &d &s
	&y(y=2)
:Y	&x(u*2) (x=UU)
:X	(cd=='‘')?{ #d (x--)? >X &x(u*2) (UU){'™'} }
	#x (y++<wy-2)? >Y &d
	&s ff-, &y(y=2) &x(u*2)
:Z	(cd=='™')?{
		#y &y(1) #k #i &y(y) g++,ff+, &d &s
		&b(2) &w(1) &b(2) &w(8)
	}
	#x (y++<wy-2)? >Z
	&d (ff)? (f++) >21

30:	(g>h)? (h=g)
	f=g=0,
	&d
	&b(4) &w(8) &b(16)
	!01 (r==-1)? >>
	#39 #x #k (wy-3){ #p } &s #40 (wy-3){ #y } &d >21

40:	&d #39 #x (wy-2){ #y } #e #y
	du], dc], aw], ab], as], wl], es], ei], mi], mr], #]

* Pop up menu

1	"",22,1,0,-1
	" ‚f‚`‚l‚d  ‚n‚u‚d‚q "

2	"",14,1,0,-1
	" ‚o‚`‚t‚r‚d "

*
======== End of game.def ========