| 0,0 → 1,68 |
|---|
| format coff |
| use32 ; Tell compiler to use 32 bit instructions |
| |
| section '.init' code ; Keep this line before includes or GCC messes up call addresses |
| |
| include '../../../programs/proc32.inc' |
| include '../../../programs/macros.inc' |
| purge section,mov,add,sub |
| |
| include '../../../programs/dll.inc' |
| |
| public init_kmenu as '_init_kmenu_asm' |
| ;;; Returns 0 on success. -1 on failure. |
| |
| proc init_kmenu |
| |
| mcall 68,11 |
| |
| stdcall dll.Load, @IMPORT |
| test eax, eax |
| jnz error |
| |
| mov eax, 0 |
| ret |
| |
| error: |
| mov eax, -1 |
| ret |
| endp |
| |
| @IMPORT: |
| library lib_kmenu, 'kmenu.obj' |
| |
| import lib_kmenu, \ |
| kmainmenu_draw, 'kmainmenu_draw' , \ |
| kmainmenu_dispatch_cursorevent, 'kmainmenu_dispatch_cursorevent' , \ |
| kmainmenu_get_height, 'kmainmenu_get_height', \ |
| ksubmenu_new, 'ksubmenu_new' , \ |
| ksubmenu_delete, 'ksubmenu_delete' , \ |
| ksubmenu_draw, 'ksubmenu_draw' , \ |
| ksubmenu_add, 'ksubmenu_add' , \ |
| ksubmenu_set_items_margin, 'ksubmenu_set_items_margin' , \ |
| ksubmenu_set_items_padding, 'ksubmenu_set_items_padding' , \ |
| kmenuitem_new, 'kmenuitem_new' , \ |
| kmenuitem_delete, 'kmenuitem_delete' , \ |
| kmenuitem_draw, 'kmenuitem_draw' , \ |
| kmenuitem_get_preffered_width, 'kmenuitem_get_preffered_width' , \ |
| kmenuitem_get_preffered_height, 'kmenuitem_get_preffered_height' , \ |
| kmenu_set_font, 'kmenu_set_font' , \ |
| kmenu_init, 'kmenu_init' |
| |
| public kmainmenu_draw as '_kmainmenu_draw' |
| public kmainmenu_dispatch_cursorevent as '_kmainmenu_dispatch_cursorevent' |
| public kmainmenu_get_height as '_kmainmenu_get_height' |
| public ksubmenu_new as '_ksubmenu_new' |
| public ksubmenu_delete as '_ksubmenu_delete' |
| public ksubmenu_draw as '_ksubmenu_draw' |
| public ksubmenu_add as '_ksubmenu_add' |
| public ksubmenu_set_items_margin as '_ksubmenu_set_items_margin' |
| public ksubmenu_set_items_padding as '_ksubmenu_set_items_padding' |
| public kmenuitem_new as '_kmenuitem_new' |
| public kmenuitem_new as '_kmenuitem__submenu_new' |
| public kmenuitem_delete as '_kmenuitem_delete' |
| public kmenuitem_draw as '_kmenuitem_draw' |
| public kmenuitem_get_preffered_width as '_kmenuitem_get_preffered_width' |
| public kmenuitem_get_preffered_height as '_kmenuitem_get_preffered_height' |
| public kmenu_set_font as '_kmenu_set_font' |
| public kmenu_init as '_kmenu_init' |