_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

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 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL