Battle Ship v2.0  (by H.Jo)

-------version history---------
Battle Ship v1.0
(1)Had no enemies that actually fought back,
was no different than just guessing numbers.

Battle Ship v2.0
(1)Removed the memory hungry ending
(2)Added a enemy to it. which fights back
(3)Changed the scoring system
-------------------------------

Directions:
(1) Pick a area to place your ship
(2)Then try to destroy the enemy's ship, before
    it destroys yours
--------------------------------
Sign Conversion:

=> Then sign: cfx-9800: press [shift] [7]  [F1] [F1]
              fx-9700: press [shift] [7]  [F1] [F1]
              fx-7700:press [shift] [Range]  [F1] [F1]

->  store sign: button ABOVE the [DEL] sign

_   Display sign: cfx-9800: press [shift] [7]  [F5]
                  fx-9700: press [shift] [7]  [F5]
                  fx-7700:press [shift] [Range]  [F5]

=/= Not Equal to sign:cfx-9800: press [shift] [7]  [F2] [F2]
                      fx-9700: press [shift] [7]  [F2] [F2]
                      fx-7700:press [shift] [Range]  [F2] [F2]
------------------------------------------------------

'BATTLE SHIP'
Mcl
Lbl 1
"7-8-9"
"4-5-6"
"1-2-3"
"PLACE SHIP"?->A
A>9=>Goto 1
A<1=>Goto 1
" "
" "
" "
" "
" "
" "
"7-8-9"
"4-5-6"
"1-2-3"
"ENEMY IS"
"PLACING HIS"
"SHIP"_
Int 9Ran#+1->B
Lbl 4
" "
0->E
Isz F
F=10=>Goto 5
Goto 4
Lbl 5
Isz K
Frac (K/2)->L
L=/=0=>"7-8-9"
L=/=0=>"4-5-6"
L=/=0=>"1-2-3"
L=/=0=>"PICK AREA"
L=/=0=>"TO SHOOT"?->C
L=0=>"ENEMY IS"
L=0=>"SHOOTING AT"
L=0=>"YOU"_
Int 9Ran#+1->M
" "
" "
" "
" "
" "
"  OOO"
" OOOOO"
" OOOOO"
" OOOOO"
"OOOOOOO"
" "
" "
" "
" "
" "
" "
" "
0->E
L=/=0=>C=B=>"HIT"_
L=/=0=>C=B=>Goto 2
L=/=0=>C=/=B=>"MISS"_
L=/=0=>C=/=B=>Isz D
L=0=>M=A=>"HE GOT YOU"_
L=0=>M=A=>Goto 6
L=0=>M=/=A=>"PHEW,HE MISSED"_
Lbl 3
" "
Isz E
E=10=>Goto 5
Goto 3
Lbl 2
"YOU WIN"
"TRIES=":D_
Goto 8
Lbl 6
"YOU LOSE"
Lbl 8
" "