Rev 9354 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 9354 | Rev 9716 | ||
|---|---|---|---|
| Line 1... | Line -... | ||
| 1 | include '../proc32.inc' |
- | |
| 2 | - | ||
| 3 | format MS COFF |
1 | format MS COFF |
| Line 4... | Line 2... | ||
| 4 | 2 | ||
| Line 5... | Line -... | ||
| 5 | public _load_libconsole |
- | |
| 6 | - | ||
| 7 | public _con_init@20 |
- | |
| 8 | public _con_exit@4 |
- | |
| 9 | public _con_get_flags |
- | |
| 10 | public _con_set_flags@4 |
- | |
| 11 | public _con_cls |
3 | include '../proc32.inc' |
| 12 | public _con_write_string@8 |
- | |
| 13 | public _con_getch2@0 |
- | |
| Line 14... | Line 4... | ||
| 14 | public _con_gets |
4 | |
| - | 5 | public _load_libconsole |
|
| - | 6 | ||
| - | 7 | macro public_jmp name, size |
|
| - | 8 | { |
|
| Line -... | Line 9... | ||
| - | 9 | public _#name#@#size |
|
| Line 15... | Line 10... | ||
| 15 | public con_set_title as '_con_set_title_ptr' |
10 | _#name#@#size: jmp [name] |
| 16 | 11 | } |
|
| 17 | section '.text' align 16 |
12 | |
| 18 | 13 | section '.text' align 16 code readable executable |
|
| Line 153... | Line 148... | ||
| 153 | call [con_start] |
148 | call [con_start] |
| 154 | xor eax, eax |
149 | xor eax, eax |
| 155 | .fail: |
150 | .fail: |
| 156 | ret |
151 | ret |
| Line 157... | Line -... | ||
| 157 | - | ||
| 158 | align 4 |
- | |
| 159 | _con_init@20: |
- | |
| 160 | jmp [con_init] |
- | |
| 161 | - | ||
| 162 | align 4 |
- | |
| 163 | _con_exit@4: |
- | |
| 164 | jmp [con_exit] |
- | |
| 165 | - | ||
| 166 | align 4 |
- | |
| 167 | _con_write_string@8: |
- | |
| 168 | jmp [con_write_string] |
- | |
| 169 | - | ||
| 170 | _con_getch2@0: |
- | |
| 171 | jmp [con_getch2] |
- | |
| 172 | - | ||
| 173 | _con_gets: |
- | |
| 174 | jmp [con_gets] |
- | |
| 175 | - | ||
| 176 | _con_get_flags: |
- | |
| 177 | _con_set_flags@4: |
- | |
| 178 | _con_cls: |
- | |
| 179 | ret |
- | |
| 180 | - | ||
| 181 | 152 | ||
| 182 | proc mem.Alloc, size |
153 | proc mem.Alloc, size |
| 183 | push ebx ecx |
154 | push ebx ecx |
| 184 | mov ecx, [size] |
155 | mov ecx, [size] |
| 185 | mov eax, 68 |
156 | mov eax, 68 |
| Line 220... | Line 191... | ||
| 220 | int 0x40 |
191 | int 0x40 |
| 221 | pop ecx ebx |
192 | pop ecx ebx |
| 222 | ret |
193 | ret |
| 223 | endp |
194 | endp |
| Line -... | Line 195... | ||
| - | 195 | ||
| 224 | 196 | public_jmp con_init, 20 |
|
| 225 | ;section '.ctors' align 4 |
197 | public_jmp con_exit, 4 |
| - | 198 | public_jmp con_gets, 8 |
|
| 226 | ;align 4 |
199 | public_jmp con_gets2, 12 |
| - | 200 | public_jmp con_cls, 0 |
|
| - | 201 | public_jmp con_getch2, 0 |
|
| - | 202 | public_jmp con_getch, 0 |
|
| - | 203 | public_jmp con_set_cursor_pos, 8 |
|
| - | 204 | public_jmp con_get_cursor_pos, 8 |
|
| - | 205 | public_jmp con_write_string, 8 |
|
| - | 206 | public_jmp con_write_asciiz, 4 |
|
| - | 207 | public_jmp con_get_flags, 0 |
|
| - | 208 | public_jmp con_set_flags, 4 |
|
| - | 209 | public_jmp con_set_title, 4 |
|
| - | 210 | public_jmp con_get_font_height, 0 |
|
| - | 211 | public_jmp con_get_cursor_height, 0 |
|
| Line 227... | Line 212... | ||
| 227 | ;dd _load_libconsole |
212 | public_jmp con_set_cursor_height, 4 |
| Line 228... | Line 213... | ||
| 228 | 213 | ||
| 229 | section '.data' align 16 |
214 | section '.data' align 16 readable writable |
| 230 | 215 | ||
| 231 | ; ------------------------- |
216 | ; ------------------------- |
| Line 266... | Line 251... | ||
| 266 | import console, \ |
251 | import console, \ |
| 267 | con_start, 'START', \ |
252 | con_start, 'START', \ |
| 268 | con_init, 'con_init', \ |
253 | con_init, 'con_init', \ |
| 269 | con_exit, 'con_exit', \ |
254 | con_exit, 'con_exit', \ |
| 270 | con_gets, 'con_gets', \ |
255 | con_gets, 'con_gets', \ |
| - | 256 | con_gets2, 'con_gets2', \ |
|
| 271 | con_cls, 'con_cls', \ |
257 | con_cls, 'con_cls', \ |
| 272 | con_getch2, 'con_getch2', \ |
258 | con_getch2, 'con_getch2', \ |
| - | 259 | con_getch, 'con_getch', \ |
|
| 273 | con_set_cursor_pos, 'con_set_cursor_pos',\ |
260 | con_set_cursor_pos, 'con_set_cursor_pos',\ |
| - | 261 | con_get_cursor_pos, 'con_get_cursor_pos', \ |
|
| 274 | con_write_string, 'con_write_string',\ |
262 | con_write_string, 'con_write_string',\ |
| - | 263 | con_write_asciiz, 'con_write_asciiz', \ |
|
| 275 | con_get_flags, 'con_get_flags', \ |
264 | con_get_flags, 'con_get_flags', \ |
| 276 | con_set_flags, 'con_set_flags', \ |
265 | con_set_flags, 'con_set_flags', \ |
| 277 | con_set_title, 'con_set_title' |
266 | con_set_title, 'con_set_title', \ |
| - | 267 | con_get_font_height, 'con_get_font_height', \ |
|
| - | 268 | con_get_cursor_height, 'con_get_cursor_height', \ |
|
| - | 269 | con_set_cursor_height, 'con_set_cursor_height' |
|
| Line 278... | Line 270... | ||
| 278 | 270 | ||
| 279 | s_libdir: |
271 | s_libdir: |
| 280 | db '/sys/lib/' |
272 | db '/sys/lib/' |