source: buchla-68k/orig/GEMDOS/ACCSTART.S@ 66b48e7

Last change on this file since 66b48e7 was 3ae31e9, checked in by Thomas Lopatic <thomas@…>, 7 years ago

Imported original source code.

  • Property mode set to 100755
File size: 4.5 KB
Line 
1* ACCSTART.S 4/30/85 MIKE SCHMAL
2*
3* DESK ACCESSORY STARTUP PROGRAM
4*
5* This version only contains what is necessary for a desk accessory to run
6* All other garbage has been removed as not to waste memory.
7*
8
9 .text
10 .globl _main
11 .globl _crystal
12 .globl _ctrl_cnts
13
14*
15* Must be first object file in link statement
16*
17
18 move.l #ustk,a7 * get program stack
19 jsr _main * go to program
20 move.l #0,(a7) * back to gemdos
21 trap #1
22*
23* necessary for the binds to work, everyone gets one
24*
25
26_crystal:
27 move.l 4(a7),d1
28 move.w #200,d0
29 trap #2
30 rts
31*
32*
33*
34*
35 .bss
36 .even
37retsav: .ds.l 1
38 .ds.l 256
39ustk: .ds.l 1
40*
41 .data
42 .even
43_ctrl_cnts: * Application Manager
44 .dc.b 0, 1, 0 * func 010
45 .dc.b 2, 1, 1 * func 011
46 .dc.b 2, 1, 1 * func 012
47 .dc.b 0, 1, 1 * func 013
48 .dc.b 2, 1, 1 * func 014
49 .dc.b 1, 1, 1 * func 015
50 .dc.b 0, 0, 0 * func 016
51 .dc.b 0, 0, 0 * func 017
52 .dc.b 0, 0, 0 * func 008
53 .dc.b 0, 1, 0 * func 019
54* Event Manager
55 .dc.b 0, 1, 0 * func 020
56 .dc.b 3, 5, 0 * func 021
57 .dc.b 5, 5, 0 * func 022
58 .dc.b 0, 1, 1 * func 023
59 .dc.b 2, 1, 0 * func 024
60 .dc.b 16, 7, 1 * func 025
61 .dc.b 2, 1, 0 * func 026
62 .dc.b 0, 0, 0 * func 027
63 .dc.b 0, 0, 0 * func 028
64 .dc.b 0, 0, 0 * func 009
65* Menu Manager
66 .dc.b 1, 1, 1 * func 030
67 .dc.b 2, 1, 1 * func 031
68 .dc.b 2, 1, 1 * func 032
69 .dc.b 2, 1, 1 * func 033
70 .dc.b 1, 1, 2 * func 034
71 .dc.b 1, 1, 1 * func 005
72 .dc.b 0, 0, 0 * func 006
73 .dc.b 0, 0, 0 * func 007
74 .dc.b 0, 0, 0 * func 008
75 .dc.b 0, 0, 0 * func 009
76* Object Manager
77 .dc.b 2, 1, 1 * func 040
78 .dc.b 1, 1, 1 * func 041
79 .dc.b 6, 1, 1 * func 042
80 .dc.b 4, 1, 1 * func 043
81 .dc.b 1, 3, 1 * func 044
82 .dc.b 2, 1, 1 * func 045
83 .dc.b 4, 2, 1 * func 046
84 .dc.b 8, 1, 1 * func 047
85 .dc.b 0, 0, 0 * func 048
86 .dc.b 0, 0, 0 * func 049
87* Form Manager
88 .dc.b 1, 1, 1 * func 050
89 .dc.b 9, 1, 1 * func 051
90 .dc.b 1, 1, 1 * func 002
91 .dc.b 1, 1, 0 * func 003
92 .dc.b 0, 5, 1 * func 004
93 .dc.b 0, 0, 0 * func 005
94 .dc.b 0, 0, 0 * func 006
95 .dc.b 0, 0, 0 * func 007
96 .dc.b 0, 0, 0 * func 008
97 .dc.b 0, 0, 0 * func 009
98* Dialog Manager
99 .dc.b 0, 0, 0 * func 060
100 .dc.b 0, 0, 0 * func 061
101 .dc.b 0, 0, 0 * func 062
102 .dc.b 0, 0, 0 * func 003
103 .dc.b 0, 0, 0 * func 004
104 .dc.b 0, 0, 0 * func 005
105 .dc.b 0, 0, 0 * func 006
106 .dc.b 0, 0, 0 * func 007
107 .dc.b 0, 0, 0 * func 008
108 .dc.b 0, 0, 0 * func 009
109* Graphics Manager
110 .dc.b 4, 3, 0 * func 070
111 .dc.b 8, 3, 0 * func 071
112 .dc.b 6, 1, 0 * func 072
113 .dc.b 8, 1, 0 * func 073
114 .dc.b 8, 1, 0 * func 074
115 .dc.b 4, 1, 1 * func 075
116 .dc.b 3, 1, 1 * func 076
117 .dc.b 0, 5, 0 * func 077
118 .dc.b 1, 1, 1 * func 078
119 .dc.b 0, 5, 0 * func 009
120* Scrap Manager
121 .dc.b 0, 1, 1 * func 080
122 .dc.b 0, 1, 1 * func 081
123 .dc.b 0, 0, 0 * func 082
124 .dc.b 0, 0, 0 * func 083
125 .dc.b 0, 0, 0 * func 084
126 .dc.b 0, 0, 0 * func 005
127 .dc.b 0, 0, 0 * func 006
128 .dc.b 0, 0, 0 * func 007
129 .dc.b 0, 0, 0 * func 008
130 .dc.b 0, 0, 0 * func 009
131* fseler Manager
132 .dc.b 0, 2, 2 * func 090
133 .dc.b 0, 0, 0 * func 091
134 .dc.b 0, 0, 0 * func 092
135 .dc.b 0, 0, 0 * func 003
136 .dc.b 0, 0, 0 * func 004
137 .dc.b 0, 0, 0 * func 005
138 .dc.b 0, 0, 0 * func 006
139 .dc.b 0, 0, 0 * func 007
140 .dc.b 0, 0, 0 * func 008
141 .dc.b 0, 0, 0 * func 009
142* Window Manager
143 .dc.b 5, 1, 0 * func 100
144 .dc.b 5, 1, 0 * func 101
145 .dc.b 1, 1, 0 * func 102
146 .dc.b 1, 1, 0 * func 103
147 .dc.b 2, 5, 0 * func 104
148 .dc.b 6, 1, 0 * func 105
149 .dc.b 2, 1, 0 * func 106
150 .dc.b 1, 1, 0 * func 107
151 .dc.b 6, 5, 0 * func 108
152 .dc.b 0, 0, 0 * func 009
153* Resource Manger
154 .dc.b 0, 1, 1 * func 110
155 .dc.b 0, 1, 0 * func 111
156 .dc.b 2, 1, 0 * func 112
157 .dc.b 2, 1, 1 * func 113
158 .dc.b 1, 1, 1 * func 114
159 .dc.b 0, 0, 0 * func 115
160 .dc.b 0, 0, 0 * func 006
161 .dc.b 0, 0, 0 * func 007
162 .dc.b 0, 0, 0 * func 008
163 .dc.b 0, 0, 0 * func 009
164* Shell Manager
165 .dc.b 0, 1, 2 * func 120
166 .dc.b 3, 1, 2 * func 121
167 .dc.b 1, 1, 1 * func 122
168 .dc.b 1, 1, 1 * func 123
169 .dc.b 0, 1, 1 * func 124
170 .dc.b 0, 1, 2 * func 125
171 .end
Note: See TracBrowser for help on using the repository browser.