/programs/cmm/lib/date.h |
---|
1,7 → 1,6 |
//IO library |
#ifndef INCLUDE_DATE_H |
#define INCLUDE_DATE_H |
#print "[include <date.h>]\n" |
#ifndef INCLUDE_STRING_H |
#include "../lib/strings.h" |
/programs/cmm/lib/debug.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_DEBUG_H |
#define INCLUDE_DEBUG_H |
#print "[include <debug.h>]\n" |
#ifndef INCLUDE_STRING_H |
#include "../lib/strings.h" |
/programs/cmm/lib/gui.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_GUI_H |
#define INCLUDE_GUI_H |
#print "[include <gui.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/io.h |
---|
22,7 → 22,6 |
#ifndef INCLUDE_IO_H |
#define INCLUDE_IO_H |
#print "[include <io.h>]\n" |
#ifndef INCLUDE_DATE_H |
#include "../lib/date.h" |
/programs/cmm/lib/keyboard.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_KEYBOARD_H |
#define INCLUDE_KEYBOARD_H |
#print "[include <keyboard.h>]\n" |
//ASCII KEYS |
#define ASCII_KEY_BS 008 |
/programs/cmm/lib/kolibri.h |
---|
2,7 → 2,6 |
#ifndef INCLUDE_KOLIBRI_H |
#define INCLUDE_KOLIBRI_H |
#print "[include <kolibri.h>]\n" |
#pragma option OST |
#pragma option ON |
/programs/cmm/lib/lexer.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_LEXER_H |
#define INCLUDE_LEXER_H |
#print "[include <lexer.h>]\n" |
#ifndef INCLUDE_STRING_H |
#include "../lib/strings.h" |
/programs/cmm/lib/list_box.h |
---|
1,7 → 1,6 |
//list_box |
#ifndef INCLUDE_LIST_BOX_H |
#define INCLUDE_LIST_BOX_H |
#print "[include <list_box.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/mem.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_MEM_H |
#define INCLUDE_MEM_H |
#print "[include <mem.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/mouse.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_MOUSE_H |
#define INCLUDE_MOUSE_H |
#print "[include <mouse.h>]\n" |
//Button MOUSE |
#define MOUSE_LEFT 001b |
/programs/cmm/lib/obj/box_lib.h |
---|
1,7 → 1,6 |
//BOX_LIB - Asper |
#ifndef INCLUDE_BOX_LIB_H |
#define INCLUDE_BOX_LIB_H |
#print "[include <obj/box_lib.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/console.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_CONSOLE_H |
#define INCLUDE_CONSOLE_H |
#print "[include <obj/console.h]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/http.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_LIBHTTP_H |
#define INCLUDE_LIBHTTP_H |
#print "[include <obj/http.h]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/iconv.h |
---|
1,7 → 1,6 |
//convert text characters |
#ifndef INCLUDE_LIBICONV_H |
#define INCLUDE_LIBICONV_H |
#print "[include <obj/iconv.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/libimg_lib.h |
---|
1,7 → 1,6 |
//Asper |
#ifndef INCLUDE_LIBIMG_H |
#define INCLUDE_LIBIMG_H |
#print "[include <obj/libimg_lib.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/libini.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_LIBINI_H |
#define INCLUDE_LIBINI_H |
#print "[include <obj/libini.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/obj/libio_lib.h |
---|
1,7 → 1,6 |
//Asper |
#ifndef INCLUDE_LIBIO_H |
#define INCLUDE_LIBIO_H |
#print "[include <obj/libio_lib.h>]\n" |
#ifndef INCLUDE_KOLIBRI_H |
#include "../lib/kolibri.h" |
/programs/cmm/lib/patterns/rgb.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_RGB_H |
#define INCLUDE_RGB_H |
#print "[include <rgb.h>]\n" |
:struct _rgb |
{ |
/programs/cmm/lib/strings.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_STRING_H |
#define INCLUDE_STRING_H |
#print "[include <strings.h>]\n" |
#ifndef INCLUDE_MEM_H |
#include "../lib/mem.h" |
/programs/cmm/lib/system.h |
---|
1,6 → 1,5 |
#ifndef INCLUDE_SYSTEM_H |
#define INCLUDE_SYSTEM_H |
#print "[include <system.h>]\n" |
:struct COLORS { |
dword |
/programs/cmm/lib/window.h |
---|
0,0 → 1,49 |
#ifndef INCLUDE_WINDOW_H |
#define INCLUDE_WINDOW_H |
#include "../lib/gui.h" |
#define WINDOW_NORMAL 0x34 |
:struct window |
{ |
void create(); |
dword left,top,width,height; |
dword caption,type,background; |
dword onbutton,onkey,ondraw; |
proc_info Form; |
}; |
void window::create() |
{ |
word id=0; |
IF(!caption)caption = "Window"; |
IF(!width)width=350; |
IF(!height)height=300; |
IF(!type)type = WINDOW_NORMAL; |
IF(!background)background = 0xDED7CE; |
loop() switch(WaitEvent()) |
{ |
case evButton: |
id=GetButtonID(); |
IF(onbutton)onbutton(id); |
IF (id==1) ExitProcess(); |
break; |
case evKey: |
GetKeys(); |
IF(onkey)onbutton(key_scancode); |
//if (key_scancode == SCAN_CODE_ESC ) ExitProcess(); |
break; |
case evReDraw: |
GetProcessInfo(#Form, SelfInfo); |
DefineAndDrawWindow(left,top,width,height,type,background,caption,0); |
IF(ondraw)ondraw(); |
break; |
} |
} |
#endif |