8-Bit Software Online Conversion

Tax and insurance info - Listing

10 20: 30: 40: 50REM " PROGRAM FOR 8-BIT SOFTWARE BY RUSHDEN ROY (20G) A 'L'PLATE PROGRAMER! 60*FX 229,1 70MODE7:CLS 80PRINT' 90VDU23,1,0;0;0;0; 100ENVELOPE1,1,0,0,0,0,0,0,-126,-2,0,- 1,126,80 110PROCROY 120PROCdouble(" Tax and National Insur ance Data",3,10) 130PROCdouble(" for 1992/1993",11,14) 140PRINT''" (Errors and omissions e xcepted.) For additional informati on please check with goverment o ffices." 150PROCSPACE1 160CLS 170PROCheader("MENU ") 180PRINTTAB(0,6)" TAX DATA :-" 190PRINT" 1, Income Payments." 200PRINT" 2, Income Reliefs. " 210PRINT" 3, Mortgage, Business & Equ ity Plan." 220PRINT" 4, Capital Gains Tax." 230PRINT" 5, Main Corporation Rates." 240PRINT" 6, Personal Pension Premium ." 250PRINT'" NATIONAL INSURANCE DATA :-" 260PRINT" 7, Nat.Ins.Cont.Employees/e rs." 270PRINT" 8, Nat.Ins.Cont.Self-Employ ed." 280PRINT" 9, Pensions and Widows Bene fits." 290PRINT" 10, Child and Maternity Bene fits." 300PRINT" 11, Unemployed and Sickness Benefits." 310PRINTTAB(5,23)CHR$129+CHR$157+CHR$1 31+" Press 1-11 <RETURN> "+CHR$156 +CHR$13 320REPEAT:INPUTTAB(28,23)" ? "opt:IF opt>11 SOUND1,1,180,1:GOTO 310:UNTILopt> =1ANDopt<12 330ON ERROR SOUND1,1,180,1:GOTO 310 340ONoptGOTO360,490,670,860,1020,1110, 1270,1470,1570,1690,1840 350END 360CLS 370PROCheader("INCOME TAX") 380PRINT'" 1991/92 : 1 992/93" 390PRINT" BAND OF : BA ND OF" 400PRINT" TAXABLE INCOME : TAXAB LE INCOME" 410PRINT" : £0-£2 ,000 20%" 420PRINT" £0-£23,700 25% : £2,001- £23,700 25%" 430PRINT"OVER £23,700 40% : OVER £ 23,700 40%" 440PRINT" --------------------- ---" 450PRINT'"Independent Taxation for Mar ried Couples" 460PRINT"All married couples are taxed independe-ntly, each partner receiving a single person's allowance." 470PROCSPACE1 480END 490CLS 500PROCheader("Main Income Tax Reliefs ") 510PRINT'" Personal 1991 /2 1992/3" 520PRINT" Age under 65" 530PRINT"Personnal Allowance £329 5 £3445" 540PRINT"Married Couple's Allow. £172 0 £1720" 550PRINT"Single Parent,Widows etc £172 0 £1720" 560PRINT" Age 65 - 74 *" 570PRINT"Personal Allowance £402 0 £4200" 580PRINT"Married Couple's Allow. £235 5 £2465" 590PRINT" Age 75 and over *" 600PRINT"Personal Allowance £418 0 £4370" 610PRINT"Married Couple's Allow. £239 5 £2505" 620PRINT'" * Excess relief above stand ard." 630PRINT"Personal Allowance reduced by one half" 640PRINT"of income over £135 00 £14200" 650PROCSPACE1 660END 670CLS 680PROCheader("Mort., Business & Equit y") 690PRINT'" Morgage Interest 19 91/2 1992/3" 700PRINT"Main res. allowable loan £30 000 £30000" 710PRINT"( 1 only per residence) basic rate only" 720PRINT 730PRINT" Business Expansion Scheme" 740PRINT"Max. Investment Allowable £30 000 £30000" 750PRINT" B.E.S. to cease after 31/12/ 93" 760PRINT 770PRINT" Personal Equity Plan" 780PRINT"Max. yearly investment allowa ble" 790PRINT" £90 00 £9000" 800PRINT"Including £3000 in single com pany PEP" 810PRINT 820PRINT"Max. allowed in qualifying Un it Trusts" 830PRINT"or Investment Trusts £30 00 £6000" 840PROCSPACE1 850END 860CLS 870PROCheader("Capital Gains Tax") 880PRINT'" Individuals" 890PRINT"Nil on first £5800 (£5500 in 1991/92)" 900PRINT"Income tax rate thereafter." 910PRINT"Note:-" 920PRINT"Exemption applies to each ind ividual." 930PRINT 940PRINT" Most Trusts" 950PRINT"Nil on first £2900 (£2750 in 1991/92)" 960PRINT"Income tax rate thereafter." 970PRINT 980PRINT" Companies" 990PRINT"Corporation tax rate." 1000PROCSPACE1 1010END 1020CLS 1030PROCheader("Corporation Tax Rates." ) 1040PRINT'" Year Ending 31/3/1993" 1050PRINT'" Profits Rate " 1060PRINT"Up to £250,000 25%" 1070PRINT"£250,000 - £1,250,000 35%" 1080PRINT"£1,250,000 and over 33%" 1090PROCSPACE1 1100END 1110CLS 1120PROCheader("Personal Pens. Premium. ") 1130PRINT'" Premiums with tax relief" 1140PRINT 1150PRINT" Age 1992/93 " 1160PRINT" 35 or less 17.5% o f income" 1170PRINT" 36 - 45 20%" 1180PRINT" 46 - 50 25%" 1190PRINT" 56 - 60 35%" 1200PRINT" 61 - 75 40%" 1210PRINT 1220PRINT"Life Assurance Content 5%" 1230PRINT"Based on Maximum Earnings £75 ,000" 1240PRINT'"If you pay into a personal p ension a percentage (depending on a ge) of income can be used for the p remium and tax relief may be claime d." 1250PROCSPACE1 1260END 1270CLS 1280PROCheader("Nat.Ins.Cont. EEs & ERs .") 1290PRINT'" Employees Class 1 19 92/93" 1300PRINT" Total Weekly Rate on Rate on" 1310PRINT" Earnings first £54.00 Balance" 1320PRINT" Contracted" 1330PRINT" In Out" 1340PRINT"£00.00-£53.99 Nil Nil Nil" 1350PRINT"£54.00-£405.00 2% 9% 7%" 1360PRINT"£405.00+ tot.weekly cont.£32 .67 £25.65" 1370PRINT'" Employers Class 1 " 1380PRINT"£00.00-£53.99 Nil Nil Nil" 1390PRINT"£54.00-£89.99 4.60% 4 .60% 0.80%" 1400PRINT"£90.00-££134.99 6.60% 6 .60% 2.80%" 1410PRINT"£135.00-£189.99 8.60% 8 .60% 4.80$" 1420PRINT"£190.00-£405.00 10.40% 10 .40% 6.60%" 1430PRINT"Over £405.00 10.40% 10 .40%£28.78" 1440PRINT" per week" 1450PROCSPACE1 1460END 1470CLS 1480PROCheader("Nat.Ins.Cont.Self-Emplo yed") 1490PRINT'" Class 2 Contributions :-" 1500PRINT'" £5.35 a week." 1510PRINT" (net earnings over £3,030 a year)" 1520PRINT'" Class 4 Contributions :-" 1530PRINT'" 6.3% of profits or gains b etween" 1540PRINT" £6,120 and £21,060" 1550PRINT'"Note: 50% of Class 4 Contr ibutions are allowed as a relief against taxable income." 1560PROCSPACE1 1570CLS 1580PROCheader("Pensions & Widows") 1590PRINT'" Retirement Pension" 1600PRINT" Weekly Benefits" 1610PRINT" 1991/2 1992/93" 1620PRINT"Single Person £52.00 £54.15" 1630PRINT"Married Couple £83.25 £86.70" 1640PRINT'" Widow's" 1650PRINT'"Widow's Pension (max) £52.00 £54.15" 1660PRINT"Wid. Mother's Allow. £52.00 £54.15" 1670PRINT"Wid.Payment(lump sum) £1000 £1000" 1680PROCSPACE1 1690CLS 1700PROCheader("Child and Maternity Ben .") 1710PRINT'" Weekly Benefits" 1720PRINT" 1991/2 1992/93" 1730PRINT'" Child Benefit" 1740PRINT'"First Child £ 9.25 £ 9.65" 1750PRINT"Other Children £ 7.50 £ 7.80" 1760PRINT"Child Special Allow. £10.70 £10.85" 1770PRINT'" Maternity Allowance" 1780PRINT'"Maternity Allowance £40.60 £42.25" 1790PRINT"Satutory Maternity Pay" 1800PRINT" (lower rate) £44.50 £45.30" 1810PRINT'"Mat.Payment(lump sum)£100.00 £100.00" 1820PROCSPACE1 1830END 1840CLS 1850PROCheader("Unemployed and Sickness ") 1860PRINT'" Unemployment Benefit" 1870PRINT" Weekly Benefits" 1880PRINT" 1991/2 1992/93" 1890PRINT"Single Person £41.40 £43.10" 1900PRINT"Married Couple £66.95 £69.70" 1910PRINT'" Sickness Benefit" 1920PRINT"Single Person £39.60 £41.20" 1930PRINT'" Statutory Sick Pay" 1940PRINT"Standard Rate £52.50 £52.50" 1950PRINT"Lower Rate £43.50 £45.30" 1960PROCSPACE1 1970END 1980DEFPROCROY 1990PRINT"   PROGRAM B Y ££££££££" 2000PRINT"     k 7e757£k" 2010PRINT"     s550!5u0£5" 2020PRINT"   p5u7t5upp5" 2030PRINT 2040PRINT" FOR 8-BIT SOFTWARE" 2050PRINT" 1 Oakwood Drive Heaton BOLTO N BL1 5EE"' 2060ENDPROC 2070DEFPROCheader(header$) 2080IFLEN(header$)MOD2=1THENheader$=hea der$+CHR$32 2090RO%=LEN(header$):DI%=(28-RO%)/2:hea der$=STRING$(DI%," ")+header$+STRING$(DI %-1," "):PRINT"  ,,,,,,,,,l       ,,,,,,,,,,,,,,,,." 2100ENDPROC 2110DEFPROCSPACE1 2120*FX 15,0 2130rdd$=""+CHR$129+CHR$157+CHR$131+"Pr ess SPACE for menu "+CHR$156+CHR$13 2140PRINTTAB(6,23)rdd$ 2150REPEAT:UNTIL GET=32:CLS:GOTO170 2160ENDPROC 2170DEFPROCdouble(x$,x,y) 2180PRINTTAB(x-1,y);CHR$(141);x$ 2190PRINTTAB(x-1,y+1);CHR$(141);x$ 2200ENDPROC