ZXTape! 0Created with Ramsoft MakeTZXirpef J֏:1:1:7: i0,70F:0,3:3,0:0,60<:-3,0:0,3 15,0:0,-3:-3,0:0,-60<:3,0:0,-3:-15,0 30,70F:0,3:3,0:0,60<:-3,0:0,3:40(,0:3,-3 0,-27:-3,-3:3,-3:0,-27:3,0:0,-3:-15,0 0,3:3,0:0,27:-3,3:-19,0:0,-30:3,0:0,-3:-15,0 ^42*,112p:22,0:0,15:-22,0:0,-15 |90Z,70F:0,3:3,0:0,60<:-3,0:0,3:40(,0 3,-3:0,-27:-3,-3:-27,0:0,-30:3,0:0,-3:-15,0 _103g,112p:21,0:0,15:-21,0:0,-15 6150,70F:0,3:3,0 l0,60<:-3,0:0,3:43+,0:0,-9 :-31,0 0,-15:31,0:0,-9 :-31,0:0,-24:31,0:0,-9 :-43+,0 210,70F:0,3:3,0:0,60<:-3,0:0,3:43+,0:0,-9 -31,0:0,-15:31,0:0,-9 :-31,0:0,-30:3,0:0,-3:-15,0 =""22 :7:7:1: 2z$=" ":2;z$ (4a(16):b(16):c(16):d(16) *'e(16):f(16):g(16) 29i=116:a(i):b(i):c(i):d(i)=a(i)-c(i):i Zai=116:e(i):e(i)=e(i)*100000CP:f(i):f(i)=f(i)*1000:g(i)=e(i)-f(i):i %3,3;4;"OPZIONI" -5,0;1;"1 LORDA MENSILE" Z7,0;1;"2 LORDA ANNUALE":9 ,0;1;"3 NETTA MENSILE" ]11 ,0;1;"4 NETTA ANNUALE":13 ,0;1;"5 FINE PROGRAMMA" /"scelta ";h:h<1h>53000 h=1180 h=21000 h=32000 h=42000 h=55000 ::2;z$:2,9 ;1;"LORDA MENSILE" l6,0;"IMPONIBILE FISCALE: ";:"imponibile fiscale";a:a:a<1a>3333334KsX180 'i=116:aa(i)220 i 4i=1b1=(a*b(1)/100d):250 Gb1=a-a(i-1):b1=b1*b(i)/100d:b1=(b1):b1=b1+c(i-1) -8,0;"IMPOSTA LIRE: ";b1 =""260 h=42000  3000 ::2;z$:2,9 ;1;"LORDA ANNUALE" Q6 ,0;"IMPONIBILE FISCALE ";:"imponibile fiscale: ";a:2;a (a<1a>400000001000 (i=116:ae(i)1230 i /i=ab1=(a*b(1)/100d):1250 Gb1=a-e(i-1):b1=b1*b(i)/100d:b1=(b1):b1=b1+f(i-1)  250  6000p 0"netto in busta: ";a1:a1<12000 3"assegni familiari: ";a2:a2<02020 *"detrazioni:";a3:a3<02030 "qualifica";a$:2049  2040 #m=a1-a2-a3:m>02060  "dati errati" =""2051  2000  Nh=3m0,29,217083S,1250000,31,2687509,1416667, 32 ,322083D`,1583334AG0,33!,3770838`,1833334_˰,34",462083a`,2083334~P0,35#,549583,,2500000,36$ W699583*,29166672,38&,857916Qs,3333334KsX,40(,1024583z$p 30,300,,40(,430,502,590N,60<,780 ,75K,1110V,90Z,1485,110n,2025,130,2605- ,150,3225 ,170,3685e ҁ190,4525,220,5545,250,6595,300,,8395 ,350^,102957(,400,122950  p;:h=3z$;3,9 ;1;"NETTA MENSILE" u9h=4z$;3,9 ;1;"NETTA ANNUALE" v Z St$" Ks@t$7_˰>0,AG0_˰~P02KsXS  !"#$&(Sa4q$ˀS9D`8`a`,*Qsz$pS[C3q`Tg@6S|o ?X'c;9[{O <S7t$7d T@'F]@d `'> dS|Q >n5F@w1@ D֠` )8PICp;XS$ˀY@ M@CeVx3K+\{X kD$D<{S_TZ