1984 ! 64767 0:0:0: 'n=3036$:0.075},n:n C 20,8;"AZ 1984 TOLTODIK" #18,0; (0:"" %$1984 @""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx   ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~>>L @"""""""""""""""""""""">{""""""""L0 P ""xxxxxxxxxxxxxxxxxxxxxx>xxxxxxxx^q""X&xx  ÊV _  ^]wkZ&   ߟހ?   _w_. ~~~~~~~~~~~~~~?~~~~~~~~~~~~~~~~>~~""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((      "9# # <@-&&&\\]/g.m\W&t-X![!@@P!!&  !|{"\ Pz K SR P 6 &65536-(7962):0: 63767:0 kV0=0:V=0:V1=1:V2=2:V3=3:V4=4:V5=5:V6=6:V7=7  236099\,45- RATO=V 23658j\,8  V2:V:V2: V4,V;" " D.6,10 :.6,6:.6,8:.73333,V1 :n=1417:n,7;" ":n :N=40(64@:N,16:V,568+*4:N ;N=64@200:N,16:V,24+*6:N JN=200208:N,16:V,557+(N-200)^1.5@:N AN=128132:N,40(:V,(N-122z)^1.5@:N AN=132136:N,40(:V,(142-N)^1.5@:N JN=208216:N,16:V,568+(216-N)^1.5@:N !217,16:0,557:V:V2:N=13:12 +N,25;" ":N:208,62>,5:209,67C:0,-5:-2,-2 "D.73333,V1:.6,8:.6,10 :.73333,6 #SV2:V:100d:N=10 20:N,V;" ":N '7;13 ,6;" '1984' JATEK A GAZ- DASAGI TULELESROL  1983 RMH CARTER & INCENTIVE SOFTWARE" 4V6:V::20,5;" PROGRAM INITIALISING " R(128) rN=V1120x15:R(N):N:4.8,3,400,34.5 ,100d,-2,7000X,1.5@ %BANKRATE=10 +((-.5)*V3) IQ(27):A(27):B(21):C(11 ,4):D(15) N=V127:A(N):N:V5,V4,5.63333,18.3fff,13 ,36.4,104h,1.43333,46.,121.7sfff,3,3,19.9333,3.9y,3.1Ffff,579,557,1,18.8fff,20,31,51.1Lfff,53.5V,17.6 ,1.8ffff,11.34,13.7[333 N=V121:B(N):N:30,15,40(,32 ,25,6,6500d,7000X,6500d,568,23,3,8,10 ,12 ,33!,100d,100d,100d,100d,100d IN=V111 :C(N,V1):C(N,V2)=(C(N,V1)*B(8)/100d)/10 :C(N,V4):C(N,V3)=C(N,V4)-C(N,V2):N:.4L,32.5,.8L,14.4ffff,1.3&fff,13.9^fff,.8L,12.6I,.2~L,5.9<,.2~L,4.3 ,.3,4.3 ,.2~L,3.4Y,.2~L,2.6&fff,.8L,9.2333,5.2&fff,103.1N333 S,IMF=V:XOX=V:XOD=V:YEAR=1984:Y=V1 W+EXRT=(150*(+0.5))/100d XY=16:N=10 502:.005y# =,N:N:N=16:N::N+1:1;9 ;8+N,10 ;" ELERTED ":15,10 ;9 ;" 1999-ET! ":502::N:N=10 502:.005y# =,N:N:9860& ZRAT=V bCD(V1)=A(V1)+A(V2)+A(10 )+A(12 )+A(17)+A(26) lAD(V2)=A(V3)+A(V4)+A(7)+A(8)+A(16)+A(27) vD(V3)=D(V1)-D(V2) YD(V4)=A(V5)+A(V6)+A(7)+A(8)+A(13 )+A(14)+A(15)+A(20) 6D(V5)=A(9 )+A(10 )+A(11 )+A(21) D(V6)=D(V4)-D(V5) <D(7)=A(21)+A(23)+A(25)+A(27) <D(8)=A(20)+A(22)+A(24)+A(26) "D(9 )=D(7)-D(8) =D(10 )=A(11 )+A(16)+A(18)+A(24) =D(11 )=A(12 )+A(17)+A(19)+A(25) %D(12 )=D(10 )-D(11 ) <D(13 )=A(V3)+A(V4)+A(9 )+A(19)+A(22) aD(14)=A(V1)+A(V2)+A(V5)+A(V6)+A(13 )+A(14)+A(15)+A(18)+A(23) %D(15)=D(13 )-D(14) .0275{aG,38& *20,V5;" NYOMJ MEG EGY GOMBOT!":V  aV:V:V6::N=V328:.01z# =,20:M=614:V2;0;M,N;"":M:N: !7N=812 :N,V5;"":N "V1;10 ,14;YEAR *B(17)=B(17)+D(15):B(18)=B(18)+D(V3):B(19)=B(19)+D(V6):B(20)=B(20)+D(9 ):B(21)=B(21)+D(12 ) S21,9 ;V6;"KESZEN ALLSZ?":.4L,20:V:.0175{\(,38& !D(V3)>0RAT=RAT+10  :END=V U 9 V(V1;" KORMANYZATI MERLEG " `2:V;4;" BEVETELEK M` " j5" IPARUZESI ADO";24;(A(3)*1000) k+" AFA";23;(A(4)*1000) l4" JOVEDELEMADO";23;(A(9 )*1000) m;" VAM & JOVEDEKI ADO";23;(A(19)*1000) n." HITEL";23;(A(22)*1000) o<V1;" OSSZESEN..........";V1;(D(13 )*1000) t2:V;4;" KIADASOK M` " u." SZERZODESEK";24;(A(V1)*1000) v9" IPARI ENGEDMENYEK";24;(A(2)*1000) w<" KOZALKALMAZOTTI FIZ.";23;(A(5)*1000) x<" KOZTISZTVISELOI FIZ.";23;(A(6)*1000) y0" NYUGDIJ";23;(A(13 )*1000) z<" MUNKANELKULI SEGELY";24;(A(14)*1000) {7" CSALADI POTLEK";24;(A(15)*1000) |:" KULFOLDI SEGELYEK";24;(A(18)*1000) }3" HITELKAMAT";23;(A(23)*1000) ~8V1;" OSSZESEN..........";(D(14)*1000) D(15)>V400:21,0;V3;9 ;" KOLTSEGVET. PLUSZ M` ";21,23;(D(15)*1000):RAT=RAT+10 D(15)5681165 =.0275{aG,38&:X=X$(1):x9 2000 TOT=V:N=V1X:N=X:480,24:120x,V:V,128:-120x,V:V,-128:M=V120x8:M+480,24:V,128:M:13 ,24;"AKTUAL.":14,24;"ERTEK ":1100L+(N*100d) N  LV1,V5;"INFLACIO (% p.a.)":N=1YEAR-1983:TOT-64@M=V18:M+31+(8*(N-74J)),88X:4;0,R(N):M N  1980  WV1,V5;"ATLAGBER (`/Ev)":N=90Z90Z+YEAR-1983:TOT572025:q=(q*100)/100 0Q=Q$:q=((q+.005y# =)*100d)/100d q2016,V5;" IRREALIS VALTOZTATAS! ";17,V5;"LEGYEN 5% ES 20% KOZOTT":.65&fff,-10 :2025 qBANKRATE+BANKRATE*.2~L16,5;"A VALTOZAS KICSIT MAGAS";17,5;" PROBALD UJRA ":.65&fff,-10 :2025  BANKRATE=q xV:7:V1::V1,V;"EZ AZ ABRA MEGMUTATJA,HOGY A GAZDASAG MENNYIRE KIEGYENSULYOZOTT -PROBALD KIEGYENSULYOZNI-" 020,V;" KORM IPAR LAKOS BANK VILAG " cN=V200480:7+N,23:41),V:V,101e:-41),V:V,-101e:N  HN=VB(17)/V2:N100d8,24+N:V2;39',V:N IN=VB(18)/V2:N100d568,24+N:V1;39',V:N  ON=VB(19)/V2:N100d104h,24+N:6;39',V:N *ON=VB(20)/V2:N100d152,24+N:4;39',V:N 4ON=VB(21)/V2:N100d200,24+N:5;39',V:N >5N=V1V5:10 ,V2+((N-V1)*V6);B(N+16):N H&V5,V3;"(1984-BEN MINDEN ERTEK 100)" M(V,74J:8;255,0 RQ100d:V1;21,9 ;"KESZEN ALLSZ?":0:.0175{\(,38& )Q=(*30):Q>10 4000 V1:V1:7: aA$=" *KABINETGYULES*KABINETGYULES* ":N=V132 :.04|# =,n:V1;V1,32 -N;A$(N):N 3040 +(Q*10 ) !V3,V5;" VEDELMI TANACS " [S=(*20)+V1:V5,V3;"OREGEDO ESZKOZEIK CSERERE SZORULNAK, IGENYUK ";S;" %" m7,V6;"KOLTSEGVETESNOVELES";17,V2;" Alairod a valtoztatast?";20,9 ;" I VAGY N " W$=:W$=""3043 W$"I"W$"N"3043 vW$="I"RAT=RAT-502:(V2,V3)=((C(V2,V3)+C(V2,V3)*S/100d)*100d)/100d:C(V2,V4)=C(V2,V2)+C(V2,V3) (W$"I"RAT=RAT+*10 :XOD=XOD+V3 3150N V3,10 ;"OLAJVALSAG" <9 ,V2;"Az olajvalsag miatt ";bankrate/2;"%-os" i20,9 ;" I VAGY N ";10 ,V2;"tokeinjekciora lenne szukseg. Engedelyezed? " W$=:W$=""3053 W$"I"W$"N"3053 mW$="I"RAT=RAT-20:A(10 )=A(10 )*.9ffff:B(18)=B(18)-(10 +(*18)) 3150N S=(*15):8,0;" KAPTUNK ";S;"B`-T AZ EEC-TOL":20,7;"NYOMJ EGY GOMBOT":0:B(21)=B(21)-S:B(17)=B(17)+S 3150N 8,V3;"VAN IGAZSAG ABBAN A PLETY KABAN, HOGY UJ FELUGYELETET AKARSZ BEVEZETNI AZ ARFOLYAM- ELLENORZESRE?" 20,11 ;"I VAGY N" W$=:W$=""3072 W$"I"W$"N"3072 BW$="I"R(Y+75K)=R(Y+75K)+(*V5):C(V5,V1)=C(V5,V1)*V2  3150N $V5,6;"BRIT VASUTI TARSASAG" 9 ,V1;"Befektetest terveznek jovo ev- ben a tarsasagba, kolcsonzod-e a megfelelo osszeget az idei koltsegvetes terhere?" 20,11 ;"I VAGY N" W$=:W$=""3083 W$"I"W$"N"3083 [W$="I"RAT=RAT+10 :C(V6,V1)=C(V6,V1)+.1}L:C(V6,V4)=C(V6,V4)+C(V6,V4)*.5  3150N V3,11 ;"LAKASUGY" lV6,V3;"TOBB HAZAT EPITENEK,MINT AZ UTOLSO TIZ EVBEN BARMIKOR!":14,7;"NYOMJ EGY GOMBOT" @C(9 ,V1)=C(9 ,V1)*V2:C(9 ,V4)=C(9 ,V4)*V2  3150N V3,12 ;"TUNTETES" V6,V1;"Engedely nelkuli felvonulasok, passziv ellenallas,varosi terrorizmus: mindezek miatt a Rendorsegnek tobb eszkozre es emberre van szuksege." O13 ,V2;"Jovahagyod a magasabb kolt- segvetest a belugyminiszternek?" 20,11 ;"I VAGY N" W$=:W$=""3104 !W$"I"W$"N"3104 #oW$="I"RAT=RAT+10 :C(7,V1)=C(V7,V1)+.1}L:C(7,V4)=C(7,V4)+C(7,V4)*.5 $W$"I"RAT=RAT-10 % 3150N &V3,10 ;"EGESZSEGUGY" 'i9 ,V;"SZANDEKODBAN ALL EGY DRAGABB, AMMAGASABB SZINVONALU EGESZSEGUGYI RENDSZERT KIEPITENI?" (20,11 ;"I VAGY N" )W$=:W$=""3113) *W$"I"W$"N"3113) -:W$="I"C(V3,V1)=C(V3,V1)+.3:C(V3,V4)=C(V3,V4)+V3 .+W$"I"RAT=RAT-80P:XOD=XOD+3 / 3150N 0,V3:V1;3,8;" TOZSDEKRIZIS! " 19 ,V4;"A RESZVENYEK OSSZEOMLASA ELKERULHETETLEN, HACSAK A KINCSTAR NEM TUDJA KISEGI- TENI A PENZUGYI SZEKTORT" 2)15,V4;"TUDSZ NEKIK KOLCSONOZNI?" 320,11 ;"I VAGY N" 4W$=:W$=""31244 5W$"I"W$"N"31244 7rW$"I"R(Y+15)=R(Y+15)+:R(Y+30)=400+(*5):R(Y+60<)=R(Y+60<)*.9ffff 8+W$="I"B(17)=B(17)-100d 9 3150N :8V1;10 ,1;"A FONT 15%-KAL LEERTEKELODOTT!" &20,7;"NYOMJ EGY GOMBOT" ? 3150N D20,7;"NYOMJ EGY GOMBOT";10 ,0;"A SZAKSZERVEZETEK KENYSZERITENEKA MUNKANELKULISEG CSOKKENTESERE,NOVELNED KELL A KOZSZFERABAN AL- KALMAZOTTAK SZAMAT!":N=110 :C(N,1)=C(N,1)+(C(N,1)*.1}L) FN:N=1100d:N N0:.0175{\(,38& *V2:V6:V::V3,10 ;"BERTARGYALAS" N=V1502:.01z# =,N:N 10 ,V;"A kormanyzasban meg kell tanulni a targyalas muveszetet. Ha tul keveset igersz, akkor veszitesz, ha tul sokat, akkor noveled az inflaciot!":21,7;"NYOMJ EGY GOMBOT":0:.0175{\(,38& ":V1;V1,11 ;"BEREK-";YEAR (Q=((R(Y)+(*R(Y)))*10 )/10 08,V1;"A KOZTISZTVISELOK KERESE ";Q;" %" *"A TE AJANLATOD ";X$:X$=""4040 2I$=X$:9500%:X$=I$:FL=04040 X1=X$ ̸X135#+Y:V1;10 ,4;"AZ AJANLATOD ORULTSEG!"::200::RATO=-100d:9800H& /B(8)=B(8)+B(8)*X1/100d ~7;V2;14,10 ;"ELFOGADVA!":20,V;"KOZTISZTVISELOI FIZ.EMELES:";X1;"%":.4L,15:100d &V5::V1;V1,11 ;"BEREK-";YEAR (Q=((R(Y)+(*R(Y)))*10 )/10 18,V1;"A KOZALKALMAZOTTAK KERESE ";Q;" %" ,*"A TE AJANLATOD ";X$:X$=""4140, -2I$=X$:9500%:X$=I$:FL=04140, .X=X$ 0X35#+Y:V1;10 ,V4;"AZ AJANLATOD ORULTSEG!"::200:RATO=-100d:9800H& 6.B(7)=B(7)+B(7)*X/100d @}7;V2;14,10 ;"ELFOGADVA!":20,V;"KOZALKALMAZOTTI FIZ.EMELES ";X;"%":.4L,15:100d h&V1::V1;V1,11 ;"BEREK-";YEAR w(Q=((R(Y)+(*R(Y)))*10 )/10 |-8,V3;"A MAGANSZEKTOR KERESE ";Q;" %" *"A TE AJANLATOD ";X$:X$=""4240 2I$=X$:9500%:X$=I$:FL=04240 X=X$ X35#+Y:V1;10 ,4;"AZ AJANLATOD ORULTSEG!"::200:RATO=-100d:9800H& .B(9 )=B(9 )+B(9 )*X/100d {7;V2;14,10 ;"ELFOGADVA!":20,V1;"MAGANSZEKTOR FIZ.EMELES ";X;"%":.4L,15:100d IMF>V5:1:9 ::5,V4; "NEMZETKOZI VALUTAALAP ":9 ,V;"MIVEL KOLCSONT VETTEL FEL AZ IMF-TOL, IGY VISSZA KELL FIZETNED A ";(IMF*100d)/100d;" B`-BOL EGY OSSZEGET":14,V1;"VISSZAFIZETENDO ";YEAR;"-BEN ":X$:X$=""5000 9IMF>VI$=X$:9500%:X$=I$:FL=05000 4IMF>VX=X$:IMF=IMF-X:B(17)=B(17)-X |7:V1:7:V::V3,V6;"PENZUGYI BEFEKTETES":10 ,V;" MENNYIT SZERETNEL BEFEKTETNI?":15,V;"(JAVASOLT OSSZEG: 0-5 B`,TOBBET CSAK AKKOR ADJ, HA A BANKOK NA- GYON MINUSZBAN VANNAK)":"BEFEKTETESED B`-BAN ? ";X$:X$=""5500| 2I$=X$:9500%:X$=I$:FL=05500| AX=X$:B(20)=B(20)+X:R(Y+46.)=R(Y+46.)+X D#B(18)>1305708L I 5750v Lk0:0:7::10 ,V3;"HA AZ IPAR TUL GYORSAN NO, NOVELD AZ ALTALA FIZETENDO ADOT!" N(20,7;"AKAROD? (I VAGY N)" OW$=:W$=""5711O PW$"I"W$"N"5711O Q.0175{\(,38& S^0:W$="I"S=10 +*15:B(17)=B(17)+S:B(18)=B(18)-S vJUMP TO HERE (*26)=10 V2:V2:7:V1,-5::1;10 ,4;"AFRIKA HABORUBA KEVERT!":B(21)=B(21)-502:200:0 $B(21)=B(21)-*20 p]N=V111 :C(N,V2)=(C(N,V1)*B(8)/100d)/10 :C(N,V3)=C(N,V4)-C(N,V2):N zV4:7::V1;7,V7;" MINISZTERIUMOK":13 ,V;"A KOLTSEGEKET MEGFELELO SZINTEN KELL TARTANOD, MIKOZBEN VEDD FI-GYELEMBE, HOGY AZ INFLACIO ES A BEREK EMELKEDESE KOLTSEGNOVELO." 21,7;"NYOMJ EGY GOMBOT": 600X:.0175{\(,38&::A$=" TARSADALOMBIZT. HADUGY EGESZSEGUGY OKTATASUGY KERESK. ES IPAR SZALLITAS IGAZSAGUGY KORNYEZETVEDELEM LAKASUGY EGYEB AGAZATOK OSSZESEN" >TOT=V:N=V110 :TOT=TOT+C(N,V4):N:C(11 ,V4)=TOT 7:V1::V1,V7;" MINISZTERIUMOK":V,155:255,V:V3,25;"B`":V4,V;A$:n=V111 :n+V3,25;C(N,V4):N n=V9 :n+4,0;n:n:16,2;"Ha valamely agazat koltsegve- teset szeretned modositani, akkor valaszd a megfelelo szamot" 4V1;20,V;"NYOMD MEG AZ ENTERT, HA VEGEZTEL" X$=:X$=""6071 0X$=13 .0175{\(,38&:6090 'X$<480ůX$>5796071 &.0175{\(,38&:X=X$(1) Yx<10 :18,2;"(Add meg, hogy mennyit szansz erre az agazatra)":6,6;A$((x*32 )+1(x*32 )+21):9 ,4;"Alkalmazottak: ";(C(x+1,1)*1000);",000":14,V1;"Aktualis koltsegvetes: B` ";C(X+1,4):"Uj koltsegvetes (B`) ";Q$:Q$=""6075 >X<10 I$=Q$:9500%:Q$=I$:FL=06075 X<10 Q=Q$ X<10 q100d+(y*12 ):10 ,v3;"A KOLTEKEZES KEZELHETETLEN":200:9080x# dXOD>309110# A(V1)=c(11 ,V3)-60< c(V1,V3)<.052|T*((B(V4)*B(15))+(B(V5)*B(12 ))+(B(6)+B(14))):v1;10 ,V;"NEM TUDOD FIZETNI A JARULEKOKAT!":500:9800H& b27:V6:V::V1,V6;YEAR;"-ES KOLTSEGVETES" lA$=" (%) 1 JOVEDELEMADO 2 FORGALMI ADO 3 IPARUZESI ADO (`/Wk) 4 NYUGDIJ 5 MUNKANELK. SEGELY 6 CSALADI POTLEK" qv,152:255,v v+V4,v;A$:N=V1V3:N+V4,22;B(N):N w!N=V4V6:N+V5,22;B(N):N 13 ,V3;"SZABALYOZAS Minden erteket 10%-os mer- tekben modosithatsz. Csokkentheted, novelheted az ertekeket, ettol fuggo- en tehetsz szert haszonra vagy akar vesztesegre. Valaszd a kivant adot,jut- tatast." .#0;"NYOMD MEG AZ ENTERT, HA VEGEZTEL" X$=:X$=""7050 0X$=13 .0175{\(,38&:7200  4x$(V1)<491ůx$(1)>5467050 .0175{\(,38&  x=x$(V1) x=V27070 x=V37080 x=V47090 x=V57100 x=V67110 8X=V1" JOVEDELEMADO MERTEKE? ";Q$:Q$=""7060 2I$=Q$:9500%:Q$=I$:FL=07060 q=q$ 2QB(V1)+.1}L*B(V1)B(1)=Q:7000X x=V17000X 8X=V2" FORGALMI ADO MERTEKE? ";Q$:Q$=""7070 2I$=Q$:9500%:Q$=I$:FL=07070 q=q$ -QB(V2)+.1}L*B(V2)B(V2)=Q:7000X x=V27000X 9X=V3" IPARUZESI ADO MERTEKE? ";Q$:Q$=""7080 2I$=Q$:9500%:Q$=I$:FL=07080 q=q$ 2QB(V3)+.1}L*B(V3)B(3)=Q:7000X x=V37000X 3X=V4" NYUGDIJ MERTEKE? ";q$:q$=""7090 2I$=Q$:9500%:Q$=I$:FL=07090 B(4)=q$ /B(4)B(9 )/223.6_9995 ' x=V47000X ;X=V5" MUNKANELK. SEG. MERTEKE? ";q$:Q$=""7100 2I$=Q$:9500%:Q$=I$:FL=07100  B(V5)=q$ (B(V5)B(9 )/2809995 ' x=V57000X :X=V6" CSALADI POTLEK MERTEKE? ";q$:q$=""7110 2I$=Q$:9500%:Q$=I$:FL=07110  B(V6)=q$ )B(V6)B(9 )/11669995 ' x=V67000X  B(V4)B(9 )/223.6_B(5)B(9 )/280B(6)B(9 )/1166XOX=XOX+1::XOX-1;8,11 ;"VESZELY ";XOX:1;12 ,0;" A BEVETELEK NEM TUDJAK KOVETNI AZ INFLACIOT! ":300, *XOX>V39100# VgV5:V5:V1::V1,V6;"KULFOLD SEGELYEZESE":V,V:255,V:V,175:-255,V:V,-175 `N=10 40(10 :128,110n,N:N:88X,110n:80P,0:128,70F:0,80P jX=128:W=110n:Z=28:X,W:Z,Z:X,W:Z,-Z:X,W:-Z,Z:X,W:-Z,-Z:100d,40(:80P,80P,/3:156,40(:-80P,80P,-/3 tN18,V1;"AKTUALIS SEGELY EVENTE B` ";(A(18)*100d)/100d ~*"JAVITOTT ERTEK ";q$:Q$=""7550~ 2I$=Q$:9500%:Q$=I$:FL=07550~ Q=(Q$*100d)/100d qA(18)*V51;18,0;" A SEGELYT CSAK LASSAN EMELD, HOGY AZ EMARADOTTSAGOT ENYHITSE!":200:7550~ <:V2;V1;10 ,V7;" B` ";Q;" ELFOGADHATO ":200 (A(18)=(q*1000)/1000 V:V6:V6:V::V1,8;"IPARI ENGEDMENYEK ":V,V:255,V,-V1:V,175,-V1:-255,V,-V1:V,-175,-V1 410 ,5;"EVES ENGEDMENY: B` ";A(2) ("UJ ENGEDMENY ";q$:Q$=""7630 2I$=Q$:9500%:Q$=I$:FL=07630 Q=Q$ ءqA(V2)+A(V2)*V4V1;V1;14,V1;"TULZOTT KEDVEZMENY, CSOKKENTSD!":200:7610 +10 ,5;"EVES ENGEDMENY: B` ";Q 7V1;V1;14,V7;" ELFOGADHATO ERTEK ":200 A'7:V:B(12 )=R(15+Y) B A(V2)=q E"B(11 )=26-B(12 ) J1Q(V1)=(C(11 ,V3)*7.49625oG)/100d O Q(V2)=A(V2) PQ(18)=A(18) T6Q(V3)=(A(V3)*B(V3)/40()*(B(18)/100d) ^.Q(V4)=(A(10 )*B(V2)/10 )/10 hVQ(V5)=(((B(11 )-C(11 ,1))*.25~)*B(7)/10 )/300, r<Q(V6)=(C(11 ,1)*B(8)/10 )/100d |[Q(7)=(((B(11 )-C(11 ,1))*.75@)*B(9 )/10 )/100d -Q(8)=A(8)*B(18)/100d OQ(9 )=((A(5)+A(6)+A(7))*B(1)/10 )/10 Q(10 )=(A(V5)+A(V6)+A(7)+A(8)+A(13 )+A(14)+A(15)+A(20)-A(9 )-A(11 )-A(21))+((-.5)*10 ) HQ(11 )=(A(11 )*D(12 )/100d)+((-.5)*4) (Q(12 )=A(12 )*1.5@/EXRT CQ(13 )=(B(15)*524*B(4)/100d)/10 CQ(14)=(B(12 )*524*B(5)/100d)/10 CQ(15)=(B(14)*524*B(6)/100d)/10 :Q(16)=A(16)+(V1-(EXRT/1.5@))*(*V5) ?Q(17)=A(17)+(V1-(1.5@/EXRT))*(*5) :Q(19)=(A(16)*B(16)/10 )/10 TQ(20)=A(20)+((A(5)+A(6)+(7))/1.534DZ)/100d FQ(21)=A(21)+((A(20)-20)*BANKRATE)/100d 4D(15)VQ(22)=A(22)-D(15) .D(15)>VQ(22)=A(22)+(Y*) LQ(23)=A(23)+(((A(22)-53.1Tfff)*BANKRATE)/100d)+Y &.Q(24)=A(24)+Y*BANKRATE/100d 0/Q(25)=(A(24)*BANKRATE)/100d :1Q(26)=A(26)*A(10 )/121.7sfff DHQ(27)=A(27)+((A(26)-11.34)*BANKRATE)/100d NN=V127:A(N)=Q(N):N vPR(Y+V1)(*7)B(8)>10000'R(Y+V1)=R(Y+V1)+(*V4) y>B(17)<100dR(Y+1)=R(Y+1)+(*4) R(Y+V1)>309090# ]R(Y+16)=V3+(0.3*A(10 )/121.7sfff)-(.3*1.5@/EXRT)+(-.5) R(Y+16)>V59060d# R(Y+16)YV1R(Y+61=)=R(Y+60<)*(A(10 )/121.7sfff) BY=V1R(Y+61=)=100d+((-.5)*100d)/10 8Y>*10 R(Y+61=)=R(Y+61=)-R(Y+1) QR(Y+76L)<-40(R(y+76L)>20R(Y+76L)=bankrate/10 5R(Y+76L)=A(17)-A(16)+(Y^1.1 ) O(*V3)=V1A(18)<20R(Y+76L)=R(Y+76L)-bankrate/5 =R(Y+91[)=((B(7)+B(8)+B(9 ))/3) 2R(Y+106j)=1.5@*A(16)/A(17) cR(Y+V1)>8R(Y+106j)=R(Y+106j)+(-(BANKRATE/20))*(R(Y+31)/2000)  B(17)v9080x#  B(18)v9020<#  B(19)v9030F#  B(20)v9040P# ! +R(V1+Y)(*20)+209090# !R(16+Y)V59060d# !*%R(106j+Y).4L9040P# !/R(16+Y)V9070n# !4RAT=RAT+A(18)*10 !5,RAT=RAT+(R(31+Y)-400)*10 !6 RAT=RAT+R(76L+Y)*15 !7*RAT=RAT-(R(1+Y)-10 )*10 !8%RAT=RAT+(V2-R(16+Y))*20 !9#RAT=RAT+(31-B(V1))*10 !:#RAT=RAT+(15-B(V2))*10 !;:10 ,5;"GRATULALOK TULELTED AZ ";YEAR;"-ES EVET":.6,10 :.6,6:.6,8:.73333,1 !<Y=V5RAT>150XOD=V:XOX=V:V3::V1;10 ,V4;"AZ ";YEAR;"-ES VALASZTASOKBAN";YEAR:11 ,V4;"BIZALMAT KAPTAL MEGINT!":300, !=Y=V5RAT150V::V1;10 ,V4;"AZ ";YEAR;"-ES VALASZTASOKON":11 ,12 ;"ELBUKTAL!":.5,12 :1.3&fff,6:9800H& !?Y=10 RAT>300,XOD=V:XOX=V:V2::1;10 ,4;"AZ ";YEAR;"-ES VALASZTASOKBAN";YEAR:11 ,1;"BIZALMAT KAPTAL HARMADSZOR IS!":300, !@Y=10 RAT300,0::1;10 ,4;"AZ ";YEAR;"-ES VALASZTASOKON":11 ,12 ;"ELBUKTAL!":.5,12 :1.3&fff,6:9800H& !C:10 ,V4;"AZ EVES TELJESITMENYED ERTEKE: ";((RAT+100d)/10 ):.73333,V1:.6,8:.6,10 :.73333,6 !HRATO=((RATO+RAT)/Y)/10 #'!YEAR=YEAR+V1:Y=Y+V1:600X #(RV2:V2::10 ,V2;"NAGY KERESKEDELMI EGYENSULYHIANY":500:9800H& #2~V:V2:7::9 ,V;"A NEMZETI PENZTARAKAT KIURITET- TED A ROSSZ GAZDALOKODASODDAL!":500:9800H& #<]V:V2:7::9 ,V;"TELJES IPARI OSSZEOMLAST OKOZTAL":500:9800H& #FxV:V2:7::9 ,V2;"A BRIT NEPESSEG TELJESEN ELSZE- GENYEDETT, KITORT A FORRADALOM!":500:9800H& #P|V:V2:7::9 ,V;" A TOZSDE OSSZEOMLOTT, A BANKOK BEFEJEZTEK A KERESKEDELMET!":500:9800H& #ZwV:V2:7::9 ,V;" KORMANYZATI OSZTALYOKAT NULLAZ- TAL LE ES NEM MUKODNEK TOVABB!":500:9800H& #dV:V:7::9 ,V;" A MUNKANELKULISEG ELERTE AZ 5 MILLIOS HATART, NEM KAPTAL TOBB BIZALMAT!":500:9800H& #nuV:V:7::9 ,V;" A GAZDASAG GYORS ZUHANASA MEGAKADALYOZZA A MEGUJULAST!":500:9800H& #x V:V2::9 ,V4;" A KOZSZOLGALAT MEGUGRO KOLTEKEZESE ELKESERITETTE A KORMANYT!":500:9800H& #V:V2::9 ,V2;"AZ INFLACIO MIATTI ALTALANOS NYUGTALANSAG ELKESERITI A KORMANYT! ":500:9800H& #V:V2::9 ,V;"A NYUGDIJAK ES AZ EMBEREK JOLE- TENEK A FELOLDOZASA ALTALANOS ZAVARGASOKHOZ VEZETETT! ":500 #V:V2::9 ,V2;"AZ ALLANDO FELRESZAMOLASAID BIZONYITOTTAK A TE ES MINISZTE- REID ALKALMATLANSAGAT! ":500 # 9800H& %!FL=V1 %"%I$>5I$=I$(15) %#>N=I$:I$(N)=37%N1I$=I$(1(N-1)) %&N=I$:M=V1N %0CI$(M)<46.ůI$(M)>579FL=0:.375@,-14 %:M: &F &H9300,::6,V4;"A LEKOSZONESED ELFOGADVA " &RV1;13 ,6;"ELERTED AZ ";YEAR;"-ES EVET":Y118,0;" (AZ IRODADBAN TOLTOTT IDOT UGYESEN HASZNALTAD FEL) " &SY=V19870& &Ti#0;" NYOMJ MEG EGY GOMBOT ":1000:.0175{\(,38&::END=1:1110V &W 100d &B16,V3;9 ;"TELJESITMENYED ERTEKE ";(RATO+100d) &620,0;"NYOMJ EGY GOMBOT ES PROBALD UJRA" &N=V1502:N:0 &V1 &63767::0: &"" & "1984"16384@,49152 &L=64803# & ' 6:V2;V1;10 ,V2;"A JOLET NYUGODJEK BEREKBEN!" ' I100d:20,9 ;"KESZEN ALLSZ?":V:.0175{\(,38&: :9900& 1984 @@ @PMMMR P P P  ^\MM| OOMS1S WMMS P P P @ @S ANK KEY ":1000:.0175{\(,38&::END=1:1110V ;"FUNDS GROSSLY MMMR P P P  ^\MM| OOMS1S WMMS P P P @ @S ANK KEY ":1000:.0175{\(,38&::END=1:1110V ;"FUNDS GROSSLY INSUFFICIENT":200: MMMR P PM P 3 Wq MQ ?v>MMMMGG MTM P P P 33MN3G]GWqv>::\>2:\{=\*Y\6#6 ô8>G^ P P P 3MGG\GWqv>>*]\"_\C*]\~}t[3*a\Þ*x\#"x\| 4@Ϳnu{=\)