bar.1 <:&8T>: 3
""16384@,6912
N"b",0,126~,64@,124|,66B,66B,124|,0
L"g",0,126~,64@,64@,64@,64@,64@,0
M"d",0,28,36$,36$,36$,36$,126~,66B
K"j",0,65A,73I,62>,73I,73I,65A,0
K"i",0,66B,70F,74J,82R,98b,66B,0
K"l",0,30,34",34",34",34",98b,0
L"p",0,126~,66B,66B,66B,66B,66B,0
K"o",0,66B,66B,36$,24,16,96`,0
L"c",0,68D,68D,68D,68D,68D,126~,2
J"h",0,66B,66B,66B,126~,2,2,0
L"n",0,65A,73I,73I,73I,73I,127,0
L"m",0,65A,73I,73I,73I,73I,127,1
J"e",0,60<,66B,30,2,66B,60<,0
L"u",0,76L,82R,114r,82R,82R,76L,0
K"a",0,62>,66B,66B,62>,34",66B,0
L"s",24,66B,70F,74J,82R,98b,66B,0
M"r",0,64@,64@,124|,66B,66B,124|,0
N"t",0,192,64@,124|,66B,66B,124|,0
L"f",0,127,73I,73I,73I,127,8,0
M"q",0,66B,66B,114r,74J,74J,114r,0
z=120
(a$
2x=07
<y
F a$+x,y
Gx
Hz
I'6,0;1;9 ;" EC BAM HHA HCTPK- , HAMTE KAB SPACE B POTBHOM CAE HA- MTE P KA- B "
J|4,0;0;" ":5,0;1;" "
K14,0;1;" ":15,0;0;" ":0
L" " Ʀ""90Z
M$=" " 79O
N
76L
O4:1,10
;5;2;"HCTPK"
P3,0;7;0;" AHHA POPAMMA PEHA3HA- EHA PA3BT HABKOB O- TOPAECKOO BOCPT TEKC- TA. T HABK BXOT B CO BAHEX, HEOXOMX CKOPEHHOO TEH. OCHOBHA E POPAMM CO- CTOT B TOM,TO HA PAHE HA HEKOTOPOE BPEM BCXBAET O- PEEEHH TEKCT (OHO HE- CKOKO COB). BAM HAO EO 3PTEHO COTOPAPOBAT 3AOMHT. OCE TOO BAM HA- O ET HAPAT TOT TEKCT.":9000 (#
Q0:
R93,0;7;0;" HAOP TEKCTA BOHETC TEM CTPE 3 CMBOEC- KO K O AABT. TO CEAHO TOO, TO PO- PAMMO MO O3OBATC , OXO BAEE KAB- ATPO, OCOEHHO ET. PABEHE KO BOH- ETC CEM KABAM: BEBO ---------- Z BPABO---------- X OOH--------SPACE ":9000(#
S0:
T0,0;7;0;" POPAMMA OKO ABTOMAT- 3POBAHA. EC B CEHO CPABC C OEPEHM 3AA- HEM, TO CEEE 3AAHE ET KCOHPOBATC HA K- PAHE CTPEE HAOOPOT. TA- KM OPA3OM POPAMMA CAMA OCTPABAETC O EOBEKA, KOTOP C HE PAOTAET. BAM HAO TOKO BBECT CXOH POBEH COHOCT. OCET OOB B POPAMME 3ABCT OT TOO CKOKO BPE- MEH KCOHPOBAC TEKCT. 3A OK B HAOPE KB B O- AETE TPA B OHO OKO. EC B HE CE POTAT TEKCT, HAMTE KAB 0 OCE HE- OOO TPAA POOATE PAOT":9000(#
U0:
V0,0;7;0;" B MOETE BPAT KOECT- BO COB B TEKCTE (1,2 3). TEKCT XPAHTC B HAOPAX. BOP HAOPA OCECTBETC CAHM OPA3OM. HA BCE 3APOC B POPAMME OOTEH OTBET ABATE HAATEM KAB space C O- CEM enter, A OTPA- TEH OTBET - HAATEM - O PO KAB. ********************** OT KCATA POPAM- M OKA3BAET,TO OHA OMO- AET OTTC OT POOBA- PBAH COB P TEH, TAK KAK 3A 1/25 CEKH COBO MOHO POTAT TOKO OTO- PAECK":9000(#
W0:
X0,0;7;0;" AHHA POPAMMA BETC TAKE BECMA EKTBHM CPECTBOM EH PABO- CAH, OCOEHHO MA- X KOHKOB, TAK KAK OHA OECEBAET AKTBH OPATH CB3 ME POEC- CAM TEH BOCPO3BEE- H. OHOBPEMEHHO PA3BBAET- C 3PTEHA AMT. ************************ ":9000(#
Y0:
Z1:1:6:
[37,2;"EC BAC OKEH OCTK,"
\*9 ,7;"HAMTE KAB SPACE"
]*11,7;"B POTBHOM CAE -"
^313
,7;" P KAB":0
_-" "JOI=0:stick=0:99c
`g=" " JOI=31: stick=1: 99c
a
95_
c*P(30):7:0:2:
dfire=3000: move=2000: printscore=1000: finish=890z: wait=800 : loop=630v: again=520: another=90Z
eanother=230
iDefine grafics
on=07
pa
r(146)+n,a
sn
tn=07
ua
v(148)+n,a
wn
xn=07
ya
z(163)+n,a
{n
}'0,60<,126~,171: 255,126~,36$,36$: 24,24,24,24: 24,255,255,255: 0,0,24,24: 24,24,0,0
a$=""
b$=""
c$=""
s$=" "
set up display
i=130
P(i)
i
65A,144,64@, 147,143,64@, 147,44,,144, 153, 65A,144,65A, 59;,65A,144, 64@,502,66B, 139,129,67C, 129,134,132, 135,135,137,116t,66B
&2:7:9 :1:
l "BBETE CXOH POBEH COHOCT OT 1 O 9",diff
diff=diff
diff<1diff=1
diff>9 diff=9
time=100d-10
*diff
"
'%"KOECTBO COB - 1,2 3?" ,ksl
419,3;1;"HAMTE KAB"
0
d$=s$
n=04
d$=d$+d$
n
X=0
Y=3
score=0
E1,0; "ABE3KMHOPCTX_"
210
,3;"B TPH MHT HAMTE - 0"
20,3;"CET -"
54000+1000*ksl+( 5*)
again
printscore
Y,X;b$
&w$
0w$="H"finish
415,3;d$
5 15,3;"B OTOB?"
6stick=05688
7570:
8" "5655
9575?
:JOI=31
;JOI<165655
?D15,0;d$: 15,2;6;w$
Dtime:time
N15,0;d$
Xn=1̱w$
b
f$=w$(n)
l4hit=0:ship=0: xship=0
vloop
JOI=31 :="z" Ŧ="x" JOI=1 JOI=2 move
'"0" 650
0="0" score=score-20
4score<0 score=0
time=time*1.43333
n=w$
again
JOI=31
stick=1653
657
JOI=31
JOI16fire
660
=" " fire
+hit=0 loop
!1;15,n+2;f$
n
spaceship
hit=0
time=(time*0.8L)
5time<0.5 time=0.5
pagain
zfinish
15,0;d$
4 "OPOETE EE PA3?",y$
)y$=32 another
ޚ******************************************************** subroutines ****************************************************************
printscore
e$=score
k=e$
b=3k-1
e$=s$+e$
b
$20,9 ;e$
.
move
1stick=1 2015
(DX=(="x") -(="z")
2020
JOI=31
-JOI=1DX=1: 2020
/JOI=2DX=-1: 2020
UX+DX=30 X+DX=-1 DX=0
'DX=0
Y,X;s$
X=X+DX
Y,X;b$
fire
.1}L,0
k=Y-12-1
%2;k,X;c$: 1
k,X;s$
k
ship=0 X=f$-P(X+1) score=score+ (20/time*5)+1: hit=1: .3,12: hit correct letter
hit=0 score=score-1: .2~L,-12: .5,-24: miss
4score<0 score=0
printscore
&
"MAMA","MAHA","AMA","A","POP","PO3A","BEPO","OPK","KOP3HA","APOBO3","OKCT","PAKOH","EBA","BOOA","CEHOKOC","K3HEK","CKPEKA","KAPCE","KAHK","MOPKOB","H"
"MAA3H","MOPOEHOE","COOBE","KOMTEP","AMEPKAHKA","KPOCCBOP","OPOCEHOK","3MP","BEPETEHO","OBO","XBO","AKA","KOOCOK","PHK","OOCA","CEMEPKA","MATPOC","A3ETA","EEHE","KOHH","H"
"OTBEPTKA","KKKA","CTPA","OTKPTKA","APCHK","POMAKA","CHEBA","METAP","OCTA","KOPOEBCTBO","COHKO","KOECO","OPOC","BEPME","CTOTA","BOOA3","PA","PH","OOE","BOOA","H"
"3PTE","BOPOE","OHEP","TPAKTOP","KOTETA","POCTH","PAHT","PATCTBO","EPEBH","OPOBK","MOOTOK","MK","CEHTP","TPOMOH","3AXA","PHK","TPAMBA","BAHTOH","OEA","KOMAC","H"
"OTEKA","PHACT","HEBHK","OKTP","OOBO","ACTE","COPOKA","TBOPO","KAAOT","KOHTOPA","KOPOP","AAKTKA","AET","CAMOET","TAPCT","BAP","EKAP","XPP","KOMAHEP","PAAH","H"
p"ECTP_HOHOK","3EEHA_KAOA","BECE_XOHK","KAB_ECOP","XMPA_TETPA","ECT_MEBEE","OT_POKA","PBET_P3M","EHB_EMOAH","OPH_EEMOT","EPEBHH_3AOP","OTHA_E","XA_OA","CTAPHH_3AMOK","H"
q"EKAPCK_BEEP","3ABBAHE_METE","KPACB_3AKAT","ACKOB_BETEPOK","CPOBA_PABA","PTHA_BCTPEA","APHA_PAA","MOCKOBCK_3OOAPK","AEKA_AHETA","CEMOE_BOCKPECEHE","KPA_OHA","COHEHA_KA","PO3OBOE_ATE","OKA_E3HA","H"
r"CTPEE_MC","OAHE_BCTPE","OBK_BCAHK","AEHE_3BE3","OPHA_CTPEA","OBEPHT_HAPABO","3APEHHOE_PE","KABA_CMEKA","XTP_E3EHK","KATAH_KPECEPA","OCTPOT_KPEOCT","PAHEHH_COAT","OOAHHOE_CMO","3AAC_POKTOB","H"
s"KABKA3CK_XPEET","BCTPEA_3EMKOB","CEOOPO_CTAPK","3AMOPCK_PKT","PEKA_OPOA","APK_OEH","OPABAT_OBEPE","3AKAEHHA_CTA","EP3K_MAA","CKCH_MACTEP","E_PEHEO","KPTA_TPOHKA","BEABOE_E3MOBE","3APOC_EPEH","H"
t"KPBE_PACTEH","PA3HOOPA3HOE OATCTBO","AH_BCTPE","HEEKA_CA","OA_ECT","TE_OPOA","E3BOHA_CTH","METK_BCTPE","PEECTHA_EBKA","PAOCTHOE_BCTBO","EAHA_BECT","3ATA_MEO","OPETEHH_OKO","BOCEM_PATEB","H"
X"CTEC_EPH_M","CTT_OCEHH_OK","OTAOH_PHEC_OCK","POM_POXOO_OCCE","PA3AC_HOBA_BA3A","BA_AP_POM","P3__BMECTE","XOOA_HACT_BHE3AHO","3A_BKT_TEEB3OP","HAMTE__KAB","H"
Y "ACCAP_TA_A3ET","OHEP_COPA_MAKATP","OTP_BHC_BEPE","BETEP_PA3BEBA_A","TOKAP_CEA_ETA","HAAO_HOBOO_T","OCTPOB_3ATOHBX_KOPAE","AH_CTAPT_COPTCMEHA","K_TEE_KOMTEPA","OCEH_BXO_AKTEPA","H"
Z"COPOK_T_O","KPACH_A_POH","KPHOE_COPTBHOE_OCTEHE","OCTOH_PMEP_BETEPAHA","CBETOE_ETHEE_HEO","MOPO3HOE_3MHEE_TPO","POXAHA_3EEH_ECA","OHA_OPX_CTOHKOB","CAMOET_P3EMC_BOBPEM","KOHK_OTXA_ETOM","H"
["PHO_OT_COAT","HO_OPO_CH","OCA_MOOOE_EPEBO","BEPA_O_XOOHO","EBT_HE_ABCTA","OB_OEEHH_CTO","PO3PAHA_CHEBA_MOP","TE_3ECK_TP","P_OCEH_COCTAB","POMKO_AP_KOOKO","H"
\"CTA_EA_MAA","OCEH_OTKA_PHA","TPET_COTA_HOP","T_KOPAMMOB_CAXAPA","PAA_BOHA_AH","COKOHO_CA_ET","ECH_BECEHH_EH","OTPEME_OCEHE_3A","TEATP_HOO_3PTE","ACTX_OHT_KOPOB","H"
#(421,5;6;"HAMTE KAB"
#2
2yoticA@@,AA;A@2BCtBirovrintscoriniszai oovgainotheXaABCS if im
sD cor7WCOPOK_T_OihishiE 55F_screen _P?<߅?<???~??C_o???߿ݿwz?7w+~?o6 ٗ@ۿ ϿO{{{o?!A߬߿7k<~k!1ϯ߾@60k{?=|?@^}Ϸy_W{c?oG{?!o} W}?So~O@??f'vO?
@8O~<$̜DF<O?x?<?; 3<<?=<??88888888888(8888x8(88(888888888888888(88888((((hxhh((8888((88888888888(((((88((hxhh(8(((((88888888888888888(((8x~xx(((8888((((88888(((((((((((8x~xx((((((8(888888888((((((((((xx~xx(((((((((((8888888888888888x~r~x88888888888888888888888(888pprph88(((((88(((888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx888888888888888888888888888xxxxx88888888888888888888888888xxxxxx88888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888888