-lz5-` Z anime.bas)10 /* save "anime"NHKu@̂}CRirTWNjA 20 int clr1=63488,C2=65472\̐F ΁Ae y.maeda73=nt,dspold=0,kf,fl740 float wt,revsx0,sy075ssfl,sa,sb,sz,sj,h,su,sv76tOemp1277=si,sp,snew,s%,i780 dimpx(200)y@MLX79 -710=numofkey=4L[t̖[Pinbetween=5񒆊̉<data=18W{f^ȉ́A傫zƂ=x(18),y"n#nЏ"=x#sp]y#spa$b$m1%2&=t%$&&~P , E30K30I30N̈̕ʒua ɂ炷 =?offx(4)={,4~4}1210}0 wĂs i> Zg 1j:p4yx6}13404ȏ?ǂ{x$?6?H5{N3h7Nk6n 4, ={AB18095,jBgB3yD7AuDAA|E1fFP(xu2<1|@oAoB|E|AhA xIMGDEGDD{B5uCoBA5CoBhA.QIJ{BKG2H6\EQQ4\Q:GI(G"U4u@6uD2TFRu@QR_WG$}ABi8n UI: AT>QXFA>Q|ATNbhhDAyC{gekeoe9cc>P0belgaTc3gehAQkeDPB3m@d0,& foBgTsQtm@{ neqBUnQt<gePB1ug`oAXv.PoBPXt,ft?f3a!ꍇPUu_q 0_ _ꂪ+fv"37AF)0[_ō\i 0Wa Z0hr3Xv!ȐŌƍT0܂tȂׂxr nR^Ӄɕt0B(X^t QF,Tfq'3:~fx3{for ?i=0 to7 4j3!QAi,j)=ؕ+ t2iu4<Taܔnextpscr 1,3,1,1:con&e ,,0:vpage(1):aNt4`ß  ,ߓ0,:": y ଣ:{subsp1(u5k f-1뢁qe˖q5q : 5?5#line(#%@2C=: !0)=0#:=5㞔si̕80!si)-+sqr((p'ow(-7(?),2))+1 81sp~ }u90y9~} elseM9.Y͔9?zYpgCb98L vZa=2#%3f=V+1^ ))/WdgRd]-1fo@0lRlhpsb=6*(sf-sAg ~ab}b?p10seA2lG5R/.$Tpdpun7til>=LpW01p8J2/pm#=I0J2z)"/o4J21 zJ2ײ;'1s3`Vý/ʫ2h5z!)"-sl*sz:AWI(Q4<1}Q13BP@1;c1HaD101cb\1bDp=bCCR#qDfl<>2t_*1qOT>02]K+U~ O;R1t!:1whiF3QY;R;'Wj=sjR#ԑdqAj>8HbreaQk'b7 <jDoVngsh!j`>wa 'bsug|&c"sv=stl!=1 3h-su*sh)/6'bc)tvuvxbsxQPa*2!+KtTt2+qa p+6qqs qYyQPQ|qd{Y`vzrvQt+r.cIX xS0,.y1f$Fqx㳑1Upr"/";Uϊ}`̍W3킩Az̖ G1ҥ@xr VA5R#:R/Ab򂀮c1A9<>F@nui{2+c5䀔G98$ n8v5b+U🋟ѩ5â]n0ӣyڣY:RE8݃3ЗŢߘY7J8GGYhӿѢۤAЪ !-lz5- A:> HINICHI.BAS10 /* save "hinichi" y.maeda 1989.01.16 2creen 2,0,1,1#30 int y0,m0,d0,t0,h0,s͂߂̔NAתb#4B1,m1,d1,t1,h1,s1Ic5~Bdt,st naƔԂ̓Aq60 strG$,y1$,c_h,yes#7i̻O܂j#8Bzz=1 --- [N#9Bi,j,f,o,t,l0,l;100 float pycdimCco(10)={3007,625530,5634,41}c(0)@9) FwcA{m(121,28!3" $ *x{ms[2]={" "," 1H!2H!3H!4H!5H!6H!7H!8H!9H 10u!L!12"x2%ws(6?$ۓH H ζH H H H y$/(week!3B!sunH mo!tuenH wed!huH wfriH sat$while -}1loop1artc0. 8:vpage(1)cMdt=0:sT1dU0oU0T1l0f11=0#6r2fp4(="19"+left$(date$,2J22Am0=val(mid54(03xd>76prD:2 "AAa/067,1919925@8C8"r24]ܘ)C4 W[";;H ;_$(m0)cGdnA])C0LF( m;4313) )CMO t1JO( sLinpu6Lh =1 8@_AJB(if0<=o0 or1Vbisdigit(ascP))x1POZ񐔎!ȂƍēBMuTQ#^ j=mlA:+R{=2NSsub1QxAq<ORj=j+;4Af jK_3q(SP-9p3Qy0>rnelse bOreak2rAt33tim21sxh(8s64s~64/Gm ]@t0;n*";h6f@>b";2rB]@G Q2rF`Mfp<2Rt0>=24(x*QhhTnssse|5(end2A@%xz95~?45m)1?450dz65E5 [C1bI1oICOB38',12D6B()AAL SP9PՒSm10X1c$w1 e7tz 70)hz|7Ms6 8+17AJ8G\O`-8t11 ShLhT༏.S%sLs{88( 8y#1-PU{Mf4PiR toD~39hOrid=d+366sS53nexb+29(+S>1 9aQ!m(12P3xSmCiGH26s8 910*m0 f10l10|`\u10ffRv10 ."10B1} "{k1|1o@y?Cm@ 11.-Lv11*c -<&%1#xc# m@-!R116//1*1.A? loop1 Ostar#j\1 \錎̓"`1i_z1Ajinʖ́jA+R>o-2:t ![-A+103B#Al0=t+t/4-t/XA`@(}0*o-20)^BKCT@mode0(lI@,7)+3`Q6ĜE %H11C18FsDBQl1VOhOA!@D0BKCRscreQP1,3,:vpage(1asymbol(w 250,"1vZ"EQEPc_o(9),R1#q"ZY3gPIr_ XW97,,1e_1pmqZT0R"N_PU4cPU _1qU6QP_PU7Xd+oQT93SAVoظP!ZT24MdjPoP8QT1`7TtoQWWR`8 1iehDi,qa1ЁnieAs_qqharbrpAgaQ},ÜrpkgQT1rphP;_osga;q1uDhiToprxv`;ɏ1hioShio2X` t3hfQ 02AhUhy3khQ2hUsџ33n1t1׵+(1dtT1S>=s$st=s1- [(P0*24-: t #nhV0|dt*{0hQTAhv`@tkkh`}@Pzyes="N"Qocate 40,28:"s(y>[_) ";i<>"Y" 7andFy"}1707Z0=ߠҏlZ0/func73)21[NҨy9!<>y/4*Xz=0:return(lҒ*~1$=;Q&P0я3߬3Cx,y)=x-int(x/y)*y Եlx-*{2--lz5-G "2 bingo.basW10 /* save "b:bingo"1989.6.28 20 screen 1,3,1,1:console ,,0:vpage(1):a90)3^mousE:T4[1H4Osarea((,51_1,495H5width 96~\2):end60 int i,j,k,l,a1,a2,f,p1,p2,p3,p4,go=07trb,yn80 dimb1(9,4,4)D̐l92łPƂ10c1(7-/D;ĂキQin(}9fBINGOȂi߂-1KjQbb[1]={"B","IN:GO"}QNyF,  , - ې'!'!QsYol={49000,2046,63488f 550,654{72r 534,QÐ,- ,Q35^!46"" 4 #𗐐̏Qrandomize(atoi(mid$(time$'2)+ 84<70)/8H1-G1 ̓t[C_̂ŁAMŀņtLF32Vfor i=0 to 92&i,20=1HtBKJ2next2NG3̌vZ@25*10C}8s> 2k342$j2whi1j0h!{B41l3j-CN@pBlvHCf=1:b|kBs5 "3&@@Cj=j+C6D@=BBLBV54VD6O XC̃J[h\}748!B4ymbU i00+37,: ,$(i.'\'T!8),G4Nv]16U+5)_qslVG3 ̕\^ 1.@1B4M\ [z@6+6,jt{@P4Pb(kcA0R`G 65f85=Q@10*2595? Ho oi!B5YdI5b=RpF):[rright$(" "+2c@iC<5DUg2`'20+pQbh`dgE} else>v(i-5)~b PT X6h686N1sG3c%g[60t45Yd7y6mdDB6l7ineQ6+`_ 3bp „T!7)iX7h7h7,D6`7N86t7y70t7)CiqÃ7iX8uYM?_5Ԃœhׂ%}78[28\{1nx8Ny2s20T8 XpaqT#UUt|.@ ֩ "8=8A9}7] yn="n":input "SӂM({y 0_) "19@y"Y"Cprs(:H9cls9pQMꏊȎ{!B9T6,@biibCd(59mdi00%79[wi=x9g q1)Sd: ) p+25NG/15T S6T U6108jKgρ210<10Yp Ubq2 si)=B10ֱٖU{5- gam ear @l=Cl<10g`,"(ޣente@ey)"h4UC1a2WE75):>al)=a2E@l9U?OO<Vy XaOG1aFiWט`FbN1Taba-ap1Nu)/qQ!|t'1=p1+}"CqVVP 4goRHq^2T-b9-Ep2NQ-pvUk,jW2=p2SVT2_<`H_N3Tbp3N/)CvWLh3=p3SWfDpQ3 vo#pH^4h~ bՑp4N)&vW4-Lh4=p4 SZ夡Q4.p+l=~rgo>9 t#BƍŌW܂;B89~rrend~r ~Tјp=rgaunc [avmÂP 炁:?̗gsreturйrnd()*a)gTgٕgXUn²R8q j,M!igrxm2Ѳpi湐i2%r becep#s8Վ=L2^iKgo:go=g%oR2rişvri92?{BD37,(i/A50+1A5\ l,l22oq츢"xO1(N2(N3(N42T+||ʿs B I N G  O۱%7̄jhzόϞτ$+d(24#m2፳ |";#,2//a2'+/1FR3ĩ;"i҉0j=4 q5ұNaϩk}ͧ/*:0+U5(N6(N7(N8(N9տhz?QY<N`% '!rs 0~2M!k!݂!#5G!Wi{g2X^s%F;dO*r-/?/Q/ɰFҢAZثA/ $-lz5-&c mojichange.bas210 /* save "mojichange"񕶎ϊ1989.6.24 20 str a1="siܔcodj_hm"3#b1,c140? print(50 input "ǂ ܂ ";bZ6qɄ Y70(sub1(a1,V)8a 90 end100 fgunc$s;%K,b c 1~eb,lent+b"dsO,=,`1ObUpb=in%(1,asf~r0 then@=as elseleft$,b-1)+cs+righ,-b-1+1cAreturn(dU