/programs/other/TinyHashView/Tupfile.lua |
---|
1,9 → 1,10 |
if tup.getconfig("NO_TCC") ~= "" then return end |
if tup.getconfig("HELPERDIR") == "" |
then |
HELPERDIR = "../../../programs" |
end |
tup.include(HELPERDIR .. "/use_tcc.lua") |
TCC="kos32-tcc" |
CFLAGS = "-I../../develop/ktcc/trunk/libc.obj/include" |
LDFLAGS = "-nostdlib ../../develop/ktcc/trunk/bin/lib/crt0.o -L../../develop/ktcc/trunk/bin/lib" |
LIBS = "-ltcc -lcryptal -ldialog -lbox -lc.obj" |
LIBS = "-lcryptal -lbox_lib -ldialog" |
COMMAND=string.format("%s %s %s %s %s ", TCC, CFLAGS, LDFLAGS, "%f -o %o", LIBS) |
tup.rule("thashview.c", COMMAND .. tup.getconfig("KPACK_CMD"), "thashview") |
link_tcc({"thashview.c"}, "thashview"); |
/programs/other/TinyHashView/thashview.c |
---|
274,9 → 274,7 |
int main(int argc, char** argv) |
{ |
kolibri_boxlib_init(); // £à㦠¥¬ boxlib |
if(argc<2){ // ᫨ à£ã¬¥â®¢ ¥â, â® § ¯ã᪠¥¬ ¤¨ «®£ ¢ë¡®à ä |
kolibri_dialog_init(); // § £à㦠¥¬ proc_lib(libdialog) |
open_dialog* dialog = kolibri_new_open_dialog(OPEN,0, 0, 420, 320); |
OpenDialog_init(dialog); |
OpenDialog_start(dialog); |
322,7 → 320,7 |
break; |
case KSYS_EVENT_KEY: |
hash_edit_box.text_color = BLACK; |
edit_box_key(&hash_edit_box, _ksys_get_key().val); |
edit_box_key_safe(&hash_edit_box, _ksys_get_key()); |
break; |
case KSYS_EVENT_BUTTON: // ®¡ë⨥ ®¡à ¡®âª¨ ª®¯®ª |
pressed_button = _ksys_get_button(); // ®«ã票¥ ª®¤ ¦ ⮩ ª®¯ª¨. |