| /programs/system/end/light/data.inc |
|---|
| 55,23 → 55,14 |
| aautosave db 'autosave',0 |
| ini_file db '/sys/settings/rdsave.ini',0 |
| ;--------------------------------------------------------------------- |
| ;Lib_DATA |
| system_dir_libini db '/sys/lib/libini.obj',0 |
| importLib: |
| library \ |
| libini, 'libini.obj' |
| import libini, \ |
| ini_set_int ,'ini_set_int', \ |
| ini_get_int ,'ini_get_int' |
| ;--------------------------------------------------------------------- |
| l_libs_start: |
| library02 l_libs system_dir_libini+9, library_path, system_dir_libini, libini_import |
| end_l_libs: |
| ;--------------------------------------------------------------------- |
| align 4 |
| libini_import: |
| init_lib dd a_init |
| ini_get_int dd aini_get_int |
| ini_set_int dd aini_set_int |
| dd 0,0 |
| a_init db 'lib_init',0 |
| aini_get_int db 'ini_get_int',0 |
| aini_set_int db 'ini_set_int',0 |
| ;--------------------------------------------------------------------- |
| checkbox_sharedname db 'CHECKBOX',0 |
| checkbox_img dd ? |
| ;--------------------------------------------------------------------- |
| /programs/system/end/light/end.asm |
|---|
| 18,24 → 18,18 |
| include '../../../proc32.inc' |
| include '../../../dll.inc' |
| include '../../../KOSfuncs.inc' |
| include '../../../load_lib.mac' |
| include '../../../gui_patterns.inc' |
| include '../../../string.inc' |
| @use_library |
| START: |
| mcall SF_SYS_MISC, SSF_HEAP_INIT |
| mcall SF_SYS_MISC, SSF_MEM_OPEN, checkbox_sharedname |
| mov [checkbox_img], eax |
| load_libraries l_libs_start,end_l_libs |
| inc eax |
| test eax,eax |
| jz close |
| stdcall dll.Load,importLib |
| or eax, eax |
| jnz redraw |
| stdcall dll.Init,[init_lib] |
| invoke ini_get_int,ini_file,asettings,aautosave,0 |
| mov [autosave],eax |
| redraw: |
| 208,8 → 202,7 |
| mcall SF_DRAW_RECT, <34,11>, <72,11>, 0x58C33C |
| ret |
| .flag_unset: |
| DrawRectangle3D 33, 71, 12, 12, 0xDDDddd, 0xffffff |
| mcall SF_DRAW_RECT, <34,12>, <72,12>, 0xFFFfff |
| mcall SF_DRAW_RECT, <33,13>, <71,13>, 0xFFFfff |
| ret |
| ;--------------------------------------------------------------------- |
| include 'data.inc' |