ZXTape!0Created with Ramsoft MakeTZXCP.87  63999:3 &f=6500065071/:n:f,n:f 205,124|,0,59;,59;,225,1,15,0,9 ,235,42*,61=,92\,115s,35#,114r,201,0,205,142,2,123{,254,255,32 ,248,58:,58:,92\,254,12 ,40(,10 ,254,16,40(,6,254,20,40(,2,24,25,60<,502,129,92\,253,546,0,255,33!,23,37%,34",66B,92\,33!,0,0,34",68D,92\,59;,59;,195,125},27,195,3,19 965000:65053,40(:65054,0 7::"" =0:0:19,0;"":T=64000:""T L236066\,T-256*(T/256):236077\,(T/256)-1 19,0;"":"" ' 42* ( 0 *19,0;"":"" screen < 11111L1 1!!!!!5!5!DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE%%%%% j%.%! !!!@! !!1ߙ111`111!!!!X!8 !0!%%%%%D0%`%0%! !!!![0!X !!1 `1L1 '1 111**1 ! 1*`M@! !@p! U!!`1 !**"!T% I>p"@%%l%` E%%%*?*Q%TD! @!!!! ?!!8!**M! 1I 18@1>A111 ?01**1@H! ! !AA!!! ? ?r !**![%@b% 0 %A!%0%%** %**%   F!C! 8 ! !!!**!**!**1f1`1**11pH1**16b bB#C1 @ @D++ !qa!*w*#caD!++!! @J@l`@$ ((H%1cÌ%*o*c0`X%((%% ʢjH*d@//8@!ya1!**80!//1 抂H*@ 1 y c9191*_* q`1 B@0$!1 jD`jj`BfJFD@??! ssc q!**!??$@@BDR#!  %*/*s1cL%**%Vb`%fuU%DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDE0!*7*#98!**!UR@DuD! CHR$ ! $$$~$$~$>8>>fl0fF4>> 0`< 0 >>0 0l88llll< 8| 0|xxx(8 xllll8lll8|0`||0`|Z<A300, 5CYF=0:7050:B$(B)=R$:C(B)=50000P 160 ,7W=6:K=0:T$="Imiona graczy:":7000X 1-::N=1A:"gracz ";N;": ";B$(N)::N 6 7020l  7010b N=19 D(N)<9 D(N)=9 N  Y=Y+1 Y>Z5000 50,0;" * TABELA GIEDOWA * " 51,0;"" GN=211 :N,0;"";N,20;"";N,31;"":N 612 ,0;"" ZN=19 :N+2,1;N;". ";F$(N);N+2,21;"$ ";D(N);".-":N  E=E+1 E=BE=1 314,0;1;"";0;" ";B$(E) E=BE=1 16,0;1;"K";0;" KUPNO";18,0;1;"S";0;" SPRZEDA";16,20;1;"C";0;" CZEKAM";18,20;1;"F";0;" FINANSE" 0:A$= .A$="K"A$="k".01z# =,35#:800  /A$="S"A$="s".01z# =,35#:1500 .A$="C"A$="c".01z# =,35#:600X /A$="F"A$="f".01z# =,35#:1200 .1}L,-30:460 X%F=(12 *)+1:7010b Y-F1F7(610b+F*10 ) ]F8710 lqW=9 :K=0:T$=" Dugoterminowa lokata kapitauw banku daa Ci $ 2000.- tytuemodsetek.":7000X n!C(E)=C(E)+2000:700 v]W=9 :K=0:T$=" Na wycigach konnych wygrae $ 1000. Gratulacje !":7000X x!C(E)=C(E)+1000:700 nW=9 :K=0:T$=" Dziki dobrym posuniciom uzys-kae $ 500 tytuem ulg podatko-wych.":7000X  C(E)=C(E)+500:700 MW=9 :K=0:T$=" Otrzymujesz $ 500 tytuem odse-tek.":7000X  C(E)=C(E)+500:700 QW=9 :K=0:T$=" Musisz wypaci $ 500 tytuem odsetek.":7000X  C(E)=C(E)-500:700 W=9 :K=0:T$=" Z powodu nieprzemylanych posu-ni musisz zapaci dodatkowo $ 500 tytuem podatku.":7000X  C(E)=C(E)-500:700 XW=9 :K=0:T$=" Z powodu nieudanych spekulacjitracisz $ 2000.":7000X C(E)=C(E)-2000  7020l 6000p:400  GN=1421:N,0;" ":N !*14,11 ;1;" KUPUJESZ " %ZW=16:K=0:T$="Podaj numer firmy (1-9):":7000X:1;"?";8; '0:A$= (&A$491ƯA$579810* ).1}L,-30:807' * .01z# =,38&:H=(A$):H /\CYF=1:7050:G=R$:18,0;"Kupujesz ";G;" szt. akcji.":7020l ROI=G*D(H):J=(I*2.5 *0.001wn):K=(I*0.001wn):L=(I*0.01z# =) \K<1K=1 fL<5L=5 p M=I+J+K+L  7010b >1;0,0;" RACHUNEK " x2,0;"Transakcja:";3,0;G;" szt. akcji ";F$(H);4,0;"w cenie $ ";D(H);" za 1 szt." {:"Warto akcji: $ ";I::"Opata manipulacyjna: $ ";J::"Porednictwo: $ ";K::"Prowizja: $ ";L::"Cena kupna: $ ";M 319,0;1;"";0;" ";B$(E) G21,0;"Kupujesz te akcje ";1;"?";0;" (T/N)" 0:A$= 2A$="N"A$="n"M=0:E=E-1:400 A$="T"A$="t"1100L  1010 L .01z# =,35#:6000p o$C(E)