/ 8bitfiles.net/archives / archives.tar / archives / commodore-scene-files / Geos / GEOS128 / GeosD81 / cs15.d81 / iNIT

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 2e 53 54 41 52 54 20 24 | 35 30 30 30 20 3b 20 53 |.START $|5000 ; S|
|00000010| 74 61 72 74 20 61 64 64 | 72 65 73 73 20 69 6e 20 |tart add|ress in |
|00000020| 6d 65 6d 6f 72 79 20 66 | 6f 72 20 6c 6f 61 64 69 |memory f|or loadi|
|00000030| 6e 67 20 70 72 6f 67 72 | 61 6d 2e 00 3b 00 2e 49 |ng progr|am..;..I|
|00000040| 4e 49 54 20 43 6f 64 65 | 48 65 72 65 20 3b 20 49 |NIT Code|Here ; I|
|00000050| 6e 69 74 69 61 6c 69 7a | 61 74 69 6f 6e 20 72 6f |nitializ|ation ro|
|00000060| 75 74 69 6e 65 20 74 6f | 20 63 61 6c 6c 20 61 66 |utine to| call af|
|00000070| 74 65 72 20 6c 6f 61 64 | 69 6e 67 2e 00 3b 00 2e |ter load|ing..;..|
|00000080| 54 59 50 45 20 44 45 53 | 4b 5f 41 43 43 20 3b 20 |TYPE DES|K_ACC ; |
|00000090| 54 79 70 65 20 6f 66 20 | 50 72 6f 67 72 61 6d 2c |Type of |Program,|
|000000a0| 20 73 65 65 20 5a 65 72 | 6f 50 61 67 65 20 45 71 | see Zer|oPage Eq|
|000000b0| 75 61 74 65 73 20 66 6f | 72 20 64 65 74 61 69 6c |uates fo|r detail|
|000000c0| 73 2e 00 3b 00 2e 4e 41 | 4d 45 20 67 65 6f 48 65 |s..;..NA|ME geoHe|
|000000d0| 78 43 61 6c 63 20 20 56 | 31 2e 30 20 20 3b 20 50 |xCalc  V|1.0  ; P|
|000000e0| 65 72 6d 61 6e 65 6e 74 | 20 4e 61 6d 65 20 6f 66 |ermanent| Name of|
|000000f0| 20 70 72 6f 67 72 61 6d | 00 3b 00 2e 41 75 74 68 | program|.;..Auth|
|00000100| 6f 72 20 42 69 6c 6c 20 | 53 68 61 72 70 20 3b 20 |or Bill |Sharp ; |
|00000110| 41 75 74 68 6f 72 73 20 | 6e 61 6d 65 00 3b 00 3b |Authors |name.;.;|
|00000120| 20 49 63 6f 6e 20 64 61 | 74 61 20 54 61 62 6c 65 | Icon da|ta Table|
|00000130| 2c 20 74 68 69 73 20 69 | 73 20 6f 70 74 69 6f 6e |, this i|s option|
|00000140| 61 6c 00 3b 20 75 73 65 | 20 63 61 6e 20 75 73 65 |al.; use| can use|
|00000150| 20 74 68 65 20 69 63 6f | 6e 20 65 64 69 74 6f 72 | the ico|n editor|
|00000160| 28 44 65 73 6b 50 61 63 | 6b 31 29 20 74 6f 20 63 |(DeskPac|k1) to c|
|00000170| 68 61 6e 67 65 20 74 68 | 65 00 3b 20 69 63 6f 6e |hange th|e.; icon|
|00000180| 20 6c 61 74 65 72 20 69 | 66 20 79 6f 75 20 77 69 | later i|f you wi|
|00000190| 73 68 00 3b 00 2e 49 63 | 6f 6e 20 24 46 46 2c 24 |sh.;..Ic|on $FF,$|
|000001a0| 46 46 2c 24 46 46 2c 24 | 38 30 2c 30 2c 31 2c 24 |FF,$FF,$|80,0,1,$|
|000001b0| 38 46 2c 24 46 46 2c 24 | 46 39 2c 24 38 30 2c 30 |8F,$FF,$|F9,$80,0|
|000001c0| 00 20 31 2c 24 38 37 2c | 24 37 37 2c 24 37 31 2c |. 1,$87,|$77,$71,|
|000001d0| 24 38 35 2c 24 35 35 2c | 24 35 31 2c 24 38 37 2c |$85,$55,|$51,$87,|
|000001e0| 24 37 37 2c 24 37 31 2c | 24 38 30 2c 30 2c 31 2c |$77,$71,|$80,0,1,|
|000001f0| 24 38 37 2c 24 37 37 2c | 24 37 31 00 20 24 38 35 |$87,$77,|$71. $85|
|00000200| 2c 24 35 35 2c 24 35 31 | 2c 24 38 37 2c 24 37 37 |,$55,$51|,$87,$77|
|00000210| 2c 24 37 31 2c 24 38 30 | 2c 30 2c 31 2c 24 38 37 |,$71,$80|,0,1,$87|
|00000220| 2c 24 37 37 2c 24 37 31 | 2c 24 38 35 2c 24 35 35 |,$77,$71|,$85,$55|
|00000230| 2c 24 35 31 2c 24 38 37 | 00 20 24 37 37 2c 24 37 |,$51,$87|. $77,$7|
|00000240| 31 2c 24 38 30 2c 30 2c | 31 2c 24 38 37 2c 24 37 |1,$80,0,|1,$87,$7|
|00000250| 37 2c 24 37 31 2c 24 38 | 35 2c 24 35 35 2c 24 35 |7,$71,$8|5,$55,$5|
|00000260| 31 2c 24 38 37 2c 24 37 | 37 2c 24 37 31 2c 24 38 |1,$87,$7|7,$71,$8|
|00000270| 30 2c 30 2c 31 2c 24 46 | 46 2c 24 46 46 2c 24 46 |0,0,1,$F|F,$FF,$F|
|00000280| 46 00 3b 20 6e 6f 77 20 | 74 68 65 20 45 71 75 61 |F.; now |the Equa|
|00000290| 74 65 73 20 66 69 6c 65 | 73 00 2e 49 6e 63 6c 75 |tes file|s..Inclu|
|000002a0| 64 65 20 5a 65 72 6f 50 | 61 67 65 00 2e 49 6e 63 |de ZeroP|age..Inc|
|000002b0| 6c 75 64 65 20 52 6f 75 | 74 69 6e 65 73 00 2e 42 |lude Rou|tines..B|
|000002c0| 79 74 65 20 27 43 6f 70 | 79 72 69 67 68 74 20 31 |yte 'Cop|yright 1|
|000002d0| 39 38 37 20 27 00 2e 42 | 79 74 65 20 27 62 79 20 |987 '..B|yte 'by |
|000002e0| 27 20 20 00 2e 42 79 74 | 65 20 27 42 69 6c 6c 20 |'  ..Byt|e 'Bill |
|000002f0| 53 68 61 72 70 20 43 6f | 6d 70 75 74 69 6e 67 20 |Sharp Co|mputing |
|00000300| 27 00 2e 42 79 74 65 20 | 27 41 6c 6c 20 52 69 67 |'..Byte |'All Rig|
|00000310| 68 74 73 20 52 65 73 65 | 72 76 65 64 20 27 00 2e |hts Rese|rved '..|
|00000320| 42 79 74 65 20 27 53 70 | 65 63 69 61 6c 20 74 68 |Byte 'Sp|ecial th|
|00000330| 61 6e 6b 73 20 74 6f 20 | 50 61 6d 65 6c 61 20 50 |anks to |Pamela P|
|00000340| 61 72 64 75 65 2c 20 6d | 79 20 70 61 72 65 6e 74 |ardue, m|y parent|
|00000350| 73 2c 20 61 6e 64 20 47 | 6f 64 2e 27 00 3b 20 54 |s, and G|od.'.; T|
|00000360| 68 69 73 20 69 73 20 77 | 68 65 72 65 20 74 68 65 |his is w|here the|
|00000370| 20 70 72 6f 67 72 61 6d | 20 73 74 61 72 74 73 00 | program| starts.|
|00000380| 43 6f 64 65 48 65 72 65 | 00 2e 49 6e 63 6c 75 64 |CodeHere|..Includ|
|00000390| 65 20 4d 61 69 6e 00 2e | 49 6e 63 6c 75 64 65 20 |e Main..|Include |
|000003a0| 55 54 49 4c 49 54 59 00 | 2e 49 6e 63 6c 75 64 65 |UTILITY.|.Include|
|000003b0| 20 41 53 43 49 49 00 2e | 49 6e 63 6c 75 64 65 20 | ASCII..|Include |
|000003c0| 4d 41 54 48 00 2e 49 6e | 63 6c 75 64 65 20 44 49 |MATH..In|clude DI|
|000003d0| 53 50 4c 41 59 00 45 6e | 64 63 6f 64 65 20 3b 20 |SPLAY.En|dcode ; |
|000003e0| 4c 61 62 65 6c 20 69 73 | 20 75 73 65 64 20 66 6f |Label is| used fo|
|000003f0| 72 20 72 65 66 65 72 65 | 6e 63 65 20 6f 66 20 68 |r refere|nce of h|
|00000400| 69 67 68 65 73 74 20 6d | 65 6d 6f 72 79 20 6c 6f |ighest m|emory lo|
|00000410| 61 63 61 74 69 6f 6e 00 | 65                      |acation.|e       |
+--------+-------------------------+-------------------------+--------+--------+