@ 0x0000
A 0x0000
B 0x0000
C 0x0000
D 0x0000
E 0x0000
F 0x0000
G 0x0000
H 0x0000
I 0x0000
J 0x0000
K 0x0000
L 0x0000
M 0x0000
N 0x0000
O 0x0000
P 0x0000
Q 0x0000
R 0x0000
S 0x0000
T 0x0000
U 0x0000
V 0x0000
W 0x0000
X 0x0000
Y 0x0000
Z 0x0000
[ 0x0000
\ 0x0000
] 0x0000
^ 0x0000
_ 0x0000
  0x0000
! 0x0000
" 0x0000
# 0x0000
$ 0x0000
% 0x0000
& 0x02b8
' 0x0000
( 0x0000
) 0x0000
* 0x4000
+ 0x0000
, 0x0000
- 0x0000
. 0x0000
/ 0x0000
0 0x0000
1 0x0000
2 0x0000
3 0x0000
4 0x0000
5 0x0000
6 0x0000
7 0x0000
8 0x0000
9 0x0000
: 0x0000
; 0x0000
< 0x0000
= 0x0000
> 0x0000
? 0x0000
00100 )
00110 ) Hit & Blow Game
00120 )
00130 ?="--- Hit & Blow ---"
00200 ) Initialize
00210 W='/10
00220 W=%
00230 X='/10
00240 X=%
00250 #=230*(X=W)
00260 Y='/10
00270 Y=%
00280 #=260*((Y=W)+(Y=X))
00290 Z='/10
00300 Z=%
00310 #=290*((Z=W)+(Z=X)+(Z=Y))
00400 ) Main
00410 I=?
00420 P=I/1000
00430 Q=%/100
00440 R=%/10
00450 S=%
00460 H=(P=W)+(Q=X)+(R=Y)+(S=Z)
00470 B=(P=X)+(P=Y)+(P=Z)+(Q=W)+(Q=Y)+(Q=Z)
00475 B=B+(R=W)+(R=X)+(R=Z)+(S=W)+(S=X)+(S=Y)
00480 ?=H
00490 ?="H";
00500 ?=B
00510 ?="B"
00520 #=999*(H=4)
00530 #=410