/[projet1]/public/atari/tools/MOULINEX/AESLIB.S
Defence Force logotype

Contents of /public/atari/tools/MOULINEX/AESLIB.S

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1389 - (show annotations)
Tue Mar 7 19:16:33 2017 UTC (2 years, 6 months ago) by dbug
File size: 3426 byte(s)
Added Moulinex, old tool to convert MOD files to LOW format and vice versa
1
2 * AES Library Copyright (C) HiSoft 1988
3 * this MUST be assembled to either executable or GST linkable, NOT DRI code
4
5 * sets section order to TEXT,DATA,BSS
6
7 * the actual calling of the AES
8
9 MODULE LowLevelAES
10
11 XDEF CALL_AES,control,global,int_in,int_out
12 XDEF addr_in,addr_out,aes_params
13
14 SECTION TEXT
15 * call an AES routine
16 * in: d0.w=AES function number
17 * out d0.w=int_out value
18 * uses d0-d2/a0-a2
19 * (assumes control4 needs to be zero)
20
21 CALL_AES lea control,a1
22 move.w d0,(a1)+ store the op code
23 sub.w #10,d0
24 mulu #3,d0
25 move.l #gem_ctrl_list,a0
26 add.w d0,a0 points to the entry
27 moveq #0,d0
28 move.b (a0)+,d0
29 move.w d0,(a1)+ do control1
30 move.b (a0)+,d0
31 move.w d0,(a1)+ and control2
32 move.b (a0)+,d0
33 move.w d0,(a1)+ and control3
34 clr.w (a1) assumes control4=0 (all except RSRC_GADDR)
35 move.l #aes_params,d1
36 move.w #200,d0 function number
37 trap #2
38 move.w int_out,d0 usually a returned value
39 rts
40
41 * this is a table of pointers to all the AES arrays
42 aes_params dc.l control,global,int_in,int_out,addr_in,addr_out
43
44 * this is the list of Control parameters for the AES calls
45 * contains control(1..3), comment is the function number
46 * (an asterisk indicates it is not defined)
47 gem_ctrl_list
48 dc.b 0,1,0 10
49 dc.b 2,1,1 11
50 dc.b 2,1,1 12
51 dc.b 0,1,1 13
52 dc.b 2,1,1 14
53 dc.b 1,1,1 15
54 dc.b 0,0,0 16*
55 dc.b 0,0,0 17*
56 dc.b 0,0,0 18*
57 dc.b 0,1,0 19
58 dc.b 0,1,0 20
59 dc.b 3,5,0 21
60 dc.b 5,5,0 22
61 dc.b 0,1,1 23
62 dc.b 2,1,0 24
63 dc.b 16,7,1 25
64 dc.b 2,1,0 26
65 dc.b 0,0,0 27*
66 dc.b 0,0,0 28*
67 dc.b 0,0,0 29*
68 dc.b 1,1,1 30
69 dc.b 2,1,1 31
70 dc.b 2,1,1 32
71 dc.b 2,1,1 33
72 dc.b 1,1,2 34
73 dc.b 1,1,1 35
74 dc.b 0,0,0 36*
75 dc.b 0,0,0 37*
76 dc.b 0,0,0 38*
77 dc.b 0,0,0 39*
78 dc.b 2,1,1 40
79 dc.b 1,1,1 41
80 dc.b 6,1,1 42
81 dc.b 4,1,1 43
82 dc.b 1,3,1 44
83 dc.b 2,1,1 45
84 dc.b 4,2,1 46
85 dc.b 8,1,1 47
86 dc.b 0,0,0 48*
87 dc.b 0,0,0 49*
88 dc.b 1,1,1 50
89 dc.b 9,1,0 51
90 dc.b 1,1,1 52
91 dc.b 1,1,0 53
92 dc.b 0,5,1 54
93 dc.b 0,0,0 55*
94 dc.b 0,0,0 56*
95 dc.b 0,0,0 57*
96 dc.b 0,0,0 58*
97 dc.b 0,0,0 59*
98 dc.b 0,0,0 60*
99 dc.b 0,0,0 61*
100 dc.b 0,0,0 62*
101 dc.b 0,0,0 63*
102 dc.b 0,0,0 64*
103 dc.b 0,0,0 65*
104 dc.b 0,0,0 66*
105 dc.b 0,0,0 67*
106 dc.b 0,0,0 68*
107 dc.b 0,0,0 69*
108 dc.b 4,3,0 70
109 dc.b 8,3,0 71
110 dc.b 6,1,0 72
111 dc.b 8,1,0 73
112 dc.b 8,1,0 74
113 dc.b 4,1,1 75
114 dc.b 3,1,1 76
115 dc.b 0,5,0 77
116 dc.b 1,1,1 78
117 dc.b 0,5,0 79
118 dc.b 0,1,1 80
119 dc.b 0,1,1 81
120 dc.b 0,0,0 82*
121 dc.b 0,0,0 83*
122 dc.b 0,0,0 84*
123 dc.b 0,0,0 85*
124 dc.b 0,0,0 86*
125 dc.b 0,0,0 87*
126 dc.b 0,0,0 88*
127 dc.b 0,0,0 89*
128 dc.b 0,2,2 90
129 dc.b 0,0,0 91*
130 dc.b 0,0,0 92*
131 dc.b 0,0,0 93*
132 dc.b 0,0,0 94*
133 dc.b 0,0,0 95*
134 dc.b 0,0,0 96*
135 dc.b 0,0,0 97*
136 dc.b 0,0,0 98*
137 dc.b 0,0,0 99*
138 dc.b 5,1,0 100
139 dc.b 5,1,0 101
140 dc.b 1,1,0 102
141 dc.b 1,1,0 103
142 dc.b 2,5,0 104
143 dc.b 6,1,0 105
144 dc.b 2,1,0 106
145 dc.b 1,1,0 107
146 dc.b 6,5,0 108
147 dc.b 0,0,0 109*
148 dc.b 0,1,1 110
149 dc.b 0,1,0 111
150 dc.b 2,1,0 112 ** Control(4)=1 **
151 dc.b 2,1,1 113
152 dc.b 1,1,1 114
153 dc.b 0,0,0 115
154 dc.b 0,0,0 116
155 dc.b 0,0,0 117
156 dc.b 0,0,0 118
157 dc.b 0,0,0 119
158 dc.b 0,1,2 120
159 dc.b 3,1,2 121
160 dc.b 0,0,0 122*
161 dc.b 0,0,0 123*
162 dc.b 0,1,1 124
163 dc.b 0,1,3 125
164 even
165
166 * these don't need initialising so can go in the BSS section
167 control ds.w 4
168 global ds.w 14
169 int_in ds.w 16
170 int_out ds.w 7
171 addr_in ds.l 2
172 addr_out ds.l 1
173
174
175 *********** END OF AES *****************
176

  ViewVC Help
Powered by ViewVC 1.1.26