ONT 83 TAX V1.Z
FILE INFORMATION
FILENAME(S): ONT 83 TAX V1.Z
FILE TYPE(S): PRG
FILE SIZE: 7.5K
FIRST SEEN: 2025-11-30 21:07:09
APPEARS ON: 1 disk(s)
FILE HASH
b031f6c4adff3d0e2f09500123350a61a7f1a53071191be4e7262868c38270cf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG FEB 84 C | ONT 83 TAX V1.Z | PRG | DuncanTwain | 5 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 04 26 08 03 00 8F 20 20 2A 2A 2A 2A 2A 2A 2A |..&.... *******|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 00 4B 08 04 00 8F 20 20 2A 2A |******.K.... **|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 70 08 05 00 |***********.p...|
00000050: 8F 20 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. *************|
00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000070: 00 94 08 1E 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...... *********|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000090: 2A 2A 2A 2A 00 B8 08 28 00 8F 20 2A 2A 2A 2A 2A |****...(.. *****|
000000A0: 52 41 4C 50 48 20 47 52 55 4E 49 45 52 20 20 20 |RALPH GRUNIER |
000000B0: 20 20 20 2A 2A 2A 2A 2A 00 DC 08 32 00 8F 20 2A | *****...2.. *|
000000C0: 2A 2A 2A 2A 34 39 32 20 52 4F 53 45 4C 41 57 4E |****492 ROSELAWN|
000000D0: 20 41 56 45 4E 55 45 2A 2A 2A 2A 2A 00 00 09 3C | AVENUE*****...<|
000000E0: 00 8F 20 2A 2A 2A 2A 2A 54 4F 52 4F 4E 54 4F 2C |.. *****TORONTO,|
000000F0: 20 4F 4E 54 41 52 49 4F 20 20 20 2A 2A 2A 2A 2A | ONTARIO *****|
00000100: 00 24 09 46 00 8F 20 2A 2A 2A 2A 2A 4D 35 4E 20 |.$.F.. *****M5N |
00000110: 31 4A 38 20 20 20 20 20 20 20 20 20 20 20 20 2A |1J8 *|
00000120: 2A 2A 2A 2A 00 48 09 50 00 8F 20 2A 2A 2A 2A 2A |****.H.P.. *****|
00000130: 34 38 39 2D 36 38 36 30 20 20 20 20 20 20 20 20 |489-6860 |
00000140: 20 20 20 2A 2A 2A 2A 2A 00 6C 09 5A 00 8F 20 2A | *****.l.Z.. *|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 90 09 5B |************...[|
00000170: 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.. *************|
00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000190: 00 B4 09 5C 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |...\.. *********|
000001A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001B0: 2A 2A 2A 2A 00 D8 09 5D 00 8F 20 2A 2A 2A 2A 2A |****...].. *****|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001D0: 2A 2A 2A 2A 2A 2A 2A 2A 00 01 0A 64 00 86 43 28 |********...d..C(|
000001E0: 35 29 2C 46 28 35 29 2C 44 28 31 34 29 3A 8F 20 |5),F(5),D(14):. |
000001F0: 56 31 2E 30 20 44 45 43 20 38 2F 38 33 4C 49 53 |V1.0 DEC 8/83LIS|
00000200: 54 00 38 0A 6E 00 97 33 32 37 36 38 2C 30 3A 53 |T.8.n..32768,0:S|
00000210: 24 B2 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |$." |
00000220: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000230: 20 20 20 20 20 20 20 22 00 61 0A 78 00 99 22 93 | ".a.x..".|
00000240: 11 12 4F 4E 54 41 52 49 4F 20 31 39 38 33 20 49 |..ONTARIO 1983 I|
00000250: 4E 43 4F 4D 45 20 54 41 58 20 52 45 54 55 52 4E |NCOME TAX RETURN|
00000260: 22 00 8D 0A 79 00 99 22 4F 52 49 47 49 4E 41 4C |"...y.."ORIGINAL|
00000270: 4C 59 20 57 52 49 54 54 45 4E 20 42 59 20 4A 2E |LY WRITTEN BY J.|
00000280: 20 42 55 54 54 45 52 46 49 45 4C 44 22 00 B2 0A | BUTTERFIELD"...|
00000290: 7A 00 99 22 4D 4F 44 49 46 49 45 44 20 41 4E 44 |z.."MODIFIED AND|
000002A0: 20 55 50 44 41 54 45 44 20 46 4F 52 20 31 39 38 | UPDATED FOR 198|
000002B0: 33 22 00 D2 0A 7B 00 99 22 42 59 20 52 41 4C 50 |3"...{.."BY RALP|
000002C0: 48 20 47 52 55 4E 49 45 52 2C 20 54 4F 52 4F 4E |H GRUNIER, TORON|
000002D0: 54 4F 00 F1 0A 82 00 81 4A B2 34 30 A4 39 30 3A |TO......J.40.90:|
000002E0: 8B C2 28 4A AA 33 32 37 36 38 29 B2 33 32 A7 82 |..(J.32768).32..|
000002F0: 4A 00 F9 0A 8C 00 4C B2 4A 00 1F 0B 96 00 85 22 |J.....L.J......"|
00000300: 11 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 3B 5A |.INSTRUCTIONS";Z|
00000310: 24 3A 8B C6 28 5A 24 29 B2 37 38 89 32 33 30 00 |$:..(Z$).78.230.|
00000320: 43 0B A0 00 99 22 11 4F 4E 54 41 52 49 4F 20 49 |C....".ONTARIO I|
00000330: 4E 43 4F 4D 45 20 54 41 58 20 46 4F 52 20 31 39 |NCOME TAX FOR 19|
00000340: 38 33 22 00 6E 0B AA 00 99 22 11 54 48 49 53 20 |83".n....".THIS |
00000350: 50 52 4F 47 52 41 4D 20 49 53 20 49 4E 20 54 48 |PROGRAM IS IN TH|
00000360: 45 20 53 41 4D 45 20 46 4F 52 4D 41 54 22 00 9A |E SAME FORMAT"..|
00000370: 0B AB 00 99 22 41 53 20 41 20 53 54 41 4E 44 41 |...."AS A STANDA|
00000380: 52 44 20 31 39 38 33 20 49 4E 43 4F 4D 45 20 54 |RD 1983 INCOME T|
00000390: 41 58 20 52 45 54 55 52 4E 22 00 C5 0B AC 00 99 |AX RETURN"......|
000003A0: 22 41 4E 44 20 57 49 4C 4C 20 43 41 4C 43 55 4C |"AND WILL CALCUL|
000003B0: 41 54 45 20 59 4F 55 52 20 31 39 38 33 20 54 41 |ATE YOUR 1983 TA|
000003C0: 58 45 53 2E 22 00 CB 0B AD 00 99 00 F1 0B AE 00 |XES."...........|
000003D0: 99 22 54 48 49 53 20 50 52 4F 47 52 41 4D 20 12 |."THIS PROGRAM .|
000003E0: 57 49 4C 4C 20 4E 4F 54 20 50 45 52 46 4F 52 4D |WILL NOT PERFORM|
000003F0: 22 00 20 0C AF 00 99 22 43 41 4C 43 55 4C 41 54 |". ...."CALCULAT|
00000400: 49 4F 4E 53 20 53 55 43 48 20 41 53 20 54 48 45 |IONS SUCH AS THE|
00000410: 20 32 30 25 20 4C 49 4D 49 54 41 54 49 4F 4E 22 | 20% LIMITATION"|
00000420: 00 49 0C B0 00 99 22 46 4F 52 20 43 48 41 52 49 |.I...."FOR CHARI|
00000430: 54 41 42 4C 45 20 44 4F 4E 41 54 49 4F 4E 53 2C |TABLE DONATIONS,|
00000440: 54 48 45 20 53 55 42 2D 22 00 77 0C B1 00 99 22 |THE SUB-".w...."|
00000450: 43 41 4C 43 55 4C 41 54 49 4F 4E 20 46 4F 52 20 |CALCULATION FOR |
00000460: 54 48 45 20 4D 41 52 52 49 45 44 20 45 58 45 4D |THE MARRIED EXEM|
00000470: 50 54 49 4F 4E 2C 22 00 A7 0C B2 00 99 22 4F 52 |PTION,"......"OR|
00000480: 20 49 4D 50 4F 53 45 20 4C 49 4D 49 54 41 54 49 | IMPOSE LIMITATI|
00000490: 4F 4E 53 20 4F 4E 20 4F 54 48 45 52 44 45 44 55 |ONS ON OTHERDEDU|
000004A0: 43 54 49 4F 4E 53 22 00 D7 0C B3 00 99 22 49 4E |CTIONS"......"IN|
000004B0: 20 43 41 53 45 53 20 53 55 43 48 20 41 53 20 50 | CASES SUCH AS P|
000004C0: 45 4E 53 49 4F 4E 53 2C 20 43 50 50 2C 20 55 49 |ENSIONS, CPP, UI|
000004D0: 43 2C 20 45 54 43 22 00 06 0D B4 00 99 22 49 54 |C, ETC"......"IT|
000004E0: 20 57 4F 55 4C 44 20 42 45 20 41 44 56 49 53 41 | WOULD BE ADVISA|
000004F0: 42 4C 45 20 54 4F 20 48 41 56 45 20 41 56 41 49 |BLE TO HAVE AVAI|
00000500: 4C 41 42 4C 45 22 00 29 0D B5 00 99 22 54 48 45 |LABLE".)...."THE|
00000510: 20 12 31 39 38 33 20 47 45 4E 45 52 41 4C 20 54 | .1983 GENERAL T|
00000520: 41 58 20 47 55 49 44 45 22 00 58 0D BE 00 99 22 |AX GUIDE".X...."|
00000530: 11 46 4F 52 20 27 4E 49 4C 27 20 49 54 45 4D 53 |.FOR 'NIL' ITEMS|
00000540: 2C 20 4A 55 53 54 20 50 52 45 53 53 20 12 20 52 |, JUST PRESS . R|
00000550: 45 54 55 52 4E 20 2E 22 00 85 0D C8 00 99 22 11 |ETURN ."......".|
00000560: 46 4F 52 20 27 4D 55 4C 54 49 50 4C 45 27 20 45 |FOR 'MULTIPLE' E|
00000570: 4E 54 52 49 45 53 2C 20 45 4E 54 45 52 20 41 4D |NTRIES, ENTER AM|
00000580: 4F 55 4E 54 22 00 B5 0D D2 00 99 22 41 4E 44 20 |OUNT"......"AND |
00000590: 50 52 45 53 53 20 12 20 2B 20 22 3A 99 22 49 4E |PRESS . + ":."IN|
000005A0: 53 54 45 41 44 20 4F 46 20 27 52 45 54 55 52 4E |STEAD OF 'RETURN|
000005B0: 27 20 54 4F 22 00 D8 0D DC 00 99 22 53 49 47 4E |' TO"......"SIGN|
000005C0: 41 4C 20 4D 4F 52 45 20 49 54 45 4D 53 20 54 4F |AL MORE ITEMS TO|
000005D0: 20 43 4F 4D 45 2E 11 22 00 04 0E E6 00 85 22 50 | COME.."......"P|
000005E0: 52 49 4E 54 45 52 28 59 2F 4E 29 22 3B 5A 24 3A |RINTER(Y/N)";Z$:|
000005F0: 8B C6 28 5A 24 29 B2 38 39 A7 9F 32 2C 34 3A 50 |..(Z$).89..2,4:P|
00000600: 35 B2 AB 31 00 1E 0E F0 00 96 A5 53 28 4D 29 B2 |5..1.......S(M).|
00000610: 28 4D AA 53 AB B6 28 4D AB 53 29 29 AD 32 00 38 |(M.S..(M.S)).2.8|
00000620: 0E FA 00 96 A5 42 28 4D 29 B2 28 4D AA 42 AA B6 |.....B(M).(M.B..|
00000630: 28 4D AB 42 29 29 AD 32 00 52 0E 04 01 96 A5 50 |(M.B)).2.R.....P|
00000640: 28 4D 29 B2 B5 28 4D AC 50 AD 31 30 30 AA 2E 34 |(M)..(M.P.100..4|
00000650: 39 29 00 69 0E 0E 01 96 A5 49 28 4D 29 B2 B5 28 |9).i.....I(M)..(|
00000660: 4D AC 31 30 30 AA 2E 35 29 00 73 0E 18 01 8D 32 |M.100..5).s....2|
00000670: 30 30 30 00 82 0E 22 01 50 31 B2 31 3A 8D 32 35 |000...".P1.1:.25|
00000680: 30 30 00 A8 0E 2C 01 49 24 B2 22 49 4E 43 4F 4D |00...,.I$."INCOM|
00000690: 45 20 46 52 4F 4D 20 45 4D 50 4C 4F 59 4D 45 4E |E FROM EMPLOYMEN|
000006A0: 54 22 3A 8D 32 37 30 30 00 E9 0E 36 01 50 B2 32 |T":.2700...6.P.2|
000006B0: 30 3A 53 B2 35 45 34 3A 8D 32 32 30 30 3A 49 B2 |0:S.5E4:.2200:I.|
000006C0: A5 53 28 A5 50 28 49 29 29 3A 49 24 B2 22 4C 45 |.S(.P(I)):I$."LE|
000006D0: 53 53 20 45 4D 50 4C 4F 59 4D 54 20 45 58 50 45 |SS EMPLOYMT EXPE|
000006E0: 4E 53 22 3A 8D 32 33 30 30 00 0E 0F 40 01 49 24 |NS":.2300...@.I$|
000006F0: B2 22 20 2A 2A 4E 45 54 20 45 4D 50 20 45 41 52 |." **NET EMP EAR|
00000700: 4E 49 4E 47 53 2A 2A 22 3A 8D 32 34 30 30 00 34 |NINGS**":.2400.4|
00000710: 0F 41 01 44 28 33 29 B2 49 3A 49 24 B2 22 4F 4C |.A.D(3).I:I$."OL|
00000720: 44 20 41 47 45 20 50 45 4E 53 49 4F 4E 22 3A 8D |D AGE PENSION":.|
00000730: 32 38 30 30 00 59 0F 42 01 44 28 34 29 B2 49 3A |2800.Y.B.D(4).I:|
00000740: 49 24 B2 22 43 41 4E 41 44 41 20 50 45 4E 53 49 |I$."CANADA PENSI|
00000750: 4F 4E 22 3A 8D 32 38 30 30 00 7E 0F 43 01 44 28 |ON":.2800.~.C.D(|
00000760: 35 29 B2 49 3A 49 24 B2 22 4F 54 48 45 52 20 50 |5).I:I$."OTHER P|
00000770: 45 4E 53 49 4F 4E 53 22 3A 8D 32 38 30 30 00 A5 |ENSIONS":.2800..|
00000780: 0F 44 01 44 28 35 29 B2 49 3A 49 24 B2 22 46 41 |.D.D(5).I:I$."FA|
00000790: 4D 49 4C 59 20 41 4C 4C 4F 57 41 4E 43 45 22 3A |MILY ALLOWANCE":|
000007A0: 8D 32 38 30 30 00 D1 0F 45 01 44 28 36 29 B2 49 |.2800...E.D(6).I|
000007B0: 3A 49 24 B2 22 55 49 43 20 42 45 4E 45 46 49 54 |:I$."UIC BENEFIT|
000007C0: 53 20 52 45 43 45 49 56 45 44 22 3A 8D 32 38 30 |S RECEIVED":.280|
000007D0: 30 00 FB 0F 46 01 44 28 37 29 B2 49 3A 49 24 B2 |0...F.D(7).I:I$.|
000007E0: 22 52 45 4E 54 41 4C 20 49 4E 43 4F 4D 45 28 4C |"RENTAL INCOME(L|
000007F0: 4F 53 53 29 22 3A 8D 32 38 30 30 00 27 10 47 01 |OSS)":.2800.'.G.|
00000800: 44 28 38 29 B2 49 3A 49 24 B2 22 53 45 4C 46 20 |D(8).I:I$."SELF |
00000810: 45 4D 50 20 49 4E 43 28 4C 4F 53 53 29 3A 47 4F |EMP INC(LOSS):GO|
00000820: 53 55 42 32 38 30 30 00 47 10 4A 01 49 24 B2 22 |SUB2800.G.J.I$."|
00000830: 54 41 58 41 42 4C 45 20 43 44 4E 20 44 49 56 53 |TAXABLE CDN DIVS|
00000840: 22 3A 8D 32 38 30 30 00 71 10 54 01 44 28 30 29 |":.2800.q.T.D(0)|
00000850: B2 49 3A 49 24 B2 22 49 4E 54 45 52 45 53 54 20 |.I:I$."INTEREST |
00000860: 26 20 49 4E 56 20 49 4E 43 4D 22 3A 8D 32 38 30 |& INV INCM":.280|
00000870: 30 00 9F 10 5E 01 44 28 31 29 B2 49 3A 49 24 B2 |0...^.D(1).I:I$.|
00000880: 22 54 41 58 20 43 41 50 49 54 41 4C 20 47 41 49 |"TAX CAPITAL GAI|
00000890: 4E 53 20 28 41 43 4C 29 22 3A 8D 32 38 30 30 00 |NS (ACL)":.2800.|
000008A0: D5 10 68 01 42 B2 30 3A 44 28 34 29 B2 A5 42 28 |..h.B.0:D(4)..B(|
000008B0: 49 29 3A 49 24 B2 22 41 4C 4C 20 4F 54 48 45 52 |I):I$."ALL OTHER|
000008C0: 20 49 4E 43 4F 4D 45 20 28 4C 4F 53 53 29 22 3A | INCOME (LOSS)":|
000008D0: 8D 32 38 30 30 00 F5 10 72 01 49 24 B2 22 2A 2A |.2800...r.I$."**|
000008E0: 54 4F 54 41 4C 20 49 4E 43 4F 4D 45 2A 2A 22 3A |TOTAL INCOME**":|
000008F0: 8D 32 34 30 30 00 11 11 7C 01 44 28 32 29 B2 49 |.2400...|.D(2).I|
00000900: 3A 50 31 B2 32 3A 8D 32 35 30 30 3A 8D 33 33 30 |:P1.2:.2500:.330|
00000910: 30 00 44 11 86 01 99 22 4C 45 53 53 3A 22 3A 8D |0.D...."LESS:":.|
00000920: 32 32 30 30 3A 49 24 B2 22 43 50 50 20 28 4D 41 |2200:I$."CPP (MA|
00000930: 58 49 4D 55 4D 20 33 30 30 2E 36 30 29 22 3A 8D |XIMUM 300.60)":.|
00000940: 32 37 30 30 00 68 11 90 01 49 24 B2 22 55 49 43 |2700.h...I$."UIC|
00000950: 20 28 4D 41 58 49 4D 55 4D 20 34 36 30 2E 34 36 | (MAXIMUM 460.46|
00000960: 29 22 3A 8D 32 38 30 30 00 7E 11 91 01 49 24 B2 |)":.2800.~...I$.|
00000970: 22 52 2E 50 2E 50 2E 22 3A 8D 32 38 30 30 00 96 |"R.P.P.":.2800..|
00000980: 11 92 01 49 24 B2 22 52 2E 52 2E 53 2E 50 2E 22 |...I$."R.R.S.P."|
00000990: 3A 8D 32 38 30 30 00 B0 11 93 01 49 24 B2 22 52 |:.2800.....I$."R|
000009A0: 2E 48 2E 4F 2E 53 2E 50 2E 22 3A 8D 32 38 30 30 |.H.O.S.P.":.2800|
000009B0: 00 CA 11 94 01 49 24 B2 22 55 4E 49 4F 4E 2F 50 |.....I$."UNION/P|
000009C0: 52 4F 46 22 3A 8D 32 38 30 30 00 EB 11 95 01 49 |ROF":.2800.....I|
000009D0: 24 B2 22 54 55 49 54 49 4F 4E 28 3E 24 31 30 30 |$."TUITION(>$100|
000009E0: 29 3A 47 4F 53 55 42 32 38 30 30 00 05 12 96 01 |):GOSUB2800.....|
000009F0: 49 24 B2 22 43 48 49 4C 44 20 43 41 52 45 22 3A |I$."CHILD CARE":|
00000A00: 8D 32 38 30 30 00 1D 12 97 01 49 24 B2 22 41 2E |.2800.....I$."A.|
00000A10: 42 2E 49 2E 4C 2E 22 3A 8D 32 38 30 30 00 3D 12 |B.I.L.":.2800.=.|
00000A20: 9A 01 49 24 B2 22 4F 54 48 45 52 20 44 45 44 55 |..I$."OTHER DEDU|
00000A30: 43 54 49 4F 4E 53 22 3A 8D 32 38 30 30 00 62 12 |CTIONS":.2800.b.|
00000A40: A4 01 49 24 B2 22 20 2A 54 4F 54 41 4C 20 44 45 |..I$." *TOTAL DE|
00000A50: 44 55 43 54 49 4F 4E 53 2A 20 3A 22 3A 8D 32 34 |DUCTIONS* :":.24|
00000A60: 30 30 00 8D 12 AE 01 49 B2 43 28 43 29 3A 49 24 |00.....I.C(C):I$|
00000A70: B2 22 20 2A 4E 45 54 20 49 4E 43 4F 4D 45 2A 22 |." *NET INCOME*"|
00000A80: 3A 44 28 33 29 B2 49 3A 8D 33 33 30 30 00 A7 12 |:D(3).I:.3300...|
00000A90: B8 01 99 22 12 45 58 45 4D 50 54 49 4F 4E 53 3A |...".EXEMPTIONS:|
00000AA0: 22 3A 8D 32 32 30 30 00 CE 12 C2 01 49 B2 33 37 |":.2200.....I.37|
00000AB0: 37 45 33 3A 49 24 B2 22 42 41 53 49 43 20 45 58 |7E3:I$."BASIC EX|
00000AC0: 45 4D 50 54 49 4F 4E 22 3A 8D 33 31 30 30 00 EF |EMPTION":.3100..|
00000AD0: 12 CC 01 49 24 B2 22 41 47 45 20 45 58 45 4D 50 |...I$."AGE EXEMP|
00000AE0: 54 28 24 32 33 36 30 29 22 3A 8D 32 38 30 30 00 |T($2360)":.2800.|
00000AF0: 0D 13 CD 01 49 24 B2 22 4D 41 52 52 49 45 44 20 |....I$."MARRIED |
00000B00: 45 58 45 4D 50 54 22 3A 8D 32 38 30 30 00 46 13 |EXEMPT":.2800.F.|
00000B10: D6 01 49 24 B2 22 44 45 50 4E 44 54 20 43 48 49 |..I$."DEPNDT CHI|
00000B20: 4C 44 20 45 58 4D 50 54 22 3A 8D 32 38 30 30 3A |LD EXMPT":.2800:|
00000B30: 49 24 B2 22 4F 54 48 45 52 20 45 58 4D 50 54 22 |I$."OTHER EXMPT"|
00000B40: 3A 8D 32 38 30 30 00 6D 13 E0 01 49 24 B2 22 20 |:.2800.m...I$." |
00000B50: 2A 54 4F 54 41 4C 20 45 58 45 4D 50 54 2A 22 3A |*TOTAL EXEMPT*":|
00000B60: 8D 32 34 30 30 3A 44 28 31 32 29 B2 49 00 89 13 |.2400:D(12).I...|
00000B70: EA 01 49 24 B2 22 20 2A 2A 4C 49 4E 45 20 34 36 |..I$." **LINE 46|
00000B80: 2A 2A 22 3A 8D 33 30 30 30 00 B5 13 F4 01 8D 32 |**":.3000......2|
00000B90: 32 30 30 3A 8D 32 31 30 30 3A 49 24 B2 22 4D 45 |200:.2100:I$."ME|
00000BA0: 44 49 43 41 4C 20 45 58 50 45 4E 53 45 53 22 3A |DICAL EXPENSES":|
00000BB0: 8D 32 37 30 30 00 C2 13 FE 01 8B 49 B2 30 89 35 |.2700......I.0.5|
00000BC0: 34 30 00 F4 13 08 02 8D 32 32 30 30 3A 50 B2 33 |40......2200:P.3|
00000BD0: 3A 49 B2 A5 50 28 44 28 33 29 29 3A 49 24 B2 22 |:I..P(D(3)):I$."|
00000BE0: 2A 4C 45 53 53 20 33 25 20 4E 2E 49 2E 22 3A 8D |*LESS 3% N.I.":.|
00000BF0: 32 33 30 30 00 15 14 12 02 49 24 B2 22 41 4C 4C |2300.....I$."ALL|
00000C00: 4F 57 41 42 4C 45 20 4D 45 44 20 45 58 50 22 3A |OWABLE MED EXP":|
00000C10: 8D 33 30 30 30 00 3E 14 1C 02 49 24 B2 22 43 48 |.3000.>...I$."CH|
00000C20: 41 52 49 54 41 42 4C 45 20 44 4F 4E 41 54 4E 53 |ARITABLE DONATNS|
00000C30: 22 3A 8D 32 38 30 30 3A 49 B2 43 28 43 29 00 75 |":.2800:I.C(C).u|
00000C40: 14 26 02 43 B2 43 AB 31 3A 42 B2 31 45 34 3A 49 |.&.C.C.1:B.1E4:I|
00000C50: B2 A5 42 28 49 29 3A 49 24 B2 22 2A 2A 53 54 41 |..B(I):I$."**STA|
00000C60: 4E 44 41 52 44 20 44 45 44 43 54 4E 2A 2A 22 3A |NDARD DEDCTN**":|
00000C70: 8D 33 31 30 30 00 9C 14 30 02 53 B2 31 45 35 3A |.3100...0.S.1E5:|
00000C80: 49 B2 A5 53 28 44 28 30 29 AA 44 28 31 29 AA 44 |I..S(D(0).D(1).D|
00000C90: 28 34 29 29 3A 44 28 31 30 29 B2 49 00 C5 14 3A |(4)):D(10).I...:|
00000CA0: 02 8B 49 B1 30 A7 49 24 B2 22 2A 49 2C 20 44 20 |..I.0.I$."*I, D |
00000CB0: 26 20 43 47 20 44 45 44 55 43 54 49 4F 4E 22 3A |& CG DEDUCTION":|
00000CC0: 8D 33 32 30 30 00 E6 14 3B 02 49 24 B2 22 50 45 |.3200...;.I$."PE|
00000CD0: 4E 53 49 4F 4E 20 44 45 44 55 43 54 49 4F 4E 22 |NSION DEDUCTION"|
00000CE0: 3A 8D 32 38 30 30 00 0A 15 3C 02 49 24 B2 22 44 |:.2800...<.I$."D|
00000CF0: 49 53 41 42 49 4C 49 54 59 20 44 45 44 55 43 54 |ISABILITY DEDUCT|
00000D00: 49 4F 4E 22 3A 8D 32 38 30 30 00 2D 15 3D 02 49 |ION":.2800.-.=.I|
00000D10: 24 B2 22 45 44 55 43 41 54 49 4F 4E 20 28 24 35 |$."EDUCATION ($5|
00000D20: 30 2F 4D 54 48 29 22 3A 8D 32 38 30 30 00 53 15 |0/MTH)":.2800.S.|
00000D30: 3E 02 49 24 B2 22 44 45 44 55 43 54 49 4F 4E 53 |>.I$."DEDUCTIONS|
00000D40: 20 46 52 4F 4D 20 53 50 4F 55 53 45 22 3A 8D 32 | FROM SPOUSE":.2|
00000D50: 38 30 30 00 75 15 3F 02 49 24 B2 22 4E 4F 4E 2D |800.u.?.I$."NON-|
00000D60: 43 4C 20 4F 54 48 45 52 20 59 45 41 52 53 22 3A |CL OTHER YEARS":|
00000D70: 8D 32 38 30 30 00 97 15 40 02 49 24 B2 22 4E 45 |.2800...@.I$."NE|
00000D80: 54 2D 43 4C 20 4F 54 48 45 52 20 59 45 41 52 53 |T-CL OTHER YEARS|
00000D90: 22 3A 8D 32 38 30 30 00 BB 15 44 02 49 24 B2 22 |":.2800...D.I$."|
00000DA0: 41 4C 4C 20 4F 54 48 45 52 20 44 45 44 55 43 54 |ALL OTHER DEDUCT|
00000DB0: 49 4F 4E 53 22 3A 8D 32 38 30 30 00 DD 15 4E 02 |IONS":.2800...N.|
00000DC0: 49 24 B2 22 2A 2A 54 4F 54 41 4C 20 44 45 44 55 |I$."**TOTAL DEDU|
00000DD0: 43 54 49 4F 4E 53 22 3A 8D 32 34 30 30 00 0D 16 |CTIONS":.2400...|
00000DE0: 58 02 49 24 B2 22 20 2A 2A 54 41 58 41 42 4C 45 |X.I$." **TAXABLE|
00000DF0: 20 49 4E 43 4F 4D 45 2A 2A 22 3A 8D 33 30 30 30 | INCOME**":.3000|
00000E00: 3A 44 28 35 29 B2 49 3A 8D 33 35 30 30 00 43 16 |:D(5).I:.3500.C.|
00000E10: 62 02 8B 49 B3 B2 33 30 45 35 AF 44 28 30 29 B2 |b..I..30E5.D(0).|
00000E20: 30 A7 99 22 59 4F 55 20 4D 41 59 20 55 53 45 20 |0.."YOU MAY USE |
00000E30: 54 41 58 20 54 41 42 4C 45 20 2E 2E 20 4F 52 2E |TAX TABLE .. OR.|
00000E40: 2E 2E 22 00 52 16 6C 02 50 31 B2 31 3A 8D 32 36 |..".R.l.P1.1:.26|
00000E50: 30 30 00 66 16 94 02 83 35 36 35 39 32 2C 31 34 |00.f....56592,14|
00000E60: 30 33 30 2C 33 34 00 79 16 9E 02 83 33 33 30 31 |030,34.y....3301|
00000E70: 32 2C 36 39 35 36 2C 33 30 00 8C 16 A8 02 83 32 |2,6956,30......2|
00000E80: 31 32 32 32 2C 34 30 30 39 2C 32 35 00 9F 16 B2 |1222,4009,25....|
00000E90: 02 83 31 36 35 30 36 2C 32 39 32 34 2C 32 33 00 |..16506,2924,23.|
00000EA0: B2 16 BC 02 83 31 31 37 39 30 2C 31 39 38 31 2C |.....11790,1981,|
00000EB0: 32 30 00 C4 16 C6 02 83 37 30 37 34 2C 31 30 38 |20......7074,108|
00000EC0: 35 2C 31 39 00 D5 16 D0 02 83 34 37 31 36 2C 36 |5,19......4716,6|
00000ED0: 36 30 2C 31 38 00 E6 16 DA 02 83 32 33 35 38 2C |60,18......2358,|
00000EE0: 32 35 39 2C 31 37 00 F6 16 E4 02 83 31 31 37 39 |259,17......1179|
00000EF0: 2C 37 31 2C 31 36 00 01 17 EE 02 83 30 2C 30 2C |,71,16......0,0,|
00000F00: 36 00 09 17 F8 02 83 2D 31 00 21 17 02 03 87 58 |6......-1.!....X|
00000F10: 2C 59 2C 50 3A 8B 49 B3 58 AC 31 30 30 89 37 37 |,Y,P:.I.X.100.77|
00000F20: 30 00 5D 17 0C 03 54 B2 59 AC 31 30 30 3A 50 24 |0.]...T.Y.100:P$|
00000F30: B2 22 4F 4E 20 46 49 52 53 54 20 24 22 AA C4 28 |."ON FIRST $"..(|
00000F40: 58 29 AA 22 20 54 41 58 20 49 53 20 20 20 20 20 |X)." TAX IS |
00000F50: 20 22 AA C4 28 59 29 3A 8D 33 34 30 30 00 73 17 | "..(Y):.3400.s.|
00000F60: 16 03 4A B2 49 AB 58 AC 31 30 30 3A 49 B2 A5 50 |..J.I.X.100:I..P|
00000F70: 28 4A 29 00 AF 17 20 03 50 24 B2 22 4F 4E 20 52 |(J)... .P$."ON R|
00000F80: 4D 47 20 24 22 AA C4 28 4A AD 31 30 30 29 AA 22 |MG $"..(J.100)."|
00000F90: 20 54 41 58 20 41 54 22 AA C4 28 50 29 AA 22 25 | TAX AT"..(P)."%|
00000FA0: 20 49 53 20 24 22 AA C4 28 49 AD 31 30 30 29 00 | IS $"..(I.100).|
00000FB0: B9 17 2A 03 8D 33 34 30 30 00 ED 17 34 03 49 B2 |..*..3400...4.I.|
00000FC0: 49 AA 54 3A 8D 32 30 30 30 3A 43 B2 43 AB 31 3A |I.T:.2000:C.C.1:|
00000FD0: 49 24 B2 22 54 4F 54 41 4C 20 46 45 44 20 49 4E |I$."TOTAL FED IN|
00000FE0: 43 4D 20 54 41 58 22 3A 8D 33 31 30 30 00 13 18 |CM TAX":.3100...|
00000FF0: 3E 03 53 B2 49 3A 50 B2 36 38 AD 33 3A 49 B2 A5 |>.S.I:P.68.3:I..|
00001000: 53 28 A5 50 28 44 28 30 29 29 29 3A 44 28 31 31 |S(.P(D(0))):D(11|
00001010: 29 B2 49 00 3C 18 48 03 8B 49 B1 30 A7 8D 32 32 |).I.<.H..I.0..22|
00001020: 30 30 3A 49 24 B2 22 44 49 56 20 54 41 58 20 43 |00:I$."DIV TAX C|
00001030: 52 45 44 49 54 22 3A 8D 32 33 30 30 00 74 18 52 |REDIT":.2300.t.R|
00001040: 03 49 24 B2 22 20 2A 42 41 53 49 43 20 46 45 44 |.I$." *BASIC FED|
00001050: 45 52 41 4C 20 54 41 58 2A 22 3A 49 B2 43 28 43 |ERAL TAX*":I.C(C|
00001060: 29 3A 8D 33 33 30 30 3A 8D 33 35 30 30 3A 44 28 |):.3300:.3500:D(|
00001070: 36 29 B2 49 00 85 18 5C 03 8B 49 B1 32 45 34 A7 |6).I...\..I.2E4.|
00001080: 49 B2 32 45 34 00 AD 18 66 03 8D 32 32 30 30 3A |I.2E4...f..2200:|
00001090: 49 24 B2 22 52 45 44 55 43 54 49 4F 4E 20 46 4F |I$."REDUCTION FO|
000010A0: 52 20 53 45 4C 46 22 3A 8D 33 32 30 30 00 E2 18 |R SELF":.3200...|
000010B0: 70 03 49 24 B2 22 52 45 44 55 43 54 49 4F 4E 20 |p.I$."REDUCTION |
000010C0: 46 4F 52 20 53 50 4F 55 53 45 22 3A 8D 32 38 30 |FOR SPOUSE":.280|
000010D0: 30 3A 53 B2 34 45 34 3A 49 B2 A5 53 28 43 28 43 |0:S.4E4:I..S(C(C|
000010E0: 29 29 00 07 19 7A 03 49 24 B2 22 46 45 44 45 52 |))...z.I$."FEDER|
000010F0: 41 4C 20 54 41 58 20 52 45 44 55 43 54 49 4F 4E |AL TAX REDUCTION|
00001100: 22 3A 8D 32 33 30 30 00 2E 19 84 03 49 24 B2 22 |":.2300.....I$."|
00001110: 20 2A 2A 46 45 44 45 52 41 4C 20 54 41 58 2A 2A | **FEDERAL TAX**|
00001120: 22 3A 8D 33 30 30 30 3A 44 28 37 29 B2 49 00 5D |":.3000:D(7).I.]|
00001130: 19 8E 03 8D 32 32 30 30 3A 49 24 B2 22 46 4F 52 |....2200:I$."FOR|
00001140: 45 49 47 4E 20 54 41 58 20 50 41 49 44 22 3A 8D |EIGN TAX PAID":.|
00001150: 32 38 30 30 3A 8B 49 B2 30 89 39 37 30 00 A7 19 |2800:.I.0.970...|
00001160: 98 03 57 B2 49 3A 49 24 B2 22 46 4F 52 47 4E 20 |..W.I:I$."FORGN |
00001170: 49 4E 43 4F 4D 45 22 3A 8D 32 38 30 30 3A 4B B2 |INCOME":.2800:K.|
00001180: 49 3A 58 B2 28 44 28 33 29 AB 44 28 31 30 29 29 |I:X.(D(3).D(10))|
00001190: AD 31 30 30 3A 59 B2 28 44 28 37 29 AA 44 28 31 |.100:Y.(D(7).D(1|
000011A0: 31 29 29 AD 31 30 30 00 B9 19 A2 03 53 B2 B5 28 |1)).100.....S..(|
000011B0: 4B AD 58 AC 59 AA 2E 35 29 00 EF 19 AC 03 50 24 |K.X.Y..5).....P$|
000011C0: B2 C4 28 4B AD 31 30 30 29 AA 22 2F 22 AA C4 28 |..(K.100)."/"..(|
000011D0: 58 29 AA 22 2A 22 AA C4 28 59 29 AA 22 20 3D 22 |X)."*"..(Y)." ="|
000011E0: AA C4 28 53 AD 31 30 30 29 3A 8D 33 34 30 30 00 |..(S.100):.3400.|
000011F0: 10 1A B6 03 49 B2 A5 53 28 57 29 3A 49 24 B2 22 |....I..S(W):I$."|
00001200: 2D 2D 44 45 44 55 43 54 3A 22 3A 8D 32 33 30 30 |--DEDUCT:":.2300|
00001210: 00 31 1A C0 03 99 22 2E 2E 41 4E 4F 54 48 45 52 |.1...."..ANOTHER|
00001220: 20 43 4F 55 4E 54 52 59 2E 2E 2E 22 3A 89 39 31 | COUNTRY...":.91|
00001230: 30 00 67 1A CA 03 43 B2 43 AB 31 3A 49 24 B2 22 |0.g...C.C.1:I$."|
00001240: 46 45 44 45 52 41 4C 20 54 41 58 20 50 41 59 41 |FEDERAL TAX PAYA|
00001250: 42 4C 45 22 3A 8D 32 34 30 30 3A 44 28 38 29 B2 |BLE":.2400:D(8).|
00001260: 49 3A 8D 33 35 30 30 00 7D 1A D4 03 50 B2 34 39 |I:.3500.}...P.49|
00001270: 2E 32 3A 49 B2 A5 50 28 44 28 36 29 29 00 9F 1A |.2:I..P(D(6))...|
00001280: DE 03 49 24 B2 22 4F 4E 54 41 52 49 4F 20 54 41 |..I$."ONTARIO TA|
00001290: 58 22 3A 8D 33 33 30 30 3A 44 28 39 29 B2 49 00 |X":.3300:D(9).I.|
000012A0: C2 1A E8 03 42 B2 30 3A 50 B2 35 30 3A 49 B2 A5 |....B.0:P.50:I..|
000012B0: 50 28 A5 42 28 32 31 33 36 45 32 AB 44 28 35 29 |P(.B(2136E2.D(5)|
000012C0: 29 29 00 DB 1A F2 03 8B 44 28 35 29 B3 B2 31 39 |))......D(5)..19|
000012D0: 34 34 45 32 A7 49 B2 44 28 39 29 00 FC 1A FC 03 |44E2.I.D(9).....|
000012E0: 49 24 B2 22 4F 4E 54 20 54 41 58 20 52 45 44 55 |I$."ONT TAX REDU|
000012F0: 43 54 49 4F 4E 22 3A 8D 33 33 30 30 00 2E 1B 06 |CTION":.3300....|
00001300: 04 44 28 39 29 B2 44 28 39 29 AB 49 3A 49 B2 44 |.D(9).D(9).I:I.D|
00001310: 28 39 29 3A 49 24 B2 22 4F 4E 54 20 54 41 58 20 |(9):I$."ONT TAX |
00001320: 50 41 59 41 42 4C 45 22 3A 8D 33 33 30 30 00 41 |PAYABLE":.3300.A|
00001330: 1B 10 04 87 58 3A 8B 58 B3 B1 AB 31 89 31 30 34 |....X:.X...1.104|
00001340: 30 00 78 1B 1A 04 50 24 B2 22 20 3D 3D 4F 4E 54 |0.x...P$." ==ONT|
00001350: 41 52 49 4F 20 50 52 4F 50 45 52 54 59 20 26 20 |ARIO PROPERTY & |
00001360: 53 41 4C 45 53 20 54 41 58 3D 3D 22 3A 8D 33 34 |SALES TAX==":.34|
00001370: 30 30 3A 8D 32 30 30 30 00 BB 1B 24 04 85 22 41 |00:.2000...$.."A|
00001380: 52 45 20 59 4F 55 20 45 4C 49 47 49 42 4C 45 20 |RE YOU ELIGIBLE |
00001390: 46 4F 52 20 54 48 45 53 45 20 43 52 45 44 49 54 |FOR THESE CREDIT|
000013A0: 53 20 20 59 9D 9D 9D 22 3B 5A 24 3A 8B C6 28 5A |S Y...";Z$:..(Z|
000013B0: 24 29 B3 B1 38 39 89 31 32 32 30 00 EF 1B 2E 04 |$)..89.1220.....|
000013C0: 49 24 B2 22 54 4F 54 41 4C 20 52 45 4E 54 20 50 |I$."TOTAL RENT P|
000013D0: 41 59 4D 45 4E 54 53 22 3A 8D 32 37 30 30 3A 8B |AYMENTS":.2700:.|
000013E0: 49 B2 30 A7 43 B2 43 AB 31 3A 89 31 30 39 30 00 |I.0.C.C.1:.1090.|
000013F0: 18 1C 38 04 50 B2 32 30 3A 49 B2 A5 50 28 49 29 |..8.P.20:I..P(I)|
00001400: 3A 49 24 B2 22 2A 32 30 25 20 4F 46 20 52 45 4E |:I$."*20% OF REN|
00001410: 54 22 3A 8D 32 33 30 30 00 40 1C 42 04 49 24 B2 |T":.2300.@.B.I$.|
00001420: 22 50 52 4F 50 45 52 54 59 20 54 41 58 45 53 26 |"PROPERTY TAXES&|
00001430: 43 4F 4C 4C 47 20 52 45 53 22 3A 8D 32 38 30 30 |COLLG RES":.2800|
00001440: 00 83 1C 4C 04 49 B2 43 28 43 29 3A 50 B2 31 30 |...L.I.C(C):P.10|
00001450: 3A 58 B2 A5 50 28 49 29 3A 49 24 B2 22 2A 4F 43 |:X..P(I):I$."*OC|
00001460: 43 55 50 41 4E 43 59 20 43 4F 53 54 2A 22 3A 8D |CUPANCY COST*":.|
00001470: 32 34 30 30 3A 8D 33 35 30 30 3A 43 28 43 AA 31 |2400:.3500:C(C.1|
00001480: 29 B2 30 00 8D 1C 56 04 8D 32 30 30 30 00 C7 1C |).0...V..2000...|
00001490: 60 04 53 B2 31 38 45 33 3A 49 B2 A5 53 28 49 29 |`.S.18E3:I..S(I)|
000014A0: 3A 49 24 B2 22 20 41 44 44 2E 2E 22 3A 8D 33 31 |:I$." ADD..":.31|
000014B0: 30 30 3A 49 B2 58 3A 49 24 B2 22 20 54 4F 2E 2E |00:I.X:I$." TO..|
000014C0: 22 3A 8D 33 32 30 30 00 EA 1C 6A 04 49 24 B2 22 |":.3200...j.I$."|
000014D0: 50 52 4F 50 45 52 54 59 20 54 41 58 20 43 52 45 |PROPERTY TAX CRE|
000014E0: 44 49 54 22 3A 8D 32 34 30 30 00 1A 1D 74 04 50 |DIT":.2400...t.P|
000014F0: B2 31 3A 49 B2 A5 50 28 44 28 31 32 29 29 3A 49 |.1:I..P(D(12)):I|
00001500: 24 B2 22 53 41 4C 45 53 20 54 41 58 20 43 52 45 |$."SALES TAX CRE|
00001510: 44 49 54 22 3A 8D 33 32 30 30 00 37 1D 7E 04 49 |DIT":.3200.7.~.I|
00001520: 24 B2 22 54 4F 54 41 4C 20 43 52 45 44 49 54 53 |$."TOTAL CREDITS|
00001530: 22 3A 8D 32 34 30 30 00 53 1D 88 04 44 31 B2 44 |":.2400.S...D1.D|
00001540: 28 35 29 3A 8B 44 31 B3 31 39 34 34 45 32 A7 44 |(5):.D1.1944E2.D|
00001550: 31 B2 30 00 7F 1D 92 04 8D 32 32 30 30 3A 50 B2 |1.0......2200:P.|
00001560: 32 3A 49 B2 A5 50 28 44 31 29 3A 49 24 B2 22 4C |2:I..P(D1):I$."L|
00001570: 45 53 53 28 42 29 2D 2D 22 3A 8D 32 33 30 30 00 |ESS(B)--":.2300.|
00001580: BD 1D 9C 04 42 B2 30 3A 53 B2 35 45 34 3A 49 B2 |....B.0:S.5E4:I.|
00001590: A5 53 28 A5 42 28 43 28 43 29 29 29 3A 49 24 B2 |.S(.B(C(C))):I$.|
000015A0: 22 4F 4E 54 41 52 49 4F 20 50 20 26 20 53 20 43 |"ONTARIO P & S C|
000015B0: 52 45 44 49 54 53 22 3A 8D 32 33 30 30 00 EA 1D |REDITS":.2300...|
000015C0: A6 04 8D 32 31 30 30 3A 42 B2 30 3A 50 B2 31 3A |...2100:B.0:P.1:|
000015D0: 49 B2 A5 42 28 34 45 33 AB A5 50 28 44 31 29 29 |I..B(4E3..P(D1))|
000015E0: 3A 8B 49 B2 30 89 31 32 32 30 00 24 1E B0 04 85 |:.I.0.1220.$....|
000015F0: 22 45 4C 49 47 49 42 4C 45 20 46 4F 52 20 48 4F |"ELIGIBLE FOR HO|
00001600: 4D 45 20 48 45 41 54 49 4E 47 20 43 52 45 44 49 |ME HEATING CREDI|
00001610: 54 22 3B 5A 24 3A 8B C6 28 5A 24 29 B2 37 38 89 |T";Z$:..(Z$).78.|
00001620: 31 32 32 30 00 4D 1E BA 04 49 24 B2 22 2E 2E 43 |1220.M...I$."..C|
00001630: 52 45 44 49 54 3D 22 3A 8D 33 32 30 30 3A 43 28 |REDIT=":.3200:C(|
00001640: 43 AB 31 29 B2 43 28 43 AB 31 29 AA 49 00 75 1E |C.1).C(C.1).I.u.|
00001650: C4 04 49 24 B2 22 4F 4E 54 20 50 4F 4C 49 54 49 |..I$."ONT POLITI|
00001660: 43 41 4C 20 54 41 58 20 43 52 45 44 49 54 22 3A |CAL TAX CREDIT":|
00001670: 8D 32 37 30 30 00 AE 1E CE 04 49 24 B2 22 2A 54 |.2700.....I$."*T|
00001680: 4F 54 41 4C 20 4F 4E 54 20 54 41 58 20 43 52 45 |OTAL ONT TAX CRE|
00001690: 44 49 54 53 22 3A 49 B2 43 28 43 AB 31 29 AA 49 |DITS":I.C(C.1).I|
000016A0: 3A 44 28 31 33 29 B2 49 3A 8D 32 33 30 30 00 B8 |:D(13).I:.2300..|
000016B0: 1E D8 04 8D 32 30 30 30 00 F3 1E E2 04 50 31 B2 |....2000.....P1.|
000016C0: 34 3A 8D 32 35 30 30 3A 8D 32 30 30 30 3A 49 B2 |4:.2500:.2000:I.|
000016D0: 44 28 38 29 3A 49 24 B2 22 46 45 44 45 52 41 4C |D(8):I$."FEDERAL|
000016E0: 20 54 41 58 20 50 41 59 41 42 4C 45 22 3A 8D 32 | TAX PAYABLE":.2|
000016F0: 33 30 30 00 28 1F EC 04 49 24 B2 22 50 4F 4C 49 |300.(...I$."POLI|
00001700: 54 2F 42 55 53 2F 45 4D 50 4C 4D 54 20 43 52 45 |T/BUS/EMPLMT CRE|
00001710: 44 49 54 22 3A 8D 32 38 30 30 3A 58 B2 44 28 38 |DIT":.2800:X.D(8|
00001720: 29 AA 44 28 39 29 AB 49 00 58 1F F6 04 43 B2 43 |).D(9).I.X...C.C|
00001730: AB 31 3A 49 24 B2 22 4F 4E 54 41 52 49 4F 20 54 |.1:I$."ONTARIO T|
00001740: 41 58 20 50 41 59 41 42 4C 45 22 3A 49 B2 44 28 |AX PAYABLE":I.D(|
00001750: 39 29 3A 8D 33 33 30 30 00 85 1F 00 05 43 B2 43 |9):.3300.....C.C|
00001760: AB 31 3A 49 24 B2 22 54 4F 54 41 4C 20 50 41 59 |.1:I$."TOTAL PAY|
00001770: 41 42 4C 45 22 3A 49 B2 58 3A 8D 33 33 30 30 3A |ABLE":I.X:.3300:|
00001780: 8D 33 35 30 30 00 B1 1F 0A 05 8D 32 32 30 30 3A |.3500......2200:|
00001790: 49 24 B2 22 54 41 58 20 44 45 44 55 43 54 45 44 |I$."TAX DEDUCTED|
000017A0: 20 50 45 52 20 53 4C 49 50 53 22 3A 8D 32 37 30 | PER SLIPS":.270|
000017B0: 30 00 DC 1F 14 05 49 24 B2 22 4F 4E 54 41 52 49 |0.....I$."ONTARI|
000017C0: 4F 20 54 41 58 20 43 52 45 44 49 54 53 22 3A 49 |O TAX CREDITS":I|
000017D0: B2 44 28 31 33 29 3A 8D 33 32 30 30 00 04 20 1E |.D(13):.3200.. .|
000017E0: 05 49 24 B2 22 4F 56 45 52 50 41 59 4D 45 4E 54 |.I$."OVERPAYMENT|
000017F0: 53 2F 49 4E 53 54 41 4C 4D 45 4E 54 53 22 3A 8D |S/INSTALMENTS":.|
00001800: 32 38 30 30 00 24 20 28 05 49 24 B2 22 43 48 49 |2800.$ (.I$."CHI|
00001810: 4C 44 20 54 41 58 20 43 52 45 44 49 54 22 3A 8D |LD TAX CREDIT":.|
00001820: 32 38 30 30 00 56 20 32 05 49 B2 43 28 43 29 3A |2800.V 2.I.C(C):|
00001830: 43 B2 33 3A 49 24 B2 22 2A 2A 54 4F 54 41 4C 20 |C.3:I$."**TOTAL |
00001840: 43 52 45 44 49 54 53 2A 2A 22 3A 8D 33 33 30 30 |CREDITS**":.3300|
00001850: 3A 8D 33 35 30 30 00 8E 20 3C 05 43 B2 32 3A 49 |:.3500.. <.C.2:I|
00001860: 24 B2 22 42 41 4C 41 4E 43 45 20 44 55 45 22 3A |$."BALANCE DUE":|
00001870: 49 B2 58 AB 49 3A 8B 49 B3 30 A7 49 24 B2 22 52 |I.X.I:.I.0.I$."R|
00001880: 45 46 55 4E 44 3A 22 3A 49 B2 B6 28 49 29 00 AF |EFUND:":I..(I)..|
00001890: 20 46 05 8D 33 33 30 30 3A 99 3A 8B 50 35 A7 81 | F..3300:.:.P5..|
000018A0: 4A B2 31 A4 31 30 3A 98 32 3A 82 4A 3A A0 32 00 |J.1.10:.2:.J:.2.|
000018B0: B5 20 50 05 80 00 CC 20 CF 07 8F 20 43 4C 45 41 |. P.... ... CLEA|
000018C0: 52 20 41 4C 4C 20 41 43 43 55 4D 53 00 E7 20 D0 |R ALL ACCUMS.. .|
000018D0: 07 43 B2 31 3A 43 28 31 29 B2 30 3A 8D 32 31 30 |.C.1:C(1).0:.210|
000018E0: 30 3A 8D 32 31 30 30 00 FE 20 33 08 8F 20 4D 4F |0:.2100.. 3.. MO|
000018F0: 56 45 20 54 4F 20 53 55 42 54 4F 54 41 4C 00 18 |VE TO SUBTOTAL..|
00001900: 21 34 08 43 B2 43 AA 31 3A 46 28 43 29 B2 31 3A |!4.C.C.1:F(C).1:|
00001910: 43 28 43 29 B2 30 3A 8E 00 33 21 97 08 8F 20 4D |C(C).0:..3!... M|
00001920: 4F 56 45 20 54 4F 20 4E 45 47 20 53 55 42 54 4F |OVE TO NEG SUBTO|
00001930: 54 41 4C 00 4E 21 98 08 43 B2 43 AA 31 3A 46 28 |TAL.N!..C.C.1:F(|
00001940: 43 29 B2 AB 31 3A 43 28 43 29 B2 30 3A 8E 00 71 |C)..1:C(C).0:..q|
00001950: 21 FB 08 8F 20 53 55 4D 20 49 20 49 4E 54 4F 20 |!... SUM I INTO |
00001960: 4E 45 58 54 20 48 49 47 48 45 52 20 54 4F 54 41 |NEXT HIGHER TOTA|
00001970: 4C 00 7C 21 FC 08 43 28 43 29 B2 49 00 A0 21 5F |L.|!..C(C).I..!_|
00001980: 09 8F 20 53 55 4D 20 43 28 43 29 20 49 4E 54 4F |.. SUM C(C) INTO|
00001990: 20 4E 45 58 54 20 48 49 47 48 45 52 20 54 4F 54 | NEXT HIGHER TOT|
000019A0: 00 CC 21 60 09 49 B2 43 28 43 29 3A 46 B2 46 28 |..!`.I.C(C):F.F(|
000019B0: 43 29 3A 43 B2 43 AB 31 3A 43 28 43 29 B2 43 28 |C):C.C.1:C(C).C(|
000019C0: 43 29 AA 49 AC 46 3A 89 33 33 30 30 00 E0 21 C3 |C).I.F:.3300..!.|
000019D0: 09 8F 20 50 52 49 4E 54 20 50 41 47 45 20 49 44 |.. PRINT PAGE ID|
000019E0: 00 FA 21 C4 09 50 24 B2 22 20 20 20 3D 3D 3D 50 |..!..P$." ===P|
000019F0: 41 47 45 22 3A 89 32 36 31 30 00 0F 22 27 0A 8F |AGE":.2610.."'..|
00001A00: 20 50 52 49 4E 54 20 53 43 48 45 44 20 49 44 00 | PRINT SCHED ID.|
00001A10: 27 22 28 0A 50 24 B2 22 20 20 20 3D 3D 3D 53 43 |'"(.P$." ===SC|
00001A20: 48 45 44 55 4C 45 22 00 50 22 32 0A 8D 33 37 30 |HEDULE".P"2..370|
00001A30: 30 3A 50 24 B2 C4 28 50 31 29 AA 22 20 4F 46 20 |0:P$..(P1)." OF |
00001A40: 52 45 54 55 52 4E 3D 3D 3D 22 3A 89 33 34 30 30 |RETURN===":.3400|
00001A50: 00 67 22 8B 0A 8F 20 50 52 4F 4D 50 54 20 4E 45 |.g"... PROMPT NE|
00001A60: 57 20 56 41 4C 55 45 00 72 22 8C 0A 43 28 43 29 |W VALUE.r"..C(C)|
00001A70: B2 30 00 85 22 EF 0A 8F 20 50 52 4F 4D 50 54 20 |.0.."... PROMPT |
00001A80: 49 4E 50 55 54 00 9B 22 F0 0A 49 B2 30 3A A1 5A |INPUT.."..I.0:.Z|
00001A90: 24 3A 99 49 24 3B 22 3F 20 22 3B 00 AC 22 FA 0A |$:.I$;"? ";.."..|
00001AA0: 59 24 B2 22 22 3A 99 22 A6 9D 22 3B 00 C0 22 04 |Y$."":."..";..".|
00001AB0: 0B A1 5A 24 3A 8B 5A 24 B2 22 22 89 32 38 32 30 |..Z$:.Z$."".2820|
00001AC0: 00 DC 22 0E 0B 5A B2 C6 28 5A 24 29 3A 8B 5A B1 |.."..Z..(Z$):.Z.|
00001AD0: 34 37 AF 5A B3 35 38 89 32 39 31 30 00 F3 22 18 |47.Z.58.2910..".|
00001AE0: 0B 8B 5A 24 B2 22 2D 22 AF 59 24 B2 22 22 89 32 |..Z$."-".Y$."".2|
00001AF0: 39 31 30 00 04 23 22 0B 8B 5A 24 B2 22 2E 22 89 |910..#"..Z$.".".|
00001B00: 32 39 31 30 00 3B 23 2C 0B 8B 28 5A B2 31 35 37 |2910.;#,..(Z.157|
00001B10: B0 5A B2 32 30 29 AF 59 24 B3 B1 22 22 A7 59 24 |.Z.20).Y$.."".Y$|
00001B20: B2 C8 28 59 24 2C C3 28 59 24 29 AB 31 29 3A 99 |..(Y$,.(Y$).1):.|
00001B30: 22 9D 20 22 3B 3A 89 32 39 32 30 00 71 23 36 0B |". ";:.2920.q#6.|
00001B40: 8B 5A 24 B2 22 2B 22 A7 99 22 20 11 22 3B 3A 49 |.Z$."+".." .";:I|
00001B50: B2 49 AA C5 28 59 24 29 3A 81 4A B2 30 A4 C3 28 |.I..(Y$):.J.0..(|
00001B60: 59 24 29 3A 99 22 9D 22 3B 3A 82 3A 89 32 38 31 |Y$):.".";:.:.281|
00001B70: 30 00 85 23 40 0B 8B 5A B2 31 33 AF 49 B2 30 A7 |0..#@..Z.13.I.0.|
00001B80: 99 22 91 22 3B 00 A5 23 4A 0B 8B 5A B2 31 33 A7 |.".";..#J..Z.13.|
00001B90: 49 B2 A5 49 28 49 AA C5 28 59 24 29 29 3A 99 3A |I..I(I..(Y$)):.:|
00001BA0: 89 33 32 30 30 00 AF 23 54 0B 89 32 38 32 30 00 |.3200..#T..2820.|
00001BB0: BC 23 5E 0B 59 24 B2 59 24 AA 5A 24 00 CB 23 68 |.#^.Y$.Y$.Z$..#h|
00001BC0: 0B 99 5A 24 3B 3A 89 32 38 32 30 00 E4 23 B7 0B |..Z$;:.2820..#..|
00001BD0: 8F 20 46 4F 52 43 45 20 4E 4F 4E 20 4E 45 47 41 |. FORCE NON NEGA|
00001BE0: 54 49 56 45 00 F7 23 B8 0B 42 B2 30 3A 49 B2 A5 |TIVE..#..B.0:I..|
00001BF0: 42 28 43 28 43 29 29 00 0C 24 1B 0C 8F 20 53 45 |B(C(C))..$... SE|
00001C00: 54 20 56 41 4C 55 45 20 54 4F 20 49 00 17 24 1C |T VALUE TO I..$.|
00001C10: 0C 43 28 43 29 B2 30 00 27 24 7F 0C 8F 20 41 44 |.C(C).0.'$... AD|
00001C20: 44 20 56 41 4C 55 45 00 37 24 80 0C 43 28 43 29 |D VALUE.7$..C(C)|
00001C30: B2 43 28 43 29 AA 49 00 4D 24 E3 0C 8F 20 50 52 |.C(C).I.M$... PR|
00001C40: 49 4E 54 20 49 24 2C 20 56 41 4C 55 45 00 69 24 |INT I$, VALUE.i$|
00001C50: E4 0C 50 24 B2 49 24 3A 8D 33 37 30 30 3A 4D B2 |..P$.I$:.3700:M.|
00001C60: 31 45 38 3A 8D 33 36 30 30 00 7F 24 EE 0C 4A B2 |1E8:.3600..$..J.|
00001C70: B6 28 49 29 3A 5A 24 B2 22 20 22 3A 5A B2 30 00 |.(I):Z$." ":Z.0.|
00001C80: A6 24 F8 0C 44 B2 B5 28 4A AD 4D 29 3A 4A B2 4A |.$..D..(J.M):J.J|
00001C90: AB 44 AC 4D 3A 8B 44 B2 5A A7 50 24 B2 22 20 22 |.D.M:.D.Z.P$." "|
00001CA0: 3A 89 33 33 34 30 00 C1 24 02 0D 5A 24 B2 22 2C |:.3340..$..Z$.",|
00001CB0: 22 3A 5A B2 31 30 3A 50 24 B2 C7 28 44 AA 34 38 |":Z.10:P$..(D.48|
00001CC0: 29 00 E5 24 0C 0D 8D 33 37 30 30 3A 4D B2 4D AD |)..$...3700:M.M.|
00001CD0: 31 30 3A 8B 4D B2 31 45 34 A7 50 24 B2 5A 24 3A |10:.M.1E4.P$.Z$:|
00001CE0: 8D 33 37 30 30 00 00 25 16 0D 8B 4D B2 31 30 A7 |.3700..%...M.10.|
00001CF0: 50 24 B2 22 2E 22 3A 8D 33 37 30 30 3A 5A B2 4D |P$.".":.3700:Z.M|
00001D00: 00 0F 25 20 0D 8B 4D B1 B2 31 89 33 33 32 30 00 |..% ..M..1.3320.|
00001D10: 26 25 2A 0D 8B 49 B3 30 A7 50 24 B2 22 43 52 22 |&%*..I.0.P$."CR"|
00001D20: 3A 8D 33 37 30 30 00 30 25 34 0D 89 33 35 30 30 |:.3700.0%4..3500|
00001D30: 00 40 25 47 0D 8F 20 50 52 45 20 50 52 49 4E 54 |.@%G.. PRE PRINT|
00001D40: 00 4A 25 48 0D 8D 33 37 30 30 00 59 25 AB 0D 8F |.J%H..3700.Y%...|
00001D50: 20 4E 45 57 20 4C 49 4E 45 00 72 25 AC 0D 50 24 | NEW LINE.r%..P$|
00001D60: B2 C7 28 31 33 29 AA C7 28 31 30 29 3A 89 33 37 |..(13)..(10):.37|
00001D70: 30 30 00 83 25 0F 0E 8F 20 43 4F 4C 55 4D 4E 20 |00..%... COLUMN |
00001D80: 54 41 42 00 9D 25 10 0E 8B 50 35 A7 98 32 2C C8 |TAB..%...P5..2,.|
00001D90: 28 53 24 2C 34 31 AB 43 AC 31 30 29 3B 00 B7 25 |(S$,41.C.10);..%|
00001DA0: 1A 0E 8B 4C B1 37 30 A7 99 C8 28 53 24 2C 34 31 |...L.70...(S$,41|
00001DB0: AB 43 AC 31 30 29 3B 00 CD 25 24 0E 50 24 B2 C8 |.C.10);..%$.P$..|
00001DC0: 28 53 24 2C 32 35 AB C3 28 49 24 29 29 00 D9 25 |(S$,25..(I$))..%|
00001DD0: 73 0E 8F 20 50 52 49 4E 54 00 E8 25 74 0E 8B 50 |s.. PRINT..%t..P|
00001DE0: 35 A7 98 32 2C 50 24 3B 00 F3 25 7E 0E 99 50 24 |5..2,P$;..%~..P$|
00001DF0: 3B 3A 8E 00 00 00 |;:.... |
..&.... *****************************.K
.... *****************************.P...
. *****************************...... *
****************************...(.. *****
RALPH GRUNIER *****...2.. *****492
ROSELAWN AVENUE*****...<.. *****TORONTO,
ONTARIO *****.$.F.. *****M5N 1J8
*****.H.P.. *****489-6860
*****.L.Z.. *************************
****...[.. *****************************
...\.. *****************************.X.]
.. *****************************...D..C(
5),F(5),D(14):. V1.0 DEC 8/83LIST.8.N..3
2768,0:S$."
".A.X.."...ONTARIO 1983 INCOME TA
X RETURN"...Y.."ORIGINALLY WRITTEN BY J.
BUTTERFIELD"...Z.."MODIFIED AND UPDATED
FOR 1983".R.{.."BY RALPH GRUNIER, TORON
TO......J.40.90:.B(J.32768).32..J.....L.
J......".INSTRUCTIONS";Z$:.F(Z$).78.230.
C. ..".ONTARIO INCOME TAX FOR 1983".N...
.".THIS PROGRAM IS IN THE SAME FORMAT"..
...."AS A STANDARD 1983 INCOME TAX RETUR
N".E...."AND WILL CALCULATE YOUR 1983 TA
XES.".K.........."THIS PROGRAM .WILL NOT
PERFORM". ...."CALCULATIONS SUCH AS THE
20% LIMITATION".I...."FOR CHARITABLE DO
NATIONS,THE SUB-".W...."CALCULATION FOR
THE MARRIED EXEMPTION,"......"OR IMPOSE
LIMITATIONS ON OTHERDEDUCTIONS".W...."IN
CASES SUCH AS PENSIONS, CPP, UIC, ETC".
....."IT WOULD BE ADVISABLE TO HAVE AVAI
LABLE".)...."THE .1983 GENERAL TAX GUIDE
".X....".FOR 'NIL' ITEMS, JUST PRESS . R
ETURN ."...H..".FOR 'MULTIPLE' ENTRIES,
ENTER AMOUNT"...R.."AND PRESS . + ":."IN
STEAD OF 'RETURN' TO".X...."SIGNAL MORE
ITEMS TO COME.."......"PRINTER(Y/N)";Z$:
.F(Z$).89..2,4:P5..1.......S(M).(M.S..(M
.S)).2.8.....B(M).(M.B..(M.B)).2.R.....P
(M)..(M.P.100..49).I.....I(M)..(M.100..5
).S....2000...".P1.1:.2500...,.I$."INCOM
E FROM EMPLOYMENT":.2700...6.P.20:S.5E4:
.2200:I..S(.P(I)):I$."LESS EMPLOYMT EXPE
NS":.2300...@.I$." **NET EMP EARNINGS**"
:.2400.4.A.D(3).I:I$."OLD AGE PENSION":.
2800.Y.B.D(4).I:I$."CANADA PENSION":.280
0.~.C.D(5).I:I$."OTHER PENSIONS":.2800..
.D.D(5).I:I$."FAMILY ALLOWANCE":.2800.Q.
E.D(6).I:I$."UIC BENEFITS RECEIVED":.280
0...F.D(7).I:I$."RENTAL INCOME(LOSS)":.2
800.'.G.D(8).I:I$."SELF EMP INC(LOSS):GO
SUB2800.G.J.I$."TAXABLE CDN DIVS":.2800.
Q.T.D(0).I:I$."INTEREST & INV INCM":.280
0...^.D(1).I:I$."TAX CAPITAL GAINS (ACL)
":.2800.U.H.B.0:D(4)..B(I):I$."ALL OTHER
INCOME (LOSS)":.2800...R.I$."**TOTAL IN
COME**":.2400...|.D(2).I:P1.2:.2500:.330
0.D...."LESS:":.2200:I$."CPP (MAXIMUM 30
0.60)":.2700.H...I$."UIC (MAXIMUM 460.46
)":.2800.~...I$."R.P.P.":.2800.....I$."R
.R.S.P.":.2800.....I$."R.H.O.S.P.":.2800
.J...I$."UNION/PROF":.2800.....I$."TUITI
ON(>$100):GOSUB2800.....I$."CHILD CARE":
.2800.....I$."A.B.I.L.":.2800.=...I$."OT
HER DEDUCTIONS":.2800.B...I$." *TOTAL DE
DUCTIONS* :":.2400.....I.C(C):I$." *NET
INCOME*":D(3).I:.3300......".EXEMPTIONS:
":.2200.N.B.I.377E3:I$."BASIC EXEMPTION"
:.3100...L.I$."AGE EXEMPT($2360)":.2800.
..M.I$."MARRIED EXEMPT":.2800.F.V.I$."DE
PNDT CHILD EXMPT":.2800:I$."OTHER EXMPT"
:.2800.M...I$." *TOTAL EXEMPT*":.2400:D(
12).I.....I$." **LINE 46**":.3000......2
200:.2100:I$."MEDICAL EXPENSES":.2700.B.
...I.0.540......2200:P.3:I..P(D(3)):I$."
*LESS 3% N.I.":.2300.....I$."ALLOWABLE M
ED EXP":.3000.>...I$."CHARITABLE DONATNS
":.2800:I.C(C).U.&.C.C.1:B.1E4:I..B(I):I
$."**STANDARD DEDCTN**":.3100...0.S.1E5:
I..S(D(0).D(1).D(4)):D(10).I.E.:..I.0.I$
."*I, D & CG DEDUCTION":.3200...;.I$."PE
NSION DEDUCTION":.2800...<.I$."DISABILIT
Y DEDUCTION":.2800.-.=.I$."EDUCATION ($5
0/MTH)":.2800.S.>.I$."DEDUCTIONS FROM SP
OUSE":.2800.U.?.I$."NON-CL OTHER YEARS":
.2800...@.I$."NET-CL OTHER YEARS":.2800.
..D.I$."ALL OTHER DEDUCTIONS":.2800...N.
I$."**TOTAL DEDUCTIONS":.2400...X.I$." *
*TAXABLE INCOME**":.3000:D(5).I:.3500.C.
B..I..30E5.D(0).0.."YOU MAY USE TAX TABL
E .. OR...".R.L.P1.1:.2600.F....56592,14
030,34.Y....33012,6956,30......21222,400
9,25......16506,2924,23......11790,1981,
20.D.F..7074,1085,19.U.P..4716,660,18...
Z..2358,259,17......1179,71,16......0,0,
6......-1.!....X,Y,P:.I.X.100.770.]...T.
Y.100:P$."ON FIRST $".D(X)." TAX IS
".D(Y):.3400.S...J.I.X.100:I..P(J)... .
P$."ON RMG $".D(J.100)." TAX AT".D(P)."%
IS $".D(I.100)...*..3400...4.I.I.T:.200
0:C.C.1:I$."TOTAL FED INCM TAX":.3100...
>.S.I:P.68.3:I..S(.P(D(0))):D(11).I.<.H.
.I.0..2200:I$."DIV TAX CREDIT":.2300.T.R
.I$." *BASIC FEDERAL TAX*":I.C(C):.3300:
.3500:D(6).I...\..I.2E4.I.2E4...F..2200:
I$."REDUCTION FOR SELF":.3200...P.I$."RE
DUCTION FOR SPOUSE":.2800:S.4E4:I..S(C(C
))...Z.I$."FEDERAL TAX REDUCTION":.2300.
....I$." **FEDERAL TAX**":.3000:D(7).I.]
....2200:I$."FOREIGN TAX PAID":.2800:.I.
0.970.....W.I:I$."FORGN INCOME":.2800:K.
I:X.(D(3).D(10)).100:Y.(D(7).D(11)).100.
....S..(K.X.Y..5).....P$.D(K.100)."/".D(
X)."*".D(Y)." =".D(S.100):.3400.....I..S
(W):I$."--DEDUCT:":.2300.1...."..ANOTHER
COUNTRY...":.910.G.J.C.C.1:I$."FEDERAL
TAX PAYABLE":.2400:D(8).I:.3500.}.T.P.49
.2:I..P(D(6)).....I$."ONTARIO TAX":.3300
:D(9).I.B...B.0:P.50:I..P(.B(2136E2.D(5)
))......D(5)..1944E2.I.D(9).....I$."ONT
TAX REDUCTION":.3300.....D(9).D(9).I:I.D
(9):I$."ONT TAX PAYABLE":.3300.A....X:.X
...1.1040.X...P$." ==ONTARIO PROPERTY &
SALES TAX==":.3400:.2000...$.."ARE YOU E
LIGIBLE FOR THESE CREDITS Y...";Z$:.F(Z
$)..89.1220.....I$."TOTAL RENT PAYMENTS"
:.2700:.I.0.C.C.1:.1090...8.P.20:I..P(I)
:I$."*20% OF RENT":.2300.@.B.I$."PROPERT
Y TAXES&COLLG RES":.2800...L.I.C(C):P.10
:X..P(I):I$."*OCCUPANCY COST*":.2400:.35
00:C(C.1).0...V..2000.G.`.S.18E3:I..S(I)
:I$." ADD..":.3100:I.X:I$." TO..":.3200.
..J.I$."PROPERTY TAX CREDIT":.2400...T.P
.1:I..P(D(12)):I$."SALES TAX CREDIT":.32
00.7.~.I$."TOTAL CREDITS":.2400.S...D1.D
(5):.D1.1944E2.D1.0.....2200:P.2:I..P(D
1):I$."LESS(B)--":.2300.....B.0:S.5E4:I.
.S(.B(C(C))):I$."ONTARIO P & S CREDITS":
.2300......2100:B.0:P.1:I..B(4E3..P(D1))
:.I.0.1220.$...."ELIGIBLE FOR HOME HEATI
NG CREDIT";Z$:.F(Z$).78.1220.M...I$."..C
REDIT=":.3200:C(C.1).C(C.1).I.U.D.I$."ON
T POLITICAL TAX CREDIT":.2700...N.I$."*T
OTAL ONT TAX CREDITS":I.C(C.1).I:D(13).I
:.2300...X..2000.....P1.4:.2500:.2000:I.
D(8):I$."FEDERAL TAX PAYABLE":.2300.(...
I$."POLIT/BUS/EMPLMT CREDIT":.2800:X.D(8
).D(9).I.X...C.C.1:I$."ONTARIO TAX PAYAB
LE":I.D(9):.3300.....C.C.1:I$."TOTAL PAY
ABLE":I.X:.3300:.3500......2200:I$."TAX
DEDUCTED PER SLIPS":.2700.....I$."ONTARI
O TAX CREDITS":I.D(13):.3200.. ..I$."OVE
RPAYMENTS/INSTALMENTS":.2800.$ (.I$."CHI
LD TAX CREDIT":.2800.V 2.I.C(C):C.3:I$."
**TOTAL CREDITS**":.3300:.3500.. <.C.2:I
$."BALANCE DUE":I.X.I:.I.0.I$."REFUND:":
I..(I).. F..3300:.:.P5..J.1.10:.2:.J: 2.
. P...L O.. CLEAR ALL ACCUMS.. P.C.1:C(1
).0:.2100:.2100.. 3.. MOVE TO SUBTOTAL..
!4.C.C.1:F(C).1:C(C).0:..3!... MOVE TO N
EG SUBTOTAL.N!..C.C.1:F(C)..1:C(C).0:..Q
!... SUM I INTO NEXT HIGHER TOTAL.|!..C(
C).I. !_.. SUM C(C) INTO NEXT HIGHER TOT
.L!`.I.C(C):F.F(C):C.C.1:C(C).C(C).I.F:.
3300..!C.. PRINT PAGE ID..!D.P$." ===P
AGE":.2610.."'.. PRINT SCHED ID.'"(.P$."
===SCHEDULE".P"2..3700:P$.D(P1)." OF
RETURN===":.3400.G"... PROMPT NEW VALUE.
R"..C(C).0.."... PROMPT INPUT.."..I.0:.Z
$:.I$;"? ";.."..Y$."":."..";.."...Z$:.Z$
."".2820.."..Z.F(Z$):.Z.47.Z.58.2910..".
..Z$."-".Y$."".2910..#"..Z$.".".2910.;#,
..(Z.157.Z.20).Y$.."".Y$.H(Y$,C(Y$).1):.
". ";:.2920.Q#6..Z$."+".." .";:I.I.E(Y$)
:.J.0.C(Y$):.".";:.:.2810..#@..Z.13.I.0.
.".";..#J..Z.13.I..I(I.E(Y$)):.:.3200..#
T..2820..#^.Y$.Y$.Z$.K#H..Z$;:.2820..#..
. FORCE NON NEGATIVE..#..B.0:I..B(C(C)).
.$... SET VALUE TO I..$..C(C).0.'$.. AD
D VALUE.7$..C(C).C(C).I.M$... PRINT I$,
VALUE.I$..P$.I$:.3700:M.1E8:.3600.$..J.
.(I):Z$." ":Z.0..$..D..(J.M):J.J.D.M:.D.
Z.P$." ":.3340.A$..Z$.",":Z.10:P$.G(D.48
)..$...3700:M.M.10:.M.1E4.P$.Z$:.3700..%
...M.10.P$.".":.3700:Z.M..% ..M..1.3320.
&%*..I.0.P$."CR":.3700.0%4..3500.@%G.. P
RE PRINT.J%H..3700.Y%... NEW LINE.R%..P$
.G(13).G(10):.3700..%... COLUMN TAB..%..
.P5..2,H(S$,41.C.10);..%...L.70..H(S$,41
.C.10);.M%$.P$.H(S$,25.C(I$)).Y%S.. PRIN
T..%T..P5..2,P$;..%~..P$;:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL