JVC KT2p SY26V#61}MCM2O2 PU9nMCM2O3 WU:hMCM2O4 `U;cFSC89L .U<FSC89H [J>T[ICP6 a+U4 BATB,X$ ::(:::A$(2),B(2). 8 ,G( N1 2̕::(((A$(N1))),:A$(N1):,:"wordt opgezocht ";< N (A$(N1))̀F (A$(N1),N,)"'" N(A$(N1)): ZP (A$(N1),N,)" " F$F$(A$(N1),N,)Z NFd:PRINT"en klaargezet":CLOAD LEFT$(F$,6) ' cassette-versien B(N1) "en automatisch opgestart": F$ : "en klaargezet": F$ : disk-versiexˁ: PRINTROUTINE ******************Ձ ݁A$A$"*P"ڍ:A$"*L"ڑ:A$"*S"ڎ-A$"*C"C:CA$"*N"C:c(A$))B$A$:A$"":w N(   (A$,N,)" " B$(A$,N):A$(A$,(A$)N):N N̂ڍC(((B$)),:B$:A$"":B$:A$"":;,:"DRUK SPATIEBALK VOOR VERVOLG";n"HULP$$():HULP$" "ڟ::(HULP$)ڎx# ",: MENU **************************6 :N@: | J A$(N),B(N):A$(N)"OP=OP"ڑ"## &";N,A$(N):NN:Nڍ:|::^T J;^:"Nummer programma (0=opnieuw)";~h N1: N1 N1N "Onmogelijke keuze!":N :N:,r|:"MENU MCM/MSX-D27"::Ʉ: TEKSTEN ********************** *C,MSX/MS-DOS COMPUTER MAGAZINE PROGAMMA'S,*L,DISKETTE MCM/MSX-D27,*L,*L,*N *L,"Volle bak, dit keer. Ouderwets vol, zouden we bijna zeggen. Kort & Krachtigjes, muziekstukken, wat Oepsjes op MCM2B en de nodige financiele programma's." "En die laatsten, die blijken altijd weer populair. De bestellingen stromen binnen, de uitgeverij schreeuwt moord en brand waar de cassettes en diskettes blijven en wij maar de laatste probleempjes zoeken.F *L,"Oftewel, het is nu diep in de nacht, en hoewel we nachtmensen zijn is vier uur toch wat veel van het goede, temeer daar er morgen om negen uur een redactie-overleg is."Ї *P,"Kortom, dit keer weinig tekst naast die macht aan programma's. De redactie - althans deze slaaf van de machine - wil naar bed."k *L,"U moet maar denken, beter tijd besteed aan grondig debuggen en controleren, dan aan praatjes voor de vaak. Sorry, de grap was onweerstaanbaar...S *P,"Nog even ter herinnering, mocht u problemen hebben met het runnen van een van de programma's, lees dan eerst het betreffende artikel of bel desnoods het vragenuurtje, voordat u besluit dat de zaak niet naar behoren werkt.݉ *L,"Het kan inderdaad zo zijn dat u het slachtoffer bent van een dupliceerfoutje, of van de magnetische sorteermachines van de PTT.| "Maar als u een diskette/cassette retour stuurt omdat u het programma niet begrepen heeft, is dat zonde van de postzegels. En onze tijd, eerlijk gezegd.֊ *P,*C,"De Programma's",*L,*N,"Na deze waarschuwende woorden dan nu: de programma's.y *P,*C,"SAL89",*N,*L,"De jaarlijkse bijdrage van de heer van der Jagt. Uw salarisstrookje controleren is een fluitje van een cent, met dit fraaie werkstukje. *L,"SAL89 gaat van maandelijkse betalingen uit, LOON89 daarentegen is voor diegenen die per vier weken betaald krijgen.G *L,"Let wel op dat u voor uw bedrijfsvereniging de juiste cijfers invult. *P,*C,"FDATE",*N,*L,"Een redactioneel werkstukje, dat in een Basic-verpakking een extra MSX-DOS commando bevat. Runnen, en u heeft er opeens een .COM-file bij met de naam FDATE. *L,"Door vervolgens het commando FDATE in te tikken, onder DOS, kunt u de datum zoals DOS die per bestand bijhoudt wijzigen. Volgende maand: FTIME.B *P,*C,"Muziek",*N,*L,"Lezer Dekker zond ons een drietal MSX-bewerkingen van orgelstukken van Bach. Met daarbij een artikel omtrent het betere muziek-programmeren. *L,"Dat artikel heeft u in MCM 28 kunnen lezen, op de cassette/diskette staan de programma's, onder de namen KPRELD, KPRELE en KPRELF, oftewel Kleine Prelude in respectievelijk D, E en F. "Het is me wat, die namen van maximaal zes tekens. Overigens, het vierde stuk heet GEFELI, en is een felicitaie met beeld en geluid, alleen voor MSX2 geschikt.: *P,*C,"CSTUTR",*N,*L,"Een aardig overhoringsprogramma, geschikt voor zelfstudie. Bouw uw eigen lijsten van bijvoorbeeld vreemde woordjes op, met dit programma van lezers Mertens en Heye, uit de Lezers Helpen Lezers rubriek.N *L,"Ook geschikt voor cassette, en met heel aardige bestandsmogelijkheden. Aanbevolen.O *P,*C,"Kort & Krachtig",*N,*L,"Ze mogen kort zijn, het zijn er wel veel dit keer. En voor u gaat vragen, we zijn KK28-1 niet vergeten. Die was voor PC's...3P *L,"Verwacht nu niet - zoals een briefschrijver onlangs - dat deze grapjes iets nuttigs doen. Kortom, niet klagen, als er `alleen maar` lijntjes verschijnen.R *P,*C,"MCM2B-Oeps",*N,*L,"In MCM2B zijn de fouten nu toch eindelijk gevonden. In totaal vier korte listnkjes met correcties, die u zelf even met de desbetreffende modules moet mergen.S *L,"Niet los te runnen, dus. Laden, saven als ASCII met de ,A parameter, vervolgens de MCM2B module laden en de oeps-listing daar met MERGE bijvoegen.?X *P,*C,"FISCUS89",*N,*L,"Oftewel, de klap op de vuurpijl. Het programma dat u door uw aangiftebiljet heensluist. Overigens, alleen voor MSX2, de schermopbouw is 80-koloms.!Y *L,"Het bestaat in feite uit twee programma's, FSC89L en FSC89H. De eerste is de lader, die wat uitleg geeft en uw computer vast voorbereidt. FSC89H is het eigenlijke programma, dat u alleen via die lader moet oproepen. Z *L,"Cassette-gebruikers krijgen daarbij een probleem: ze moeten FSC89L even aanpassen,. In regel 230 wordt met RUN het hoofdprogramma opgehaald, dat moet voor tape in CLOAD worden gewijzigd. Na het laden zelf even op F5 drukken.[ "Eveneens voor cassette-gebruikers: zet bij het laden en saven van bestanden even CAS: voor de naam. Dan gaat dat ook goed.^\ *L,"Met dank aan de inzender, de heer van Son. Die ons overigens verzocht u erop te wijzen dat er ook een nieuwe versie is van COMSTA, zijn competitie-standen programma, dat hij commercieel verhandelt.] *L,"Verdere informatie in MCM28.U *P,*C,"ICP6",*N,*L,"Zoals altijd, ons Invoer Controle Programma. Voor de programma's op deze diskette/cassette heeft u het niet meer nodig, maar als het volgende nummer uitkomt is het weer heel handig.Ø *L,"Met het ICP kunt u namelijk de listings foutloos overnemen, hetgeen een hoop zoekwerk kan besparen.: *L,"ICP6 verschilt overigens maar heel weinig van ICP5, u kunt beiden met een gerust hart door elkaar gebruiken. *P,*C,"Later",*N,*L,"Een veelgehoorde vraag over de cassette/diskette service is waarom de bestellers eventjes moeten wachten, als ze meteen na het uitkomen van het blad bestellen. "Vele lezers blijken namelijk te verwachten dat de MCM-diskette of cassette gelijk met het blad verschijnt, hetgeen juist niet zo is.l *P,"We durven namelijk nooit helemaal uit te sluiten dat we - ondanks nauwkeurig controleren - ergens een foutje in een programma hebben laten zitten. Als dat zo is, dan horen we dat echter altijd heel snel via het vragenuurtje. "Door nu eventjes te wachten met het aanmaken van de cassettes en diskettes kunnen we dergelijke foutjes nog corrigeren. Vandaar dat u altijd eventjes geduld moet hebben.  *L,"Gelukkig gebeurt het bijna nooit dat we echte fouten maken, maar het kan nu eenmaal voorvallen dat er eens iets niet goed blijkt te functioneren als vele duizenden mensen het gaan uitproberen, op allerlei verschillende MSXen.{ "Temeer daar het bij sommige programma's bijna ondoenlijk is om werkelijk alle mogelijkheden uit te testen.D *P,"Vandaar ook dat geen enkele programmeur - ook onze redactie-leden niet - ooit zijn of haar hand in het vuur zal durven steken als het erom gaat of een bepaald programma helemaal foutloos is.:DATA *P,*C,PROBLEEMPJES?,*N,*L,"Mocht u problemen ondervinden met het laden van een of meer van de programma's op deze cassette, geef het dan niet meteen op." *P,*C,PROBLEEMPJES?,*N,*L,"Mocht u problemen ondervinden met het laden van een of meer van de programma's op deze diskette, geef het dan niet meteen op."* :DATA "Maak uw recorder schoon, speel eens wat met volume en toonhoogte, controleer de kabels, er kunnen vele redenen zijn dat het niet meteen goed gaat.  "Zet uw computer en drive eens een tijdje uit, alvorens het nogmaals te proberen. Vaak zal het nu wel goed gaan. Maak in dat geval een copie van deze disk, en werk daar voortaan mee.}:DATA "Vooral de kopstand kan kritisch wezen, als u wel eens aan die instelling gedraaid heeft, regel dan uw recorder opnieuw af op deze tape. "Dergelijke problemen worden vaak veroorzaakt door warmte, en een niet helemaal optimale afstelling van uw diskdrive. :DATA *L,"Als de moeilijkheden daardoor echter niet op te lossen zijn, stuurt u dan de cassette, met een beschrijving van de problemen, naar:",*L#! *L,"Als de moeilijkheden daardoor echter niet op te lossen zijn, stuurt u dan de diskette, met een beschrijving van de problemen, naar:",*L@* *P,"Tijl Tijdschriften^4 "Afd. MCM Lezersservicer> "Postbus 9943H "1006 AP AmsterdamޣR:DATA *L,"waarna wij uw cassette zullen omruilen voor een ander exemplaar."*S *L,"waarna wij uw diskette zullen omruilen voor een ander exemplaar."\ *L,"Telefonische vragen over de Programma Service - maar geen technische vragen - kunt u kwijt op 020-5182828. Leg zo kort en bondig mogelijk uit wat er aan de hand is en wij zullen proberen het te verhelpen.f *P,*C,"Vragenuurtje",*N,*L,"Technische vragen kunt u namelijk alleen stellen tijdens het telefonisch vragenuurtje van de redactie van MSX/MS-DOS Computer Magazine.Cp *L,"De redactie beschikt continu over een zogenaamde vragenlijn, telefoon: 020-860743. Meestal zult u op dit nummer een antwoordapparaat treffen,z "dat u op vriendelijke toon mededeelt wat er in het laatste nummer aan eventuele fouten is gevonden.% *L,"Tot slot volgt er een mededeling wanneer er weer mensen van vlees en bloed aan de andere kant zullen zitten. "Meestal zal dat donderdagmiddag van 17.00-19.00 zijn, mogelijk aangevuld met gespecialiseerde uurtjes. Wij spreken het allemaal in! *P,"Dat vragenuurtje is echter niet bestemd voor vragen zoals:' *L,"Hoe werkt de MCM database uit nummer 2?ܨ *L,"Dergelijke vragen kunt u namelijk zelf beantwoorden, door het betreffende nummer er op na te slaan. Bezit u dat nummer niet, dan kunt u dat nabestellen bij de uitgeverij.訶 *P,*S: PROGRAMMA'S ******************8 SAL89 ' loonberekeningen; maand,1Z LOON89 ' idem; vier-weeks,1 FDATE ' Basic-loader DOS-commando,1 KPRELD ' Kleine Prelude in D,1ϩ GEFELI ' Muzikale gelukswens,1 KPRELE ' Kleine Prelude in E,1 KPRELF ' Kleine Prelude in F,1? CSTUTR ' Overhoringsprogramma,1` KK28-2 ' Kort & Krachtig,1 KK28-3 ' Kort & Krachtig,1 KK28-4 ' Kort & Krachtig,1ê KK28-5 ' Kort & Krachtig,1 KK28-6 ' Kort & Krachtig,1 KK28-7 ' Kort & Krachtig,1& KK28-8 ' Kort & Krachtig,1I MCM2O1 ' Oeps-merge MCM2BM,0l MCM2O2 ' Oeps-merge MCM2B2,0 MCM2O3 ' Oeps-merge MCM2B3,0 MCM2O4 ' Oeps-merge MCM2B4,0ޫ FSC89L ' Belasting-programma deel 1,1  FSC89H ' Belasting-programma deel 2,05$ ICP6 ' Invoer Controle Programma,1C. OP=OP,0),,,S:T:2,T:):::AV( ):D1( ):AR( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(),VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS SAL896 MSX/MS-DOS Computer Magazine<(o2:Berekening maandsalaris 1989 (witte tabel).<:Geschikt voor bruto- en netto-berekeningen.F:P :Z :Ād:̀n:x:door JvdJteG. :Initialisatie ******************$ : : (: : TU:Op MSX2 kan ook WIDTH 80 gebruikt worden.}:Invoer ************************* "LOONBEREKENING" "=============="܁ "Voert u een bruto of een nettobedrag in?" "Kies b of n: ";C$:  ("BbNn",C$)  %m "ZW = ";ZW,"WW = ";WW,"WA = ";WA,"ZF = ";ZF,"FR = ";FRs "Zijn deze percentages en de franchise juist?" "Voor niet-ZFW gevallen percentage ZF op 0 stellen!"! "Franchisebedragen WAO voor vacantiebongerechtigden:") :^  " f. 96.60 voor minder dan 20 vacantiedagen."  " f.102.90 voor 20 of mr vacantiedagen.":  "Kies j of n: ";P$: ̃ ("JjNn",P$) " ("Jj",P$) ^-, "Wijzig de percentages en/of de franchise in onderstaande regel."O6 "Tik daarna RETURN en RUN."U@_J eTk^}h "Naam: ";A$r "Tariefgroep 1;1a;2;3;4;4d: ";B$ń| ("11a2344d",B$) r섆 "Bedrag beschikking Insp.: ";CC "Aantal gewerkte dagen: ";F1 ("Bb",C$) XL: X "Nettoloon per maand: ";XLhYL:  "Brutoloon per maand: ";YLEAXL: څ: "Even geduld; ik ben aan het rekenen!"TT "Berekening:";T "Netto loon:";"#####.##";NL/ YL EYLW:Berekenen **********************a FRFRF: AA: AB: ACE: ADE ACABF ACABF ADAAF ADAAFنZWZWd: ZW(ZWACd)dWWWWd: WW(WWACd)d WAWAd: WA(WA(ACFR)d)d2& WA WAS0ZFZFd: ZF(ZFADd)dt5ZXZXd: ZX(ZXADd)d:EEEZWWWWAZX<EFEECC>IN(EF <)<·DK((?@INd@P)d)N K  K X K KbN: P@l B$"1" D 4v B$"1a" D !J B$"2" D-` B$"3" D;v B$"4" D5 B$"4d" DBG::È IN Eu6 IN(EF ) INFD IN(EF )YN(P(INKN)) YN  YN / YN  YNFYM(YN  ) \G(INKNYND) G  A  : B: C  G % A % : B: C K؉  G B A B : B : C F  G { A { : B): C h'  G EDe A EDe: B3: C C3O* G Ee$ A Ee$: B<: C G\y4 G Eg` A Eg`: BB: C E9G> GF$ AF$: BE: C EXȊH GF# AF#: BH: CFBRRXN((GA)BdC)W XN XN \XM(XN  ) fSVZWWWWAZF*pESESV7zYXYMXMLBLESVCCZFZXYSYSVYXfNLESYXl YL  NLXL :Afdrukken scherm ***************ŋ A$ދ "Tariefgroep ";B$; ) "##";F; ) "dagen" CC 7 "Bedrag besch.Inspect.";a ) "#####.##";CC "===============================" "Bruto loon" ) "#####.##";E "Inh.premie ZW" ) "#####.##";ZW$ "Inh.premie WW" ) "#####.##";WW<. "Inh.premie WAO") "#####.##";WAO8 ZF LyB "Inh.premie ZFW") "#####.##";ZFL ) "--------"΍V ) "#####.##";SV` "Bedr. voor AOW"j "en LB" ) "#####.##";BL9t "Inh.premie AOW") "#####.##";YMc~ "Inh.loonbel." ) "#####.##";XM ) "--------" ) "#####.##";SY㎜ ) "--------"  "Netto loon" ) "#####.##";NL8 ) "========"K YL e NLXL EE(XLNL) NLXL EE(NLXL) NLXL   "Uitprinten j/n:";Q$֏ ("JjNn",Q$)  ("Jj",Q$)  :  :Afdrukken printer *************( A$A "Tariefgroep ";B$;U# ) "##";F;h$ ) "dagen"{( CC F2 "Bedrag besch.Inspect.";Đ< ) "#####.##";CCF "==============================="P!Z "Bruto loon" ) "#####.##";EKd "Inh.premie ZW" ) "#####.##";ZWun "Inh.premie WW" ) "#####.##";WWx "Inh.premie WAO") "#####.##";WA ZF ܑ "Inh.premie ZFW") "#####.##";ZF ) "--------"1 ) "#####.##";SVH "Bedr. voor AOW"r "en LB" ) "#####.##";BL "Inh.premie AOW") "#####.##";YMƒ "Inh.loonbel." ) "#####.##";XM ) "--------" ) "#####.##";SYF ) "--------"p "Netto loon" ) "#####.##";NL ) "========" ̓:Percentages en franchise: *****ZW  : WW A% : WA :ZF A1P :FR[ZXAIP! ZF ZX'"Programma,1C. OP=OP,0),,,S:T:2,T:):::AV( ):D1( ):AR( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(),VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS :LOON89:;:MSX/MS-DOS COMPUTER MAGAZINEC(:2:Berekening maandsalaris c.q. vier-wekensalaris 1989 (witte tabel).<:Geschikt voor bruto- en netto-berekeningen.ȀF:݀P:door JvdJteG.Z:d : : (:*n:Op MSX2 kan ook WIDTH 80 gebruikt worden.Ax "LOONBEREKENING"X "=============="b  "Premiepercentages en franchise per dag" "--------------------------------------"恪 "Premie ZW = " "##.##";ZW "Premie WW = " "##.##";WW2 "Premie WAO = " "##.##";WAX "Premie ZFW = " "##.##";ZF~ "Franchise WAO = " "##.##";FR "Zijn deze percentages en de franchise juist?" "Voor niet-ZFW gevallen percentage ZF op 0 stellen!"2 "Franchisebedragen WAO voor vacantiebongerechtigden:"g " f. 96.60 voor minder dan 20 vacantiedagen." " f.102.90 voor 20 of mr vacantiedagen." : "Kies j of n: ";P$ :Ճ" ("JjNn",P$) , ("Jj",P$) h66 "Wijzig de percentages en/of de franchise in onderstaande regel,"^@ "gevolgd door en ."dJnT t^zhr "Voert u een bruto of een nettobedrag in?"DŽ| "Kies b of n: ";C$ :䄆 ("BbNn",C$) |( "Wenst u een berekening van maandloon of van vier-wekenloon?"D "Kies m of v: ";D$ :a ("MmVv",D$) s "Naam: ";A$ "Tariefgroep 1;1a;2;3;4;4d: ";B$ ("11a2344d",B$)  "Bedrag beschikking Insp.: ";C1 "Aantal gewerkte dagen: ";F' ("Bb",C$) X1: N "Nettoloon: ";X1X dX1X1tY1:  "Brutoloon: ";Y1E1AX1&: X0:"Even geduld; ik ben aan het rekenen!":TTD"Berekening:";T%N"Netto loon:""#####.##";N18X Y1 E1Y1Bb 4Sl Y1 ov N1X1 E1E1(X1N1) N1X1 E1E1(N1X1) N1X1  0 Hއ "Wilt u een uitprint j/n :";Q$ ("JjNn",Q$)  ("Nn",Q$)  ` (:P:Percentages SVW en franchise WAOx:================================ZW  :WW A% :WA  :ZF A1P :FR [ʈ ZXAIPوZFZX߈ *:4:Berekeningen SVW>:================!HA1,RA26\A3E1@fA4E1Hp:`z A3A2F A3A2Fx A4A1F A4A1FF1FRFS1(ZWA3)dS2(WWA3)dʼnS3(WA(A3F1))d։S3 S3S4(ZFA4)dS9(ZXA4)dS5S1S2S3S4E2E1S51T1E2C1S4S99:A:Y:Jaarloonfactorenq:================I1 Eu6$I2FD.I3F&8:BJ1 <LJ2ŠVJ3ʊ`:ՊjV1 tV2  ~V3  V4 4V5 :W3 @%W4 @Q2W5A%I ("Vv",D$) Q:z:Herleiding maandloon tot jaarloon:=================================Nj I(T1V2J1)J1 I I1 I(T1V2J2)J2 I I2 I(T1V2J3)J3  ("Mm",D$) Z&:Q:Herleiding 4-wekenloon tot jaarloon|(:===================================2 I((T1V3W3)J1)J1ʌ< I I1 I((T1V3W3)J2)J2F I I2 I((T1V3W3)J3)J3P:Z:Aftrekbare kosten)d:=================AnK(I?@@P)Ux K  K g K KpNx::Belastingvrije sommen:=====================ɍ B$"1" D  B$"1a" D ! B$"2" D-  B$"3" D;" B$"4" D58 B$"4d" DBG@:V:Premie AOW/AWWl:==============xP@Y(P(IKN))"Y2, Y Y2 Y6Y4Ȏ@ Y Y4 YY4J ("Mm",D$) T ("Vv",D$) ^:h:Belastingschijven4r:=================H|G(IKNYD)u G  A  :B :C  G % A % :B :C KǏ G B A B :B :C F  G { A { :B) :C h G EDe A EDe :B3 :C C3A G Ee$ A Ee$ :B< :C G\l G Eg` A Eg` :BB :C E9G G F$ AF$ :BE :C EX G F# AF# :BH :CFBRŐ:ڐ:Loonbelasting:=============X((GA)BdC)X2" XX2 X; ("Mm",D$) T& ("Vv",D$) \0:x::Telling en salderingD:====================NZ1Y3X3XZ2Z1S5bN1E1Z2lɑv:鑀:Premie AOW/AWW per maand :========================Y3(Y  ) %-:O:Premie AOW/AWW per 4 wekenq:==========================Y3(Y d)d::Loonbelasting per maandӒ:=======================X3(X  )  ::Loonbelasting per 4 weken9 :=========================O*X3(X d)dU4]>:uH:Afdrukken scherm~R A$\ "Tar.groep: ";B$;f )"Aant.dagen:";FÓp C1 z "Bedrag besch.Inspect.";  ) "#####.##";C1: "==============================="@j "Bruto loon" ) "#####.##";E1 "Inh.premie ZW" ) "#####.##";S1 "Inh.premie WW" ) "#####.##";S2 "Inh.premie WAO") "#####.##";S3 S4 % "Inh.premie ZFW") "#####.##";S4P ) "--------"z ) "#####.##";S5 "Bedr. voor AOW" "en LB" ) "#####.##";T1 "Inh.premie AOW") "#####.##";Y3 "Inh.loonbel." ) "#####.##";X3: ) "--------"d$ ) "#####.##";Z2. ) "--------"8 "Netto loon" ) "#####.##";N1B ) "========"L V : ` :Afdrukken printerj A$,t "Tar.groep: ";B$;F~ )"Aant.dagen:";FY C1  x "Bedrag besch.Inspect."; ) "#####.##";C1З "==============================="֗ "Bruto loon" ) "#####.##";E1* "Inh.premie ZW" ) "#####.##";S1T "Inh.premie WW" ) "#####.##";S2~ "Inh.premie WAO") "#####.##";S3 S4  "Inh.premie ZFW") "#####.##";S4 ) "--------" ) "#####.##";S5' "Bedr. voor AOW"Q "en LB" ) "#####.##";T1{ "Inh.premie AOW") "#####.##";Y3( "Inh.loonbel." ) "#####.##";X3Й2 ) "--------"< ) "#####.##";Z2%F ) "--------"OP "Netto loon" ) "#####.##";N1zZ ) "========"d n :( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(),VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS BASIC-LOADERI Dit programma is gegenereerd door datmakO(2 Het bevat de DATA-weergave van het bestand fdate.com<F: F1$,RL,FL: N: CK: NC: VLP: %: "Deze Basic-lader maakt het bestand ofprogramma ";F1$;" aan."QZ: "Dataregels worden eerst gecontroleerd": "Even geduld aub...."yd: check data-regels *************ʁn A$: NN: NCNC: VL NCNC("&h"A$): VL : A$"**" VLxCKCK((A$,))((A$,))( NRL CR$: CK("&H"CR$) CK : T< NCFL ni CR$: CK("&H"CR$) CK : T: maak bestand ****************** F1$ AS #  #, AS I$؂: "Aan het werk..." F1$,RL,FL: N: NC A$: NN: NCNC: NRL CR$Q A$"**" I$(("&H"A$)): #: " A$: NN: BT("&H"A$): NRL CR$ A$: NN: BV("&H"A$): NRL CR$Ń N1 BTރ I$(BV): # N1: NCNCBT" NCFL J: : "Klaar": >T "Fout gevonden in regel:"^I(8 )(7 ): FI  : (F) F : (F)(F)h fdate.com, 20 , 1024 3A,80,00,FE,02,DA,03,02,CD,B0,03,CD,5A,04,F5,CC,FB,01,F1,CA,D90C EB,01,CD,99,04,22,B2,04,11,B4,04,0E,1A,CD,05,00,11,5C,00,0E,D0C 11,CD,05,00,3C,F5,CC,F0,01,F1,CA,EB,01,11,B4,04,0E,0F,CD,05,D6Aυ 00,0E,10,CD,05,00,11,D9,04,0E,1A,CD,05,00,3A,CD,04,E6,0F,32,D2F B1,04,3A,CD,04,**,04,1F,E6,0F,32,B0,04,3A,B4,04,0E,1B,CD,05,D30[$ 00,DD,7E,11,6F,DD,7E,12,67,3A,B0,04,16,00,5F,19,5D,54,26,01,D42. 3A,B4,04,3D,6F,D5,E5,0E,2F,CD,05,00,11,F1,04,26,00,3A,B1,04,D308 6F,**,05,29,19,ED,5B,B2,04,72,23,73,E1,D1,0E,30,CD,05,00,11,CD7-B B4,04,0E,1A,CD,05,00,11,B4,04,21,B5,04,01,08,00,ED,B0,3E,24,CD9sL 32,BC,04,32,C0,04,11,B4,04,0E,09,CD,05,00,1E,20,0E,02,CD,05,CEFV 00,11,BD,04,0E,09,CD,05,00,1E,0A,0E,02,CD,05,00,1E,0D,0E,02,D47` CD,05,00,0E,12,CD,05,00,3C,C2,35,01,0E,00,CD,05,00,11,0C,02,CE4Ej 0E,09,CD,05,00,C3,03,02,11,26,02,0E,09,CD,05,00,11,3C,02,0E,CD4t 09,CD,05,00,C9,0A,0D,20,20,46,49,4C,45,20,4E,49,45,54,20,47,CDDш~ 45,56,4F,4E,44,45,4E,21,0A,0D,24,0A,0D,20,20,44,41,54,55,4D,D05 20,4F,4E,47,45,4C,44,49,47,21,0A,0D,24,0A,0D,20,20,46,44,41,CE6] 54,45,20,32,2E,30,30,20,69,73,20,65,65,6E,20,65,78,74,65,72,C62 6E,0A,0D,20,20,44,4F,53,20,63,6F,6D,6D,61,6E,64,6F,20,6F,6D,D7B鉦 20,64,65,20,64,61,74,75,6D,0A,0D,20,20,76,61,6E,20,66,69,6C,CB7/ 65,73,20,74,65,20,76,65,72,61,6E,64,65,72,65,6E,2E,0A,0D,0A,CE7u 0D,20,20,53,79,6E,74,61,78,3A,0A,0D,20,20,46,44,41,54,45,20,CA0 3C,66,69,6C,65,73,70,65,63,3E,20,3C,64,61,74,75,6D,3E,0A,0D,D32 0A,0D,20,20,3C,66,69,6C,65,73,70,65,63,3E,20,69,73,20,65,65,CC3G 6E,20,67,65,77,6F,6E,65,0A,0D,20,20,66,69,6C,65,6E,61,61,6D,D3F 2C,20,77,69,6C,64,63,61,72,64,73,20,7A,69,6A,6E,0A,0D,20,20,CF4Ӌ 74,6F,65,67,65,73,74,61,61,6E,2E,0A,0D,20,20,3C,64,61,74,75,CEA 6D,3E,20,73,74,61,61,74,20,69,6E,20,64,65,20,76,6F,72,6D,0A,CE4_ 0D,20,20,44,44,3A,4D,4D,3A,**,04,4A,2E,20,48,65,74,20,6A,61,CD5  61,72,20,6D,61,67,0A,0D,20,20,31,39,38,30,20,74,2F,6D,20,32,C93 30,37,39,20,7A,69,6A,6E,2C,20,64,6F,6F,72,0A,0D,20,20,44,44,D111 20,6F,66,20,4D,4D,20,61,6C,73,20,30,20,6F,70,20,74,65,20,67,C9Aw( 65,2D,0A,0D,20,20,76,65,6E,20,76,65,72,64,77,69,6A,6E,74,20,CEF2 64,65,20,64,61,74,75,6D,2E,0A,0D,0A,0D,**,17,20,52,57,4C,0A,CEB< 0D,0A,0D,24,01,81,00,11,00,00,21,00,00,CD,11,04,CD,1E,04,CD,CBEIF 11,04,CD,2B,04,5D,CD,2B,04,55,CD,2B,04,D5,E5,11,64,00,B7,ED,D6DP 52,E1,D2,ED,03,E5,11,50,00,B7,ED,52,D1,D2,07,04,62,6B,11,14,CCCՎZ 00,19,C3,07,04,E5,11,20,08,B7,ED,52,E1,D2,07,04,E5,11,BC,07,CC9d B7,ED,52,E1,DA,07,04,11,44,F8,19,D1,C9,D1,11,FF,FF,21,FF,FF,DB1an C9,0B,03,0A,FE,0D,CA,09,04,FE,20,20,F5,C9,0B,03,0A,FE,0D,CA,DDAx 09,04,FE,20,28,F5,C9,21,00,00,0B,03,0A,FE,0D,C8,FE,30,DA,2F,D75폂 04,FE,3A,D2,2F,04,D5,29,54,5D,29,29,19,D6,30,16,00,5F,19,D1,D2C3 03,0A,FE,30,D8,FE,3A,D0,FE,0D,C8,C3,3E,04,7A,B7,CA,91,04,7B,DDDy B7,CA,91,04,7D,FE,65,D2,8F,04,7A,FE,0D,D2,8F,04,E5,D5,6A,26,DD3 00,2D,11,A4,04,19,7E,D1,E1,BB,DA,8F,04,7D,E6,03,EE,03,C0,7A,D7E FE,02,C0,7B,FE,1D,C0,AF,C9,11,00,00,2E,00,B7,3C,C9,7A,CB,3F,DCCK **,03,1F,ED,6A,B3,67,C9,1F,1D,1F,1E,1F,1E,1F,1F,1E,1F,1E,1F,E27 **,05,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,D8Aב 00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,DD4 00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,DD4] 00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,00,FF,C72 ) "========"d n :( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(),VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS( KPRELD Bach: kleine prelude in D.Q MSX/MS-DOS Computer Magazinex( ingezonden door: Simon C. Dekker~2< Alleen MSX1 & MSX2!FP: : :  ,,€Z ,րdN$()(M)nN3$N$N$N$xN5$N$N$N$N$N$* N3$;" ";N5$;" ";N5$;" ";N$;" ";N$4 ,v N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$ , N3$;" ";N5$;" ";N$;" ";N5$ , N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$ ,: N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$;" ";N$D ,x N3$;" ";N$;" ";N$;" ";N5$;" ";N$;" ";N$ , "KLEINE PRELUDE IN D" ,‚ "COMPUTED"΂" ,ق, "BY"6  ,@ "SIMON C.DEKKER"߃JA$"T82V12O4AO5D.C#16D16E8O4G16R16G8F#8R8O5T83D16.R32O4F#8E8R8O5C#16.R32O4E8D8R8B16.R32D8C#8R8T84A16.R32O3B8O4C#8D.T83C#16D16E16D16C#16D16E16D16C#16O3B16A16G16F#16E16F#8O4F#16G16A16G16F#16G16A16G16F#16E16D16C16O3B16A16B16"pTB$"T80V12O3D8E8F#8G8A8B8O4C#8O3A8O4D8C#8O3B8A8G8E8A8G8F#8B8G#8E8A8G#8F#8E8D8C#8O2B8O3E8O2A8B8O3C#8O2B8A8B8O3C#8O2A8O3D8E8F#8E8D8E8F#8D8G16"^C$"T83V11O4F#2E2.D2C#2O3B2A2G#A2A8R4.R1R16"yhD$"T80V12O4D16E16F#16G16B16O5C#16D16E16O4G16F#16E16F#16O5E16D16C#16D16O4F#16G#16A16G#16O5D16C#16O4B16O5C#16O4A16B16O5C#16O4D16O5C#16O4B16A16G#16E16F#16G#16A16B16O5C#16D16EA.G#16A16B8D8C#8E8D16C#16O4B16A32R32A2"rE$"T80V12O3G16F#8E8D8C#8O2B8A#8F#8B8E8O3E8G#8A8G#8F#8D8E8D8C#8O2B8A8B8O3C#8D8E8F#8G#8E8A8C#8D8E8O2A8.O3E16A""|F$"T80V12O5R64R16R4R1R1T82C#2O4B2B8AG#8R16E16C#."ꆆG$"T82V12O4AO5E.F#16G16A16G16F#16E16F#1T84GF#.E16D#16E.T83A16B16A16G16F#16E32R32T83E8D#E16F#16G8F#16G16A16G16F#16A16G16F#16E16G16F#16E16D#16F#16E1E8F#ED#8E8G8O4A16O5G16F#16A16G16F#16E16D#16E.R8"凐H$"T80V12O3A8B8A8G8F#8E8F#8A8D8E8D8C8O2B8A8B8O3D8O2G9O3G8A8B8O4C8O3C8O4C8O3B8A8F#8G8A8B8A8G8F#8E8O4E8O3B8O4D#8E8O3G8A8F#8G8O4E8O3G#8O4E8O3A8O4C8D8O3B8O4C16O3B16A16O4C16O3B16A16G16B16A16G16F#16A16G16F#16E16D16C16O2B16A16O3C16O2BO3EE16D#16E16F#16"I$"T83V12O4R1DA.B16O5C16D16C16O4B16A16BAG.A16B16O5C2.O4B1BB32R16B16O5C16D16C16O4B16O5D16C16O4B16A16O5C16O4B16A16G#16B16AGF#E8R2O3A8..G16F#16A16G8R8"VJ$"T80V12O5R2E2.G.F#16E16F#16A16G16B16A16C16O4B16A16B16O5A16G16F#16G16O4B16O5C#16D16C#16G16F#16E16F#16D16E16F#16O4G16O5F#16E16D16C#16O4A16B16O5C#16D16E16F#16G16AO6D.C#16D16E8O5G8F#16F#32 A8G16F#16E16D32R32D2."K$"T80V12O5BD.C#16O4B16O5C#16O4A16G#16B16A2.R8.R32R1T83R1O5F#2E2E16.E64DC#8T65R16O4A16F#2"UL$"T78V12O3G#8B8G#8E8A8O2AB8O3C#8E8T79C#8O2A8O3D8O2DO3E8F#8E8D#8O2B8O3E8O2A8O3A8O4C#8D8C#8O3B8G8A8G8F#8E8D8E8F#8G8A8B8O4C#8O3A8O4D8O3F#8G8A8T55D8.A16O4D"_ i s }   A$,B$,C$ D$,E$,F$ G$,H$,I$Ɋ J$,K$,L$ϊ&VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS5 GEFELI Gefeliciteerd, een muzikale gelukswens;^ MSX/MS-DOS Computer Magazine( ingezonden door: Simon C. Dekker2< Alleen MSX2!FP: :  ,,: ЀZ: : : : d "NAAM VAN DE JARIGE";J$n: : x "GEFELICITEERD DOOR";K$, ,:  ,,E (,)(,), ,Ba (g,)(,2), ,BF| (i, )(,0), ,B T   I  A: A$A$(A) Iс $(T)A$݁ A$"" T D d @ ,(F, D), ,- ,(H,f),,E ,(f,D), ,] ,(h,f),,v" ,(, D), ,, ,(,f),,6 ,(, D), ,@ ,(,f),,ǂJ D߂T "GRP:" AS #^  ,,h (v,%), r #,J$|A$"T100V12O4F8.R32F8R16F32R64FCA8.R16A8R16A32R32AFO5C8.R16C8R16C16D8C8O4B-8A8G8.R16G8.R16GO5C8O4B-8A2B-2O5C2DO4B-A2G2F2."탆B$"T100V12O3AB-O4C8O3B-8AO4C8.R16C8R16C32R32C8O3B-8AO4FED8E8F2DE2FEDG.F8E-D.E8F8E8D2C8O3B-8A2."EC$"T100V12O2FGA8G8F8.R16FO3CFC8O2B-8A2B-8A8GO3C2.O2A8G8F2G2A2B-8A8GA.B-8O3CO2CF2."τD$"T100V12O4C2.RR32G8.R16G8R16G32R32GDB8.R16B8R16B32R32BGO5D8.R16D8R16D16E8D8C8O4B8A8.R16A8.R16AO5D8C8O4t102B2O5C2D2t100ECO4B2A2G2."E$"T94V12O4F#2.RO5G8A8B8O6C8D8C8O5B8O6C8D8E8D8G8T94D8C8O5B8A8T94G8F#8G8B8O6C8O5B8A8G8F#8E8F#8t95G8F#8G16A16B8A8T94G16B16O6D8C8O5B8A16O6C16E8D8C8O5T94B8G8A8B8O6C8O5B8A8O6E8O5G8O6D8O5B8G8F#16G16A16B16O6C16D16E16F#16G2."F$"T100V12O3D2.RR64GDO2BGO3G2.G64DO2B2A8B8O3C8C#8D2.D8.D64G2D.D16.G2O2AO3CD2A16G16F#16E16D16C16O2B16A16G2.". A$,B$,C$C K : KV I  s (I,I)(I,), ,B{ I K : K X Q @ ,(X,Q),,ن  ,(X ,Q),,  ,(X@,Q),,  ,(X`,Q),,& X&0 D$,E$,F$;: K : KRD Y [ @jN  ,(Y,?),,X ,(Y ,?),,b ,(Y@,?),,l ,(Y`,?),,Çv Y߇ (F,)(,), ,BF (H,)(,), ,B  (Q,),  #,"DOOR ";K$5 K : KQ (,)(,), ,BFb ((,),  #,"EN DOOR SIMON C.DEKKER!" K : K (!,!), : #,"VANDAAG"Ј K : K (,,), : DATE D$: #,D$ A$,B$,C$* () () ()  :  247, 132, 132, 132, 183, 148, 148, 247, 0, 0, 0, 0, 0, 0, 0, 0, 189, 33, 33, 33, 189, 33, 33, 161 232, 8, 8, 8, 232, 8, 8, 239, 0, 0, 0, 0, 0, 0, 0, 0, 94, 80, 80, 80, 80, 80, 80, 94Z  190, 136, 136, 136, 136, 136, 136, 136, 0, 0, 0, 0, 0, 0, 0, 0, 247, 132, 132, 132, 247, 132, 132, 247* 189, 37, 37, 37, 189, 41, 37, 165, 0, 0, 0, 0, 0, 0, 0, 0, 196, 36, 36, 36, 36, 32, 32, 196 J$,K$,L$ϊ&VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS ::: ,,,N"MMMMM MMMMM MMMMM M M"W(,2 "M M M M M M M"<,F "MMM MMMMM M MMMMM"ƀP,Z "M M M M M M M"d,$n "M M M M M M M"-x,_ "MMMMM M M MMMMM M M"eo, "KLEINE PRELUDE IN E","COMPUTED","BY"ˁ ,"SIMON C.DEKKER"A$"T90V12O4R8B8O5E8O4B8O5C#8O4A8F#8B8E8F#16G#16A8G#8F#8B8A8G#8F#16V10B16A#16B16D#16B16A#16B16E16B16O5C#16O4B16A#16G#16F#16E16D#16B16A#16B16G#16B16F#16B16E16B16D#16B16C#16B16O3B16O4B16A#16"B$"T90V10O3E16O4E16D#16E16O3G#16O4E16D#16E16O3A16O4E16F#16E16D#16C#16O3B16A16G#16O4E16D#16E16C#16E16O3B16O4E16O3A16O4E16O3G#16O4E16O3F#16O4E16O3E16O4E16D#16.R32V12O3F#8B8F#8G#8E8C#8F#8O2B8O3C#16D#16E8D#8C#8F#8E8D#8C#16"$C$"T90V12O5R16C#8F#8C#8D#8B#8O4G#8O5F#8E16V10A16G#16A16F#16A16G#16A16D#16A16B16A16G#16F#16E16D#16E8V12O4B8O5E8O4B8O5C#8O4A8F#8B8E8F#16G#16A8G#8F#8B8A8G#8"D$"T90V10O3F#16E16F#16D#16F#16E16F#16B#16O3F#16G#16F#16E16D#16C#16B#16O3C#16.R32V12E8A8E8F#8D#8O2B8O3A8G#16V10E16D#16E16C#16E16D#16E16O2A16O3E16F#16E16D#16C#16O2B16A16G#16O3E16D#16E16C#16E16O2B16O3E16O2A16O3E16O2G#16O3E16O2F#16O3E16O2E16O3E16"xE$"T90V12O4F#8E16F#16G#8F#8E8O5E8D#16C#16D#16E16F#16E16G#16F#16E16D#16C#16O4B32R32B2"F$"T90V10O2B16O3D#16C#16D#16E16O2B16O3F#16O2B16O3G#16O2B16O3A#16O2B16O3B8G#8D#8O2B8O3F#8O2F#8BO1B"G$"T90V10O4R1R2F#16D#16O3B16B""H$"T90V10O4R16F#16E16F#16D#16F#16B16G#16A16F#16E16F#16D#16F#16A16F#16V12G#8F#16G#16E8B8G#8B8E8G#8A16.R32O5C#16.R32AA16O4B16A16B16O5G#G#16.V12C#8F#8C#8D8O4B8G#8O5E#8",I$"T90V10O2B8V12O3F#8B8F#8D#8F#8O2B8O3D#8E16V10B16A16B16G#16B16O4E16C#16D16O3B16A16B16G#16B16O4D16O3B16O4C#16O3A16G#16A16F#16A16O4C#16O3A16B16G#16F#16G#16E#16G#16B16G#16A16F#16E#16F#16D16F#16E#16F#16O2B16O3F#16E#16F#15C#16O4C#16O3B16O4C#16"6J$"T90V12O5F#16V10C#16O4B16O5C#16O4A16O5C#16F#16D#16E16C#16O4B16O5C#16O4A#16O5C#16E16C#16V12D#8C#16D#16O4B8O5F#8D#8F#8O4B8O5D#8E16V10O4B16A16B16G#16B16O5D#16O4B16O5C#16O4A16G#16A16F#16A16O5C#16O4A16B16G#16F#16G#16E16G#16B16G#16A16F#16"8@K$"T90V10O3A8V12O4C#8F#8C#8O3A#8O4C#8O3F#8A#8B16V10F#16E16F#16D#16F#16B16G#16A16F#16E16F#16D#16F#16A16F#16G#8V12B8O4E8O3G#8A8O4C#8D#8O3F#8G#8B8O4C#8O3E8F#8"JL$"T90V10O4E16F#16D#16F#16A16F#16G#8F#16G#16A16G#16F#16E16O5V12C#8E32D#32C#32D#32E2T80D#T70E2."-TM$"T90V12O3A8B8D#8E16B16O4E16D#16C#16O3B16A16G#16A16G#16F#16A16T82G#16O4E16D#16E16O3A16O4E16D#16E16O3T80B8O2B8O3T70E16O2E16G#16T50B16O3E."c^N$"T90V11O4R1R8R16R16B8O5C#8O4A8T80F#8B8T70G#2."lhur~| H$,I$J$,K$L$,M$,N$ƊA$,B$ъC$,D$ߊE$,F$,G$ ".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS :::,, ,N"MMMMM MMMMM MMMMM M M"X( ,2 "M M M M M M M"< ,F "MMM MMMMM M MMMMM"ȀP ,Z "M M M M M M M"d ,%n "M M M M M M M"/x ,_ "MMMMM M M MMMMM M M"k , "KLEINE PRELUDE IN F" , "COMPUTED" , "BY"́  ,"SIMON C.DEKKER"A$"T150V12R8O5C8O4A8O5C8O4F8O5C8O4A8O5C8O4F8O5D8O4B-8O5D8O4F8O5D8O4B-8O5D8O4G8O5E8O4B-8O5E8O4G8O5E8O4B-8O5E8F8C8O4A8O5C8O4F8R8R2O5F8R8F8R8FRF8R8F8R8FRGB-GAR2."ڂB$"T150V12O3AO4CO3AO4CRDO3B-O4DRO3GB-GA2R2O5R4CO4AO5CRDO4B-O5DRE8R8E8R8ECR2."C$"T150V12O3F8R8F8R8F8R8FRF8R8F8R8FRF8R8F8R8F8R8F2R8O4C8O3A8O4C8O3F8O4C8O3A8O4C8O3F8O4C8O3A8O4C8O3F8O4D8O3B-8O4D8O3F8O4D8O3B-8O4D8O3G8O4E8O3B-8O4E8O3G8O4E8O3B-8O4E8F8C8O3A8O4C8O3F8C8O2A8O3C8O2 "D$"T150V12O2FGAB-O3CDECDEFGAB-O4CO3AB-AGFECFEDGECF8C8O2A8O3C8O2F8A8O3C8F8O2B-O3B-RAG8D8O2B-8O3D8O2G8B-8O3D8G8CO4C"E$"T150V12R8O5A8F8A8C8A8F8A8C8G8F8G8C8G8E8G8O4A8O5F8E8F8O4A8O5F8D8F8O4A8O5E8D8E8O4A8O5E8C8E8O4F8O5D8C8D8O4G8O5D8O4B-8O5D8O4G8O5C8O4B-8O5C8O4F8O5C8O4A8O5C8O4F8B-8A8B-8C8B-8G8B-8C8A8F8A8C8A8F8A8D8A8F8A8D8F8A8O5C8O4D8B-8G8B-8D8B-8G8B-8E8B-8G8B-8"F$"T150V12O4E8G8B-8O5D8O4F8O5C8O4A8O5C8F8C8O4A8F8R8B-8G8B-8O5E8O4B-8G8E8R8A8F8A8O5D8O4A8F8D8R8G8E8G8O5C8O4G8E8C8R8F8D8F8G8A8B-8D8G8A8B-8E8F8G8A8C8D8F8A8O5C8O4B-8A8G8B-8O5D8F8E8D8C8E8G8B-8C64E64G64B-64B-RAT135R8G8R8F8R8F8R8EF1"P"G$"T150V12O3RB-ACACGCGCFCFCECECDCO2B-GO3ECAFB-2R2R1O2E2RFO3T135DO2B-O3CO2CC8F1",H$"T150V12O5R2R1R1R1R1R1R1R1R1O5C2RCO4T135B-8O5E8O4A8O5D8O4G8O5C8O4G8B-A1"6 A$,B$,C$@ D$,E$ʆJ F$,G$,H$ІT܆^  , h"DEZE COMPOSITIE VAN"r , +|"JOHANN SEBASTIAN BACH (1685-1750)"6 , V"HEB IK GECOMPUTED N.A.V."a , "HET EUROPESE JAAR VAN DE MUZIEK." , "DRIE BELANGRIJKE COMPONISTEN ZIJN "ɇ , "300 JAAR GELEDEN GEBOREN T.W.:" , "B A C H"  ,)"H N D E L"5  ,N"S C A R L A T T I"X T70G#2."lhur~| H$,I$J$,K$L$,M$,N$ƊA$,B$ъC$,D$ߊE$,F$,G$ ".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS CS-TUTOR9 MSX/MS-DOS Computer Magazine?(c2 ingezonden door Carlo Mertens< en D.J. Heye, MAASTRICHTF؀P Initialisatie ***********************************************************Z : (: : MSX_:KEY OFF ' PC%d @: WW$(,): AWBn:RANDOMIZE TIMER ' pcWsZ() : msx Start scherm ***********************************************************ǁ: ()"CS-TUTOR"ၠ ()"VERSIE 2.1": ()"VOOR MSX 1 EN 2 EN PC";: : : " DOOR C.J.E. MERTENS EN D.J. HEYE"m: : "lege return = terug naar hoofdmenu": : : "gebruikt u cassettes j/n? "; : msxقC$$(): ("JjNn",C$)  : C$ : msx( MENU *******************************************************************.Y: );"1..........INVOEREN WOORDEN": );"2.................REPETEREN": );"3.............BESTAND SAVEN"ڃ: );"4.............BESTAND LADEN": );"5..........WIJZIGEN WOORDEN"0": );"6.......VERWIJDEREN BESTAND"[,: );"7...................STOPPEN"6: : "kies het gewenste nummer: ";KEUS$˄@KEUS(KEUS$): KEUS ^, , , >, , ,  ՄJ $T Invoeren Woorden *******************************************************3^: AWAWRh  );"INVOEREN WOORDEN."{r  );"aantal vrije tekens:";("")|: : "###e vreemde woord:";AW WW$(,AW)ԅ WW$(,AW)"" AWAW: : "In het Nederlands:" WW$(,AW): ) "Accoord (J/N) ";: I$$()f ("jJ",I$) ^ : ("Nn",I$) : r :  Repeteren **************************************************************ӆ AW : : G: F );"REPETEREN": );"1.....VAN VREEMD NAAR NEDERLANDS"J: );"2.....VAN NEDERLANDS NAAR VREEMD"z: );"3.....................DOORELKAAR": : "kies het nummer van uw keuze: ";K$ۇK(K$): K : K K : );"REPETEREN"+: "Goed:### - Fout:### - Totaal:###";G;F;GFB& K SK: :V0S(())k:W(()AW)D WW$(,W)"" :N: : "vertaal:": X WW$(S,W): b AN$܈l AN$"" :GOTO 460!v AN$WW$(S,W) GG: : "GOED !!": T d: T: 4FF: : : x "FOUT!!": "Het goede antwoord is: ";WW$(S,W): "" ""  : ㉞ Bestand Saven ********************************************************** AW :   );"BESTAND SAVEN">: : "Naam van het bestand: ";BN$O BN$""  ("jJ",C$) : "Druk en in." :msx: "Geef toetsdruk..." "" ۊ: "BESTAND WORDT GESAVED." BN$ AS # #,AW  I AW. #,WW$(,I): #,WW$(,I)6  I?* #E4> Bestand laden **********************************************************H:  );"BESTAND LADEN"݋R: : "Naam van het bestand: ";BN$\ BN$"" f ("jJ",C$) : "Druk in." : msx=p: "Geef toetsdruk..."Pz "" zq: "BESTAND WORDT GELADEN" BN$ AS# #, AW I AWÌ #,WW$(,I): #,WW$(,I)ˌ IԌ #ڌ) Woorden wijzigen *******************************************************8 AW X: );"WOORDEN WIJZIGEN": "u mag zowel een Nederlands als een" "vreemd woord opgeven"֍: : EW$"": "Welk woord wijzigen: "; EW$ EW$""  I AW"$ WW$(,I)EW$ WW$(,I)EW$ B*. I]8: "Niet gevonden.": P : P: rB: "Gevonden:"L: WW$(,I);" - ";WW$(,I)V: "Wijzigen (J/N) ";: I$$()` ("jJ",I$) j : ("Nn",I$)  : j: );"WOORDEN WIJZIGEN"7t "lege return = woord verwijderen"a~ "maar dat moet u niet te vaak doen"{: "Vreemde woord:" WW$(,I) WW$(,I)"" WW$(,I)"": WW$(,I)"": ݏ: "Nederlands woord:" WW$(,I): "Accoord (J/N) ";: I$$()M ("Jj",I$)  : ("Nn",I$) j :  Verwijderen bestand *************************************************** AW ې:  );"VERWIJDEREN BESTAND uit geheugen": "Zeker weten (J/N) ";: I$$(): ("Jj",I$)  : ("Nn",I$) : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : piepen5: MSX/MS-DOS Computer MagazineD: KK28-2k(: ingezonden door Paul te Bokkels2:,<:A():I:X(I),Y(I)::Y()Y():A$(($()) ):A("123a456b789c*0#d",A$):A$;:Aڊ:,X((A)):,Y(A):, :, :T2:::93,160,84,145,76,131,69,119 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : keybrd<: MSX/MS-DOS Computer Magazine KK28-3b: ingezonden door D.W.v Vlodropj(:)2 ,:"'n toets ingedrukt houden s.v.p.":P):I :("0000000"((I )),);" = ROW";I;?):: P):"de toetscode = 8x rownummer + bitnummer (0-7) van bit dat 0 wordt.":2 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS :autoexec.bas9:MSX/MS-DOS Computer MagazineH:KK 28-4k(:ingezonden door Eric Wannees2:F ,()()" "()()(): ,( )"cls:list"( ): , ()"run"( ): , ( )"files"( )P : : 0Z : : (: ,,Ld "overzicht files:": Zn "*.bas"hx "*.bin"Y: Q: : : ">>welk programma?" X,Y: RXY(: A($())聖 A(A) ,,,,,: : : : XX (X (R ) ): @+XX (X): @PYY(Y)(Y (R() ): @YY((R() )((R() (RP) YQ): @ I  : P$P$((RI)): Iڂ (P$,)"BAS" P$ : P$,R 5 Q  : Q: : (0-7) van bit dat 0 wordt.":2 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : sclone<: MSX/MS-DOS Computer Magazine KK28-5[: achtergelaten door RWLc(:2 : AZ : C: A()< (,)(,,) (,): ()(()) : C(C()) : A()C: A,(A) : <Q: : (0-7) van bit dat 0 wordt.":2 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : flakkr5: MSX/MS-DOS Computer MagazineD: KK28-6f(: ingezonden door D. Teeuwn2:< ,,: : Z()FA(() )PX(())ʀZ(X,X)(XX,XX),A,BFd "" F : ,,: <Q: : (0-7) van bit dat 0 wordt.":2 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : osclok<: MSX/MS-DOS Computer Magazine KK28-7b: ingezonden door Oscar Hartmanj(:2 : P: : ,,< A$: A$TI$ <FTI$A$ȀPU$(A$,): U(U$)ZM$(A$,,): M(M$)dS$(A$,): S(S$)n M S Bx , : "Uren :";U );" ";U$;&);" "r , : "Min. :";M );" ";M$;J);" " ,: "Sec. :";S );" ";S$;J);" " DATE B$: B$DA$ <́DA$B$ꁪMA$(B$,): MA(MA$)D$(B$,,): D(D$) J$(B$,): J(J$)T ,: "dag :";D );" ";D$;*);" " ,: "maand:";MA );" ";MA$;);" " ,: "jaar :";(J<) );" ";J$;J);" "ł <BFd "" F : ,,: <Q: : (0-7) van bit dat 0 wordt.":2 : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS : GAMOVR<: MSX/MS-DOS Computer Magazine KK28-8d: ingezonden door Michel Shuquairl(:,2,:P:,:():A$"EMAGOVER":Cn:E:T:TT:LCCE:P:P,(}PL,PP),P,((A$,P,)):P,(}PL,PP),P,((A$,P,)):,P<:P,L:CC:EE: : G: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS& mcm2b4 correcties afdrukmodule,Ӏ2ͷ:x:AZ:AB( ): ,:D::&:0:AV( ):D1( ):AR( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(AV),VL(AV)<,C1LC:CO:LV@(PF)(KR$"")(BF):( )SR( )( ):DFNN:NNSR: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS/ mcm2b3 correcties 1e deel afdrukmodule5ڀ2ͷ:x:AZ:AB( ): ,:0::::AV( ):D1( ):AR( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(),VL(AV)G#:NN$".LS"(F),S:LC(Y$):OLLC:T:PS(T)((Z$,T,)):T:T:2,T:)::ED::FF(D)(F)(E)(D)(FLF)(E):#,F:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS$"":T:PS$PS$(PS(T)):T:Z$PS$:#,F:#:NN$".LS"(F),,,S:T:2,T:):: ):D1( ):AR( )( ):AFAR:PL( ):PH( ):VN$(AV),A$(AV),PS(AV),VL(AV)<,C1LC:CO:LV@(PF)(KR$"")(BF):( )SR( )( ):DFNN:NNSR: d : : : :pc en msx2 evt. WIDTH 80 tussenvoegenF:A,:X$:QQ$:QQ$( )":QQ$()FLF:":QQ$()ڴ#:T:2,T:):::l,Y$(LC):PS) mcm2b2 correcties selectiemodule/f2ͷ:x:AZ:AB( ): ,::X:bause PLAATS UW FLOPPIES copy c:*.* a: del a:c4.bat copy c:*.* b: del b:c4.bat copy c:*.* d: del d:c4.bat c:c4 , ,,: K$;" ... EEN OGENBLIKJE";: I K: P$: I;6 @: P$ AS 1:: P$@ ,: "DIT PROGRAMMA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ:% mcm2bm correcties menumodule+F{ "SELECTEREN ",1a "NIEUW BESTAND",1bause PLAATS UW FLOPPIES copy c:*.* a: del a:c4.bat copy c:*.* b: del b:c4.bat copy c:*.* d: del d:c4.bat c:c4 , ,,: K$;" ... EEN OGENBLIKJE";: I K: P$: I;6 @: P$ AS 1:: P$@ ,: "DIT PROGRAMMA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ: :P::, B"BELASTINGPROGRAMMA * FISCUS 89 *"{:"Sunshine Software":"Benesserlaan 402, Uitgeest"(:"VOOR HET E- en T-BILJET en EENVOUDIGE A-BILJETTEN !"2:<:"DIT PROGRAMMA BEPAALT cq BEREKENT VOOR U:"F"- indeling tariefgroepen"9P"- (aanvullende) arbeidstoeslag"`Z"- alleenstaande eenoudertoeslag"d"- minima/maxima van aftrekbedragen"n"- alle optellingen en doorberekeningen"x"- van toepassing zijnde tabelbedragen"3"- verschuldigde of terug te ontvangen loonbelasting en aow/aww premie."<:"Beantwoord vragen met J of N":"(in hoofdletters) gevolgd door RETURN." :"Geldbedragen invoeren zonder F teken en een punt in plaats van een komma Voorbeeld: niet F 410,50 maar 410.50.":"Volg de volgorde van de vragen in het hoofdmenu; u kunt vragen overslaan, maar let erop dat u alle noodzakelijke vragen beantwoordt."҃:"Met F2 (+ RETURN) kunt u een screendump maken."ۃ:::"U KUNT GEEN RECHTEN AAN HET PROGRAMMA ONTLENEN !!!":"Let op! Dit voorloop-programma schakelt de B-drive uit i.v.m benodigde geheugenruimte.":::"Uw computer wordt op HOOFDLETTERS-INVOER gezet."ӄ:"FSC89H"ل::"druk een toets in" A$:A$""$: I;6 @: P$ AS 1:: P$@ ,: "DIT PROGRAMMA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ:, Edh0,: ,( ) :P::AZ=NV(:k():̍ : : ::T$"TOTAAL"݀(A9:B9:C9:D5:D8:D9:E9:F9:G9:H9:I9:J9:K9:X9:T0:T1:T2:T3O:T4:Y8:RT5g2:"vrij "()" bytes")"<< HOOFDMENU FISCUS 89 >>")"(c) Sunshine software":(P,"_"):"[ 0]" )"Tariefgroep en arbeidstoeslag4<"[ 1] E1/A1 Inkomsten uit arbeid"/)"[17] Verzamelstaat":"[ 2] E2/A2 Reiskosten woon-werk"/)"[18] Berekenen Loonbelasting":"[ 3] E3/A3 Beroepskosten"/)"[19] Berekenen Aow/AwwF"[ 4] E4/A4 Studietoelage/uitkering":"[ 5] E5/A6 Totaal vragen E 1-4 of A 1-5":"[ 6] E7/A7 Persoonlijke omstandigheden":"[ 7] E7/A8 Eigen woning":"[ 8] E8/A10 Inkomsten onderverhuur҃P"[ 9] E9/A12 Rente-inkomsten":"[10] E10/A13 Rente minderjarige kinderen":"[11] E11/A14 Rente schulden en geldleningen"/)"[20] LADEN":"[12] E12/A15 Rentevrijstelling"/)"[21] SAVENAZ"[13] E13/A16 Andere inkomsten"/)"[22] OPNIEUW STARTEN":"[14] E14/A17 Giften"/)"[23] STOPPEN܄d"[15] E15/A18 Buitengewone lasten":"[16] E16/A20 Premies volksverzekeringen"/)"[24] SCHOENENDOOS":(P,"_"):)"UW KEUZE";:KE:KEڍDnKE,,>,,,,,,,,,,T,^,,,4,p,,~ , ,, , Mx2:T1:T2:T3:T4:A$"":B$"":C$"":D$"":AA$"":AI$"":AZ$"":SA$"":IN$"":VU$"":AU$"":WW$"":PR$"":"VRAGEN VOOR TARIEFSGROEP-INDELING:"::"WAS U IN 1988 GEHUWD";AZ$}AZ$"J"څ"BENT U IN 1988 GETROUWD OF DUURZAAM GESCHEIDEN GAAN WONEN";GG$:"WAS U IN 1988 TEN MINSTE 6 MND GEHUWD";AA$CAZ$"N"څ"TEN MINSTE 6 MND SAMENWONEND MET EEN ONGEHUWDE BELASTINGPLICHTIGE, DIE OP 31-12-1988 18 JAAR OF OUDER IS EN VOOR NIET MEER DAN 50% DOOR ZIJN/HAAR OUDERS WORDT ONDERHOUDEN";SA$AA$"J"SA$"J"څ"HAD UW PARTNER IN 1988 EEN INKOMEN";IN$:IN$"N"T1:,AA$"J"SA$"J"ڋIN$"J"T1:V:,]"HEEFT U RECHT OP KINDERBIJSLAG OF VERVANGENDE BUITENGEWONE LASTEN AFTREK";A$:A$"J"څ"VOERT U EEN VOOR U ALLEEN EEN HUISHOUDEN";B$:B$"J"T1:,ꈾA$"J"ڋB$"N"څ"VOERT U EEN HUISHOUDEN UITSLUITEND MET KINDEREN DIE OP 31-12-88 ALLEN JONGER ZIJN DAN 27 JAAR";C$:C$"J"T1:, A$"J"ڋB$"N"ڋC$"N",k"WAS U OP 31-12-87 27 JAAR OF OUDER ";A$:A$"J"څ"VOERT U VOOR U ALLEEN EEN HUISHOUDEN";B$A$"J"ڋB$"J"T1:,A$"J"ڋB$"N"ڑ"VOERT U EEN HUISHOUDEN UITSLUITEND MET KINDEREN DIE OP 31-12-88 ALLEN JONGER ZIJN DAN 27 JAAR";:C$:C$"J"T1:,=A$"J"ڋB$"N"ڋC$"N":,"ZIJN ALLE ANDEREN WAARMEE U DUURZAAM EEN HUISHOUDEN VOERT GEHUWD";A$:A$"J"T1:,"HEEFT UW HUISGENOOT EEN INKOMEN IN 1988";A$:A$"J"T1:V:,)"LEEFTIJD OP 31-12-87 VAN UW HUISGENOOT DIE GEEN INKOMEN HEEFT";LҋLT1:,:LT1:,:LڋLڑ"WORDT DEZE PERSOON GROTENDEELS OP KOSTEN VAN ZIJN/HAAR":"(PLEEG)OUDERS ONDERHOUDEN";A$:A$"J"T1:,:T1:,ۋ"T1N,:"U BENT INGEDEELD IN TARIEFGROEP";T1:VNVڑ:"HEEFT UW PARTNER EEN LAGER ARBEIDSINKOMEN DAN UZELF";AI$ߌ6 :VNVAI$"J"ڟ:"I.V.M. BEREKENING VOETOVERHEVELING BIJ TWEEVERDIENERS, VOER EERST DE GEGEVENS VAN UW PARTNER IN":NV: :J @NVAZ$"J"ڟ:"VULT UW ECHTGENOOT ZELF EEN BILJET IN";VU$J:T0:"VRAGEN VOOR BEREKENING ARBEIDSTOESLAGEN:"::"HEEFT U EEN BAAN";A$:A$"J"T2:T2܍TT1A$"J"څ"HEEFT U MINSTENS 1 KIND, DAT OP 31-12-87 JONGER WAS DAN 12 JAAR";B$^B$"J"A$"J"T3QhT1A$"J"څ"HEEFT U EEN THUISWONEND KIND DAT OP 31-12-87 JONGER WAS DAN 12 JAAR";C$rT1A$"J"C$"J"څ"HEEFT U EEN THUISWONEND KIND WAARVAN HET OUDSTE KIND JONGER IS DAN 27 JAAR EN ONDERHOUDT U DEZE IN BELANGRIJKE MATE";D$"|D$"J"څ"WAT IS UW TOTALE JAARLIJKSE ARBEIDSINKOMEN";VVED$"J"T4VV:T4tT4t:T2ڑ"U HEEFT RECHT OP ARBEIDSTOESLAG":T3ڑ"EN OOK OP AANVULLENDE ARBEIDSTOESLAGۏT4ڑ"EN OP AANVULLENDE ALLEENSTAANDE-OUDER-TOESLAG T2T0T2:T3T0T2T3:T4T0T2T4T4T0T2T4:T$" VAN TOESLAG F";T0:VT5ڑ:"BEDRAG VOETOVERHEVELING PARTNER:F";T5;" KOMT BIJ UW BELASTINGVRIJE SOMR:T5RŐT1(T1):T1,,,ՐT1:T1P+:T19:T13  :>:A3:Z2:P2:"E1/A1 INKOMSTEN UIT ARBEIDNVVU$"N"ڑ"Vul het arbeidsinkomen in op Model A (vul alleen vragen 1 t/m 6 en 16 t/m 19 in)::"1a INGEHOUDEN PREMIES AOW/AWW"<)"F";:P4::"1a INGEHOUDEN LOONBELASTING"<)"F";:Z4&:"1a LOON,PENSIOEN,AOW/AWW, SOCIALE UITKERINGEN,LIJRENTE etc.":"zonder aftrek loonbelasting en premies"<)"F";:A2:A3A3A2:Z2Z2Z4:P2P2P4Ȓ0:"NOG MEER OPTELPOSTEN";A$:A$"J";::"TOTAAL 1a AOW/AWW"<)"F ";P2::"TOTAAL 1a LOONBELASTING"<)"F ";Z2::T$" 1a LOON etc."<)"F ";A3: D:"1b HAD U IN 1988 EEN PERSONENAUTO VAN UW WERKGEVER TER BESCHIKKING";:AU$:AU$"N"N:"GEBRUIKT U DE AUTO VOOR WOON-WERKVERKEER";WW$::"REED U PRIVE MINDER DAN 2000 KM (OF 10% TOT. AANTAL GEREDEN KM)";PR$TXPR$"J"ڑ:"VUL DE WERKELIJKE KOSTEN IN"<)"F";:WKb:"CATALOGUS WAARDE AUTO"<)"F ";:W1::"AANTAL MAANDEN "<):W2::"EIGEN BIJDRAGE"<)"F ";:W3:W4(((W1)(W2 ))W3):W4W4lWKW4WK6v:"BELASTBAAR BEDRAG VOOR PRIVEGEBRUIK AUTO"<)"F ";W4: :"1c ANDERE BRUTO INKOMSTEN":"bv neveninkomsten, free lance inkomsten"<)"F";:A4::T$" 1d"<)"F ";A3A4W4: :$:"E2/A2 REISKOSTEN WONING-WERK:":::"KOMT U VOOR AFTREK WOON-WERKVERKEER IN AANMERKING";A$:A$"N"4AU$"J"WW$"J"W3ڑ:"U MAG ALLEEN HET VASTE BEDRAG AD F200 VOOR REISKOSTEN AFTREKKEN":A5: 떞AU$"J"W3ڑ:"DOOR UW EIGEN BIJDRAGE MAG U REISKOSTEN VOLGENS DE TABEL AFTREKKENW:"REIST U DOORGAANS 1 OF MEER DAGEN PER WEEK":"het gehele afgelopen jaar en met dezelfde afstand";A$ؗA$"N"ڑ:"ZIE VOOR BEREKENING AFTREKBAAR BEDRAG TOELICHTING AANGIFTEBILJET"::"VUL AFTREKBAAR BEDRAG IN"<)"F";:A5: :"HOEVEEL DAGEN REIST U PER WEEK";RD:RDRD!RDRDz:"REIST U BINNEN 1 VAN ONDERSTAANDE GEBIEDEN"::"AMSTERDAM,DIEMEN OF DUIVENDRECHT"ROTTERDAM(BEHALVE HOEK VAN HOLLAND EN WESTELIJK DE OUDE MAAS),SCHIEDAM, VLAAR- DINGEN,RHOON,POORTUGAAL EN CAPELLE A/D IJSSEL"DEN HAAG, RIJSWIJK, VOORBURG, EINDHOVEN":"EN HEEFT U IN DEZE GEBIEDEN GEEN 3 STER-ABONNEMENT NODIG";A$:A$"J"A5: ř:"AFSTAND WOON/WERKGEBIED IN KM (enkele reis)";K1:K1 A52JK1 K1A5:K1K1A5c:K1K1A5CPu:K1K1(A5Cf%:K1(K12A5Cu:K12A5\WA5RDA5 :"1 KOSTEN VAN REIZEN TUSSEN WONING EN WERK"<)"F ";A5;:"2 ONTVANGEN BELASTINGVRIJE VERGOEDING VOOR UW REISKOSTEN":"(indien de vergoeding ruimschoots de aftrekbare kosten":"overtreft zie toelichting)"<)"F";:A6U A7A5A6:A7A7*:"3 AFTREKBAAR BEDRAG (MIN.F200)"<)"F ";A74 :>:"E3/A3 BEROEPSKOSTEN:":::"BESTAAT UW TOTAAL INKOMEN UIT TEGENWOORDIGE ARBEID";:A$:A$"J"TAA3:RHH"WAT IS HET TOT. INKOMEN UIT TEGENWOORDIGE ARBEID"<)"F";:TAbRA8?@TA:A8p\A8 A8 :A8A8ɜf:"4% REGEL VAN DEZE INKOMSTEN (MIN f200 / MAX f800)"<)"F ";A8 pA$"N"K2څ"HEEFT U ALLEEN INKOMEN UIT VROEGERE ARBEID";B$JzB$"J"A8::"VAST BEDRAG VOOR AFTREK"<)"F ";A8:Ɲ:"WERKELIJKE KOSTEN":"- KOSTEN (AFSCHRIJVING) VAN VOOR UW WERK BENODIGDE":" VOORWERPEN (bv computer)";<)"F";:Y1V"- CONTRIBUTIES/BIJDRAGE PERSONEELSVERENIGING";<);"F";:Y2:"- VAKLITERATUUR/BLADEN";<);"F";:Y3:"- LIEF EN LEEDPOTJES";<);"F";:Y4"- REPRESENTATIEKOSTEN";<);"F";:Y5:"- EXTRA KOSTEN IVM OVER/ONREGELMATIG WERK";<);"F";:Y6:"- OVERIGE";<);"F";:Y7:Y8Y1Y2Y3Y4Y5Y6Y7"TOTALE KOSTEN";<)"F ";Y85A8Y8ڑ:T$" 3a"<)"F ";(A8)ZY8A8ڑ:T$" 3b"<)"F ";(Y8)kY8A8A8Y8v ::"E4/A4 PERIODIEKE STUDIETOELAGEN EN UITKERINGEN:":::"4a BEDRAG AAN STUDIETOELAGEN"<)"F";:B2:"4b LIJFRENTE OF PERIODIEKE UITKERINGEN VROEGERE ARBEID"<)"F";:B3::"4a + 4b ="<)"F ";B2B3::"4c AF: AFTREKBARE KOSTEN"<)"F";:B4:B9B2B3B4:T$" 4e"<)"F ";(B9): :?::"E5/A6 "T$" E1 t/m E4 OF A1 t/m A5:":::"1d INKOMSTEN UIT ARBEID"<)"F ";(A3A4W4)::"2e AF: REISKOSTEN WOON-WERK"-)"F ";(A7)ݡ:"3a/b AF: BEROEPSKOSTEN"-)"F ";(A8)::T$" 2e + 3a/3b"<)"F ";(A7A8)::"4e STUDIETOELAGE/UITKERING"<)"F ";(B9):A9A3A4W4B9A8A7:T$" 5"<)"F ";(A9): :.:AZ$"N"ڑ"VUL ALLEEN VRAAG 6a": :m:"E6/A7 PERSOONLIJKE OMSTANDIGHEDEN:":NVVU$"N"~$GG$"J"BŢ.M2A9::"UW PERSOONLIJK ARBEIDSINKOMEN IS"<)"F ";M2:NVM3M2΢8j7B:"HOEVEEL MAANDEN BENT U GEHUWD GEWEEST";M1:M1ڑ:"VUL ALLEEN DE VRAGEN 6a, 6b EN 6c IN": :WLM2(M1(A9) ):NVM3M2V::"6e PERSOONLIJK ARBEIDSINKOMEN"<)"F ";(M2)::"ALS U HET HOOGSTE PERSOONLIJKE ARBEIDSINKOMEN HEBT, MOET U DE NIET-PERSOON-LIJKEINKOMSTEN ALS VOLGT OPGEVEN`:"over de niet-huwelijkse periode DE NIET-PERSOONLIJKE INKOMSTEN EN AFTREKPOSTEN VAN UZELF"::"over de huwelijkse periode IDEM, ECHTER VAN U ZELF EN UW ECHTGENOOTjM3M2ڟ:"U HEEFT NIET HET HOOGSTE ARBEIDSINKOMEN. START HET PROGRAMMA OPNIEUW": :6tNVM3M2څ"BENT U JONGER";A$:A$"N"~NVAI$"N"ڑ:"VUL OP HET BILJET HET PERSOONLIJK ARBEIDSINKOMEN VAN UW ECHTGENOOT (E6/A7) IN": :VU$"J"GG$"J"ڍ :̥ :&M9A9:I3A9::"6f PERSOONLIJK ARBEIDSINKOMEN ECHTGENOOT"<)"F ";(M9): :NVڎ:"E16/A20 PREMIES VOLKSVERZEKERINGEN:"::"a PREMIES AOW/AWW"<)"F";P2::"b PREMIES AWBZ,AAW EN AKW VERHAALD OP UW WERKGEVER"<)"F";:ABS:"c VORIG JAAR OP AANSLAG BETAALDE PREMIES"<)"F";:AC:G5P2ABAC::T$<)"F ";G5::"d VORIG JAAR TERUGONTVANGEN PREMIES"<)"F";:AD:G9G5AD觺:T$" 16f"<)"F ";G9::"VUL ALLEEN NOG DE VERZAMELSTAAT IN (ECHTGENOOT DIENT EIGEN BILJET IN TE VULLEN) EN START HET PROGRAMMA OPNIEUW":X9A9 :t:F3:"E7/A8 INKOMSTEN UIT EIGEN WONING:":::"HAD U/UW ECHTGENOOT AFGELOPEN JAAR (EEN) EIGEN WONING(EN)";:A$:A$"N"ڎ:"WOONT U ZELF IN DE WONING (GEEN VAKANTIEWONING)";A$:A$"N":"VRIJE VERKOOPWAARDE WONING"<)"F";:F0:F1@`F0:-:"VRIJE VERKOOPWAARDE WONING"<)"F";:F0:"HOEVEEL MAANDEN WAS U EIGENAAR VAN DE WONING";BB:A$"J"ڑ:"FISCALE WAARDE"<)"F ";F1A$"N"ڑ:"FISCALE WAARDE"<)"F ";F0:F1F0Щ F1:F2F1:F10uF2F10uF1E`F2&(F1E`F1EF2 E2F1EF1FF2d<F1FF1FF2FF1FF1F$F2$ PF1F$F1F0F20 ZF1F0F1F6F2<dF1F6F1FEF2HnF1FEF1FTF2xF1FTF2lnF2(BBF2) :F3F3F2::"HEEFT U NOG MEER WONING(EN)";B$:B$"J"A$"N": ::뫌:"c HUURWAARDE VOLGENS TABEL"<)"F ";F3::"d PERIODIEKE BIJDRAGE OVERHEID"<)"F";:Z6::T$" 7e"<)"F ";F3Z6: v:"f RENTE VAN SCHULDEN EN KOSTEN VAN HYP. LENINGEN"<)"F";:F4::"g ERFPACHT"<)"F";:F5::"h ONDERHOUD"<)"F";:F6:F8F4F5F6:T$" 7i"<)"F ";F8:F9F8F3Z6:F9F9(F9)::T$" 7j"<)"F ";(F9):::"7k TOTAALBEDRAG VAN DE SCHULDEN"<)"F";:Z7: ::"E8/A10 INKOMSTEN UIT ONDERVERHURING:":::"a BRUTO INKOMSTEN"<)"F";:C2::"b AF: AFTREKBARE KOSTEN"<)"F";:C3:C9C2C3:T$" 8c"<)"F ";(C9): :+:"E9/A12 RENTE:"::"TIP: VUL HIER NEGATIEVE RENTE IVM DOORLOPENDE LENINGEN IN":::"RENTE GIRO/BANK REKENING"<)"F";:D1:"RENTE SPAARTEGOEDEN"<)"F";:D2::"RENTE SPAARBEWIJZEN"<)"F";:D3::T$" 9a"<)"F ";D1D2D3::"b AFTREKBARE KOSTEN"<)"F";:D4D5D1D2D3D4::T$" 9c"<)"F ";(D5): :n:"E10/A13 RENTE VAN UW MINDERJARIGE KINDEREN:":::"a RENTE-INKOMSTEN"<)"F";:D6::"b AFTREKBARE KOSTEN"<)"F";:D7D8D6D7::T$" 10c"<)"F ";(D8)::"AANTAL MINDERJARIGE KINDEREN";:N:KN(N)::T$" 10d"<)"F ";KN:D8KND9KN:D9D82:"10e RENTEVRIJSTELLING KINDEREN"<)"F ";(D9): ::"E11/A14 RENTE VAN SCHULDEN:":::"a RENTE/KOSTEN VAN LENINGEN"<)"F";:H7::"b BEDRAG VAN DE SCHULDEN OP 31 DEC."<)"F";:H8H9H7::T$" 11a"<)"F ";(H9): :,:J9:"E12/A15 RENTEVRIJSTELLING:":D8KNJ8D5D8KN:J8D5::"a GENOTEN RENTE"<)"F ";J8::"b AF:BETAALDE RENTE EN KOSTEN LENINGEN"<)"F ";H9:J9J8H9::T$" 12c"<)"F ";J9:J9J9:J˱"AZ$"N"6#,AZ$"J"IN$"J"ڑ:"HEEFT U HET HOOGST PERSOONLIJKE ARBEIDSINKOMEN";A$:A$"J"@;6J9J9:JN@J9J9tJ:T$" 12e"<)"F ";(J9): :ײT:"E13/A16 ANDERE INKOMSTEN:":::"ONTVANGEN ALIMENTATIES EN DERGELIJKE"<)"F";:E9: :`^:"E14/A17 GIFTEN:":::"a GIFTEN VIA TERMIJNEN VAN LIJFRENTE"<)"F";:I6::"b OVERIGE GIFTEN"<)"F";:I7:XXA9C9D5D8E9F9}hI8?XX:I8xI8xr:"c AF:1% VAN UW ONZUIVER INKOMEN.(min.f 120)"<)"F ";(I8):V6I7I8:V7@XX:V6ڑ:"OVERIGE GIFTEN TE GERING VOOR AFTREK|V6V7V6V7%V6V6~:"14 b - c = (MAX.10% VAN UW ONZUIVER INKOMEN)"<)"F ";(V6):I9I6V6:I9I9:T$" 14"<)"F ";(I9): :ȴ:"E15/A18 BUITENGEWONE LASTEN::"a ALS U HET AFGELOPEN JAAR MEER DAN 6 MND ALS ONGEHUWDE EEN GEZAMENLIJKE HUIS- HOUDING VOERDE MET EEN ANDERE ONGEHUWDE VAN 18 JAAR EN OUDER MAG U DE BUITENGE- WONE LASTEN SAMENVOEGEN@:"b IDEM, ECHTER ALS U AANSLUITEND GEHUWD BENT, MAG U DE TIJD WAARIN U SAMENWOONDE IN AANMERKING NEMEN ALS TIJD WAARIN U GEHUWD WAS.": ::"15d UITGAVEN VOOR ZIEKTE etc:"ZIEKENFONDSPREMIE WERKNEMERSDEEL OF":"PREMIE ZIEKTEKOSTENVERZEKERING"<)"F";:K0::"WERKGEVERSDEEL ZF"<)"F";:K1(:"MEDICIJNEN, HUISAPOTHEEK etc."<)"F";:K2::"DOKTERS, TANDARTS OF ZIEKENHUISKOSTEN"<)"F";:K3:"DIEETKOSTEN, KOSTEN KRAAMHULP, BRIL etc."<)"F";:K4::"EXTRA KOSTEN KLEDING EN BEDDEGOED (630,- of 1575,-)"<)"F";:K51:"CONTRIBUTIE KRUISVERENIGING"<)"F";:K6::"OVERIGE KOSTEN bv adoptiekosten, kosten igv":"overlijden etc."<)"F";:K7: ޸::"1-IS EEN PARTNER JONGER DAN 65 JAAR, ARBEIDSONGESCHIKT EN VERDIENT U MINDER DAN 55% DAN GEZONDE MENSEN IN DEZELFDE OMSTANDIGHEDEN"::"2-IDEM VOOR TWEE PARTNERS:"3-IS EEN PARTNER GEDURENDE HET GEHELE AFGELOPEN JAAR 65 OF OUDER"::"4-IDEM VOOR TWEE PARTNERS"::"5-IS DE ENE PARTNER 65 JAAR OF OUDER EN DE ANDER ARBEIDSONGESCHIKT6:"6-BENT U/UW PARTNER HET AFGELOPEN JAAR 65 JAAR GEWORDEN"::"7-IDEM VOOR TWEE PARTNERS"::"8-GEEN VAN ALLEN IS VAN TOEPASSING"::"UW KEUZE";A$:A$"1"K81A$"2"K8b:A$"3"K81:A$"3"K81:A$"4"K8!:A$"5"K8búA$"6"ڑ:"HOEVEEL MAANDEN WAS U IN 1988 65 JAAR";L0 A$"7"ڑ:"HOEVEEL MAANDEN WAREN U+UW PARTNER IN 1988 65 JAAR";L1)&A$"6"K8((L01) )H0A$"7"K8((L1!))Y:A$"8"K8D:"AFTREK WEGENS ARBEIDSONGESCHIKTHEID EN/OF OUDERDOM"<)"F ";K8:K9K0K1K2K3K4K5K6K7K8::"TOTAAL UITGAVEN TER ZAKE VAN ZIEKTE etc."<)"F ";(K9)!NM8A9C9D5D8E9F9M9:M9bX:"UW ONZUIVER INKOMEN"<)"F ";(A9C9D5D8E9F9)::"PERSOONLIJK ARBEIDSINKOMEN VAN ECHTGENOOT"<)"F ";M9::T$"TAB(60)"F ";INT(M8)\bSA$"J"ڑ:"INDIEN U UITGAVEN VAN UW PARTNER BIJ UW AANGIFTE HEEFT OPGETELD,":"VUL DAN HET ARBEIDSINKOMEN (OVER DE BETROKKEN MAANDEN cq JAAR)":"HIER IN"<)"F";:MMнlM8M8MM:L3@ M8:L4(?0M8):L5 :L6:M8EIPL6L3:M8EIPM8F L6L4:M8F L6L5Mv:"AF: DREMPEL BIJ ONZUIVER INKOMEN VAN F "M8"="<)"F ";(L6):L7K9L6:L7ڑ:"UITGAVEN TE GERING VOOR AFTREK"::"A 15d1 - 15d2 ="<)"F ";(L7): ::"-HAD U IN 1988 VOOR MEER DAN 4 KINDEREN RECHT OP KINDERBIJSLAG$:"-OF VOOR MEER DAN 4 KINDEREN JONGER DAN 27 JAAR, RECHT OP AFTREK WEGENS BUITEN- GEWONE LASTEN:"-OF KWAMEN U/UW ECHTGENOOT DE AFGELOPEN 2 JAREN IN AANMERKING VOOR AFTREK BUI- TENGEWONE LASTEN";A$:A$"J"O1AP:"-KWAMEN U/UW ECHTGENOOT DE AFGELOPEN 3 JAREN IN AANMERKING VOOR AFTREK BUITEN- GEWONE LASTEN";A$:A$"J"O1A:"VERMENIGVULDIGINGSFACTOR"();O1:O1O2O1L7:O2L7:OO?0M8:OO OO :(O2L7)OOO2L7OO::"MAX. VERSCHIL TUSSEN A EN B"<)"F "(OO):T$" 15d "<)"F ";(O2): ::"15e en f UITGAVEN VOOR LEVENSONDERHOUD:"1 VAN KINDEREN JONGER DAN 27 JAAR WAARVOOR U GEEN RECHT HEBT":" OP KINDERBIJSLAG/STUDIEFINANCIERING"<)"F";:O3/:"2 VAN KINDEREN VAN 27 JAAR EN OUDER EN OVERIGE NAASTE":" VERWANTEN"<)"F";:O4:O5? M8:O5 O5 :O4ڑ:"NIET AFTREKBAAR BEDRAG"<)"F ";(O5)JO6O3O4O5:O6O6:T$" 15e"<)"F ";(O6): ::"15g UITGAVEN VOOR STUDIE OF OPLEIDING VOOR EEN BEROEP VAN U EN/OF UW PARTNER"::"WERKELIJKE UITGAVEN"<)"F";:O7]:"VERGOEDINGEN WERKGEVER"<)"F";:O8:O7O8ڑ:"NIET AFTREKBAAR BEDRAG"<)"F ";(O5):O9O7O8O5:O9O9:T$" 15g"<)"F ";(O9): ::"15h UITGAVEN VOOR GEZINSHULP EN KINDERDAGVERBLIJF BIJ EEN GEZIN MET 1 OUDER"::"WERKELIJKE UITGAVEN"<)"F";:Q1Q2@M8:Q2+Q2+pQ1ڑ:"NIET AFTREKBAAR BEDRAG"<)"F ";Q2:Q3Q1Q2:Q3Q3:Q3E3`Q3E3`:T$" 15f"<)"F ";Q3:K9O2O6O9Q3::T$" 15d"<)"F ";(O2):T$" 15e/f"<)"F ";(O6):T$" 15g"<)"F ";(O9)' T$" 15h"<)"F ";(Q3)::T$" 15"<)"F ";(K9): ::"E16/A20 PREMIES VOLKSVERZEKERINGEN:":::"a PREMIES AOW/AWW VOLGENS 1a1"<)"F ";P2::"b VERHAALDE PREMIES AWBZ, AAW EN AKW m.b.t. 1a1"<)"F";:G3: :"c OP AANSLAG BETAALDE PREMIES"<)"F";:G4:G5P2G3G4::T$" 16d"<)"F ";G5::"16a + b + c ="<)"F ";G5*:"d AF:TERUGONTVANGEN PREMIES"<)"F";:G6:G9G5G6::T$" 16f"<)"F ";(G9): :24:"VERZAMELSTAAT VOOR BEREKENING BELASTBAAR INKOMEN:"::"5 TOTAAL VRAGEN 1 T/M 4"<)"F ";(A9):"8c INKOMSTEN UIT ONDERVERHURING"<)"F ";(C9)>"9c RENTE U/UW ECHTGENOTE"<)"F ";(D5):"10c RENTE MINDERJARIGE KINDEREN"<)"F ";(D8):"13 OVERIGE PERIODIEKE UITKERINGEN"<)"F ";(E9):SU(A9C9D5D8E9)`H()"subtotaal"<)"F ";SU:"7 INKOMSTEN UIT EIGEN WONING"<)"F ";(F9):X9SUF9:()"ONZUIVER INKOMEN"<)"F ";(X9)R"10e RENTEVRIJSTELLING KINDEREN"()"F ";(D9):"11a RENTE VAN SCHULDEN"()"F ";(H9):"12e RENTEVRIJSTELLING"()"F ";(J9):"14 GIFTEN"()"F ";(I9)\"15 BUITENGEWONE LASTEN"()"F ";(K9):"16f PREMIES VOLKSVERZEKERINGEN"()"F ";(G9):Q4(D9H9J9I9K9G9):()"subtotaal"<)"F ";(Q4):Q5X9Q4&f()"INKOMEN"<)"F ";(Q5):"TE VERREKENEN VERLIEZEN"<)"F";:Q6:I3Q5Q6:()"BELASTBAAR INKOMEN"<)"F ";(I3): :Wp:I4T1T2T3T4T5:T2T3T4I3I4T1I3T5dzI5I3I4ʄI5Z::I5%Z@I5::I5%ڋI5BZ(I5%)@$G:LˎI5BڋI55{Z(I5B)@2< ::I55{ڋI5EDR@Z(I55{)@AQ::I5EDR@ڋI5Ee Z(I5EDR@)@Q3:˘I5Ee ڋI5E@Z(I5Ee )@`\::I5E@ڋI5FaZ(I5E@)@fE96 ::I5FaڋI5F"%Z(I5Fa)@iEXP:̢Z(I5F"%)@rF8R̬Z(Z):"BELASTBAAR INKOMEN 1988: F";(I3):"BELASTINGVRIJE SOM: F";I4:"BELASTBARE SOM: F";(I5):I3I4T2T3I5(I3(dI4U))ͶI5VT5(I5)::"U KUNT OVERHEVELEN NAAR DE BELASTINGVRIJE VOET PARTNER"<)"F ";(I5):OVx::"VERSCHULDIGDE INKOMSTENBELASTING"<)"F ";Z:::"BEDRAG INGEHOUDEN LOONBELASTING"<)"F ";Z2T5OVڑ::"VOORLOPIGE TERUGGAVE I.V.M. VOETOVERHEVELING IN 1988"<)"F";:Z3pZZZ2Z3:Zڑ::"U KRIJGT TERUG AAN INKOMSTENBELASTING 1988"<)"F ";(Z):ZZڑ:"EEN T-BILJET AANVRAGEN VOOR BELASTINGTERUGGAVE HEEFT GEEN ZIN Zڑ::"NOG TE BETALEN AAN INKOMSTENBELASTING 1988"<)"F ";(Z):ZZڑ:"HET TE BETALEN BEDRAG AAN INKOMSTENBELASTING WORDT NIET GEHEVEN,OV:NVڍ ::NV: ::"BEREKENENING PREMIE-INKOMEN EN AOW/AWW:"::"BENT U TUSSEN 15 EN 65 JAAR";A$:A$"J" :A$"N"ڑ:"U HOEFT GEEN AOW/AWW PREMIE TE BETALEN": :F AZ$"N"ڑ:"BENT U EEN ONGEHUWDE VROUW OUDER DAN 45 JAAR (PER 31-12-1987) EN HEEFT U GEEN RECHT OP KINDERBIJSLAG";OV$ :"BENT U IN 1988 65 JAAR GEWORDEN";OU$:OU$"J"ڑ:"HOEVEEL DAGEN WAS U 64 JAAR (1 MND = 30 DGN)";DA: :"TOTAAL BETAALDE PREMIES AOW/AWW"<)"F ";(G5)::"ONTVANGEN AOW EN AWW UITKERINGEN"<)"F";:P3:MI3G9P3G4:MEe%MEe%$ G4OV$"J"AF(dG4):MMG4AF:G4AF(dG4)CP:MMG4AF:OU$"J"ڋM(DAh)Ee%M(DAh)Ee%. :"PREMIE-INKOMEN (maximaal f 65.250 )"<)"F ";(M):A@M:A A 8 :"VERSCHULDIGDE PREMIE AOW/AWW"<)"F ";(A):M@I4ڑ:"I.V.M. PREMIEVRIJSTELLINGSGRENS GEEN INVORDERING PREMIES":L %B MA0I4BB(((M(@I4))((A0I4)(@I4)))d):A((BBA)d)::"I.V.M. REDUKTIEGRENS GEDEELTELIJKE INVORDERING PREMIES"<)"F ";(A)L HG5A:AG5ڑ:"TE BETALEN PREMIE IS GELIJK AAN BETAALDE PREMI":AG5ڑ:"TEVEEL BETAALDE AOW/AWW PREMIE"<)"F ";(H)V HHڑ:"F 139,- OF LAGER WORDT NIET TERUGBETAALD (behalve bij loonbeschikkingM` OV$"J"FF@(AG5):F@(AG5):FhOV$"J"Fh:FH FH j Fڑ:"VERSCHULDIGDE PREMIES AWBZ, AKW EN AWW"<)"F "(F)o AG5ڑ:"TOTAAL NOG VERSCHULDIGDE PREMIES"<)"F ";(FAG5)>t NVڍ ::"START NA BEREKENING PREMIE AOW/AWW HET PROGRAMMA OPNIEUW (KEUZE 22)":NV: :: :~ /,:"BESTANDSNAAM: ";BE$:BE$AS#:#,A9,C9,D5,D8,D9,E9,F9,G4,G5,G9,H9,I3,I4,I9,J9,K9,M9,Q6,T0,T1,T2,T3,T4,T5,Z2:#:Aֈ /,:"BESTANDSNAAM: ";BE$:BE$AS#:#,A9,C9,D5,D8,D9,E9,F9,G4,G5,G9,H9,I3,I4,I9,J9,K9,M9,Q6,T0,T1,T2,T3,T4,T5,Z2:#:֒ ,:"druk SPATIEBALK in":"F1 (+ return-toets) voor screendump֜ A$:A$"" :():̍ :A$"":B$"":C$"":֦ R:TO:C(()RPT):(C);::::%װ :"foutmelding nr ";:N::2:.׺ 26 : :)"SCHOENENDOOS:"::"(schoenendoos-bedragen in de vragen van het biljet met slechts de return-toets beantwoorden)k :"[ 1] BEROEPSKOSTEN":"[ 2] VERGOEDING REISKOSTEN":"[ 3] HYPOTHEEKRENTE":"[ 4] ERFPACHTKOSTEN":"[ 5] RENTE SCHULDEN":"[ 6] RENTE SPAARTEGOEDEN":"[ 7] RENTE GIRO/BANK" "[ 8] KOSTEN IVM RENTE":"[ 9] RENTE KINDEREN":"[10] GIFTEN":"[11] MEDICIJNEN/HUISAPOTHEEK":"[12] DOKTER/ZIEKENHUISKOSTEN":"[13] UITGAVEN IVM STUDIE":"[ 0] HOOFDMENU ,:" ":,:" ":,:"UW KEUZE";:KE:KEڎ:,:"BEDRAG ";:BE F$"TOTAAL F":KE , , ,( ,2 ,< ,F ,P ,Z ,d ,n ,x ,  Y7Y7BE:(,:F$;Y7: A6A6BE:(,:F$;A6:2 F4F4BE:(,:F$;F4:N( F5F5BE:(,:F$;F5:j2 H7H7BE:(,:F$;H7:< D2D2BE:(, :F$;D2:F D1D1BE:(, :F$;D1:P D4D4BE:(, :F$;D4:Z D6D6BE:(, :F$;D6:d I7I7BE:(,:F$;I7:n K2K2BE:(,:F$;K2:5x K3K3BE:(,:F$;K3:Rۂ O7O7BE:(,:F$;O7:MA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ: : ICP/6 voor MSX :E: MSX/MS-DOS Computer Magaziner(: copyright MBI Publications B.V. 19852:*********************************Ā<: PAS TOP OF BASIC MEMORY AAN ****F ,(( J)( K)) PB( J)( K): BM3Z: STEL SCHERM IN *****************Pd : %: ,,: xn: GEEF INSTRUCTIE OP SCHERM *****x ,: "MSX/MS-DOS COMPUTER MAGAZINE"ρ ,: "INVOER CONTROLE PROGRAMMA/6"3 ,: "Dit programma maakt het mogelijk om de listings uit dit blad foutloos in te voeren." "Bij het intikken van programma-regelsverschijnt, nadat u op 'RETURN' of 'ENTER' gedrukt heeft een getal linksop de onderste regel."V "Dit getal moet gelijk zijn aan de bijde listing afgedrukte checksumwaarde.Als dit niet zo is, dan is er een fout gemaakt bij het intikken." "Let op, Basic-woorden moeten met hoofdletters geschreven worden!"˃: INSTALLEER MACHINECODE ********ڃ R  A$CSCS(((A$,))((A$,)))(R)@ (A$,)"*" BR,("&H"A$):  A$"**" A$: ABB("&H"A$): BR,AB((AB)): RR: BR,(AB):  A$"*1" A$: ABB("&H"A$): BR,AB((AB)):  A$"*2" BR,(AB):  RC: CONTROLEER DATA-WAARDES ******* CSG3 : "U heeft een fout gemaakt in de data- regels!": : "Eerst verbeteren!": ҅": ZET CHECKSUMROUTINE AAN *******ޅ,A()6: "Begint u maar met intikken" @2J: MACHINECODE *******************T 21,5E,F5,7E,23,FE,20,20,FA,7E,23,FE,20,28,FA,FE,27,28,D,FE,52,20,D,7E,FE,45,C0,23,7E,FE,4D,C0,E1,C3,**,9F,FE,72,C0,7E&^ FE,65,C0,23,7E,FE,6D,28,EF,C9,36,27,1,6,0,21,**,47,11,7F,F8,ED,B0,3E,C9,32,DB,FD,C3,**,CB,63,6F,6C,6F,72,20,1,6,0h 21,7F,F8,11,**,47,ED,B0,21,7F,F8,36,27,21,83,F8,36,27,23,36,D,21,DB,FD,36,C3,23,36,*1,71,23,36,*2,C9,1E,0,CD,**,00,21,5Er F5,6,1,7E,4F,FE,27,28,B1,18,1,4E,3E,0,B9,28,16,C5,16,7,CB,39,30,1,80,15,28,4,CB,20,18,F4,83,5F,C1,4,23,18,E4,6B| 11,80,F8,26,0,1,64,0,CD,**,B9,1,A,0,CD,**,B9,1,1,0,CD,**,B9,18,12,37,3F,3E,0,ED,42,FA,**,C5,3C,18,F8,C6,30,12 13,9,C9,CD,C9,0,C9D4BE:(, :F$;D4:Z D6D6BE:(, :F$;D6:d I7I7BE:(,:F$;I7:n K2K2BE:(,:F$;K2:5x K3K3BE:(,:F$;K3:Rۂ O7O7BE:(,:F$;O7:MA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ:  pause PLAATS UW FLOPPIES copy c:*.* a: del a:c4.bat copy c:*.* b: del b:c4.bat copy c:*.* d: del d:c4.bat c:c4 d I7I7BE:(,:F$;I7:n K2K2BE:(,:F$;K2:5x K3K3BE:(,:F$;K3:Rۂ O7O7BE:(,:F$;O7:MA STAAT NIET OP FLOPPIE!";: "M3000S1T255L64CDEFG"J I : I:T:EN GEEF RETURN WANNEER GEREED" "t255l64s8m5000cfacfacfacfacfacfa"( )ڊ: