#line 1 "subs_functions/subs_functions.bas"
void SUB_REGINTERNAL(){
#line 1 "subs_functions/subs_functions.bas"
qbs *tqbs;
#line 1 "subs_functions/subs_functions.bas"
ptrszint tmp_long;
#line 1 "subs_functions/subs_functions.bas"
int32 tmp_fileno;
#line 1 "subs_functions/subs_functions.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 1 "subs_functions/subs_functions.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 1 "subs_functions/subs_functions.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 1 "subs_functions/subs_functions.bas"
#include "data84.txt"
#line 1 "subs_functions/subs_functions.bas"
mem_lock *sf_mem_lock;
#line 1 "subs_functions/subs_functions.bas"
new_mem_lock();
#line 1 "subs_functions/subs_functions.bas"
sf_mem_lock=mem_lock_tmp;
#line 1 "subs_functions/subs_functions.bas"
sf_mem_lock->type=3;
#line 1 "subs_functions/subs_functions.bas"
libqb_check_stack();
#line 1 "subs_functions/subs_functions.bas"
if (is_error_pending()) goto exit_subfunc;
#line 2 "subs_functions/subs_functions.bas"
do{
#line 2 "subs_functions/subs_functions.bas"
*__LONG_REGINTERNALSUBFUNC= 1 ;
#line 2 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2,"subs_functions.bas");}while(r);
#line 32 "subs_functions/subs_functions.bas"
do{
#line 32 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 32 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,32,"subs_functions.bas");}while(r);
#line 33 "subs_functions/subs_functions.bas"
do{
#line 33 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
#line 33 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 33 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,33,"subs_functions.bas");}while(r);
#line 33 "subs_functions/subs_functions.bas"
do{
#line 33 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 33 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,33,"subs_functions.bas");}while(r);
#line 33 "subs_functions/subs_functions.bas"
do{
#line 33 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 33 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 33 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,33,"subs_functions.bas");}while(r);
#line 33 "subs_functions/subs_functions.bas"
do{
#line 33 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 33 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,33,"subs_functions.bas");}while(r);
#line 34 "subs_functions/subs_functions.bas"
do{
#line 34 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 34 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,34,"subs_functions.bas");}while(r);
#line 35 "subs_functions/subs_functions.bas"
do{
#line 35 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
#line 35 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 35 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,35,"subs_functions.bas");}while(r);
#line 35 "subs_functions/subs_functions.bas"
do{
#line 35 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 35 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,35,"subs_functions.bas");}while(r);
#line 35 "subs_functions/subs_functions.bas"
do{
#line 35 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 35 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 35 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,35,"subs_functions.bas");}while(r);
#line 35 "subs_functions/subs_functions.bas"
do{
#line 35 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 35 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,35,"subs_functions.bas");}while(r);
#line 36 "subs_functions/subs_functions.bas"
do{
#line 36 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 36 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,36,"subs_functions.bas");}while(r);
#line 37 "subs_functions/subs_functions.bas"
do{
#line 37 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("End",3));
#line 37 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 37 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,37,"subs_functions.bas");}while(r);
#line 37 "subs_functions/subs_functions.bas"
do{
#line 37 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 37 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,37,"subs_functions.bas");}while(r);
#line 37 "subs_functions/subs_functions.bas"
do{
#line 37 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 37 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 37 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,37,"subs_functions.bas");}while(r);
#line 37 "subs_functions/subs_functions.bas"
do{
#line 37 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 37 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,37,"subs_functions.bas");}while(r);
#line 38 "subs_functions/subs_functions.bas"
do{
#line 38 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 38 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,38,"subs_functions.bas");}while(r);
#line 39 "subs_functions/subs_functions.bas"
do{
#line 39 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LSet",4));
#line 39 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 39 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,39,"subs_functions.bas");}while(r);
#line 39 "subs_functions/subs_functions.bas"
do{
#line 39 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 39 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,39,"subs_functions.bas");}while(r);
#line 39 "subs_functions/subs_functions.bas"
do{
#line 39 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 39 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 39 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,39,"subs_functions.bas");}while(r);
#line 39 "subs_functions/subs_functions.bas"
do{
#line 39 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 39 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,39,"subs_functions.bas");}while(r);
#line 40 "subs_functions/subs_functions.bas"
do{
#line 40 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 40 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,40,"subs_functions.bas");}while(r);
#line 41 "subs_functions/subs_functions.bas"
do{
#line 41 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RSet",4));
#line 41 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 41 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,41,"subs_functions.bas");}while(r);
#line 41 "subs_functions/subs_functions.bas"
do{
#line 41 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 41 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,41,"subs_functions.bas");}while(r);
#line 41 "subs_functions/subs_functions.bas"
do{
#line 41 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 41 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 41 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,41,"subs_functions.bas");}while(r);
#line 41 "subs_functions/subs_functions.bas"
do{
#line 41 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 41 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,41,"subs_functions.bas");}while(r);
#line 42 "subs_functions/subs_functions.bas"
do{
#line 42 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 42 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,42,"subs_functions.bas");}while(r);
#line 43 "subs_functions/subs_functions.bas"
do{
#line 43 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Mid",3));
#line 43 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 43 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,43,"subs_functions.bas");}while(r);
#line 43 "subs_functions/subs_functions.bas"
do{
#line 43 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 43 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,43,"subs_functions.bas");}while(r);
#line 43 "subs_functions/subs_functions.bas"
do{
#line 43 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 43 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 43 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,43,"subs_functions.bas");}while(r);
#line 43 "subs_functions/subs_functions.bas"
do{
#line 43 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 43 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 43 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,43,"subs_functions.bas");}while(r);
#line 43 "subs_functions/subs_functions.bas"
do{
#line 43 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 43 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,43,"subs_functions.bas");}while(r);
#line 44 "subs_functions/subs_functions.bas"
do{
#line 44 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 44 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,44,"subs_functions.bas");}while(r);
#line 45 "subs_functions/subs_functions.bas"
do{
#line 45 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Print",5));
#line 45 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 45 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,45,"subs_functions.bas");}while(r);
#line 45 "subs_functions/subs_functions.bas"
do{
#line 45 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 45 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,45,"subs_functions.bas");}while(r);
#line 45 "subs_functions/subs_functions.bas"
do{
#line 45 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 45 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 45 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,45,"subs_functions.bas");}while(r);
#line 45 "subs_functions/subs_functions.bas"
do{
#line 45 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 45 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,45,"subs_functions.bas");}while(r);
#line 46 "subs_functions/subs_functions.bas"
do{
#line 46 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 46 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,46,"subs_functions.bas");}while(r);
#line 47 "subs_functions/subs_functions.bas"
do{
#line 47 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Option",6));
#line 47 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 47 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,47,"subs_functions.bas");}while(r);
#line 47 "subs_functions/subs_functions.bas"
do{
#line 47 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 47 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,47,"subs_functions.bas");}while(r);
#line 47 "subs_functions/subs_functions.bas"
do{
#line 47 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 47 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 47 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,47,"subs_functions.bas");}while(r);
#line 47 "subs_functions/subs_functions.bas"
do{
#line 47 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 47 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,47,"subs_functions.bas");}while(r);
#line 48 "subs_functions/subs_functions.bas"
do{
#line 48 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 48 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,48,"subs_functions.bas");}while(r);
#line 49 "subs_functions/subs_functions.bas"
do{
#line 49 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Swap",4));
#line 49 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 49 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,49,"subs_functions.bas");}while(r);
#line 49 "subs_functions/subs_functions.bas"
do{
#line 49 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 49 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,49,"subs_functions.bas");}while(r);
#line 49 "subs_functions/subs_functions.bas"
do{
#line 49 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 49 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 49 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,49,"subs_functions.bas");}while(r);
#line 49 "subs_functions/subs_functions.bas"
do{
#line 49 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 49 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,49,"subs_functions.bas");}while(r);
#line 50 "subs_functions/subs_functions.bas"
do{
#line 50 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 50 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,50,"subs_functions.bas");}while(r);
#line 51 "subs_functions/subs_functions.bas"
do{
#line 51 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("System",6));
#line 51 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 51 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,51,"subs_functions.bas");}while(r);
#line 51 "subs_functions/subs_functions.bas"
do{
#line 51 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 51 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,51,"subs_functions.bas");}while(r);
#line 51 "subs_functions/subs_functions.bas"
do{
#line 51 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 51 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 51 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,51,"subs_functions.bas");}while(r);
#line 51 "subs_functions/subs_functions.bas"
do{
#line 51 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 51 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,51,"subs_functions.bas");}while(r);
#line 52 "subs_functions/subs_functions.bas"
do{
#line 52 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 52 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,52,"subs_functions.bas");}while(r);
#line 53 "subs_functions/subs_functions.bas"
do{
#line 53 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Write",5));
#line 53 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 53 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,53,"subs_functions.bas");}while(r);
#line 53 "subs_functions/subs_functions.bas"
do{
#line 53 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 53 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,53,"subs_functions.bas");}while(r);
#line 53 "subs_functions/subs_functions.bas"
do{
#line 53 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 53 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 53 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,53,"subs_functions.bas");}while(r);
#line 53 "subs_functions/subs_functions.bas"
do{
#line 53 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 53 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,53,"subs_functions.bas");}while(r);
#line 54 "subs_functions/subs_functions.bas"
do{
#line 54 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 54 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,54,"subs_functions.bas");}while(r);
#line 55 "subs_functions/subs_functions.bas"
do{
#line 55 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Read",4));
#line 55 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 55 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,55,"subs_functions.bas");}while(r);
#line 55 "subs_functions/subs_functions.bas"
do{
#line 55 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 55 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,55,"subs_functions.bas");}while(r);
#line 55 "subs_functions/subs_functions.bas"
do{
#line 55 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 55 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 55 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,55,"subs_functions.bas");}while(r);
#line 55 "subs_functions/subs_functions.bas"
do{
#line 55 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 55 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,55,"subs_functions.bas");}while(r);
#line 56 "subs_functions/subs_functions.bas"
do{
#line 56 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 56 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,56,"subs_functions.bas");}while(r);
#line 57 "subs_functions/subs_functions.bas"
do{
#line 57 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Close",5));
#line 57 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 57 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,57,"subs_functions.bas");}while(r);
#line 57 "subs_functions/subs_functions.bas"
do{
#line 57 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 57 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,57,"subs_functions.bas");}while(r);
#line 57 "subs_functions/subs_functions.bas"
do{
#line 57 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 57 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 57 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,57,"subs_functions.bas");}while(r);
#line 57 "subs_functions/subs_functions.bas"
do{
#line 57 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 57 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,57,"subs_functions.bas");}while(r);
#line 58 "subs_functions/subs_functions.bas"
do{
#line 58 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 58 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,58,"subs_functions.bas");}while(r);
#line 59 "subs_functions/subs_functions.bas"
do{
#line 59 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Reset",5));
#line 59 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 59 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,59,"subs_functions.bas");}while(r);
#line 59 "subs_functions/subs_functions.bas"
do{
#line 59 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 59 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,59,"subs_functions.bas");}while(r);
#line 59 "subs_functions/subs_functions.bas"
do{
#line 59 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 59 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 59 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,59,"subs_functions.bas");}while(r);
#line 59 "subs_functions/subs_functions.bas"
do{
#line 59 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 59 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,59,"subs_functions.bas");}while(r);
#line 60 "subs_functions/subs_functions.bas"
do{
#line 60 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 60 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,60,"subs_functions.bas");}while(r);
#line 61 "subs_functions/subs_functions.bas"
do{
#line 61 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Input",5));
#line 61 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 61 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,61,"subs_functions.bas");}while(r);
#line 61 "subs_functions/subs_functions.bas"
do{
#line 61 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 61 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,61,"subs_functions.bas");}while(r);
#line 61 "subs_functions/subs_functions.bas"
do{
#line 61 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 61 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 61 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,61,"subs_functions.bas");}while(r);
#line 61 "subs_functions/subs_functions.bas"
do{
#line 61 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 61 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,61,"subs_functions.bas");}while(r);
#line 63 "subs_functions/subs_functions.bas"
do{
#line 63 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 63 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,63,"subs_functions.bas");}while(r);
#line 64 "subs_functions/subs_functions.bas"
do{
#line 64 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("TrOn",4));
#line 64 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 64 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,64,"subs_functions.bas");}while(r);
#line 64 "subs_functions/subs_functions.bas"
do{
#line 64 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 64 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,64,"subs_functions.bas");}while(r);
#line 64 "subs_functions/subs_functions.bas"
do{
#line 64 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 64 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 64 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,64,"subs_functions.bas");}while(r);
#line 64 "subs_functions/subs_functions.bas"
do{
#line 64 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 64 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,64,"subs_functions.bas");}while(r);
#line 65 "subs_functions/subs_functions.bas"
do{
#line 65 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 65 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,65,"subs_functions.bas");}while(r);
#line 66 "subs_functions/subs_functions.bas"
do{
#line 66 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("TrOff",5));
#line 66 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 66 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,66,"subs_functions.bas");}while(r);
#line 66 "subs_functions/subs_functions.bas"
do{
#line 66 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 66 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,66,"subs_functions.bas");}while(r);
#line 66 "subs_functions/subs_functions.bas"
do{
#line 66 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 66 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 66 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,66,"subs_functions.bas");}while(r);
#line 66 "subs_functions/subs_functions.bas"
do{
#line 66 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 66 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,66,"subs_functions.bas");}while(r);
#line 67 "subs_functions/subs_functions.bas"
do{
#line 67 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 67 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,67,"subs_functions.bas");}while(r);
#line 68 "subs_functions/subs_functions.bas"
do{
#line 68 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("List",4));
#line 68 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 68 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,68,"subs_functions.bas");}while(r);
#line 68 "subs_functions/subs_functions.bas"
do{
#line 68 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 68 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,68,"subs_functions.bas");}while(r);
#line 68 "subs_functions/subs_functions.bas"
do{
#line 68 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 68 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 68 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,68,"subs_functions.bas");}while(r);
#line 68 "subs_functions/subs_functions.bas"
do{
#line 68 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 68 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,68,"subs_functions.bas");}while(r);
#line 69 "subs_functions/subs_functions.bas"
do{
#line 69 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 69 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,69,"subs_functions.bas");}while(r);
#line 70 "subs_functions/subs_functions.bas"
do{
#line 70 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Def",3));
#line 70 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 70 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,70,"subs_functions.bas");}while(r);
#line 70 "subs_functions/subs_functions.bas"
do{
#line 70 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 70 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,70,"subs_functions.bas");}while(r);
#line 70 "subs_functions/subs_functions.bas"
do{
#line 70 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 70 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 70 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,70,"subs_functions.bas");}while(r);
#line 70 "subs_functions/subs_functions.bas"
do{
#line 70 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+2129))),256,1),qbs_new_txt_len("SEG",3));
#line 70 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 70 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,70,"subs_functions.bas");}while(r);
#line 70 "subs_functions/subs_functions.bas"
do{
#line 70 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 70 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,70,"subs_functions.bas");}while(r);
#line 71 "subs_functions/subs_functions.bas"
do{
#line 71 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 71 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,71,"subs_functions.bas");}while(r);
#line 72 "subs_functions/subs_functions.bas"
do{
#line 72 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("IoCtl",5));
#line 72 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 72 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,72,"subs_functions.bas");}while(r);
#line 72 "subs_functions/subs_functions.bas"
do{
#line 72 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 72 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,72,"subs_functions.bas");}while(r);
#line 72 "subs_functions/subs_functions.bas"
do{
#line 72 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 72 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 72 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,72,"subs_functions.bas");}while(r);
#line 72 "subs_functions/subs_functions.bas"
do{
#line 72 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 72 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,72,"subs_functions.bas");}while(r);
#line 73 "subs_functions/subs_functions.bas"
do{
#line 73 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 73 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,73,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("IoCtl",5));
#line 74 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_stub",9));
#line 74 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 74 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 74 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 74 "subs_functions/subs_functions.bas"
do{
#line 74 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 74 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,74,"subs_functions.bas");}while(r);
#line 75 "subs_functions/subs_functions.bas"
do{
#line 75 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 75 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,75,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Fre",3));
#line 76 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_stub",9));
#line 76 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 76 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 76 "subs_functions/subs_functions.bas"
do{
#line 76 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 76 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,76,"subs_functions.bas");}while(r);
#line 77 "subs_functions/subs_functions.bas"
do{
#line 77 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 77 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,77,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("SetMem",6));
#line 78 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_stub",9));
#line 78 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 78 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 78 "subs_functions/subs_functions.bas"
do{
#line 78 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 78 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,78,"subs_functions.bas");}while(r);
#line 79 "subs_functions/subs_functions.bas"
do{
#line 79 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 79 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,79,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("FileAttr",8));
#line 80 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_stub",9));
#line 80 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 80 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 80 "subs_functions/subs_functions.bas"
do{
#line 80 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 80 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,80,"subs_functions.bas");}while(r);
#line 81 "subs_functions/subs_functions.bas"
do{
#line 81 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 81 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,81,"subs_functions.bas");}while(r);
#line 82 "subs_functions/subs_functions.bas"
do{
#line 82 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemGet",7));
#line 82 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 82 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,82,"subs_functions.bas");}while(r);
#line 82 "subs_functions/subs_functions.bas"
do{
#line 82 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 82 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,82,"subs_functions.bas");}while(r);
#line 82 "subs_functions/subs_functions.bas"
do{
#line 82 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 82 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 82 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,82,"subs_functions.bas");}while(r);
#line 82 "subs_functions/subs_functions.bas"
do{
#line 82 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 82 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,82,"subs_functions.bas");}while(r);
#line 83 "subs_functions/subs_functions.bas"
do{
#line 83 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 83 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,83,"subs_functions.bas");}while(r);
#line 84 "subs_functions/subs_functions.bas"
do{
#line 84 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemPut",7));
#line 84 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 84 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,84,"subs_functions.bas");}while(r);
#line 84 "subs_functions/subs_functions.bas"
do{
#line 84 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 84 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,84,"subs_functions.bas");}while(r);
#line 84 "subs_functions/subs_functions.bas"
do{
#line 84 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 84 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 84 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,84,"subs_functions.bas");}while(r);
#line 84 "subs_functions/subs_functions.bas"
do{
#line 84 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 84 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,84,"subs_functions.bas");}while(r);
#line 85 "subs_functions/subs_functions.bas"
do{
#line 85 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 85 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,85,"subs_functions.bas");}while(r);
#line 86 "subs_functions/subs_functions.bas"
do{
#line 86 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemFill",8));
#line 86 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 86 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,86,"subs_functions.bas");}while(r);
#line 86 "subs_functions/subs_functions.bas"
do{
#line 86 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 86 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,86,"subs_functions.bas");}while(r);
#line 86 "subs_functions/subs_functions.bas"
do{
#line 86 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 86 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 86 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,86,"subs_functions.bas");}while(r);
#line 86 "subs_functions/subs_functions.bas"
do{
#line 86 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 86 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,86,"subs_functions.bas");}while(r);
#line 87 "subs_functions/subs_functions.bas"
do{
#line 87 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 87 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,87,"subs_functions.bas");}while(r);
#line 88 "subs_functions/subs_functions.bas"
do{
#line 88 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Continue",9));
#line 88 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 88 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,88,"subs_functions.bas");}while(r);
#line 88 "subs_functions/subs_functions.bas"
do{
#line 88 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 88 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,88,"subs_functions.bas");}while(r);
#line 88 "subs_functions/subs_functions.bas"
do{
#line 88 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_stub",8));
#line 88 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 88 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,88,"subs_functions.bas");}while(r);
#line 88 "subs_functions/subs_functions.bas"
do{
#line 88 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 88 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,88,"subs_functions.bas");}while(r);
#line 90 "subs_functions/subs_functions.bas"
do{
#line 90 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 90 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,90,"subs_functions.bas");}while(r);
#line 91 "subs_functions/subs_functions.bas"
do{
#line 91 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cast",5));
#line 91 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 91 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,91,"subs_functions.bas");}while(r);
#line 92 "subs_functions/subs_functions.bas"
do{
#line 92 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 92 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,92,"subs_functions.bas");}while(r);
#line 93 "subs_functions/subs_functions.bas"
do{
#line 93 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 93 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,93,"subs_functions.bas");}while(r);
#line 94 "subs_functions/subs_functions.bas"
do{
#line 94 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string( -1 )));
#line 94 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 94 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,94,"subs_functions.bas");}while(r);
#line 95 "subs_functions/subs_functions.bas"
do{
#line 95 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 95 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,95,"subs_functions.bas");}while(r);
#line 96 "subs_functions/subs_functions.bas"
do{
#line 96 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CAST(numericalType, numericalValue)",36));
#line 96 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 96 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,96,"subs_functions.bas");}while(r);
#line 97 "subs_functions/subs_functions.bas"
do{
#line 97 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 97 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,97,"subs_functions.bas");}while(r);
#line 99 "subs_functions/subs_functions.bas"
do{
#line 99 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 99 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,99,"subs_functions.bas");}while(r);
#line 100 "subs_functions/subs_functions.bas"
do{
#line 100 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_IIf",4));
#line 100 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 100 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,100,"subs_functions.bas");}while(r);
#line 101 "subs_functions/subs_functions.bas"
do{
#line 101 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 101 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,101,"subs_functions.bas");}while(r);
#line 102 "subs_functions/subs_functions.bas"
do{
#line 102 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 102 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,102,"subs_functions.bas");}while(r);
#line 103 "subs_functions/subs_functions.bas"
do{
#line 103 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 103 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 103 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,103,"subs_functions.bas");}while(r);
#line 104 "subs_functions/subs_functions.bas"
do{
#line 104 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 104 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,104,"subs_functions.bas");}while(r);
#line 105 "subs_functions/subs_functions.bas"
do{
#line 105 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_IIF(expression, truePart, falsePart)",37));
#line 105 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 105 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,105,"subs_functions.bas");}while(r);
#line 106 "subs_functions/subs_functions.bas"
do{
#line 106 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,106,"subs_functions.bas");}while(r);
#line 108 "subs_functions/subs_functions.bas"
do{
#line 108 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 108 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,108,"subs_functions.bas");}while(r);
#line 109 "subs_functions/subs_functions.bas"
do{
#line 109 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Min",4));
#line 109 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 109 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,109,"subs_functions.bas");}while(r);
#line 110 "subs_functions/subs_functions.bas"
do{
#line 110 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 110 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,110,"subs_functions.bas");}while(r);
#line 111 "subs_functions/subs_functions.bas"
do{
#line 111 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 111 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,111,"subs_functions.bas");}while(r);
#line 112 "subs_functions/subs_functions.bas"
do{
#line 112 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 112 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 112 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,112,"subs_functions.bas");}while(r);
#line 113 "subs_functions/subs_functions.bas"
do{
#line 113 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 113 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,113,"subs_functions.bas");}while(r);
#line 114 "subs_functions/subs_functions.bas"
do{
#line 114 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_Min(value1, value2)",20));
#line 114 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 114 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,114,"subs_functions.bas");}while(r);
#line 115 "subs_functions/subs_functions.bas"
do{
#line 115 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 115 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,115,"subs_functions.bas");}while(r);
#line 117 "subs_functions/subs_functions.bas"
do{
#line 117 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 117 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,117,"subs_functions.bas");}while(r);
#line 118 "subs_functions/subs_functions.bas"
do{
#line 118 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Max",4));
#line 118 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 118 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,118,"subs_functions.bas");}while(r);
#line 119 "subs_functions/subs_functions.bas"
do{
#line 119 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 119 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,119,"subs_functions.bas");}while(r);
#line 120 "subs_functions/subs_functions.bas"
do{
#line 120 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 120 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,120,"subs_functions.bas");}while(r);
#line 121 "subs_functions/subs_functions.bas"
do{
#line 121 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 121 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 121 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,121,"subs_functions.bas");}while(r);
#line 122 "subs_functions/subs_functions.bas"
do{
#line 122 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 122 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,122,"subs_functions.bas");}while(r);
#line 123 "subs_functions/subs_functions.bas"
do{
#line 123 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_Max(value1, value2)",20));
#line 123 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 123 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,123,"subs_functions.bas");}while(r);
#line 124 "subs_functions/subs_functions.bas"
do{
#line 124 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,124,"subs_functions.bas");}while(r);
#line 126 "subs_functions/subs_functions.bas"
do{
#line 126 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 126 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,126,"subs_functions.bas");}while(r);
#line 127 "subs_functions/subs_functions.bas"
do{
#line 127 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clamp",6));
#line 127 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 127 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,127,"subs_functions.bas");}while(r);
#line 128 "subs_functions/subs_functions.bas"
do{
#line 128 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 128 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,128,"subs_functions.bas");}while(r);
#line 129 "subs_functions/subs_functions.bas"
do{
#line 129 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 129 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,129,"subs_functions.bas");}while(r);
#line 130 "subs_functions/subs_functions.bas"
do{
#line 130 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 130 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 130 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,130,"subs_functions.bas");}while(r);
#line 131 "subs_functions/subs_functions.bas"
do{
#line 131 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 131 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,131,"subs_functions.bas");}while(r);
#line 132 "subs_functions/subs_functions.bas"
do{
#line 132 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_Clamp(value, minimum, maximum)",31));
#line 132 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 132 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,132,"subs_functions.bas");}while(r);
#line 133 "subs_functions/subs_functions.bas"
do{
#line 133 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 133 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,133,"subs_functions.bas");}while(r);
#line 135 "subs_functions/subs_functions.bas"
do{
#line 135 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 135 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,135,"subs_functions.bas");}while(r);
#line 136 "subs_functions/subs_functions.bas"
do{
#line 136 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Resize",7));
#line 136 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 136 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,136,"subs_functions.bas");}while(r);
#line 137 "subs_functions/subs_functions.bas"
do{
#line 137 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 137 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,137,"subs_functions.bas");}while(r);
#line 138 "subs_functions/subs_functions.bas"
do{
#line 138 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__resize",11));
#line 138 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 138 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,138,"subs_functions.bas");}while(r);
#line 139 "subs_functions/subs_functions.bas"
do{
#line 139 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 139 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,139,"subs_functions.bas");}while(r);
#line 140 "subs_functions/subs_functions.bas"
do{
#line 140 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 140 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 140 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,140,"subs_functions.bas");}while(r);
#line 141 "subs_functions/subs_functions.bas"
do{
#line 141 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{On|Off}][,{_Stretch|_Smooth}]",31));
#line 141 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 141 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,141,"subs_functions.bas");}while(r);
#line 142 "subs_functions/subs_functions.bas"
do{
#line 142 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RESIZE [{ON|OFF}][, {_STRETCH|_SMOOTH}]",40));
#line 142 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 142 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,142,"subs_functions.bas");}while(r);
#line 143 "subs_functions/subs_functions.bas"
do{
#line 143 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 143 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,143,"subs_functions.bas");}while(r);
#line 145 "subs_functions/subs_functions.bas"
do{
#line 145 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 145 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,145,"subs_functions.bas");}while(r);
#line 146 "subs_functions/subs_functions.bas"
do{
#line 146 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Resize",7));
#line 146 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 146 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,146,"subs_functions.bas");}while(r);
#line 147 "subs_functions/subs_functions.bas"
do{
#line 147 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 147 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,147,"subs_functions.bas");}while(r);
#line 148 "subs_functions/subs_functions.bas"
do{
#line 148 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__resize",12));
#line 148 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 148 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,148,"subs_functions.bas");}while(r);
#line 149 "subs_functions/subs_functions.bas"
do{
#line 149 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 149 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,149,"subs_functions.bas");}while(r);
#line 150 "subs_functions/subs_functions.bas"
do{
#line 150 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RESIZE",7));
#line 150 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 150 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,150,"subs_functions.bas");}while(r);
#line 151 "subs_functions/subs_functions.bas"
do{
#line 151 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 151 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,151,"subs_functions.bas");}while(r);
#line 153 "subs_functions/subs_functions.bas"
do{
#line 153 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 153 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,153,"subs_functions.bas");}while(r);
#line 154 "subs_functions/subs_functions.bas"
do{
#line 154 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResizeWidth",12));
#line 154 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,154,"subs_functions.bas");}while(r);
#line 155 "subs_functions/subs_functions.bas"
do{
#line 155 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 155 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,155,"subs_functions.bas");}while(r);
#line 156 "subs_functions/subs_functions.bas"
do{
#line 156 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__resizewidth",17));
#line 156 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 156 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,156,"subs_functions.bas");}while(r);
#line 157 "subs_functions/subs_functions.bas"
do{
#line 157 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 157 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,157,"subs_functions.bas");}while(r);
#line 158 "subs_functions/subs_functions.bas"
do{
#line 158 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RESIZEWIDTH",12));
#line 158 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 158 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,158,"subs_functions.bas");}while(r);
#line 159 "subs_functions/subs_functions.bas"
do{
#line 159 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 159 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,159,"subs_functions.bas");}while(r);
#line 161 "subs_functions/subs_functions.bas"
do{
#line 161 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 161 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,161,"subs_functions.bas");}while(r);
#line 162 "subs_functions/subs_functions.bas"
do{
#line 162 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResizeHeight",13));
#line 162 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 162 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,162,"subs_functions.bas");}while(r);
#line 163 "subs_functions/subs_functions.bas"
do{
#line 163 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 163 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,163,"subs_functions.bas");}while(r);
#line 164 "subs_functions/subs_functions.bas"
do{
#line 164 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__resizeheight",18));
#line 164 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 164 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,164,"subs_functions.bas");}while(r);
#line 165 "subs_functions/subs_functions.bas"
do{
#line 165 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 165 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,165,"subs_functions.bas");}while(r);
#line 166 "subs_functions/subs_functions.bas"
do{
#line 166 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RESIZEHEIGHT",13));
#line 166 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 166 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,166,"subs_functions.bas");}while(r);
#line 167 "subs_functions/subs_functions.bas"
do{
#line 167 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 167 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,167,"subs_functions.bas");}while(r);
#line 169 "subs_functions/subs_functions.bas"
do{
#line 169 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 169 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,169,"subs_functions.bas");}while(r);
#line 170 "subs_functions/subs_functions.bas"
do{
#line 170 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScaledWidth",12));
#line 170 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 170 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,170,"subs_functions.bas");}while(r);
#line 171 "subs_functions/subs_functions.bas"
do{
#line 171 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 171 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,171,"subs_functions.bas");}while(r);
#line 172 "subs_functions/subs_functions.bas"
do{
#line 172 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__scaledwidth",17));
#line 172 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 172 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,172,"subs_functions.bas");}while(r);
#line 173 "subs_functions/subs_functions.bas"
do{
#line 173 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,173,"subs_functions.bas");}while(r);
#line 174 "subs_functions/subs_functions.bas"
do{
#line 174 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCALEDWIDTH",12));
#line 174 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 174 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,174,"subs_functions.bas");}while(r);
#line 175 "subs_functions/subs_functions.bas"
do{
#line 175 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 175 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,175,"subs_functions.bas");}while(r);
#line 177 "subs_functions/subs_functions.bas"
do{
#line 177 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 177 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,177,"subs_functions.bas");}while(r);
#line 178 "subs_functions/subs_functions.bas"
do{
#line 178 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScaledHeight",13));
#line 178 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 178 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,178,"subs_functions.bas");}while(r);
#line 179 "subs_functions/subs_functions.bas"
do{
#line 179 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 179 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,179,"subs_functions.bas");}while(r);
#line 180 "subs_functions/subs_functions.bas"
do{
#line 180 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__scaledheight",18));
#line 180 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 180 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,180,"subs_functions.bas");}while(r);
#line 181 "subs_functions/subs_functions.bas"
do{
#line 181 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 181 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,181,"subs_functions.bas");}while(r);
#line 182 "subs_functions/subs_functions.bas"
do{
#line 182 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCALEDHEIGHT",13));
#line 182 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 182 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,182,"subs_functions.bas");}while(r);
#line 183 "subs_functions/subs_functions.bas"
do{
#line 183 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,183,"subs_functions.bas");}while(r);
#line 186 "subs_functions/subs_functions.bas"
do{
#line 186 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 186 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,186,"subs_functions.bas");}while(r);
#line 187 "subs_functions/subs_functions.bas"
do{
#line 187 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_GLRender",9));
#line 187 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 187 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,187,"subs_functions.bas");}while(r);
#line 188 "subs_functions/subs_functions.bas"
do{
#line 188 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 188 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,188,"subs_functions.bas");}while(r);
#line 189 "subs_functions/subs_functions.bas"
do{
#line 189 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__glrender",13));
#line 189 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 189 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,189,"subs_functions.bas");}while(r);
#line 190 "subs_functions/subs_functions.bas"
do{
#line 190 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 190 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,190,"subs_functions.bas");}while(r);
#line 191 "subs_functions/subs_functions.bas"
do{
#line 191 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 191 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 191 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,191,"subs_functions.bas");}while(r);
#line 192 "subs_functions/subs_functions.bas"
do{
#line 192 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{_Behind|_OnTop|_Only}",22));
#line 192 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 192 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,192,"subs_functions.bas");}while(r);
#line 193 "subs_functions/subs_functions.bas"
do{
#line 193 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_GLRENDER {_Behind|_OnTop|_Only}",32));
#line 193 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,193,"subs_functions.bas");}while(r);
#line 194 "subs_functions/subs_functions.bas"
do{
#line 194 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 194 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,194,"subs_functions.bas");}while(r);
#line 196 "subs_functions/subs_functions.bas"
do{
#line 196 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 196 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,196,"subs_functions.bas");}while(r);
#line 197 "subs_functions/subs_functions.bas"
do{
#line 197 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DisplayOrder",13));
#line 197 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 197 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,197,"subs_functions.bas");}while(r);
#line 198 "subs_functions/subs_functions.bas"
do{
#line 198 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 198 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,198,"subs_functions.bas");}while(r);
#line 199 "subs_functions/subs_functions.bas"
do{
#line 199 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__displayorder",17));
#line 199 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 199 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,199,"subs_functions.bas");}while(r);
#line 200 "subs_functions/subs_functions.bas"
do{
#line 200 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 200 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,200,"subs_functions.bas");}while(r);
#line 201 "subs_functions/subs_functions.bas"
do{
#line 201 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 201 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 201 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,201,"subs_functions.bas");}while(r);
#line 202 "subs_functions/subs_functions.bas"
do{
#line 202 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}]]]]",179));
#line 202 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 202 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,202,"subs_functions.bas");}while(r);
#line 203 "subs_functions/subs_functions.bas"
do{
#line 203 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DISPLAYORDER {_Software|_Hardware|_Hardware1|_GLRender} (any combination/order)",80));
#line 203 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,203,"subs_functions.bas");}while(r);
#line 204 "subs_functions/subs_functions.bas"
do{
#line 204 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 204 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,204,"subs_functions.bas");}while(r);
#line 206 "subs_functions/subs_functions.bas"
do{
#line 206 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 206 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,206,"subs_functions.bas");}while(r);
#line 207 "subs_functions/subs_functions.bas"
do{
#line 207 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemGet",7));
#line 207 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 207 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,207,"subs_functions.bas");}while(r);
#line 208 "subs_functions/subs_functions.bas"
do{
#line 208 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 208 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,208,"subs_functions.bas");}while(r);
#line 209 "subs_functions/subs_functions.bas"
do{
#line 209 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__memget",12));
#line 209 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 209 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,209,"subs_functions.bas");}while(r);
#line 210 "subs_functions/subs_functions.bas"
do{
#line 210 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 210 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,210,"subs_functions.bas");}while(r);
#line 211 "subs_functions/subs_functions.bas"
do{
#line 211 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string( -1 )));
#line 211 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 211 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,211,"subs_functions.bas");}while(r);
#line 212 "subs_functions/subs_functions.bas"
do{
#line 212 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 212 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,212,"subs_functions.bas");}while(r);
#line 213 "subs_functions/subs_functions.bas"
do{
#line 213 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMGET(block, offset, type)",28));
#line 213 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,213,"subs_functions.bas");}while(r);
#line 214 "subs_functions/subs_functions.bas"
do{
#line 214 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 214 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,214,"subs_functions.bas");}while(r);
#line 216 "subs_functions/subs_functions.bas"
do{
#line 216 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 216 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,216,"subs_functions.bas");}while(r);
#line 217 "subs_functions/subs_functions.bas"
do{
#line 217 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Mem",4));
#line 217 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 217 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,217,"subs_functions.bas");}while(r);
#line 218 "subs_functions/subs_functions.bas"
do{
#line 218 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 218 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,218,"subs_functions.bas");}while(r);
#line 219 "subs_functions/subs_functions.bas"
do{
#line 219 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mem",9));
#line 219 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 219 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,219,"subs_functions.bas");}while(r);
#line 222 "subs_functions/subs_functions.bas"
do{
#line 222 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,222,"subs_functions.bas");}while(r);
#line 223 "subs_functions/subs_functions.bas"
do{
#line 223 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)));
#line 223 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 223 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,223,"subs_functions.bas");}while(r);
#line 224 "subs_functions/subs_functions.bas"
do{
#line 224 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 224 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 224 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,224,"subs_functions.bas");}while(r);
#line 225 "subs_functions/subs_functions.bas"
do{
#line 225 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ISUDT+( 1 );
#line 225 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,225,"subs_functions.bas");}while(r);
#line 226 "subs_functions/subs_functions.bas"
do{
#line 226 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEM(referenceVariable) or _MEM(offset, byteSize)",49));
#line 226 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 226 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,226,"subs_functions.bas");}while(r);
#line 227 "subs_functions/subs_functions.bas"
do{
#line 227 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 227 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,227,"subs_functions.bas");}while(r);
#line 230 "subs_functions/subs_functions.bas"
do{
#line 230 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 230 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,230,"subs_functions.bas");}while(r);
#line 231 "subs_functions/subs_functions.bas"
do{
#line 231 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemElement",11));
#line 231 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,231,"subs_functions.bas");}while(r);
#line 232 "subs_functions/subs_functions.bas"
do{
#line 232 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 232 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,232,"subs_functions.bas");}while(r);
#line 233 "subs_functions/subs_functions.bas"
do{
#line 233 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mem",9));
#line 233 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 233 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,233,"subs_functions.bas");}while(r);
#line 234 "subs_functions/subs_functions.bas"
do{
#line 234 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 234 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,234,"subs_functions.bas");}while(r);
#line 235 "subs_functions/subs_functions.bas"
do{
#line 235 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -8 ));
#line 235 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 235 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,235,"subs_functions.bas");}while(r);
#line 236 "subs_functions/subs_functions.bas"
do{
#line 236 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ISUDT+( 1 );
#line 236 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,236,"subs_functions.bas");}while(r);
#line 237 "subs_functions/subs_functions.bas"
do{
#line 237 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMELEMENT(referenceVariable)",30));
#line 237 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 237 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,237,"subs_functions.bas");}while(r);
#line 238 "subs_functions/subs_functions.bas"
do{
#line 238 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 238 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,238,"subs_functions.bas");}while(r);
#line 241 "subs_functions/subs_functions.bas"
do{
#line 241 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 241 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,241,"subs_functions.bas");}while(r);
#line 242 "subs_functions/subs_functions.bas"
do{
#line 242 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemFree",8));
#line 242 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 242 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,242,"subs_functions.bas");}while(r);
#line 243 "subs_functions/subs_functions.bas"
do{
#line 243 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 243 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,243,"subs_functions.bas");}while(r);
#line 244 "subs_functions/subs_functions.bas"
do{
#line 244 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__memfree",12));
#line 244 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 244 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,244,"subs_functions.bas");}while(r);
#line 245 "subs_functions/subs_functions.bas"
do{
#line 245 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 245 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,245,"subs_functions.bas");}while(r);
#line 246 "subs_functions/subs_functions.bas"
do{
#line 246 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_UDTTYPE+( 1 )));
#line 246 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 246 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,246,"subs_functions.bas");}while(r);
#line 247 "subs_functions/subs_functions.bas"
do{
#line 247 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMFREE memoryVariable",23));
#line 247 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 247 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,247,"subs_functions.bas");}while(r);
#line 248 "subs_functions/subs_functions.bas"
do{
#line 248 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 248 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,248,"subs_functions.bas");}while(r);
#line 250 "subs_functions/subs_functions.bas"
do{
#line 250 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 250 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,250,"subs_functions.bas");}while(r);
#line 251 "subs_functions/subs_functions.bas"
do{
#line 251 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemExists",10));
#line 251 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,251,"subs_functions.bas");}while(r);
#line 252 "subs_functions/subs_functions.bas"
do{
#line 252 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 252 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,252,"subs_functions.bas");}while(r);
#line 253 "subs_functions/subs_functions.bas"
do{
#line 253 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__memexists",15));
#line 253 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 253 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,253,"subs_functions.bas");}while(r);
#line 254 "subs_functions/subs_functions.bas"
do{
#line 254 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 254 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,254,"subs_functions.bas");}while(r);
#line 255 "subs_functions/subs_functions.bas"
do{
#line 255 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_UDTTYPE+( 1 )));
#line 255 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 255 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,255,"subs_functions.bas");}while(r);
#line 256 "subs_functions/subs_functions.bas"
do{
#line 256 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 256 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,256,"subs_functions.bas");}while(r);
#line 257 "subs_functions/subs_functions.bas"
do{
#line 257 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMEXISTS(memBlock)",20));
#line 257 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 257 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,257,"subs_functions.bas");}while(r);
#line 258 "subs_functions/subs_functions.bas"
do{
#line 258 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 258 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,258,"subs_functions.bas");}while(r);
#line 260 "subs_functions/subs_functions.bas"
do{
#line 260 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 260 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,260,"subs_functions.bas");}while(r);
#line 261 "subs_functions/subs_functions.bas"
do{
#line 261 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemNew",7));
#line 261 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 261 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,261,"subs_functions.bas");}while(r);
#line 262 "subs_functions/subs_functions.bas"
do{
#line 262 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 262 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,262,"subs_functions.bas");}while(r);
#line 263 "subs_functions/subs_functions.bas"
do{
#line 263 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__memnew",12));
#line 263 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 263 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,263,"subs_functions.bas");}while(r);
#line 264 "subs_functions/subs_functions.bas"
do{
#line 264 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 264 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,264,"subs_functions.bas");}while(r);
#line 265 "subs_functions/subs_functions.bas"
do{
#line 265 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER));
#line 265 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 265 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,265,"subs_functions.bas");}while(r);
#line 266 "subs_functions/subs_functions.bas"
do{
#line 266 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ISUDT+( 1 );
#line 266 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,266,"subs_functions.bas");}while(r);
#line 267 "subs_functions/subs_functions.bas"
do{
#line 267 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMNEW(byteSize)",17));
#line 267 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 267 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,267,"subs_functions.bas");}while(r);
#line 268 "subs_functions/subs_functions.bas"
do{
#line 268 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 268 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,268,"subs_functions.bas");}while(r);
#line 270 "subs_functions/subs_functions.bas"
do{
#line 270 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 270 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,270,"subs_functions.bas");}while(r);
#line 271 "subs_functions/subs_functions.bas"
do{
#line 271 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemImage",9));
#line 271 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 271 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,271,"subs_functions.bas");}while(r);
#line 272 "subs_functions/subs_functions.bas"
do{
#line 272 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 272 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,272,"subs_functions.bas");}while(r);
#line 273 "subs_functions/subs_functions.bas"
do{
#line 273 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__memimage",14));
#line 273 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 273 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,273,"subs_functions.bas");}while(r);
#line 274 "subs_functions/subs_functions.bas"
do{
#line 274 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 274 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,274,"subs_functions.bas");}while(r);
#line 275 "subs_functions/subs_functions.bas"
do{
#line 275 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 275 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 275 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,275,"subs_functions.bas");}while(r);
#line 276 "subs_functions/subs_functions.bas"
do{
#line 276 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 276 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 276 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,276,"subs_functions.bas");}while(r);
#line 277 "subs_functions/subs_functions.bas"
do{
#line 277 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ISUDT+( 1 );
#line 277 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,277,"subs_functions.bas");}while(r);
#line 278 "subs_functions/subs_functions.bas"
do{
#line 278 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMIMAGE[(imageHandle&)]",25));
#line 278 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 278 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,278,"subs_functions.bas");}while(r);
#line 279 "subs_functions/subs_functions.bas"
do{
#line 279 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 279 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,279,"subs_functions.bas");}while(r);
#line 281 "subs_functions/subs_functions.bas"
do{
#line 281 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 281 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,281,"subs_functions.bas");}while(r);
#line 282 "subs_functions/subs_functions.bas"
do{
#line 282 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemSound",9));
#line 282 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 282 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,282,"subs_functions.bas");}while(r);
#line 282 "subs_functions/subs_functions.bas"
do{
#line 282 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 282 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,282,"subs_functions.bas");}while(r);
#line 283 "subs_functions/subs_functions.bas"
do{
#line 283 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 283 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,283,"subs_functions.bas");}while(r);
#line 284 "subs_functions/subs_functions.bas"
do{
#line 284 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__memsound",14));
#line 284 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 284 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,284,"subs_functions.bas");}while(r);
#line 285 "subs_functions/subs_functions.bas"
do{
#line 285 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 285 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,285,"subs_functions.bas");}while(r);
#line 286 "subs_functions/subs_functions.bas"
do{
#line 286 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 286 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 286 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,286,"subs_functions.bas");}while(r);
#line 287 "subs_functions/subs_functions.bas"
do{
#line 287 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 287 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 287 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,287,"subs_functions.bas");}while(r);
#line 288 "subs_functions/subs_functions.bas"
do{
#line 288 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ISUDT+( 1 );
#line 288 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,288,"subs_functions.bas");}while(r);
#line 289 "subs_functions/subs_functions.bas"
do{
#line 289 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMSOUND(soundHandle&)",23));
#line 289 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,289,"subs_functions.bas");}while(r);
#line 290 "subs_functions/subs_functions.bas"
do{
#line 290 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 290 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,290,"subs_functions.bas");}while(r);
#line 292 "subs_functions/subs_functions.bas"
do{
#line 292 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 292 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,292,"subs_functions.bas");}while(r);
#line 293 "subs_functions/subs_functions.bas"
do{
#line 293 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemCopy",8));
#line 293 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 293 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,293,"subs_functions.bas");}while(r);
#line 294 "subs_functions/subs_functions.bas"
do{
#line 294 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 294 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,294,"subs_functions.bas");}while(r);
#line 295 "subs_functions/subs_functions.bas"
do{
#line 295 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__memcopy",12));
#line 295 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 295 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,295,"subs_functions.bas");}while(r);
#line 296 "subs_functions/subs_functions.bas"
do{
#line 296 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 296 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,296,"subs_functions.bas");}while(r);
#line 297 "subs_functions/subs_functions.bas"
do{
#line 297 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_UDTTYPE+( 1 ))),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)));
#line 297 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 297 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,297,"subs_functions.bas");}while(r);
#line 298 "subs_functions/subs_functions.bas"
do{
#line 298 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?,?{To}?,?",12));
#line 298 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 298 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,298,"subs_functions.bas");}while(r);
#line 299 "subs_functions/subs_functions.bas"
do{
#line 299 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MEMCOPY sourceBlock, sourceBlock.OFFSET, sourceBlock.SIZE TO destBlock, destBlock.OFFSET",89));
#line 299 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,299,"subs_functions.bas");}while(r);
#line 300 "subs_functions/subs_functions.bas"
do{
#line 300 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 300 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,300,"subs_functions.bas");}while(r);
#line 302 "subs_functions/subs_functions.bas"
do{
#line 302 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 302 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,302,"subs_functions.bas");}while(r);
#line 303 "subs_functions/subs_functions.bas"
do{
#line 303 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleTitle",13));
#line 303 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 303 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,303,"subs_functions.bas");}while(r);
#line 304 "subs_functions/subs_functions.bas"
do{
#line 304 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 304 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,304,"subs_functions.bas");}while(r);
#line 305 "subs_functions/subs_functions.bas"
do{
#line 305 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__consoletitle",17));
#line 305 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 305 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,305,"subs_functions.bas");}while(r);
#line 306 "subs_functions/subs_functions.bas"
do{
#line 306 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 306 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,306,"subs_functions.bas");}while(r);
#line 307 "subs_functions/subs_functions.bas"
do{
#line 307 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 307 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 307 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,307,"subs_functions.bas");}while(r);
#line 308 "subs_functions/subs_functions.bas"
do{
#line 308 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLETITLE title$",20));
#line 308 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,308,"subs_functions.bas");}while(r);
#line 309 "subs_functions/subs_functions.bas"
do{
#line 309 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 309 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,309,"subs_functions.bas");}while(r);
#line 311 "subs_functions/subs_functions.bas"
do{
#line 311 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 311 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,311,"subs_functions.bas");}while(r);
#line 312 "subs_functions/subs_functions.bas"
do{
#line 312 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenShow",11));
#line 312 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 312 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,312,"subs_functions.bas");}while(r);
#line 313 "subs_functions/subs_functions.bas"
do{
#line 313 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 313 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,313,"subs_functions.bas");}while(r);
#line 314 "subs_functions/subs_functions.bas"
do{
#line 314 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__screenshow",15));
#line 314 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 314 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,314,"subs_functions.bas");}while(r);
#line 315 "subs_functions/subs_functions.bas"
do{
#line 315 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENSHOW",11));
#line 315 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 315 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,315,"subs_functions.bas");}while(r);
#line 316 "subs_functions/subs_functions.bas"
do{
#line 316 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 316 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,316,"subs_functions.bas");}while(r);
#line 318 "subs_functions/subs_functions.bas"
do{
#line 318 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 318 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,318,"subs_functions.bas");}while(r);
#line 319 "subs_functions/subs_functions.bas"
do{
#line 319 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenHide",11));
#line 319 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 319 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,319,"subs_functions.bas");}while(r);
#line 320 "subs_functions/subs_functions.bas"
do{
#line 320 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 320 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,320,"subs_functions.bas");}while(r);
#line 321 "subs_functions/subs_functions.bas"
do{
#line 321 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__screenhide",15));
#line 321 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 321 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,321,"subs_functions.bas");}while(r);
#line 322 "subs_functions/subs_functions.bas"
do{
#line 322 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENHIDE",11));
#line 322 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 322 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,322,"subs_functions.bas");}while(r);
#line 323 "subs_functions/subs_functions.bas"
do{
#line 323 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 323 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,323,"subs_functions.bas");}while(r);
#line 325 "subs_functions/subs_functions.bas"
do{
#line 325 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 325 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,325,"subs_functions.bas");}while(r);
#line 326 "subs_functions/subs_functions.bas"
do{
#line 326 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenHide",11));
#line 326 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 326 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,326,"subs_functions.bas");}while(r);
#line 327 "subs_functions/subs_functions.bas"
do{
#line 327 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,327,"subs_functions.bas");}while(r);
#line 328 "subs_functions/subs_functions.bas"
do{
#line 328 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__screenhide",16));
#line 328 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 328 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,328,"subs_functions.bas");}while(r);
#line 329 "subs_functions/subs_functions.bas"
do{
#line 329 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 329 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,329,"subs_functions.bas");}while(r);
#line 330 "subs_functions/subs_functions.bas"
do{
#line 330 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENHIDE",11));
#line 330 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 330 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,330,"subs_functions.bas");}while(r);
#line 331 "subs_functions/subs_functions.bas"
do{
#line 331 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 331 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,331,"subs_functions.bas");}while(r);
#line 333 "subs_functions/subs_functions.bas"
do{
#line 333 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 333 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,333,"subs_functions.bas");}while(r);
#line 334 "subs_functions/subs_functions.bas"
do{
#line 334 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Console",8));
#line 334 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 334 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,334,"subs_functions.bas");}while(r);
#line 335 "subs_functions/subs_functions.bas"
do{
#line 335 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 335 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,335,"subs_functions.bas");}while(r);
#line 336 "subs_functions/subs_functions.bas"
do{
#line 336 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__console",13));
#line 336 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 336 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,336,"subs_functions.bas");}while(r);
#line 337 "subs_functions/subs_functions.bas"
do{
#line 337 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 337 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,337,"subs_functions.bas");}while(r);
#line 338 "subs_functions/subs_functions.bas"
do{
#line 338 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLE",8));
#line 338 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 338 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,338,"subs_functions.bas");}while(r);
#line 339 "subs_functions/subs_functions.bas"
do{
#line 339 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 339 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,339,"subs_functions.bas");}while(r);
#line 341 "subs_functions/subs_functions.bas"
do{
#line 341 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 341 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,341,"subs_functions.bas");}while(r);
#line 342 "subs_functions/subs_functions.bas"
do{
#line 342 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Console",8));
#line 342 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 342 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,342,"subs_functions.bas");}while(r);
#line 343 "subs_functions/subs_functions.bas"
do{
#line 343 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 343 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,343,"subs_functions.bas");}while(r);
#line 344 "subs_functions/subs_functions.bas"
do{
#line 344 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__console",12));
#line 344 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 344 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,344,"subs_functions.bas");}while(r);
#line 345 "subs_functions/subs_functions.bas"
do{
#line 345 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 345 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,345,"subs_functions.bas");}while(r);
#line 346 "subs_functions/subs_functions.bas"
do{
#line 346 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 346 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 346 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,346,"subs_functions.bas");}while(r);
#line 347 "subs_functions/subs_functions.bas"
do{
#line 347 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off}",8));
#line 347 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 347 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,347,"subs_functions.bas");}while(r);
#line 348 "subs_functions/subs_functions.bas"
do{
#line 348 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLE {On|Off}",17));
#line 348 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 348 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,348,"subs_functions.bas");}while(r);
#line 349 "subs_functions/subs_functions.bas"
do{
#line 349 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 349 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,349,"subs_functions.bas");}while(r);
#line 351 "subs_functions/subs_functions.bas"
do{
#line 351 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 351 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,351,"subs_functions.bas");}while(r);
#line 352 "subs_functions/subs_functions.bas"
do{
#line 352 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ControlChr",11));
#line 352 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 352 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,352,"subs_functions.bas");}while(r);
#line 353 "subs_functions/subs_functions.bas"
do{
#line 353 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 353 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,353,"subs_functions.bas");}while(r);
#line 354 "subs_functions/subs_functions.bas"
do{
#line 354 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__controlchr",15));
#line 354 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 354 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,354,"subs_functions.bas");}while(r);
#line 355 "subs_functions/subs_functions.bas"
do{
#line 355 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 355 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,355,"subs_functions.bas");}while(r);
#line 356 "subs_functions/subs_functions.bas"
do{
#line 356 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 356 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 356 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,356,"subs_functions.bas");}while(r);
#line 357 "subs_functions/subs_functions.bas"
do{
#line 357 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off}",8));
#line 357 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 357 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,357,"subs_functions.bas");}while(r);
#line 358 "subs_functions/subs_functions.bas"
do{
#line 358 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONTROLCHR {On|Off}",20));
#line 358 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 358 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,358,"subs_functions.bas");}while(r);
#line 359 "subs_functions/subs_functions.bas"
do{
#line 359 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 359 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,359,"subs_functions.bas");}while(r);
#line 361 "subs_functions/subs_functions.bas"
do{
#line 361 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 361 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,361,"subs_functions.bas");}while(r);
#line 362 "subs_functions/subs_functions.bas"
do{
#line 362 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blink",6));
#line 362 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 362 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,362,"subs_functions.bas");}while(r);
#line 363 "subs_functions/subs_functions.bas"
do{
#line 363 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 363 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,363,"subs_functions.bas");}while(r);
#line 364 "subs_functions/subs_functions.bas"
do{
#line 364 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__blink",10));
#line 364 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 364 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,364,"subs_functions.bas");}while(r);
#line 365 "subs_functions/subs_functions.bas"
do{
#line 365 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 365 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,365,"subs_functions.bas");}while(r);
#line 366 "subs_functions/subs_functions.bas"
do{
#line 366 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 366 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 366 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,366,"subs_functions.bas");}while(r);
#line 367 "subs_functions/subs_functions.bas"
do{
#line 367 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off}",8));
#line 367 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 367 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,367,"subs_functions.bas");}while(r);
#line 368 "subs_functions/subs_functions.bas"
do{
#line 368 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLINK {On|Off}",15));
#line 368 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 368 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,368,"subs_functions.bas");}while(r);
#line 369 "subs_functions/subs_functions.bas"
do{
#line 369 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 369 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,369,"subs_functions.bas");}while(r);
#line 371 "subs_functions/subs_functions.bas"
do{
#line 371 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 371 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,371,"subs_functions.bas");}while(r);
#line 372 "subs_functions/subs_functions.bas"
do{
#line 372 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blink",6));
#line 372 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 372 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,372,"subs_functions.bas");}while(r);
#line 373 "subs_functions/subs_functions.bas"
do{
#line 373 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 373 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,373,"subs_functions.bas");}while(r);
#line 374 "subs_functions/subs_functions.bas"
do{
#line 374 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__blink",11));
#line 374 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 374 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,374,"subs_functions.bas");}while(r);
#line 375 "subs_functions/subs_functions.bas"
do{
#line 375 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 375 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,375,"subs_functions.bas");}while(r);
#line 376 "subs_functions/subs_functions.bas"
do{
#line 376 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLINK",6));
#line 376 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 376 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,376,"subs_functions.bas");}while(r);
#line 377 "subs_functions/subs_functions.bas"
do{
#line 377 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 377 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,377,"subs_functions.bas");}while(r);
#line 379 "subs_functions/subs_functions.bas"
do{
#line 379 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 379 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,379,"subs_functions.bas");}while(r);
#line 380 "subs_functions/subs_functions.bas"
do{
#line 380 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FileExists",11));
#line 380 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 380 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,380,"subs_functions.bas");}while(r);
#line 381 "subs_functions/subs_functions.bas"
do{
#line 381 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 381 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,381,"subs_functions.bas");}while(r);
#line 382 "subs_functions/subs_functions.bas"
do{
#line 382 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fileexists",16));
#line 382 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 382 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,382,"subs_functions.bas");}while(r);
#line 383 "subs_functions/subs_functions.bas"
do{
#line 383 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 383 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,383,"subs_functions.bas");}while(r);
#line 384 "subs_functions/subs_functions.bas"
do{
#line 384 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 384 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 384 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,384,"subs_functions.bas");}while(r);
#line 385 "subs_functions/subs_functions.bas"
do{
#line 385 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 385 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,385,"subs_functions.bas");}while(r);
#line 386 "subs_functions/subs_functions.bas"
do{
#line 386 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FILEEXISTS(fileName$)",22));
#line 386 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 386 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,386,"subs_functions.bas");}while(r);
#line 387 "subs_functions/subs_functions.bas"
do{
#line 387 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 387 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,387,"subs_functions.bas");}while(r);
#line 389 "subs_functions/subs_functions.bas"
do{
#line 389 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 389 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,389,"subs_functions.bas");}while(r);
#line 390 "subs_functions/subs_functions.bas"
do{
#line 390 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DirExists",10));
#line 390 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 390 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,390,"subs_functions.bas");}while(r);
#line 391 "subs_functions/subs_functions.bas"
do{
#line 391 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 391 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,391,"subs_functions.bas");}while(r);
#line 392 "subs_functions/subs_functions.bas"
do{
#line 392 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__direxists",15));
#line 392 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 392 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,392,"subs_functions.bas");}while(r);
#line 393 "subs_functions/subs_functions.bas"
do{
#line 393 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 393 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,393,"subs_functions.bas");}while(r);
#line 394 "subs_functions/subs_functions.bas"
do{
#line 394 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 394 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 394 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,394,"subs_functions.bas");}while(r);
#line 395 "subs_functions/subs_functions.bas"
do{
#line 395 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 395 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,395,"subs_functions.bas");}while(r);
#line 396 "subs_functions/subs_functions.bas"
do{
#line 396 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DIREXISTS(path$)",17));
#line 396 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 396 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,396,"subs_functions.bas");}while(r);
#line 397 "subs_functions/subs_functions.bas"
do{
#line 397 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 397 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,397,"subs_functions.bas");}while(r);
#line 401 "subs_functions/subs_functions.bas"
do{
#line 401 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 401 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,401,"subs_functions.bas");}while(r);
#line 402 "subs_functions/subs_functions.bas"
do{
#line 402 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Stick",5));
#line 402 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 402 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,402,"subs_functions.bas");}while(r);
#line 402 "subs_functions/subs_functions.bas"
do{
#line 402 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 402 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,402,"subs_functions.bas");}while(r);
#line 403 "subs_functions/subs_functions.bas"
do{
#line 403 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 403 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,403,"subs_functions.bas");}while(r);
#line 404 "subs_functions/subs_functions.bas"
do{
#line 404 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_stick",10));
#line 404 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 404 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,404,"subs_functions.bas");}while(r);
#line 405 "subs_functions/subs_functions.bas"
do{
#line 405 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 405 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,405,"subs_functions.bas");}while(r);
#line 406 "subs_functions/subs_functions.bas"
do{
#line 406 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 406 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 406 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,406,"subs_functions.bas");}while(r);
#line 407 "subs_functions/subs_functions.bas"
do{
#line 407 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 407 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,407,"subs_functions.bas");}while(r);
#line 408 "subs_functions/subs_functions.bas"
do{
#line 408 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 408 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 408 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,408,"subs_functions.bas");}while(r);
#line 409 "subs_functions/subs_functions.bas"
do{
#line 409 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("STICK(direction%) or STICK(direction%, axis_number%)",52));
#line 409 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 409 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,409,"subs_functions.bas");}while(r);
#line 410 "subs_functions/subs_functions.bas"
do{
#line 410 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 410 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,410,"subs_functions.bas");}while(r);
#line 412 "subs_functions/subs_functions.bas"
do{
#line 412 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 412 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,412,"subs_functions.bas");}while(r);
#line 413 "subs_functions/subs_functions.bas"
do{
#line 413 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Strig",5));
#line 413 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 413 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,413,"subs_functions.bas");}while(r);
#line 413 "subs_functions/subs_functions.bas"
do{
#line 413 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 413 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,413,"subs_functions.bas");}while(r);
#line 414 "subs_functions/subs_functions.bas"
do{
#line 414 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 414 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,414,"subs_functions.bas");}while(r);
#line 415 "subs_functions/subs_functions.bas"
do{
#line 415 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_strig",10));
#line 415 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 415 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,415,"subs_functions.bas");}while(r);
#line 416 "subs_functions/subs_functions.bas"
do{
#line 416 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 416 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,416,"subs_functions.bas");}while(r);
#line 417 "subs_functions/subs_functions.bas"
do{
#line 417 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 417 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 417 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,417,"subs_functions.bas");}while(r);
#line 418 "subs_functions/subs_functions.bas"
do{
#line 418 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 418 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,418,"subs_functions.bas");}while(r);
#line 419 "subs_functions/subs_functions.bas"
do{
#line 419 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 419 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 419 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,419,"subs_functions.bas");}while(r);
#line 420 "subs_functions/subs_functions.bas"
do{
#line 420 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("STRIG(button_function%) or STRIG(button_function%, device_number%)",66));
#line 420 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 420 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,420,"subs_functions.bas");}while(r);
#line 421 "subs_functions/subs_functions.bas"
do{
#line 421 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 421 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,421,"subs_functions.bas");}while(r);
#line 423 "subs_functions/subs_functions.bas"
do{
#line 423 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 423 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,423,"subs_functions.bas");}while(r);
#line 424 "subs_functions/subs_functions.bas"
do{
#line 424 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Strig",5));
#line 424 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 424 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,424,"subs_functions.bas");}while(r);
#line 424 "subs_functions/subs_functions.bas"
do{
#line 424 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 424 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,424,"subs_functions.bas");}while(r);
#line 425 "subs_functions/subs_functions.bas"
do{
#line 425 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 425 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,425,"subs_functions.bas");}while(r);
#line 426 "subs_functions/subs_functions.bas"
do{
#line 426 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_strig",9));
#line 426 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 426 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,426,"subs_functions.bas");}while(r);
#line 427 "subs_functions/subs_functions.bas"
do{
#line 427 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 427 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,427,"subs_functions.bas");}while(r);
#line 428 "subs_functions/subs_functions.bas"
do{
#line 428 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 428 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 428 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,428,"subs_functions.bas");}while(r);
#line 429 "subs_functions/subs_functions.bas"
do{
#line 429 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[(?[,?])]{On|Off|Stop}",22));
#line 429 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 429 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,429,"subs_functions.bas");}while(r);
#line 431 "subs_functions/subs_functions.bas"
do{
#line 431 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("STRIG(button%) {On|Off|Stop}",28));
#line 431 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 431 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,431,"subs_functions.bas");}while(r);
#line 432 "subs_functions/subs_functions.bas"
do{
#line 432 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 432 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,432,"subs_functions.bas");}while(r);
#line 434 "subs_functions/subs_functions.bas"
do{
#line 434 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 434 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,434,"subs_functions.bas");}while(r);
#line 435 "subs_functions/subs_functions.bas"
do{
#line 435 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Devices",8));
#line 435 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 435 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,435,"subs_functions.bas");}while(r);
#line 435 "subs_functions/subs_functions.bas"
do{
#line 435 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 435 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,435,"subs_functions.bas");}while(r);
#line 436 "subs_functions/subs_functions.bas"
do{
#line 436 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 436 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,436,"subs_functions.bas");}while(r);
#line 437 "subs_functions/subs_functions.bas"
do{
#line 437 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__devices",13));
#line 437 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 437 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,437,"subs_functions.bas");}while(r);
#line 438 "subs_functions/subs_functions.bas"
do{
#line 438 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 438 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,438,"subs_functions.bas");}while(r);
#line 439 "subs_functions/subs_functions.bas"
do{
#line 439 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEVICES",8));
#line 439 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 439 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,439,"subs_functions.bas");}while(r);
#line 440 "subs_functions/subs_functions.bas"
do{
#line 440 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 440 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,440,"subs_functions.bas");}while(r);
#line 442 "subs_functions/subs_functions.bas"
do{
#line 442 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 442 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,442,"subs_functions.bas");}while(r);
#line 443 "subs_functions/subs_functions.bas"
do{
#line 443 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Device",7));
#line 443 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 443 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,443,"subs_functions.bas");}while(r);
#line 443 "subs_functions/subs_functions.bas"
do{
#line 443 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 443 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,443,"subs_functions.bas");}while(r);
#line 444 "subs_functions/subs_functions.bas"
do{
#line 444 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 444 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 444 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,444,"subs_functions.bas");}while(r);
#line 445 "subs_functions/subs_functions.bas"
do{
#line 445 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 445 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,445,"subs_functions.bas");}while(r);
#line 446 "subs_functions/subs_functions.bas"
do{
#line 446 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__device",12));
#line 446 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 446 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,446,"subs_functions.bas");}while(r);
#line 447 "subs_functions/subs_functions.bas"
do{
#line 447 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 447 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,447,"subs_functions.bas");}while(r);
#line 448 "subs_functions/subs_functions.bas"
do{
#line 448 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 448 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 448 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,448,"subs_functions.bas");}while(r);
#line 449 "subs_functions/subs_functions.bas"
do{
#line 449 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 449 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,449,"subs_functions.bas");}while(r);
#line 450 "subs_functions/subs_functions.bas"
do{
#line 450 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 450 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 450 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,450,"subs_functions.bas");}while(r);
#line 451 "subs_functions/subs_functions.bas"
do{
#line 451 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEVICE$(device_number)",23));
#line 451 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 451 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,451,"subs_functions.bas");}while(r);
#line 452 "subs_functions/subs_functions.bas"
do{
#line 452 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 452 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,452,"subs_functions.bas");}while(r);
#line 454 "subs_functions/subs_functions.bas"
do{
#line 454 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 454 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,454,"subs_functions.bas");}while(r);
#line 455 "subs_functions/subs_functions.bas"
do{
#line 455 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DeviceInput",12));
#line 455 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 455 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,455,"subs_functions.bas");}while(r);
#line 455 "subs_functions/subs_functions.bas"
do{
#line 455 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 455 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,455,"subs_functions.bas");}while(r);
#line 456 "subs_functions/subs_functions.bas"
do{
#line 456 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 456 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,456,"subs_functions.bas");}while(r);
#line 457 "subs_functions/subs_functions.bas"
do{
#line 457 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__deviceinput",17));
#line 457 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 457 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,457,"subs_functions.bas");}while(r);
#line 458 "subs_functions/subs_functions.bas"
do{
#line 458 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 458 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,458,"subs_functions.bas");}while(r);
#line 459 "subs_functions/subs_functions.bas"
do{
#line 459 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 459 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 459 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,459,"subs_functions.bas");}while(r);
#line 460 "subs_functions/subs_functions.bas"
do{
#line 460 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 460 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,460,"subs_functions.bas");}while(r);
#line 461 "subs_functions/subs_functions.bas"
do{
#line 461 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 461 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 461 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,461,"subs_functions.bas");}while(r);
#line 462 "subs_functions/subs_functions.bas"
do{
#line 462 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEVICEINPUT[(device_number&)]",30));
#line 462 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 462 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,462,"subs_functions.bas");}while(r);
#line 463 "subs_functions/subs_functions.bas"
do{
#line 463 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 463 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,463,"subs_functions.bas");}while(r);
#line 465 "subs_functions/subs_functions.bas"
do{
#line 465 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 465 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,465,"subs_functions.bas");}while(r);
#line 466 "subs_functions/subs_functions.bas"
do{
#line 466 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastButton",11));
#line 466 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 466 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,466,"subs_functions.bas");}while(r);
#line 466 "subs_functions/subs_functions.bas"
do{
#line 466 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 466 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,466,"subs_functions.bas");}while(r);
#line 467 "subs_functions/subs_functions.bas"
do{
#line 467 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 467 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,467,"subs_functions.bas");}while(r);
#line 468 "subs_functions/subs_functions.bas"
do{
#line 468 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__lastbutton",16));
#line 468 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 468 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,468,"subs_functions.bas");}while(r);
#line 469 "subs_functions/subs_functions.bas"
do{
#line 469 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 469 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,469,"subs_functions.bas");}while(r);
#line 470 "subs_functions/subs_functions.bas"
do{
#line 470 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 470 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 470 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,470,"subs_functions.bas");}while(r);
#line 471 "subs_functions/subs_functions.bas"
do{
#line 471 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 471 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,471,"subs_functions.bas");}while(r);
#line 472 "subs_functions/subs_functions.bas"
do{
#line 472 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 472 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 472 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,472,"subs_functions.bas");}while(r);
#line 473 "subs_functions/subs_functions.bas"
do{
#line 473 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LASTBUTTON(deviceNumber)",25));
#line 473 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 473 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,473,"subs_functions.bas");}while(r);
#line 474 "subs_functions/subs_functions.bas"
do{
#line 474 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 474 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,474,"subs_functions.bas");}while(r);
#line 476 "subs_functions/subs_functions.bas"
do{
#line 476 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 476 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,476,"subs_functions.bas");}while(r);
#line 477 "subs_functions/subs_functions.bas"
do{
#line 477 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastAxis",9));
#line 477 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 477 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,477,"subs_functions.bas");}while(r);
#line 477 "subs_functions/subs_functions.bas"
do{
#line 477 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 477 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,477,"subs_functions.bas");}while(r);
#line 478 "subs_functions/subs_functions.bas"
do{
#line 478 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 478 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,478,"subs_functions.bas");}while(r);
#line 479 "subs_functions/subs_functions.bas"
do{
#line 479 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__lastaxis",14));
#line 479 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 479 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,479,"subs_functions.bas");}while(r);
#line 480 "subs_functions/subs_functions.bas"
do{
#line 480 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 480 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,480,"subs_functions.bas");}while(r);
#line 481 "subs_functions/subs_functions.bas"
do{
#line 481 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 481 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 481 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,481,"subs_functions.bas");}while(r);
#line 482 "subs_functions/subs_functions.bas"
do{
#line 482 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 482 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,482,"subs_functions.bas");}while(r);
#line 483 "subs_functions/subs_functions.bas"
do{
#line 483 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 483 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 483 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,483,"subs_functions.bas");}while(r);
#line 484 "subs_functions/subs_functions.bas"
do{
#line 484 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LASTAXIS(deviceNumber)",23));
#line 484 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 484 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,484,"subs_functions.bas");}while(r);
#line 485 "subs_functions/subs_functions.bas"
do{
#line 485 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 485 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,485,"subs_functions.bas");}while(r);
#line 487 "subs_functions/subs_functions.bas"
do{
#line 487 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 487 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,487,"subs_functions.bas");}while(r);
#line 488 "subs_functions/subs_functions.bas"
do{
#line 488 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastWheel",10));
#line 488 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 488 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,488,"subs_functions.bas");}while(r);
#line 488 "subs_functions/subs_functions.bas"
do{
#line 488 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 488 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,488,"subs_functions.bas");}while(r);
#line 489 "subs_functions/subs_functions.bas"
do{
#line 489 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 489 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,489,"subs_functions.bas");}while(r);
#line 490 "subs_functions/subs_functions.bas"
do{
#line 490 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__lastwheel",15));
#line 490 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 490 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,490,"subs_functions.bas");}while(r);
#line 491 "subs_functions/subs_functions.bas"
do{
#line 491 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 491 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,491,"subs_functions.bas");}while(r);
#line 492 "subs_functions/subs_functions.bas"
do{
#line 492 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 492 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 492 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,492,"subs_functions.bas");}while(r);
#line 493 "subs_functions/subs_functions.bas"
do{
#line 493 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 493 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,493,"subs_functions.bas");}while(r);
#line 494 "subs_functions/subs_functions.bas"
do{
#line 494 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 494 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 494 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,494,"subs_functions.bas");}while(r);
#line 495 "subs_functions/subs_functions.bas"
do{
#line 495 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LASTWHEEL(deviceNumber)",24));
#line 495 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 495 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,495,"subs_functions.bas");}while(r);
#line 496 "subs_functions/subs_functions.bas"
do{
#line 496 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 496 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,496,"subs_functions.bas");}while(r);
#line 498 "subs_functions/subs_functions.bas"
do{
#line 498 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 498 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,498,"subs_functions.bas");}while(r);
#line 499 "subs_functions/subs_functions.bas"
do{
#line 499 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Button",7));
#line 499 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 499 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,499,"subs_functions.bas");}while(r);
#line 499 "subs_functions/subs_functions.bas"
do{
#line 499 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 499 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,499,"subs_functions.bas");}while(r);
#line 500 "subs_functions/subs_functions.bas"
do{
#line 500 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 500 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,500,"subs_functions.bas");}while(r);
#line 501 "subs_functions/subs_functions.bas"
do{
#line 501 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__button",12));
#line 501 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 501 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,501,"subs_functions.bas");}while(r);
#line 502 "subs_functions/subs_functions.bas"
do{
#line 502 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 502 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,502,"subs_functions.bas");}while(r);
#line 503 "subs_functions/subs_functions.bas"
do{
#line 503 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 503 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 503 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,503,"subs_functions.bas");}while(r);
#line 504 "subs_functions/subs_functions.bas"
do{
#line 504 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 504 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,504,"subs_functions.bas");}while(r);
#line 505 "subs_functions/subs_functions.bas"
do{
#line 505 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 505 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 505 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,505,"subs_functions.bas");}while(r);
#line 506 "subs_functions/subs_functions.bas"
do{
#line 506 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BUTTON(button_number%)",23));
#line 506 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 506 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,506,"subs_functions.bas");}while(r);
#line 507 "subs_functions/subs_functions.bas"
do{
#line 507 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 507 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,507,"subs_functions.bas");}while(r);
#line 509 "subs_functions/subs_functions.bas"
do{
#line 509 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 509 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,509,"subs_functions.bas");}while(r);
#line 510 "subs_functions/subs_functions.bas"
do{
#line 510 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ButtonChange",13));
#line 510 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 510 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,510,"subs_functions.bas");}while(r);
#line 510 "subs_functions/subs_functions.bas"
do{
#line 510 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 510 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,510,"subs_functions.bas");}while(r);
#line 511 "subs_functions/subs_functions.bas"
do{
#line 511 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 511 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,511,"subs_functions.bas");}while(r);
#line 512 "subs_functions/subs_functions.bas"
do{
#line 512 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__buttonchange",18));
#line 512 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 512 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,512,"subs_functions.bas");}while(r);
#line 513 "subs_functions/subs_functions.bas"
do{
#line 513 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 513 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,513,"subs_functions.bas");}while(r);
#line 514 "subs_functions/subs_functions.bas"
do{
#line 514 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 514 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 514 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,514,"subs_functions.bas");}while(r);
#line 515 "subs_functions/subs_functions.bas"
do{
#line 515 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 515 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,515,"subs_functions.bas");}while(r);
#line 516 "subs_functions/subs_functions.bas"
do{
#line 516 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 516 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 516 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,516,"subs_functions.bas");}while(r);
#line 517 "subs_functions/subs_functions.bas"
do{
#line 517 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BUTTONCHANGE(button_number%)",29));
#line 517 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 517 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,517,"subs_functions.bas");}while(r);
#line 518 "subs_functions/subs_functions.bas"
do{
#line 518 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 518 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,518,"subs_functions.bas");}while(r);
#line 520 "subs_functions/subs_functions.bas"
do{
#line 520 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 520 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,520,"subs_functions.bas");}while(r);
#line 521 "subs_functions/subs_functions.bas"
do{
#line 521 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Axis",5));
#line 521 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 521 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,521,"subs_functions.bas");}while(r);
#line 521 "subs_functions/subs_functions.bas"
do{
#line 521 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 521 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,521,"subs_functions.bas");}while(r);
#line 522 "subs_functions/subs_functions.bas"
do{
#line 522 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 522 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,522,"subs_functions.bas");}while(r);
#line 523 "subs_functions/subs_functions.bas"
do{
#line 523 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__axis",10));
#line 523 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 523 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,523,"subs_functions.bas");}while(r);
#line 524 "subs_functions/subs_functions.bas"
do{
#line 524 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 524 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,524,"subs_functions.bas");}while(r);
#line 525 "subs_functions/subs_functions.bas"
do{
#line 525 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 525 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 525 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,525,"subs_functions.bas");}while(r);
#line 526 "subs_functions/subs_functions.bas"
do{
#line 526 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 526 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,526,"subs_functions.bas");}while(r);
#line 527 "subs_functions/subs_functions.bas"
do{
#line 527 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 527 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 527 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,527,"subs_functions.bas");}while(r);
#line 528 "subs_functions/subs_functions.bas"
do{
#line 528 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_AXIS(axis_number%)",19));
#line 528 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 528 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,528,"subs_functions.bas");}while(r);
#line 529 "subs_functions/subs_functions.bas"
do{
#line 529 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 529 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,529,"subs_functions.bas");}while(r);
#line 531 "subs_functions/subs_functions.bas"
do{
#line 531 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 531 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,531,"subs_functions.bas");}while(r);
#line 532 "subs_functions/subs_functions.bas"
do{
#line 532 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Wheel",6));
#line 532 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 532 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,532,"subs_functions.bas");}while(r);
#line 532 "subs_functions/subs_functions.bas"
do{
#line 532 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 10ll ;
#line 532 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,532,"subs_functions.bas");}while(r);
#line 533 "subs_functions/subs_functions.bas"
do{
#line 533 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 533 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,533,"subs_functions.bas");}while(r);
#line 534 "subs_functions/subs_functions.bas"
do{
#line 534 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__wheel",11));
#line 534 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 534 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,534,"subs_functions.bas");}while(r);
#line 535 "subs_functions/subs_functions.bas"
do{
#line 535 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 535 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,535,"subs_functions.bas");}while(r);
#line 536 "subs_functions/subs_functions.bas"
do{
#line 536 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 536 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 536 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,536,"subs_functions.bas");}while(r);
#line 537 "subs_functions/subs_functions.bas"
do{
#line 537 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 537 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,537,"subs_functions.bas");}while(r);
#line 538 "subs_functions/subs_functions.bas"
do{
#line 538 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 538 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 538 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,538,"subs_functions.bas");}while(r);
#line 539 "subs_functions/subs_functions.bas"
do{
#line 539 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WHEEL(wheelNumber%)",20));
#line 539 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 539 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,539,"subs_functions.bas");}while(r);
#line 540 "subs_functions/subs_functions.bas"
do{
#line 540 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 540 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,540,"subs_functions.bas");}while(r);
#line 542 "subs_functions/subs_functions.bas"
do{
#line 542 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 542 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,542,"subs_functions.bas");}while(r);
#line 543 "subs_functions/subs_functions.bas"
do{
#line 543 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Key",3));
#line 543 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 543 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,543,"subs_functions.bas");}while(r);
#line 544 "subs_functions/subs_functions.bas"
do{
#line 544 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 544 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,544,"subs_functions.bas");}while(r);
#line 545 "subs_functions/subs_functions.bas"
do{
#line 545 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_key",7));
#line 545 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 545 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,545,"subs_functions.bas");}while(r);
#line 546 "subs_functions/subs_functions.bas"
do{
#line 546 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 546 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,546,"subs_functions.bas");}while(r);
#line 547 "subs_functions/subs_functions.bas"
do{
#line 547 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 547 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 547 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,547,"subs_functions.bas");}while(r);
#line 548 "subs_functions/subs_functions.bas"
do{
#line 548 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("(?){On|Off|Stop}",16));
#line 548 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 548 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,548,"subs_functions.bas");}while(r);
#line 549 "subs_functions/subs_functions.bas"
do{
#line 549 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("KEY(number) {On|Off|Stop}",25));
#line 549 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 549 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,549,"subs_functions.bas");}while(r);
#line 550 "subs_functions/subs_functions.bas"
do{
#line 550 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 550 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,550,"subs_functions.bas");}while(r);
#line 552 "subs_functions/subs_functions.bas"
do{
#line 552 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 552 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,552,"subs_functions.bas");}while(r);
#line 553 "subs_functions/subs_functions.bas"
do{
#line 553 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenX",8));
#line 553 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 553 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,553,"subs_functions.bas");}while(r);
#line 554 "subs_functions/subs_functions.bas"
do{
#line 554 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 554 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,554,"subs_functions.bas");}while(r);
#line 555 "subs_functions/subs_functions.bas"
do{
#line 555 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__screenx",13));
#line 555 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 555 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,555,"subs_functions.bas");}while(r);
#line 556 "subs_functions/subs_functions.bas"
do{
#line 556 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 556 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,556,"subs_functions.bas");}while(r);
#line 557 "subs_functions/subs_functions.bas"
do{
#line 557 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENX",8));
#line 557 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 557 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,557,"subs_functions.bas");}while(r);
#line 558 "subs_functions/subs_functions.bas"
do{
#line 558 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 558 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,558,"subs_functions.bas");}while(r);
#line 560 "subs_functions/subs_functions.bas"
do{
#line 560 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 560 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,560,"subs_functions.bas");}while(r);
#line 561 "subs_functions/subs_functions.bas"
do{
#line 561 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenY",8));
#line 561 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 561 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,561,"subs_functions.bas");}while(r);
#line 562 "subs_functions/subs_functions.bas"
do{
#line 562 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 562 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,562,"subs_functions.bas");}while(r);
#line 563 "subs_functions/subs_functions.bas"
do{
#line 563 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__screeny",13));
#line 563 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 563 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,563,"subs_functions.bas");}while(r);
#line 564 "subs_functions/subs_functions.bas"
do{
#line 564 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 564 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,564,"subs_functions.bas");}while(r);
#line 565 "subs_functions/subs_functions.bas"
do{
#line 565 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENY",8));
#line 565 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 565 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,565,"subs_functions.bas");}while(r);
#line 566 "subs_functions/subs_functions.bas"
do{
#line 566 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 566 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,566,"subs_functions.bas");}while(r);
#line 568 "subs_functions/subs_functions.bas"
do{
#line 568 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 568 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,568,"subs_functions.bas");}while(r);
#line 569 "subs_functions/subs_functions.bas"
do{
#line 569 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenMove",11));
#line 569 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 569 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,569,"subs_functions.bas");}while(r);
#line 570 "subs_functions/subs_functions.bas"
do{
#line 570 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 570 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,570,"subs_functions.bas");}while(r);
#line 571 "subs_functions/subs_functions.bas"
do{
#line 571 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__screenmove",15));
#line 571 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 571 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,571,"subs_functions.bas");}while(r);
#line 572 "subs_functions/subs_functions.bas"
do{
#line 572 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 572 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,572,"subs_functions.bas");}while(r);
#line 573 "subs_functions/subs_functions.bas"
do{
#line 573 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 573 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 573 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,573,"subs_functions.bas");}while(r);
#line 574 "subs_functions/subs_functions.bas"
do{
#line 574 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Middle}][?,?]",16));
#line 574 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 574 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,574,"subs_functions.bas");}while(r);
#line 575 "subs_functions/subs_functions.bas"
do{
#line 575 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENMOVE x, y or _SCREENMOVE _Middle",39));
#line 575 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 575 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,575,"subs_functions.bas");}while(r);
#line 576 "subs_functions/subs_functions.bas"
do{
#line 576 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 576 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,576,"subs_functions.bas");}while(r);
#line 578 "subs_functions/subs_functions.bas"
do{
#line 578 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 578 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,578,"subs_functions.bas");}while(r);
#line 579 "subs_functions/subs_functions.bas"
do{
#line 579 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMove",10));
#line 579 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 579 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,579,"subs_functions.bas");}while(r);
#line 580 "subs_functions/subs_functions.bas"
do{
#line 580 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 580 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,580,"subs_functions.bas");}while(r);
#line 581 "subs_functions/subs_functions.bas"
do{
#line 581 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__mousemove",14));
#line 581 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 581 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,581,"subs_functions.bas");}while(r);
#line 582 "subs_functions/subs_functions.bas"
do{
#line 582 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 582 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,582,"subs_functions.bas");}while(r);
#line 583 "subs_functions/subs_functions.bas"
do{
#line 583 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 583 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 583 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,583,"subs_functions.bas");}while(r);
#line 584 "subs_functions/subs_functions.bas"
do{
#line 584 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEMOVE x, y",15));
#line 584 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 584 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,584,"subs_functions.bas");}while(r);
#line 585 "subs_functions/subs_functions.bas"
do{
#line 585 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 585 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,585,"subs_functions.bas");}while(r);
#line 587 "subs_functions/subs_functions.bas"
do{
#line 587 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 587 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,587,"subs_functions.bas");}while(r);
#line 588 "subs_functions/subs_functions.bas"
do{
#line 588 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OS",3));
#line 588 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 588 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,588,"subs_functions.bas");}while(r);
#line 589 "subs_functions/subs_functions.bas"
do{
#line 589 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 589 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 589 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,589,"subs_functions.bas");}while(r);
#line 590 "subs_functions/subs_functions.bas"
do{
#line 590 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 590 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,590,"subs_functions.bas");}while(r);
#line 591 "subs_functions/subs_functions.bas"
do{
#line 591 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__os",8));
#line 591 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 591 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,591,"subs_functions.bas");}while(r);
#line 592 "subs_functions/subs_functions.bas"
do{
#line 592 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 592 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,592,"subs_functions.bas");}while(r);
#line 593 "subs_functions/subs_functions.bas"
do{
#line 593 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_OS$",4));
#line 593 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 593 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,593,"subs_functions.bas");}while(r);
#line 594 "subs_functions/subs_functions.bas"
do{
#line 594 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 594 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,594,"subs_functions.bas");}while(r);
#line 596 "subs_functions/subs_functions.bas"
do{
#line 596 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 596 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,596,"subs_functions.bas");}while(r);
#line 597 "subs_functions/subs_functions.bas"
do{
#line 597 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompileDate",12));
#line 597 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 597 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,597,"subs_functions.bas");}while(r);
#line 598 "subs_functions/subs_functions.bas"
do{
#line 598 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 598 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 598 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,598,"subs_functions.bas");}while(r);
#line 599 "subs_functions/subs_functions.bas"
do{
#line 599 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 599 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,599,"subs_functions.bas");}while(r);
#line 600 "subs_functions/subs_functions.bas"
do{
#line 600 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__compdate",14));
#line 600 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 600 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,600,"subs_functions.bas");}while(r);
#line 601 "subs_functions/subs_functions.bas"
do{
#line 601 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 601 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,601,"subs_functions.bas");}while(r);
#line 602 "subs_functions/subs_functions.bas"
do{
#line 602 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COMPILEDATE$",13));
#line 602 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 602 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,602,"subs_functions.bas");}while(r);
#line 603 "subs_functions/subs_functions.bas"
do{
#line 603 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 603 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,603,"subs_functions.bas");}while(r);
#line 605 "subs_functions/subs_functions.bas"
do{
#line 605 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 605 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,605,"subs_functions.bas");}while(r);
#line 606 "subs_functions/subs_functions.bas"
do{
#line 606 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompileTime",12));
#line 606 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 606 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,606,"subs_functions.bas");}while(r);
#line 607 "subs_functions/subs_functions.bas"
do{
#line 607 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 607 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 607 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,607,"subs_functions.bas");}while(r);
#line 608 "subs_functions/subs_functions.bas"
do{
#line 608 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 608 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,608,"subs_functions.bas");}while(r);
#line 609 "subs_functions/subs_functions.bas"
do{
#line 609 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__comptime",14));
#line 609 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 609 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,609,"subs_functions.bas");}while(r);
#line 610 "subs_functions/subs_functions.bas"
do{
#line 610 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 610 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,610,"subs_functions.bas");}while(r);
#line 611 "subs_functions/subs_functions.bas"
do{
#line 611 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COMPILETIME$",13));
#line 611 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 611 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,611,"subs_functions.bas");}while(r);
#line 612 "subs_functions/subs_functions.bas"
do{
#line 612 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 612 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,612,"subs_functions.bas");}while(r);
#line 614 "subs_functions/subs_functions.bas"
do{
#line 614 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 614 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,614,"subs_functions.bas");}while(r);
#line 615 "subs_functions/subs_functions.bas"
do{
#line 615 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompilerVersion",16));
#line 615 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 615 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,615,"subs_functions.bas");}while(r);
#line 616 "subs_functions/subs_functions.bas"
do{
#line 616 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 616 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 616 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,616,"subs_functions.bas");}while(r);
#line 617 "subs_functions/subs_functions.bas"
do{
#line 617 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 617 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,617,"subs_functions.bas");}while(r);
#line 618 "subs_functions/subs_functions.bas"
do{
#line 618 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__compvers",14));
#line 618 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 618 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,618,"subs_functions.bas");}while(r);
#line 619 "subs_functions/subs_functions.bas"
do{
#line 619 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 619 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,619,"subs_functions.bas");}while(r);
#line 620 "subs_functions/subs_functions.bas"
do{
#line 620 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COMPILERVERSION$",17));
#line 620 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 620 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,620,"subs_functions.bas");}while(r);
#line 621 "subs_functions/subs_functions.bas"
do{
#line 621 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 621 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,621,"subs_functions.bas");}while(r);
#line 623 "subs_functions/subs_functions.bas"
do{
#line 623 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 623 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,623,"subs_functions.bas");}while(r);
#line 624 "subs_functions/subs_functions.bas"
do{
#line 624 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Title",6));
#line 624 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 624 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,624,"subs_functions.bas");}while(r);
#line 625 "subs_functions/subs_functions.bas"
do{
#line 625 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 625 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 625 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,625,"subs_functions.bas");}while(r);
#line 626 "subs_functions/subs_functions.bas"
do{
#line 626 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 626 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,626,"subs_functions.bas");}while(r);
#line 627 "subs_functions/subs_functions.bas"
do{
#line 627 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__title",11));
#line 627 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 627 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,627,"subs_functions.bas");}while(r);
#line 628 "subs_functions/subs_functions.bas"
do{
#line 628 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 628 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,628,"subs_functions.bas");}while(r);
#line 629 "subs_functions/subs_functions.bas"
do{
#line 629 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TITLE$",7));
#line 629 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 629 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,629,"subs_functions.bas");}while(r);
#line 630 "subs_functions/subs_functions.bas"
do{
#line 630 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 630 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,630,"subs_functions.bas");}while(r);
#line 632 "subs_functions/subs_functions.bas"
do{
#line 632 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 632 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,632,"subs_functions.bas");}while(r);
#line 633 "subs_functions/subs_functions.bas"
do{
#line 633 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapUnicode",11));
#line 633 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 633 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,633,"subs_functions.bas");}while(r);
#line 634 "subs_functions/subs_functions.bas"
do{
#line 634 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 634 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,634,"subs_functions.bas");}while(r);
#line 635 "subs_functions/subs_functions.bas"
do{
#line 635 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__mapunicode",15));
#line 635 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 635 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,635,"subs_functions.bas");}while(r);
#line 636 "subs_functions/subs_functions.bas"
do{
#line 636 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 636 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,636,"subs_functions.bas");}while(r);
#line 637 "subs_functions/subs_functions.bas"
do{
#line 637 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 637 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 637 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,637,"subs_functions.bas");}while(r);
#line 638 "subs_functions/subs_functions.bas"
do{
#line 638 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?{To}?",6));
#line 638 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 638 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,638,"subs_functions.bas");}while(r);
#line 639 "subs_functions/subs_functions.bas"
do{
#line 639 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MAPUNICODE unicode& TO asciiCode%",34));
#line 639 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 639 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,639,"subs_functions.bas");}while(r);
#line 640 "subs_functions/subs_functions.bas"
do{
#line 640 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 640 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,640,"subs_functions.bas");}while(r);
#line 642 "subs_functions/subs_functions.bas"
do{
#line 642 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 642 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,642,"subs_functions.bas");}while(r);
#line 643 "subs_functions/subs_functions.bas"
do{
#line 643 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapUnicode",11));
#line 643 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 643 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,643,"subs_functions.bas");}while(r);
#line 644 "subs_functions/subs_functions.bas"
do{
#line 644 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 644 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,644,"subs_functions.bas");}while(r);
#line 645 "subs_functions/subs_functions.bas"
do{
#line 645 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mapunicode",16));
#line 645 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 645 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,645,"subs_functions.bas");}while(r);
#line 646 "subs_functions/subs_functions.bas"
do{
#line 646 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 646 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,646,"subs_functions.bas");}while(r);
#line 647 "subs_functions/subs_functions.bas"
do{
#line 647 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 647 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 647 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,647,"subs_functions.bas");}while(r);
#line 648 "subs_functions/subs_functions.bas"
do{
#line 648 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 648 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,648,"subs_functions.bas");}while(r);
#line 649 "subs_functions/subs_functions.bas"
do{
#line 649 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MAPUNICODE(asciiCode%)",23));
#line 649 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 649 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,649,"subs_functions.bas");}while(r);
#line 650 "subs_functions/subs_functions.bas"
do{
#line 650 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 650 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,650,"subs_functions.bas");}while(r);
#line 652 "subs_functions/subs_functions.bas"
do{
#line 652 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 652 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,652,"subs_functions.bas");}while(r);
#line 653 "subs_functions/subs_functions.bas"
do{
#line 653 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyDown",8));
#line 653 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 653 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,653,"subs_functions.bas");}while(r);
#line 654 "subs_functions/subs_functions.bas"
do{
#line 654 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 654 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,654,"subs_functions.bas");}while(r);
#line 655 "subs_functions/subs_functions.bas"
do{
#line 655 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__keydown",13));
#line 655 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 655 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,655,"subs_functions.bas");}while(r);
#line 656 "subs_functions/subs_functions.bas"
do{
#line 656 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 656 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,656,"subs_functions.bas");}while(r);
#line 657 "subs_functions/subs_functions.bas"
do{
#line 657 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 657 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 657 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,657,"subs_functions.bas");}while(r);
#line 658 "subs_functions/subs_functions.bas"
do{
#line 658 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 658 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,658,"subs_functions.bas");}while(r);
#line 659 "subs_functions/subs_functions.bas"
do{
#line 659 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_KEYDOWN(code&)",15));
#line 659 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 659 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,659,"subs_functions.bas");}while(r);
#line 660 "subs_functions/subs_functions.bas"
do{
#line 660 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 660 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,660,"subs_functions.bas");}while(r);
#line 662 "subs_functions/subs_functions.bas"
do{
#line 662 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 662 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,662,"subs_functions.bas");}while(r);
#line 663 "subs_functions/subs_functions.bas"
do{
#line 663 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyHit",7));
#line 663 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 663 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,663,"subs_functions.bas");}while(r);
#line 664 "subs_functions/subs_functions.bas"
do{
#line 664 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 664 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,664,"subs_functions.bas");}while(r);
#line 665 "subs_functions/subs_functions.bas"
do{
#line 665 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__keyhit",12));
#line 665 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 665 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,665,"subs_functions.bas");}while(r);
#line 666 "subs_functions/subs_functions.bas"
do{
#line 666 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 666 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,666,"subs_functions.bas");}while(r);
#line 667 "subs_functions/subs_functions.bas"
do{
#line 667 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_KEYHIT",7));
#line 667 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 667 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,667,"subs_functions.bas");}while(r);
#line 668 "subs_functions/subs_functions.bas"
do{
#line 668 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 668 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,668,"subs_functions.bas");}while(r);
#line 670 "subs_functions/subs_functions.bas"
do{
#line 670 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 670 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,670,"subs_functions.bas");}while(r);
#line 671 "subs_functions/subs_functions.bas"
do{
#line 671 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WindowHandle",13));
#line 671 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 671 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,671,"subs_functions.bas");}while(r);
#line 672 "subs_functions/subs_functions.bas"
do{
#line 672 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 672 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,672,"subs_functions.bas");}while(r);
#line 673 "subs_functions/subs_functions.bas"
do{
#line 673 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__windowhandle",18));
#line 673 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 673 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,673,"subs_functions.bas");}while(r);
#line 674 "subs_functions/subs_functions.bas"
do{
#line 674 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER;
#line 674 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,674,"subs_functions.bas");}while(r);
#line 675 "subs_functions/subs_functions.bas"
do{
#line 675 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 675 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,675,"subs_functions.bas");}while(r);
#line 676 "subs_functions/subs_functions.bas"
do{
#line 676 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 676 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 676 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,676,"subs_functions.bas");}while(r);
#line 677 "subs_functions/subs_functions.bas"
do{
#line 677 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 677 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 677 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,677,"subs_functions.bas");}while(r);
#line 678 "subs_functions/subs_functions.bas"
do{
#line 678 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WINDOWHANDLE[(handleType&)]",28));
#line 678 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 678 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,678,"subs_functions.bas");}while(r);
#line 679 "subs_functions/subs_functions.bas"
do{
#line 679 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 679 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,679,"subs_functions.bas");}while(r);
#line 681 "subs_functions/subs_functions.bas"
do{
#line 681 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 681 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,681,"subs_functions.bas");}while(r);
#line 682 "subs_functions/subs_functions.bas"
do{
#line 682 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Files",5));
#line 682 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 682 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,682,"subs_functions.bas");}while(r);
#line 683 "subs_functions/subs_functions.bas"
do{
#line 683 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 683 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,683,"subs_functions.bas");}while(r);
#line 684 "subs_functions/subs_functions.bas"
do{
#line 684 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_files",9));
#line 684 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 684 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,684,"subs_functions.bas");}while(r);
#line 685 "subs_functions/subs_functions.bas"
do{
#line 685 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 685 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,685,"subs_functions.bas");}while(r);
#line 686 "subs_functions/subs_functions.bas"
do{
#line 686 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 686 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 686 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,686,"subs_functions.bas");}while(r);
#line 687 "subs_functions/subs_functions.bas"
do{
#line 687 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 687 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 687 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,687,"subs_functions.bas");}while(r);
#line 688 "subs_functions/subs_functions.bas"
do{
#line 688 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("FILES fileSpec$",15));
#line 688 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 688 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,688,"subs_functions.bas");}while(r);
#line 689 "subs_functions/subs_functions.bas"
do{
#line 689 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 689 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,689,"subs_functions.bas");}while(r);
#line 691 "subs_functions/subs_functions.bas"
do{
#line 691 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 691 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,691,"subs_functions.bas");}while(r);
#line 692 "subs_functions/subs_functions.bas"
do{
#line 692 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Files",6));
#line 692 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 692 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,692,"subs_functions.bas");}while(r);
#line 693 "subs_functions/subs_functions.bas"
do{
#line 693 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 693 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 693 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,693,"subs_functions.bas");}while(r);
#line 694 "subs_functions/subs_functions.bas"
do{
#line 694 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 694 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,694,"subs_functions.bas");}while(r);
#line 695 "subs_functions/subs_functions.bas"
do{
#line 695 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__files",11));
#line 695 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 695 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,695,"subs_functions.bas");}while(r);
#line 696 "subs_functions/subs_functions.bas"
do{
#line 696 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 696 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,696,"subs_functions.bas");}while(r);
#line 697 "subs_functions/subs_functions.bas"
do{
#line 697 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 697 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 697 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,697,"subs_functions.bas");}while(r);
#line 698 "subs_functions/subs_functions.bas"
do{
#line 698 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 698 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 698 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,698,"subs_functions.bas");}while(r);
#line 699 "subs_functions/subs_functions.bas"
do{
#line 699 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 699 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,699,"subs_functions.bas");}while(r);
#line 700 "subs_functions/subs_functions.bas"
do{
#line 700 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FILES$([fileSpec$])",20));
#line 700 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 700 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,700,"subs_functions.bas");}while(r);
#line 701 "subs_functions/subs_functions.bas"
do{
#line 701 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 701 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,701,"subs_functions.bas");}while(r);
#line 703 "subs_functions/subs_functions.bas"
do{
#line 703 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 703 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,703,"subs_functions.bas");}while(r);
#line 704 "subs_functions/subs_functions.bas"
do{
#line 704 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullPath",9));
#line 704 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 704 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,704,"subs_functions.bas");}while(r);
#line 705 "subs_functions/subs_functions.bas"
do{
#line 705 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 705 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 705 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,705,"subs_functions.bas");}while(r);
#line 706 "subs_functions/subs_functions.bas"
do{
#line 706 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 706 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,706,"subs_functions.bas");}while(r);
#line 707 "subs_functions/subs_functions.bas"
do{
#line 707 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fullpath",14));
#line 707 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 707 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,707,"subs_functions.bas");}while(r);
#line 708 "subs_functions/subs_functions.bas"
do{
#line 708 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 708 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,708,"subs_functions.bas");}while(r);
#line 709 "subs_functions/subs_functions.bas"
do{
#line 709 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 709 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 709 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,709,"subs_functions.bas");}while(r);
#line 710 "subs_functions/subs_functions.bas"
do{
#line 710 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 710 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,710,"subs_functions.bas");}while(r);
#line 711 "subs_functions/subs_functions.bas"
do{
#line 711 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FULLPATH$(pathName$)",21));
#line 711 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 711 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,711,"subs_functions.bas");}while(r);
#line 712 "subs_functions/subs_functions.bas"
do{
#line 712 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 712 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,712,"subs_functions.bas");}while(r);
#line 714 "subs_functions/subs_functions.bas"
do{
#line 714 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 714 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,714,"subs_functions.bas");}while(r);
#line 715 "subs_functions/subs_functions.bas"
do{
#line 715 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintImage",11));
#line 715 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 715 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,715,"subs_functions.bas");}while(r);
#line 715 "subs_functions/subs_functions.bas"
do{
#line 715 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 7ll ;
#line 715 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,715,"subs_functions.bas");}while(r);
#line 716 "subs_functions/subs_functions.bas"
do{
#line 716 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 716 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,716,"subs_functions.bas");}while(r);
#line 717 "subs_functions/subs_functions.bas"
do{
#line 717 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__printimage",15));
#line 717 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 717 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,717,"subs_functions.bas");}while(r);
#line 718 "subs_functions/subs_functions.bas"
do{
#line 718 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 718 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,718,"subs_functions.bas");}while(r);
#line 719 "subs_functions/subs_functions.bas"
do{
#line 719 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 719 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 719 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,719,"subs_functions.bas");}while(r);
#line 722 "subs_functions/subs_functions.bas"
do{
#line 722 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PRINTIMAGE imageHandle&",24));
#line 722 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 722 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,722,"subs_functions.bas");}while(r);
#line 723 "subs_functions/subs_functions.bas"
do{
#line 723 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 723 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,723,"subs_functions.bas");}while(r);
#line 727 "subs_functions/subs_functions.bas"
do{
#line 727 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 727 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,727,"subs_functions.bas");}while(r);
#line 728 "subs_functions/subs_functions.bas"
do{
#line 728 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenClick",12));
#line 728 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 728 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,728,"subs_functions.bas");}while(r);
#line 729 "subs_functions/subs_functions.bas"
do{
#line 729 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 729 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,729,"subs_functions.bas");}while(r);
#line 730 "subs_functions/subs_functions.bas"
do{
#line 730 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__screenclick",16));
#line 730 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 730 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,730,"subs_functions.bas");}while(r);
#line 731 "subs_functions/subs_functions.bas"
do{
#line 731 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 731 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,731,"subs_functions.bas");}while(r);
#line 732 "subs_functions/subs_functions.bas"
do{
#line 732 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 732 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 732 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,732,"subs_functions.bas");}while(r);
#line 733 "subs_functions/subs_functions.bas"
do{
#line 733 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 733 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 733 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,733,"subs_functions.bas");}while(r);
#line 734 "subs_functions/subs_functions.bas"
do{
#line 734 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENCLICK x, y[, button%]",28));
#line 734 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 734 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,734,"subs_functions.bas");}while(r);
#line 735 "subs_functions/subs_functions.bas"
do{
#line 735 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 735 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,735,"subs_functions.bas");}while(r);
#line 737 "subs_functions/subs_functions.bas"
do{
#line 737 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 737 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,737,"subs_functions.bas");}while(r);
#line 738 "subs_functions/subs_functions.bas"
do{
#line 738 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenPrint",12));
#line 738 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 738 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,738,"subs_functions.bas");}while(r);
#line 739 "subs_functions/subs_functions.bas"
do{
#line 739 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 739 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,739,"subs_functions.bas");}while(r);
#line 740 "subs_functions/subs_functions.bas"
do{
#line 740 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__screenprint",16));
#line 740 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 740 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,740,"subs_functions.bas");}while(r);
#line 741 "subs_functions/subs_functions.bas"
do{
#line 741 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 741 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,741,"subs_functions.bas");}while(r);
#line 742 "subs_functions/subs_functions.bas"
do{
#line 742 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 742 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 742 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,742,"subs_functions.bas");}while(r);
#line 743 "subs_functions/subs_functions.bas"
do{
#line 743 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENPRINT text$",18));
#line 743 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 743 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,743,"subs_functions.bas");}while(r);
#line 744 "subs_functions/subs_functions.bas"
do{
#line 744 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 744 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,744,"subs_functions.bas");}while(r);
#line 746 "subs_functions/subs_functions.bas"
do{
#line 746 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 746 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,746,"subs_functions.bas");}while(r);
#line 747 "subs_functions/subs_functions.bas"
do{
#line 747 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenImage",12));
#line 747 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 747 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,747,"subs_functions.bas");}while(r);
#line 747 "subs_functions/subs_functions.bas"
do{
#line 747 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 9ll ;
#line 747 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,747,"subs_functions.bas");}while(r);
#line 748 "subs_functions/subs_functions.bas"
do{
#line 748 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 748 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,748,"subs_functions.bas");}while(r);
#line 749 "subs_functions/subs_functions.bas"
do{
#line 749 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__screenimage",17));
#line 749 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 749 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,749,"subs_functions.bas");}while(r);
#line 750 "subs_functions/subs_functions.bas"
do{
#line 750 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 750 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,750,"subs_functions.bas");}while(r);
#line 751 "subs_functions/subs_functions.bas"
do{
#line 751 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 751 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 751 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,751,"subs_functions.bas");}while(r);
#line 752 "subs_functions/subs_functions.bas"
do{
#line 752 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?,?,?,?]",9));
#line 752 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 752 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,752,"subs_functions.bas");}while(r);
#line 753 "subs_functions/subs_functions.bas"
do{
#line 753 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 753 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,753,"subs_functions.bas");}while(r);
#line 754 "subs_functions/subs_functions.bas"
do{
#line 754 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENIMAGE(column1, row1, column2, row2)",42));
#line 754 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 754 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,754,"subs_functions.bas");}while(r);
#line 755 "subs_functions/subs_functions.bas"
do{
#line 755 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 755 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,755,"subs_functions.bas");}while(r);
#line 757 "subs_functions/subs_functions.bas"
do{
#line 757 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 757 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,757,"subs_functions.bas");}while(r);
#line 758 "subs_functions/subs_functions.bas"
do{
#line 758 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Lock",4));
#line 758 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 758 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,758,"subs_functions.bas");}while(r);
#line 759 "subs_functions/subs_functions.bas"
do{
#line 759 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 759 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,759,"subs_functions.bas");}while(r);
#line 760 "subs_functions/subs_functions.bas"
do{
#line 760 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_lock",8));
#line 760 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 760 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,760,"subs_functions.bas");}while(r);
#line 761 "subs_functions/subs_functions.bas"
do{
#line 761 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 761 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,761,"subs_functions.bas");}while(r);
#line 762 "subs_functions/subs_functions.bas"
do{
#line 762 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
#line 762 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 762 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,762,"subs_functions.bas");}while(r);
#line 763 "subs_functions/subs_functions.bas"
do{
#line 763 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17));
#line 763 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 763 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,763,"subs_functions.bas");}while(r);
#line 764 "subs_functions/subs_functions.bas"
do{
#line 764 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LOCK #fileNumber%, record& or LOCK #fileNumber% firstRecord& TO lastRecord&",75));
#line 764 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 764 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,764,"subs_functions.bas");}while(r);
#line 765 "subs_functions/subs_functions.bas"
do{
#line 765 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 765 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,765,"subs_functions.bas");}while(r);
#line 767 "subs_functions/subs_functions.bas"
do{
#line 767 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 767 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,767,"subs_functions.bas");}while(r);
#line 768 "subs_functions/subs_functions.bas"
do{
#line 768 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Unlock",6));
#line 768 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 768 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,768,"subs_functions.bas");}while(r);
#line 769 "subs_functions/subs_functions.bas"
do{
#line 769 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 769 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,769,"subs_functions.bas");}while(r);
#line 770 "subs_functions/subs_functions.bas"
do{
#line 770 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_unlock",10));
#line 770 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 770 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,770,"subs_functions.bas");}while(r);
#line 771 "subs_functions/subs_functions.bas"
do{
#line 771 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 771 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,771,"subs_functions.bas");}while(r);
#line 772 "subs_functions/subs_functions.bas"
do{
#line 772 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
#line 772 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 772 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,772,"subs_functions.bas");}while(r);
#line 773 "subs_functions/subs_functions.bas"
do{
#line 773 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17));
#line 773 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 773 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,773,"subs_functions.bas");}while(r);
#line 774 "subs_functions/subs_functions.bas"
do{
#line 774 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("UNLOCK #fileNumber%, record& or UNLOCK #fileNumber% firstRecord& TO lastRecord&",79));
#line 774 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 774 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,774,"subs_functions.bas");}while(r);
#line 775 "subs_functions/subs_functions.bas"
do{
#line 775 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 775 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,775,"subs_functions.bas");}while(r);
#line 777 "subs_functions/subs_functions.bas"
do{
#line 777 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 777 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,777,"subs_functions.bas");}while(r);
#line 778 "subs_functions/subs_functions.bas"
do{
#line 778 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeTimer",10));
#line 778 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 778 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,778,"subs_functions.bas");}while(r);
#line 779 "subs_functions/subs_functions.bas"
do{
#line 779 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 779 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,779,"subs_functions.bas");}while(r);
#line 780 "subs_functions/subs_functions.bas"
do{
#line 780 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__freetimer",15));
#line 780 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 780 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,780,"subs_functions.bas");}while(r);
#line 781 "subs_functions/subs_functions.bas"
do{
#line 781 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 781 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,781,"subs_functions.bas");}while(r);
#line 782 "subs_functions/subs_functions.bas"
do{
#line 782 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FREETIMER",10));
#line 782 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 782 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,782,"subs_functions.bas");}while(r);
#line 783 "subs_functions/subs_functions.bas"
do{
#line 783 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 783 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,783,"subs_functions.bas");}while(r);
#line 785 "subs_functions/subs_functions.bas"
do{
#line 785 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 785 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,785,"subs_functions.bas");}while(r);
#line 786 "subs_functions/subs_functions.bas"
do{
#line 786 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Timer",5));
#line 786 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 786 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,786,"subs_functions.bas");}while(r);
#line 787 "subs_functions/subs_functions.bas"
do{
#line 787 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 787 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,787,"subs_functions.bas");}while(r);
#line 788 "subs_functions/subs_functions.bas"
do{
#line 788 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_timer",9));
#line 788 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 788 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,788,"subs_functions.bas");}while(r);
#line 789 "subs_functions/subs_functions.bas"
do{
#line 789 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 789 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,789,"subs_functions.bas");}while(r);
#line 790 "subs_functions/subs_functions.bas"
do{
#line 790 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 790 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 790 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,790,"subs_functions.bas");}while(r);
#line 791 "subs_functions/subs_functions.bas"
do{
#line 791 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[(?)]{On|Off|Stop|Free}",23));
#line 791 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 791 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,791,"subs_functions.bas");}while(r);
#line 792 "subs_functions/subs_functions.bas"
do{
#line 792 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TIMER[(number%)] {On|Off|Stop|Free}",35));
#line 792 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 792 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,792,"subs_functions.bas");}while(r);
#line 793 "subs_functions/subs_functions.bas"
do{
#line 793 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 793 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,793,"subs_functions.bas");}while(r);
#line 795 "subs_functions/subs_functions.bas"
do{
#line 795 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 795 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,795,"subs_functions.bas");}while(r);
#line 796 "subs_functions/subs_functions.bas"
do{
#line 796 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullScreen",11));
#line 796 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 796 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,796,"subs_functions.bas");}while(r);
#line 797 "subs_functions/subs_functions.bas"
do{
#line 797 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 797 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,797,"subs_functions.bas");}while(r);
#line 798 "subs_functions/subs_functions.bas"
do{
#line 798 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__fullscreen",15));
#line 798 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 798 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,798,"subs_functions.bas");}while(r);
#line 799 "subs_functions/subs_functions.bas"
do{
#line 799 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 799 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,799,"subs_functions.bas");}while(r);
#line 800 "subs_functions/subs_functions.bas"
do{
#line 800 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 800 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 800 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,800,"subs_functions.bas");}while(r);
#line 801 "subs_functions/subs_functions.bas"
do{
#line 801 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",47));
#line 801 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 801 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,801,"subs_functions.bas");}while(r);
#line 802 "subs_functions/subs_functions.bas"
do{
#line 802 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FULLSCREEN [{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",59));
#line 802 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 802 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,802,"subs_functions.bas");}while(r);
#line 803 "subs_functions/subs_functions.bas"
do{
#line 803 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 803 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,803,"subs_functions.bas");}while(r);
#line 805 "subs_functions/subs_functions.bas"
do{
#line 805 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 805 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,805,"subs_functions.bas");}while(r);
#line 806 "subs_functions/subs_functions.bas"
do{
#line 806 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AllowFullScreen",16));
#line 806 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 806 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,806,"subs_functions.bas");}while(r);
#line 807 "subs_functions/subs_functions.bas"
do{
#line 807 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 807 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,807,"subs_functions.bas");}while(r);
#line 808 "subs_functions/subs_functions.bas"
do{
#line 808 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__allowfullscreen",20));
#line 808 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 808 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,808,"subs_functions.bas");}while(r);
#line 809 "subs_functions/subs_functions.bas"
do{
#line 809 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 809 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,809,"subs_functions.bas");}while(r);
#line 810 "subs_functions/subs_functions.bas"
do{
#line 810 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 810 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 810 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,810,"subs_functions.bas");}while(r);
#line 811 "subs_functions/subs_functions.bas"
do{
#line 811 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",66));
#line 811 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 811 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,811,"subs_functions.bas");}while(r);
#line 812 "subs_functions/subs_functions.bas"
do{
#line 812 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ALLOWFULLSCREEN [{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",83));
#line 812 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 812 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,812,"subs_functions.bas");}while(r);
#line 813 "subs_functions/subs_functions.bas"
do{
#line 813 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 813 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,813,"subs_functions.bas");}while(r);
#line 815 "subs_functions/subs_functions.bas"
do{
#line 815 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 815 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,815,"subs_functions.bas");}while(r);
#line 816 "subs_functions/subs_functions.bas"
do{
#line 816 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullScreen",11));
#line 816 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 816 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,816,"subs_functions.bas");}while(r);
#line 817 "subs_functions/subs_functions.bas"
do{
#line 817 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 817 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,817,"subs_functions.bas");}while(r);
#line 818 "subs_functions/subs_functions.bas"
do{
#line 818 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fullscreen",16));
#line 818 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 818 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,818,"subs_functions.bas");}while(r);
#line 819 "subs_functions/subs_functions.bas"
do{
#line 819 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 819 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,819,"subs_functions.bas");}while(r);
#line 820 "subs_functions/subs_functions.bas"
do{
#line 820 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FULLSCREEN",11));
#line 820 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 820 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,820,"subs_functions.bas");}while(r);
#line 821 "subs_functions/subs_functions.bas"
do{
#line 821 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 821 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,821,"subs_functions.bas");}while(r);
#line 823 "subs_functions/subs_functions.bas"
do{
#line 823 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 823 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,823,"subs_functions.bas");}while(r);
#line 824 "subs_functions/subs_functions.bas"
do{
#line 824 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Smooth",7));
#line 824 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 824 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,824,"subs_functions.bas");}while(r);
#line 825 "subs_functions/subs_functions.bas"
do{
#line 825 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 825 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,825,"subs_functions.bas");}while(r);
#line 826 "subs_functions/subs_functions.bas"
do{
#line 826 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fullscreensmooth",22));
#line 826 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 826 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,826,"subs_functions.bas");}while(r);
#line 827 "subs_functions/subs_functions.bas"
do{
#line 827 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 827 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,827,"subs_functions.bas");}while(r);
#line 828 "subs_functions/subs_functions.bas"
do{
#line 828 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SMOOTH",7));
#line 828 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 828 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,828,"subs_functions.bas");}while(r);
#line 829 "subs_functions/subs_functions.bas"
do{
#line 829 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 829 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,829,"subs_functions.bas");}while(r);
#line 831 "subs_functions/subs_functions.bas"
do{
#line 831 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 831 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,831,"subs_functions.bas");}while(r);
#line 832 "subs_functions/subs_functions.bas"
do{
#line 832 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WindowHasFocus",15));
#line 832 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 832 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,832,"subs_functions.bas");}while(r);
#line 833 "subs_functions/subs_functions.bas"
do{
#line 833 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 833 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,833,"subs_functions.bas");}while(r);
#line 834 "subs_functions/subs_functions.bas"
do{
#line 834 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__hasfocus",14));
#line 834 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 834 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,834,"subs_functions.bas");}while(r);
#line 835 "subs_functions/subs_functions.bas"
do{
#line 835 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 835 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,835,"subs_functions.bas");}while(r);
#line 836 "subs_functions/subs_functions.bas"
do{
#line 836 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WINDOWHASFOCUS",15));
#line 836 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 836 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,836,"subs_functions.bas");}while(r);
#line 837 "subs_functions/subs_functions.bas"
do{
#line 837 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 837 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,837,"subs_functions.bas");}while(r);
#line 839 "subs_functions/subs_functions.bas"
do{
#line 839 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 839 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,839,"subs_functions.bas");}while(r);
#line 840 "subs_functions/subs_functions.bas"
do{
#line 840 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WindowSizeLimit",16));
#line 840 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 840 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,840,"subs_functions.bas");}while(r);
#line 841 "subs_functions/subs_functions.bas"
do{
#line 841 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 841 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,841,"subs_functions.bas");}while(r);
#line 842 "subs_functions/subs_functions.bas"
do{
#line 842 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__windowsizelimit",20));
#line 842 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 842 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,842,"subs_functions.bas");}while(r);
#line 843 "subs_functions/subs_functions.bas"
do{
#line 843 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 843 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,843,"subs_functions.bas");}while(r);
#line 844 "subs_functions/subs_functions.bas"
do{
#line 844 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 844 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 844 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,844,"subs_functions.bas");}while(r);
#line 845 "subs_functions/subs_functions.bas"
do{
#line 845 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[(?,?)][-(?,?)]",15));
#line 845 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 845 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,845,"subs_functions.bas");}while(r);
#line 846 "subs_functions/subs_functions.bas"
do{
#line 846 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WINDOWSIZELIMIT [(minWidth, minHeight)] [- (maxWidth, maxHeight)]",66));
#line 846 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 846 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,846,"subs_functions.bas");}while(r);
#line 847 "subs_functions/subs_functions.bas"
do{
#line 847 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 847 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,847,"subs_functions.bas");}while(r);
#line 849 "subs_functions/subs_functions.bas"
do{
#line 849 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 849 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,849,"subs_functions.bas");}while(r);
#line 850 "subs_functions/subs_functions.bas"
do{
#line 850 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clipboard",10));
#line 850 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 850 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,850,"subs_functions.bas");}while(r);
#line 851 "subs_functions/subs_functions.bas"
do{
#line 851 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 851 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 851 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,851,"subs_functions.bas");}while(r);
#line 852 "subs_functions/subs_functions.bas"
do{
#line 852 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 852 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,852,"subs_functions.bas");}while(r);
#line 853 "subs_functions/subs_functions.bas"
do{
#line 853 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__clipboard",14));
#line 853 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 853 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,853,"subs_functions.bas");}while(r);
#line 854 "subs_functions/subs_functions.bas"
do{
#line 854 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 854 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,854,"subs_functions.bas");}while(r);
#line 855 "subs_functions/subs_functions.bas"
do{
#line 855 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 855 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 855 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,855,"subs_functions.bas");}while(r);
#line 856 "subs_functions/subs_functions.bas"
do{
#line 856 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("=?",2));
#line 856 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 856 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,856,"subs_functions.bas");}while(r);
#line 857 "subs_functions/subs_functions.bas"
do{
#line 857 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLIPBOARD$ = text$",19));
#line 857 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 857 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,857,"subs_functions.bas");}while(r);
#line 858 "subs_functions/subs_functions.bas"
do{
#line 858 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 858 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,858,"subs_functions.bas");}while(r);
#line 860 "subs_functions/subs_functions.bas"
do{
#line 860 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 860 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,860,"subs_functions.bas");}while(r);
#line 861 "subs_functions/subs_functions.bas"
do{
#line 861 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clipboard",10));
#line 861 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 861 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,861,"subs_functions.bas");}while(r);
#line 862 "subs_functions/subs_functions.bas"
do{
#line 862 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 862 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 862 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,862,"subs_functions.bas");}while(r);
#line 863 "subs_functions/subs_functions.bas"
do{
#line 863 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 863 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,863,"subs_functions.bas");}while(r);
#line 864 "subs_functions/subs_functions.bas"
do{
#line 864 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__clipboard",15));
#line 864 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 864 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,864,"subs_functions.bas");}while(r);
#line 865 "subs_functions/subs_functions.bas"
do{
#line 865 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 865 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,865,"subs_functions.bas");}while(r);
#line 866 "subs_functions/subs_functions.bas"
do{
#line 866 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLIPBOARD$",11));
#line 866 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 866 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,866,"subs_functions.bas");}while(r);
#line 867 "subs_functions/subs_functions.bas"
do{
#line 867 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 867 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,867,"subs_functions.bas");}while(r);
#line 869 "subs_functions/subs_functions.bas"
do{
#line 869 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 869 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,869,"subs_functions.bas");}while(r);
#line 870 "subs_functions/subs_functions.bas"
do{
#line 870 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClipboardImage",15));
#line 870 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 870 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,870,"subs_functions.bas");}while(r);
#line 870 "subs_functions/subs_functions.bas"
do{
#line 870 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 9ll ;
#line 870 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,870,"subs_functions.bas");}while(r);
#line 871 "subs_functions/subs_functions.bas"
do{
#line 871 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 871 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,871,"subs_functions.bas");}while(r);
#line 872 "subs_functions/subs_functions.bas"
do{
#line 872 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__clipboardimage",20));
#line 872 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 872 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,872,"subs_functions.bas");}while(r);
#line 873 "subs_functions/subs_functions.bas"
do{
#line 873 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 873 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,873,"subs_functions.bas");}while(r);
#line 874 "subs_functions/subs_functions.bas"
do{
#line 874 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLIPBOARDIMAGE",15));
#line 874 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 874 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,874,"subs_functions.bas");}while(r);
#line 875 "subs_functions/subs_functions.bas"
do{
#line 875 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 875 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,875,"subs_functions.bas");}while(r);
#line 877 "subs_functions/subs_functions.bas"
do{
#line 877 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 877 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,877,"subs_functions.bas");}while(r);
#line 878 "subs_functions/subs_functions.bas"
do{
#line 878 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClipboardImage",15));
#line 878 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 878 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,878,"subs_functions.bas");}while(r);
#line 878 "subs_functions/subs_functions.bas"
do{
#line 878 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 9ll ;
#line 878 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,878,"subs_functions.bas");}while(r);
#line 879 "subs_functions/subs_functions.bas"
do{
#line 879 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 879 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,879,"subs_functions.bas");}while(r);
#line 880 "subs_functions/subs_functions.bas"
do{
#line 880 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__clipboardimage",19));
#line 880 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 880 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,880,"subs_functions.bas");}while(r);
#line 881 "subs_functions/subs_functions.bas"
do{
#line 881 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 881 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,881,"subs_functions.bas");}while(r);
#line 882 "subs_functions/subs_functions.bas"
do{
#line 882 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 882 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 882 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,882,"subs_functions.bas");}while(r);
#line 883 "subs_functions/subs_functions.bas"
do{
#line 883 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("=?",2));
#line 883 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 883 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,883,"subs_functions.bas");}while(r);
#line 884 "subs_functions/subs_functions.bas"
do{
#line 884 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLIPBOARDIMAGE = existingImageHandle&",38));
#line 884 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 884 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,884,"subs_functions.bas");}while(r);
#line 885 "subs_functions/subs_functions.bas"
do{
#line 885 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 885 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,885,"subs_functions.bas");}while(r);
#line 887 "subs_functions/subs_functions.bas"
do{
#line 887 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 887 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,887,"subs_functions.bas");}while(r);
#line 888 "subs_functions/subs_functions.bas"
do{
#line 888 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Exit",5));
#line 888 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 888 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,888,"subs_functions.bas");}while(r);
#line 889 "subs_functions/subs_functions.bas"
do{
#line 889 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 889 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,889,"subs_functions.bas");}while(r);
#line 890 "subs_functions/subs_functions.bas"
do{
#line 890 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__exit",10));
#line 890 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 890 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,890,"subs_functions.bas");}while(r);
#line 891 "subs_functions/subs_functions.bas"
do{
#line 891 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 891 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,891,"subs_functions.bas");}while(r);
#line 892 "subs_functions/subs_functions.bas"
do{
#line 892 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_EXIT",5));
#line 892 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 892 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,892,"subs_functions.bas");}while(r);
#line 893 "subs_functions/subs_functions.bas"
do{
#line 893 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 893 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,893,"subs_functions.bas");}while(r);
#line 895 "subs_functions/subs_functions.bas"
do{
#line 895 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 895 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,895,"subs_functions.bas");}while(r);
#line 896 "subs_functions/subs_functions.bas"
do{
#line 896 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenHost",9));
#line 896 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 896 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,896,"subs_functions.bas");}while(r);
#line 896 "subs_functions/subs_functions.bas"
do{
#line 896 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 6ll ;
#line 896 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,896,"subs_functions.bas");}while(r);
#line 897 "subs_functions/subs_functions.bas"
do{
#line 897 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 897 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,897,"subs_functions.bas");}while(r);
#line 898 "subs_functions/subs_functions.bas"
do{
#line 898 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__openhost",14));
#line 898 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 898 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,898,"subs_functions.bas");}while(r);
#line 899 "subs_functions/subs_functions.bas"
do{
#line 899 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 899 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,899,"subs_functions.bas");}while(r);
#line 900 "subs_functions/subs_functions.bas"
do{
#line 900 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 900 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 900 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,900,"subs_functions.bas");}while(r);
#line 901 "subs_functions/subs_functions.bas"
do{
#line 901 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 901 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,901,"subs_functions.bas");}while(r);
#line 902 "subs_functions/subs_functions.bas"
do{
#line 902 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_OPENHOST(",10),func_chr( 34 )),qbs_new_txt_len("TCP/IP:portNumber",17)),func_chr( 34 )),qbs_new_txt_len(")",1)));
#line 902 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 902 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,902,"subs_functions.bas");}while(r);
#line 903 "subs_functions/subs_functions.bas"
do{
#line 903 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 903 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,903,"subs_functions.bas");}while(r);
#line 905 "subs_functions/subs_functions.bas"
do{
#line 905 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 905 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,905,"subs_functions.bas");}while(r);
#line 906 "subs_functions/subs_functions.bas"
do{
#line 906 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Connected",10));
#line 906 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 906 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,906,"subs_functions.bas");}while(r);
#line 907 "subs_functions/subs_functions.bas"
do{
#line 907 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 907 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,907,"subs_functions.bas");}while(r);
#line 908 "subs_functions/subs_functions.bas"
do{
#line 908 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__connected",15));
#line 908 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 908 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,908,"subs_functions.bas");}while(r);
#line 909 "subs_functions/subs_functions.bas"
do{
#line 909 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 909 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,909,"subs_functions.bas");}while(r);
#line 910 "subs_functions/subs_functions.bas"
do{
#line 910 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 910 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 910 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,910,"subs_functions.bas");}while(r);
#line 911 "subs_functions/subs_functions.bas"
do{
#line 911 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 911 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,911,"subs_functions.bas");}while(r);
#line 912 "subs_functions/subs_functions.bas"
do{
#line 912 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONNECTED(connectionHandle&)",29));
#line 912 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 912 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,912,"subs_functions.bas");}while(r);
#line 913 "subs_functions/subs_functions.bas"
do{
#line 913 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 913 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,913,"subs_functions.bas");}while(r);
#line 915 "subs_functions/subs_functions.bas"
do{
#line 915 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 915 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,915,"subs_functions.bas");}while(r);
#line 916 "subs_functions/subs_functions.bas"
do{
#line 916 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConnectionAddress",18));
#line 916 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 916 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,916,"subs_functions.bas");}while(r);
#line 917 "subs_functions/subs_functions.bas"
do{
#line 917 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+524))),8,1),qbs_new_txt_len("$",1));
#line 917 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 917 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,917,"subs_functions.bas");}while(r);
#line 918 "subs_functions/subs_functions.bas"
do{
#line 918 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 918 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,918,"subs_functions.bas");}while(r);
#line 919 "subs_functions/subs_functions.bas"
do{
#line 919 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__connectionaddress",23));
#line 919 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 919 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,919,"subs_functions.bas");}while(r);
#line 920 "subs_functions/subs_functions.bas"
do{
#line 920 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 920 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,920,"subs_functions.bas");}while(r);
#line 921 "subs_functions/subs_functions.bas"
do{
#line 921 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 921 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 921 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,921,"subs_functions.bas");}while(r);
#line 922 "subs_functions/subs_functions.bas"
do{
#line 922 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 922 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,922,"subs_functions.bas");}while(r);
#line 923 "subs_functions/subs_functions.bas"
do{
#line 923 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONNECTIONADDRESS(connectionHandle&)",37));
#line 923 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 923 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,923,"subs_functions.bas");}while(r);
#line 924 "subs_functions/subs_functions.bas"
do{
#line 924 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 924 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,924,"subs_functions.bas");}while(r);
#line 926 "subs_functions/subs_functions.bas"
do{
#line 926 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 926 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,926,"subs_functions.bas");}while(r);
#line 927 "subs_functions/subs_functions.bas"
do{
#line 927 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenConnection",15));
#line 927 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 927 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,927,"subs_functions.bas");}while(r);
#line 928 "subs_functions/subs_functions.bas"
do{
#line 928 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 928 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,928,"subs_functions.bas");}while(r);
#line 929 "subs_functions/subs_functions.bas"
do{
#line 929 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__openconnection",20));
#line 929 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 929 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,929,"subs_functions.bas");}while(r);
#line 930 "subs_functions/subs_functions.bas"
do{
#line 930 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 930 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,930,"subs_functions.bas");}while(r);
#line 931 "subs_functions/subs_functions.bas"
do{
#line 931 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 931 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 931 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,931,"subs_functions.bas");}while(r);
#line 932 "subs_functions/subs_functions.bas"
do{
#line 932 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 932 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,932,"subs_functions.bas");}while(r);
#line 933 "subs_functions/subs_functions.bas"
do{
#line 933 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_OPENCONNECTION(hostHandle)",27));
#line 933 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 933 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,933,"subs_functions.bas");}while(r);
#line 934 "subs_functions/subs_functions.bas"
do{
#line 934 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 934 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,934,"subs_functions.bas");}while(r);
#line 936 "subs_functions/subs_functions.bas"
do{
#line 936 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 936 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,936,"subs_functions.bas");}while(r);
#line 937 "subs_functions/subs_functions.bas"
do{
#line 937 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenClient",11));
#line 937 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 937 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,937,"subs_functions.bas");}while(r);
#line 937 "subs_functions/subs_functions.bas"
do{
#line 937 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 6ll ;
#line 937 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,937,"subs_functions.bas");}while(r);
#line 938 "subs_functions/subs_functions.bas"
do{
#line 938 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 938 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,938,"subs_functions.bas");}while(r);
#line 939 "subs_functions/subs_functions.bas"
do{
#line 939 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__openclient",16));
#line 939 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 939 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,939,"subs_functions.bas");}while(r);
#line 940 "subs_functions/subs_functions.bas"
do{
#line 940 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 940 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,940,"subs_functions.bas");}while(r);
#line 941 "subs_functions/subs_functions.bas"
do{
#line 941 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 941 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 941 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,941,"subs_functions.bas");}while(r);
#line 942 "subs_functions/subs_functions.bas"
do{
#line 942 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 942 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,942,"subs_functions.bas");}while(r);
#line 943 "subs_functions/subs_functions.bas"
do{
#line 943 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_OPENCLIENT(",12),func_chr( 34 )),qbs_new_txt_len("TCP/IP:port:address",19)),func_chr( 34 )),qbs_new_txt_len(")",1)));
#line 943 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 943 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,943,"subs_functions.bas");}while(r);
#line 944 "subs_functions/subs_functions.bas"
do{
#line 944 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 944 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,944,"subs_functions.bas");}while(r);
#line 946 "subs_functions/subs_functions.bas"
do{
#line 946 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 946 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,946,"subs_functions.bas");}while(r);
#line 947 "subs_functions/subs_functions.bas"
do{
#line 947 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StatusCode",11));
#line 947 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 947 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,947,"subs_functions.bas");}while(r);
#line 948 "subs_functions/subs_functions.bas"
do{
#line 948 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 948 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,948,"subs_functions.bas");}while(r);
#line 949 "subs_functions/subs_functions.bas"
do{
#line 949 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__statusCode",16));
#line 949 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 949 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,949,"subs_functions.bas");}while(r);
#line 950 "subs_functions/subs_functions.bas"
do{
#line 950 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 950 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,950,"subs_functions.bas");}while(r);
#line 951 "subs_functions/subs_functions.bas"
do{
#line 951 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 951 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 951 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,951,"subs_functions.bas");}while(r);
#line 952 "subs_functions/subs_functions.bas"
do{
#line 952 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 952 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,952,"subs_functions.bas");}while(r);
#line 953 "subs_functions/subs_functions.bas"
do{
#line 953 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_STATUSCODE(httpHandle&)",24));
#line 953 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 953 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,953,"subs_functions.bas");}while(r);
#line 954 "subs_functions/subs_functions.bas"
do{
#line 954 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 954 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,954,"subs_functions.bas");}while(r);
#line 956 "subs_functions/subs_functions.bas"
do{
#line 956 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 956 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,956,"subs_functions.bas");}while(r);
#line 957 "subs_functions/subs_functions.bas"
do{
#line 957 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_EnvironCount",13));
#line 957 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 957 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,957,"subs_functions.bas");}while(r);
#line 958 "subs_functions/subs_functions.bas"
do{
#line 958 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 958 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,958,"subs_functions.bas");}while(r);
#line 959 "subs_functions/subs_functions.bas"
do{
#line 959 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__environcount",18));
#line 959 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 959 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,959,"subs_functions.bas");}while(r);
#line 960 "subs_functions/subs_functions.bas"
do{
#line 960 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 960 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,960,"subs_functions.bas");}while(r);
#line 961 "subs_functions/subs_functions.bas"
do{
#line 961 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ENVIRONCOUNT",13));
#line 961 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 961 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,961,"subs_functions.bas");}while(r);
#line 962 "subs_functions/subs_functions.bas"
do{
#line 962 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 962 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,962,"subs_functions.bas");}while(r);
#line 964 "subs_functions/subs_functions.bas"
do{
#line 964 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 964 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,964,"subs_functions.bas");}while(r);
#line 965 "subs_functions/subs_functions.bas"
do{
#line 965 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Environ",7));
#line 965 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 965 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,965,"subs_functions.bas");}while(r);
#line 966 "subs_functions/subs_functions.bas"
do{
#line 966 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 966 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 966 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,966,"subs_functions.bas");}while(r);
#line 967 "subs_functions/subs_functions.bas"
do{
#line 967 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 967 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,967,"subs_functions.bas");}while(r);
#line 968 "subs_functions/subs_functions.bas"
do{
#line 968 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_environ",12));
#line 968 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 968 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,968,"subs_functions.bas");}while(r);
#line 969 "subs_functions/subs_functions.bas"
do{
#line 969 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 969 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,969,"subs_functions.bas");}while(r);
#line 970 "subs_functions/subs_functions.bas"
do{
#line 970 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 970 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 970 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,970,"subs_functions.bas");}while(r);
#line 971 "subs_functions/subs_functions.bas"
do{
#line 971 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 971 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,971,"subs_functions.bas");}while(r);
#line 972 "subs_functions/subs_functions.bas"
do{
#line 972 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ENVIRON$(listIndex%) or ENVIRON$(systemID$)",43));
#line 972 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 972 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,972,"subs_functions.bas");}while(r);
#line 973 "subs_functions/subs_functions.bas"
do{
#line 973 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 973 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,973,"subs_functions.bas");}while(r);
#line 975 "subs_functions/subs_functions.bas"
do{
#line 975 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 975 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,975,"subs_functions.bas");}while(r);
#line 976 "subs_functions/subs_functions.bas"
do{
#line 976 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Environ",7));
#line 976 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 976 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,976,"subs_functions.bas");}while(r);
#line 977 "subs_functions/subs_functions.bas"
do{
#line 977 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 977 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,977,"subs_functions.bas");}while(r);
#line 978 "subs_functions/subs_functions.bas"
do{
#line 978 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_environ",11));
#line 978 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 978 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,978,"subs_functions.bas");}while(r);
#line 979 "subs_functions/subs_functions.bas"
do{
#line 979 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 979 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,979,"subs_functions.bas");}while(r);
#line 980 "subs_functions/subs_functions.bas"
do{
#line 980 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 980 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 980 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,980,"subs_functions.bas");}while(r);
#line 981 "subs_functions/subs_functions.bas"
do{
#line 981 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ENVIRON stringExpression$",25));
#line 981 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 981 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,981,"subs_functions.bas");}while(r);
#line 982 "subs_functions/subs_functions.bas"
do{
#line 982 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 982 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,982,"subs_functions.bas");}while(r);
#line 984 "subs_functions/subs_functions.bas"
do{
#line 984 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 984 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,984,"subs_functions.bas");}while(r);
#line 985 "subs_functions/subs_functions.bas"
do{
#line 985 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ErrorLine",10));
#line 985 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 985 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,985,"subs_functions.bas");}while(r);
#line 986 "subs_functions/subs_functions.bas"
do{
#line 986 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 986 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,986,"subs_functions.bas");}while(r);
#line 987 "subs_functions/subs_functions.bas"
do{
#line 987 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__errorline",15));
#line 987 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 987 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,987,"subs_functions.bas");}while(r);
#line 988 "subs_functions/subs_functions.bas"
do{
#line 988 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 988 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,988,"subs_functions.bas");}while(r);
#line 989 "subs_functions/subs_functions.bas"
do{
#line 989 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ERRORLINE",10));
#line 989 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 989 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,989,"subs_functions.bas");}while(r);
#line 990 "subs_functions/subs_functions.bas"
do{
#line 990 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 990 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,990,"subs_functions.bas");}while(r);
#line 992 "subs_functions/subs_functions.bas"
do{
#line 992 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 992 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,992,"subs_functions.bas");}while(r);
#line 993 "subs_functions/subs_functions.bas"
do{
#line 993 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InclErrorLine",14));
#line 993 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 993 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,993,"subs_functions.bas");}while(r);
#line 994 "subs_functions/subs_functions.bas"
do{
#line 994 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 994 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,994,"subs_functions.bas");}while(r);
#line 995 "subs_functions/subs_functions.bas"
do{
#line 995 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__inclerrorline",19));
#line 995 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 995 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,995,"subs_functions.bas");}while(r);
#line 996 "subs_functions/subs_functions.bas"
do{
#line 996 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 996 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,996,"subs_functions.bas");}while(r);
#line 997 "subs_functions/subs_functions.bas"
do{
#line 997 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_INCLERRORLINE",14));
#line 997 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 997 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,997,"subs_functions.bas");}while(r);
#line 998 "subs_functions/subs_functions.bas"
do{
#line 998 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 998 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,998,"subs_functions.bas");}while(r);
#line 1000 "subs_functions/subs_functions.bas"
do{
#line 1000 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1000 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1000,"subs_functions.bas");}while(r);
#line 1001 "subs_functions/subs_functions.bas"
do{
#line 1001 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ErrorMessage",13));
#line 1001 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1001 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1001,"subs_functions.bas");}while(r);
#line 1002 "subs_functions/subs_functions.bas"
do{
#line 1002 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 1002 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1002 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1002,"subs_functions.bas");}while(r);
#line 1003 "subs_functions/subs_functions.bas"
do{
#line 1003 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1003 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1003,"subs_functions.bas");}while(r);
#line 1004 "subs_functions/subs_functions.bas"
do{
#line 1004 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__errormessage",18));
#line 1004 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1004 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1004,"subs_functions.bas");}while(r);
#line 1005 "subs_functions/subs_functions.bas"
do{
#line 1005 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1005 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1005 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1005,"subs_functions.bas");}while(r);
#line 1006 "subs_functions/subs_functions.bas"
do{
#line 1006 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1006 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1006,"subs_functions.bas");}while(r);
#line 1007 "subs_functions/subs_functions.bas"
do{
#line 1007 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1007 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1007 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1007,"subs_functions.bas");}while(r);
#line 1008 "subs_functions/subs_functions.bas"
do{
#line 1008 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 1008 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1008,"subs_functions.bas");}while(r);
#line 1009 "subs_functions/subs_functions.bas"
do{
#line 1009 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ERRORMESSAGE$[(errorCode&)]",28));
#line 1009 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1009 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1009,"subs_functions.bas");}while(r);
#line 1010 "subs_functions/subs_functions.bas"
do{
#line 1010 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1010 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1010,"subs_functions.bas");}while(r);
#line 1012 "subs_functions/subs_functions.bas"
do{
#line 1012 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1012 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1012,"subs_functions.bas");}while(r);
#line 1013 "subs_functions/subs_functions.bas"
do{
#line 1013 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Assert",7));
#line 1013 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1013 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1013,"subs_functions.bas");}while(r);
#line 1014 "subs_functions/subs_functions.bas"
do{
#line 1014 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1014 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1014,"subs_functions.bas");}while(r);
#line 1015 "subs_functions/subs_functions.bas"
do{
#line 1015 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__assert",11));
#line 1015 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1015 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1015,"subs_functions.bas");}while(r);
#line 1016 "subs_functions/subs_functions.bas"
do{
#line 1016 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1016 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1016,"subs_functions.bas");}while(r);
#line 1017 "subs_functions/subs_functions.bas"
do{
#line 1017 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1017 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1017 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1017,"subs_functions.bas");}while(r);
#line 1018 "subs_functions/subs_functions.bas"
do{
#line 1018 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 1018 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1018 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1018,"subs_functions.bas");}while(r);
#line 1019 "subs_functions/subs_functions.bas"
do{
#line 1019 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ASSERT condition[, errorMessage$]",34));
#line 1019 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1019 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1019,"subs_functions.bas");}while(r);
#line 1020 "subs_functions/subs_functions.bas"
do{
#line 1020 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1020 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1020,"subs_functions.bas");}while(r);
#line 1022 "subs_functions/subs_functions.bas"
do{
#line 1022 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1022 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1022,"subs_functions.bas");}while(r);
#line 1023 "subs_functions/subs_functions.bas"
do{
#line 1023 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Display",8));
#line 1023 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1023 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1023,"subs_functions.bas");}while(r);
#line 1024 "subs_functions/subs_functions.bas"
do{
#line 1024 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1024 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1024,"subs_functions.bas");}while(r);
#line 1025 "subs_functions/subs_functions.bas"
do{
#line 1025 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__display",12));
#line 1025 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1025 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1025,"subs_functions.bas");}while(r);
#line 1026 "subs_functions/subs_functions.bas"
do{
#line 1026 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DISPLAY",8));
#line 1026 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1026 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1026,"subs_functions.bas");}while(r);
#line 1027 "subs_functions/subs_functions.bas"
do{
#line 1027 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1027 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1027,"subs_functions.bas");}while(r);
#line 1029 "subs_functions/subs_functions.bas"
do{
#line 1029 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1029 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1029,"subs_functions.bas");}while(r);
#line 1030 "subs_functions/subs_functions.bas"
do{
#line 1030 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AutoDisplay",12));
#line 1030 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1030 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1030,"subs_functions.bas");}while(r);
#line 1031 "subs_functions/subs_functions.bas"
do{
#line 1031 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1031 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1031,"subs_functions.bas");}while(r);
#line 1032 "subs_functions/subs_functions.bas"
do{
#line 1032 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__autodisplay",16));
#line 1032 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1032 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1032,"subs_functions.bas");}while(r);
#line 1033 "subs_functions/subs_functions.bas"
do{
#line 1033 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_AUTODISPLAY",12));
#line 1033 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1033 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1033,"subs_functions.bas");}while(r);
#line 1034 "subs_functions/subs_functions.bas"
do{
#line 1034 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1034 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1034,"subs_functions.bas");}while(r);
#line 1036 "subs_functions/subs_functions.bas"
do{
#line 1036 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1036 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1036,"subs_functions.bas");}while(r);
#line 1037 "subs_functions/subs_functions.bas"
do{
#line 1037 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Limit",6));
#line 1037 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1037 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1037,"subs_functions.bas");}while(r);
#line 1038 "subs_functions/subs_functions.bas"
do{
#line 1038 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1038 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1038,"subs_functions.bas");}while(r);
#line 1039 "subs_functions/subs_functions.bas"
do{
#line 1039 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__limit",10));
#line 1039 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1039 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1039,"subs_functions.bas");}while(r);
#line 1040 "subs_functions/subs_functions.bas"
do{
#line 1040 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1040 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1040,"subs_functions.bas");}while(r);
#line 1041 "subs_functions/subs_functions.bas"
do{
#line 1041 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 1041 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1041 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1041,"subs_functions.bas");}while(r);
#line 1042 "subs_functions/subs_functions.bas"
do{
#line 1042 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LIMIT framesPerSecond!",23));
#line 1042 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1042 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1042,"subs_functions.bas");}while(r);
#line 1043 "subs_functions/subs_functions.bas"
do{
#line 1043 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1043 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1043,"subs_functions.bas");}while(r);
#line 1045 "subs_functions/subs_functions.bas"
do{
#line 1045 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1045 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1045,"subs_functions.bas");}while(r);
#line 1046 "subs_functions/subs_functions.bas"
do{
#line 1046 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FPS",4));
#line 1046 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1046 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1046,"subs_functions.bas");}while(r);
#line 1047 "subs_functions/subs_functions.bas"
do{
#line 1047 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1047 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1047,"subs_functions.bas");}while(r);
#line 1048 "subs_functions/subs_functions.bas"
do{
#line 1048 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__fps",8));
#line 1048 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1048 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1048,"subs_functions.bas");}while(r);
#line 1049 "subs_functions/subs_functions.bas"
do{
#line 1049 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1049 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1049,"subs_functions.bas");}while(r);
#line 1050 "subs_functions/subs_functions.bas"
do{
#line 1050 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 1050 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1050 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1050,"subs_functions.bas");}while(r);
#line 1051 "subs_functions/subs_functions.bas"
do{
#line 1051 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Auto}][?]",12));
#line 1051 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1051 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1051,"subs_functions.bas");}while(r);
#line 1052 "subs_functions/subs_functions.bas"
do{
#line 1052 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FPS fps! or _FPS _Auto",23));
#line 1052 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1052 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1052,"subs_functions.bas");}while(r);
#line 1053 "subs_functions/subs_functions.bas"
do{
#line 1053 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1053 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1053,"subs_functions.bas");}while(r);
#line 1055 "subs_functions/subs_functions.bas"
do{
#line 1055 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1055 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1055,"subs_functions.bas");}while(r);
#line 1056 "subs_functions/subs_functions.bas"
do{
#line 1056 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Delay",6));
#line 1056 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1056 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1056,"subs_functions.bas");}while(r);
#line 1057 "subs_functions/subs_functions.bas"
do{
#line 1057 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1057 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1057,"subs_functions.bas");}while(r);
#line 1058 "subs_functions/subs_functions.bas"
do{
#line 1058 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__delay",10));
#line 1058 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1058 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1058,"subs_functions.bas");}while(r);
#line 1059 "subs_functions/subs_functions.bas"
do{
#line 1059 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1059 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1059,"subs_functions.bas");}while(r);
#line 1060 "subs_functions/subs_functions.bas"
do{
#line 1060 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 1060 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1060 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1060,"subs_functions.bas");}while(r);
#line 1061 "subs_functions/subs_functions.bas"
do{
#line 1061 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DELAY seconds!",15));
#line 1061 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1061 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1061,"subs_functions.bas");}while(r);
#line 1062 "subs_functions/subs_functions.bas"
do{
#line 1062 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1062 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1062,"subs_functions.bas");}while(r);
#line 1064 "subs_functions/subs_functions.bas"
do{
#line 1064 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1064 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1064,"subs_functions.bas");}while(r);
#line 1065 "subs_functions/subs_functions.bas"
do{
#line 1065 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Icon",5));
#line 1065 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1065 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1065,"subs_functions.bas");}while(r);
#line 1065 "subs_functions/subs_functions.bas"
do{
#line 1065 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 8ll ;
#line 1065 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1065,"subs_functions.bas");}while(r);
#line 1066 "subs_functions/subs_functions.bas"
do{
#line 1066 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1066 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1066,"subs_functions.bas");}while(r);
#line 1067 "subs_functions/subs_functions.bas"
do{
#line 1067 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__icon",9));
#line 1067 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1067 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1067,"subs_functions.bas");}while(r);
#line 1068 "subs_functions/subs_functions.bas"
do{
#line 1068 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1068 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1068,"subs_functions.bas");}while(r);
#line 1069 "subs_functions/subs_functions.bas"
do{
#line 1069 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1069 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1069 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1069,"subs_functions.bas");}while(r);
#line 1070 "subs_functions/subs_functions.bas"
do{
#line 1070 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?[,?]]",7));
#line 1070 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1070 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1070,"subs_functions.bas");}while(r);
#line 1071 "subs_functions/subs_functions.bas"
do{
#line 1071 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ICON [mainImageHandle&[, smallImageHandle&]]",45));
#line 1071 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1071 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1071,"subs_functions.bas");}while(r);
#line 1072 "subs_functions/subs_functions.bas"
do{
#line 1072 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1072 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1072,"subs_functions.bas");}while(r);
#line 1074 "subs_functions/subs_functions.bas"
do{
#line 1074 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1074 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1074,"subs_functions.bas");}while(r);
#line 1075 "subs_functions/subs_functions.bas"
do{
#line 1075 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Title",6));
#line 1075 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1075 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1075,"subs_functions.bas");}while(r);
#line 1076 "subs_functions/subs_functions.bas"
do{
#line 1076 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1076 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1076,"subs_functions.bas");}while(r);
#line 1077 "subs_functions/subs_functions.bas"
do{
#line 1077 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__title",10));
#line 1077 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1077 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1077,"subs_functions.bas");}while(r);
#line 1078 "subs_functions/subs_functions.bas"
do{
#line 1078 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1078 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1078,"subs_functions.bas");}while(r);
#line 1079 "subs_functions/subs_functions.bas"
do{
#line 1079 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1079 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1079 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1079,"subs_functions.bas");}while(r);
#line 1080 "subs_functions/subs_functions.bas"
do{
#line 1080 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TITLE text$",12));
#line 1080 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1080 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1080,"subs_functions.bas");}while(r);
#line 1081 "subs_functions/subs_functions.bas"
do{
#line 1081 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1081 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1081,"subs_functions.bas");}while(r);
#line 1083 "subs_functions/subs_functions.bas"
do{
#line 1083 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1083 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1083,"subs_functions.bas");}while(r);
#line 1084 "subs_functions/subs_functions.bas"
do{
#line 1084 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Echo",5));
#line 1084 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1084 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1084,"subs_functions.bas");}while(r);
#line 1085 "subs_functions/subs_functions.bas"
do{
#line 1085 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1085 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1085,"subs_functions.bas");}while(r);
#line 1086 "subs_functions/subs_functions.bas"
do{
#line 1086 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__echo",9));
#line 1086 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1086 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1086,"subs_functions.bas");}while(r);
#line 1087 "subs_functions/subs_functions.bas"
do{
#line 1087 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1087 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1087,"subs_functions.bas");}while(r);
#line 1088 "subs_functions/subs_functions.bas"
do{
#line 1088 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1088 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1088 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1088,"subs_functions.bas");}while(r);
#line 1089 "subs_functions/subs_functions.bas"
do{
#line 1089 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ECHO text$",11));
#line 1089 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1089 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1089,"subs_functions.bas");}while(r);
#line 1090 "subs_functions/subs_functions.bas"
do{
#line 1090 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1090 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1090,"subs_functions.bas");}while(r);
#line 1092 "subs_functions/subs_functions.bas"
do{
#line 1092 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1092 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1092,"subs_functions.bas");}while(r);
#line 1093 "subs_functions/subs_functions.bas"
do{
#line 1093 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ReadFile",9));
#line 1093 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1093 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1093,"subs_functions.bas");}while(r);
#line 1094 "subs_functions/subs_functions.bas"
do{
#line 1094 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 1094 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1094 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1094,"subs_functions.bas");}while(r);
#line 1095 "subs_functions/subs_functions.bas"
do{
#line 1095 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1095 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1095,"subs_functions.bas");}while(r);
#line 1096 "subs_functions/subs_functions.bas"
do{
#line 1096 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__readfile",14));
#line 1096 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1096 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1096,"subs_functions.bas");}while(r);
#line 1097 "subs_functions/subs_functions.bas"
do{
#line 1097 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1097 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1097,"subs_functions.bas");}while(r);
#line 1098 "subs_functions/subs_functions.bas"
do{
#line 1098 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1098 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1098 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1098,"subs_functions.bas");}while(r);
#line 1099 "subs_functions/subs_functions.bas"
do{
#line 1099 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 1099 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1099,"subs_functions.bas");}while(r);
#line 1100 "subs_functions/subs_functions.bas"
do{
#line 1100 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_READFILE$(fileSpec$)",21));
#line 1100 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1100 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1100,"subs_functions.bas");}while(r);
#line 1101 "subs_functions/subs_functions.bas"
do{
#line 1101 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1101 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1101,"subs_functions.bas");}while(r);
#line 1103 "subs_functions/subs_functions.bas"
do{
#line 1103 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1103 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1103,"subs_functions.bas");}while(r);
#line 1104 "subs_functions/subs_functions.bas"
do{
#line 1104 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WriteFile",10));
#line 1104 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1104 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1104,"subs_functions.bas");}while(r);
#line 1105 "subs_functions/subs_functions.bas"
do{
#line 1105 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1105 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1105,"subs_functions.bas");}while(r);
#line 1106 "subs_functions/subs_functions.bas"
do{
#line 1106 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__writefile",14));
#line 1106 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1106,"subs_functions.bas");}while(r);
#line 1107 "subs_functions/subs_functions.bas"
do{
#line 1107 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1107 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1107,"subs_functions.bas");}while(r);
#line 1108 "subs_functions/subs_functions.bas"
do{
#line 1108 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 1108 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1108 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1108,"subs_functions.bas");}while(r);
#line 1109 "subs_functions/subs_functions.bas"
do{
#line 1109 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WRITEFILE fileSpec$, contents$",31));
#line 1109 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1109 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1109,"subs_functions.bas");}while(r);
#line 1110 "subs_functions/subs_functions.bas"
do{
#line 1110 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1110 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1110,"subs_functions.bas");}while(r);
#line 1112 "subs_functions/subs_functions.bas"
do{
#line 1112 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1112 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1112,"subs_functions.bas");}while(r);
#line 1113 "subs_functions/subs_functions.bas"
do{
#line 1113 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AcceptFileDrop",15));
#line 1113 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1113 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1113,"subs_functions.bas");}while(r);
#line 1114 "subs_functions/subs_functions.bas"
do{
#line 1114 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1114 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1114,"subs_functions.bas");}while(r);
#line 1115 "subs_functions/subs_functions.bas"
do{
#line 1115 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__filedrop",13));
#line 1115 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1115 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1115,"subs_functions.bas");}while(r);
#line 1116 "subs_functions/subs_functions.bas"
do{
#line 1116 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1116 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1116,"subs_functions.bas");}while(r);
#line 1117 "subs_functions/subs_functions.bas"
do{
#line 1117 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1117 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1117 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1117,"subs_functions.bas");}while(r);
#line 1118 "subs_functions/subs_functions.bas"
do{
#line 1118 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{On|Off}]",10));
#line 1118 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1118 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1118,"subs_functions.bas");}while(r);
#line 1119 "subs_functions/subs_functions.bas"
do{
#line 1119 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ACCEPTFILEDROP [{On|Off}]",26));
#line 1119 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1119 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1119,"subs_functions.bas");}while(r);
#line 1120 "subs_functions/subs_functions.bas"
do{
#line 1120 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1120 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1120,"subs_functions.bas");}while(r);
#line 1122 "subs_functions/subs_functions.bas"
do{
#line 1122 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1122 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1122,"subs_functions.bas");}while(r);
#line 1123 "subs_functions/subs_functions.bas"
do{
#line 1123 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AcceptFileDrop",15));
#line 1123 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1123 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1123,"subs_functions.bas");}while(r);
#line 1124 "subs_functions/subs_functions.bas"
do{
#line 1124 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1124,"subs_functions.bas");}while(r);
#line 1125 "subs_functions/subs_functions.bas"
do{
#line 1125 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__filedrop",14));
#line 1125 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1125 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1125,"subs_functions.bas");}while(r);
#line 1126 "subs_functions/subs_functions.bas"
do{
#line 1126 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1126 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1126,"subs_functions.bas");}while(r);
#line 1127 "subs_functions/subs_functions.bas"
do{
#line 1127 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ACCEPTFILEDROP",15));
#line 1127 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1127 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1127,"subs_functions.bas");}while(r);
#line 1128 "subs_functions/subs_functions.bas"
do{
#line 1128 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1128 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1128,"subs_functions.bas");}while(r);
#line 1130 "subs_functions/subs_functions.bas"
do{
#line 1130 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1130 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1130,"subs_functions.bas");}while(r);
#line 1131 "subs_functions/subs_functions.bas"
do{
#line 1131 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FinishDrop",11));
#line 1131 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1131 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1131,"subs_functions.bas");}while(r);
#line 1132 "subs_functions/subs_functions.bas"
do{
#line 1132 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1132 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1132,"subs_functions.bas");}while(r);
#line 1133 "subs_functions/subs_functions.bas"
do{
#line 1133 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__finishdrop",15));
#line 1133 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1133 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1133,"subs_functions.bas");}while(r);
#line 1134 "subs_functions/subs_functions.bas"
do{
#line 1134 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FINISHDROP",11));
#line 1134 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1134 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1134,"subs_functions.bas");}while(r);
#line 1135 "subs_functions/subs_functions.bas"
do{
#line 1135 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1135 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1135,"subs_functions.bas");}while(r);
#line 1137 "subs_functions/subs_functions.bas"
do{
#line 1137 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1137 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1137,"subs_functions.bas");}while(r);
#line 1138 "subs_functions/subs_functions.bas"
do{
#line 1138 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_TotalDroppedFiles",18));
#line 1138 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1138 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1138,"subs_functions.bas");}while(r);
#line 1139 "subs_functions/subs_functions.bas"
do{
#line 1139 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1139 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1139,"subs_functions.bas");}while(r);
#line 1140 "subs_functions/subs_functions.bas"
do{
#line 1140 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__totaldroppedfiles",23));
#line 1140 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1140 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1140,"subs_functions.bas");}while(r);
#line 1141 "subs_functions/subs_functions.bas"
do{
#line 1141 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1141 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1141,"subs_functions.bas");}while(r);
#line 1142 "subs_functions/subs_functions.bas"
do{
#line 1142 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TOTALDROPPEDFILES",18));
#line 1142 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1142 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1142,"subs_functions.bas");}while(r);
#line 1143 "subs_functions/subs_functions.bas"
do{
#line 1143 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1143 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1143,"subs_functions.bas");}while(r);
#line 1145 "subs_functions/subs_functions.bas"
do{
#line 1145 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1145 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1145,"subs_functions.bas");}while(r);
#line 1146 "subs_functions/subs_functions.bas"
do{
#line 1146 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DroppedFile",12));
#line 1146 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1146 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1146,"subs_functions.bas");}while(r);
#line 1147 "subs_functions/subs_functions.bas"
do{
#line 1147 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+524))),8,1),qbs_new_txt_len("$",1));
#line 1147 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1147 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1147,"subs_functions.bas");}while(r);
#line 1148 "subs_functions/subs_functions.bas"
do{
#line 1148 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1148 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1148,"subs_functions.bas");}while(r);
#line 1149 "subs_functions/subs_functions.bas"
do{
#line 1149 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__droppedfile",17));
#line 1149 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1149 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1149,"subs_functions.bas");}while(r);
#line 1150 "subs_functions/subs_functions.bas"
do{
#line 1150 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 1150 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1150,"subs_functions.bas");}while(r);
#line 1151 "subs_functions/subs_functions.bas"
do{
#line 1151 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1151 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1151,"subs_functions.bas");}while(r);
#line 1152 "subs_functions/subs_functions.bas"
do{
#line 1152 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1152 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1152 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1152,"subs_functions.bas");}while(r);
#line 1153 "subs_functions/subs_functions.bas"
do{
#line 1153 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1153 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1153 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1153,"subs_functions.bas");}while(r);
#line 1154 "subs_functions/subs_functions.bas"
do{
#line 1154 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DROPPEDFILE$[(index&)]",23));
#line 1154 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1154,"subs_functions.bas");}while(r);
#line 1155 "subs_functions/subs_functions.bas"
do{
#line 1155 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1155 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1155,"subs_functions.bas");}while(r);
#line 1157 "subs_functions/subs_functions.bas"
do{
#line 1157 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1157 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1157,"subs_functions.bas");}while(r);
#line 1158 "subs_functions/subs_functions.bas"
do{
#line 1158 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Clear",5));
#line 1158 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1158 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1158,"subs_functions.bas");}while(r);
#line 1159 "subs_functions/subs_functions.bas"
do{
#line 1159 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1159 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1159,"subs_functions.bas");}while(r);
#line 1160 "subs_functions/subs_functions.bas"
do{
#line 1160 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_clear",9));
#line 1160 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1160 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1160,"subs_functions.bas");}while(r);
#line 1161 "subs_functions/subs_functions.bas"
do{
#line 1161 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1161 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1161,"subs_functions.bas");}while(r);
#line 1162 "subs_functions/subs_functions.bas"
do{
#line 1162 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1162 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1162 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1162,"subs_functions.bas");}while(r);
#line 1163 "subs_functions/subs_functions.bas"
do{
#line 1163 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
#line 1163 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1163 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1163,"subs_functions.bas");}while(r);
#line 1164 "subs_functions/subs_functions.bas"
do{
#line 1164 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CLEAR",5));
#line 1164 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1164 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1164,"subs_functions.bas");}while(r);
#line 1165 "subs_functions/subs_functions.bas"
do{
#line 1165 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1165 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1165,"subs_functions.bas");}while(r);
#line 1169 "subs_functions/subs_functions.bas"
do{
#line 1169 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1169 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1169,"subs_functions.bas");}while(r);
#line 1170 "subs_functions/subs_functions.bas"
do{
#line 1170 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NewImage",9));
#line 1170 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1170 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1170,"subs_functions.bas");}while(r);
#line 1171 "subs_functions/subs_functions.bas"
do{
#line 1171 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1171 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1171,"subs_functions.bas");}while(r);
#line 1172 "subs_functions/subs_functions.bas"
do{
#line 1172 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__newimage",14));
#line 1172 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1172 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1172,"subs_functions.bas");}while(r);
#line 1173 "subs_functions/subs_functions.bas"
do{
#line 1173 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1173,"subs_functions.bas");}while(r);
#line 1174 "subs_functions/subs_functions.bas"
do{
#line 1174 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1174 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1174 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1174,"subs_functions.bas");}while(r);
#line 1175 "subs_functions/subs_functions.bas"
do{
#line 1175 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 1175 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1175 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1175,"subs_functions.bas");}while(r);
#line 1176 "subs_functions/subs_functions.bas"
do{
#line 1176 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1176 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1176,"subs_functions.bas");}while(r);
#line 1177 "subs_functions/subs_functions.bas"
do{
#line 1177 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_NEWIMAGE(width&, height&, mode)",32));
#line 1177 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1177 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1177,"subs_functions.bas");}while(r);
#line 1178 "subs_functions/subs_functions.bas"
do{
#line 1178 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1178 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1178,"subs_functions.bas");}while(r);
#line 1180 "subs_functions/subs_functions.bas"
do{
#line 1180 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1180 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1180,"subs_functions.bas");}while(r);
#line 1181 "subs_functions/subs_functions.bas"
do{
#line 1181 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LoadImage",10));
#line 1181 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1181 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1181,"subs_functions.bas");}while(r);
#line 1182 "subs_functions/subs_functions.bas"
do{
#line 1182 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 4ll ;
#line 1182 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1182,"subs_functions.bas");}while(r);
#line 1183 "subs_functions/subs_functions.bas"
do{
#line 1183 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1183,"subs_functions.bas");}while(r);
#line 1184 "subs_functions/subs_functions.bas"
do{
#line 1184 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__loadimage",15));
#line 1184 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1184 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1184,"subs_functions.bas");}while(r);
#line 1185 "subs_functions/subs_functions.bas"
do{
#line 1185 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1185 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1185,"subs_functions.bas");}while(r);
#line 1186 "subs_functions/subs_functions.bas"
do{
#line 1186 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 1186 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1186 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1186,"subs_functions.bas");}while(r);
#line 1187 "subs_functions/subs_functions.bas"
do{
#line 1187 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
#line 1187 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1187 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1187,"subs_functions.bas");}while(r);
#line 1188 "subs_functions/subs_functions.bas"
do{
#line 1188 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1188 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1188,"subs_functions.bas");}while(r);
#line 1189 "subs_functions/subs_functions.bas"
do{
#line 1189 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOADIMAGE(fileName$[, [mode&][, requirements$]])",49));
#line 1189 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1189 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1189,"subs_functions.bas");}while(r);
#line 1190 "subs_functions/subs_functions.bas"
do{
#line 1190 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1190 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1190,"subs_functions.bas");}while(r);
#line 1192 "subs_functions/subs_functions.bas"
do{
#line 1192 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1192 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1192,"subs_functions.bas");}while(r);
#line 1193 "subs_functions/subs_functions.bas"
do{
#line 1193 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeImage",10));
#line 1193 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1193,"subs_functions.bas");}while(r);
#line 1194 "subs_functions/subs_functions.bas"
do{
#line 1194 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1194 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1194,"subs_functions.bas");}while(r);
#line 1195 "subs_functions/subs_functions.bas"
do{
#line 1195 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__freeimage",14));
#line 1195 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1195 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1195,"subs_functions.bas");}while(r);
#line 1196 "subs_functions/subs_functions.bas"
do{
#line 1196 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1196 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1196,"subs_functions.bas");}while(r);
#line 1197 "subs_functions/subs_functions.bas"
do{
#line 1197 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1197 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1197 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1197,"subs_functions.bas");}while(r);
#line 1198 "subs_functions/subs_functions.bas"
do{
#line 1198 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1198 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1198 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1198,"subs_functions.bas");}while(r);
#line 1199 "subs_functions/subs_functions.bas"
do{
#line 1199 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FREEIMAGE handle&",18));
#line 1199 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1199 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1199,"subs_functions.bas");}while(r);
#line 1200 "subs_functions/subs_functions.bas"
do{
#line 1200 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1200 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1200,"subs_functions.bas");}while(r);
#line 1202 "subs_functions/subs_functions.bas"
do{
#line 1202 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1202 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1202,"subs_functions.bas");}while(r);
#line 1203 "subs_functions/subs_functions.bas"
do{
#line 1203 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CopyImage",10));
#line 1203 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1203,"subs_functions.bas");}while(r);
#line 1204 "subs_functions/subs_functions.bas"
do{
#line 1204 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1204 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1204,"subs_functions.bas");}while(r);
#line 1205 "subs_functions/subs_functions.bas"
do{
#line 1205 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__copyimage",15));
#line 1205 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1205 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1205,"subs_functions.bas");}while(r);
#line 1206 "subs_functions/subs_functions.bas"
do{
#line 1206 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1206 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1206,"subs_functions.bas");}while(r);
#line 1207 "subs_functions/subs_functions.bas"
do{
#line 1207 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1207 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1207 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1207,"subs_functions.bas");}while(r);
#line 1208 "subs_functions/subs_functions.bas"
do{
#line 1208 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1208 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1208 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1208,"subs_functions.bas");}while(r);
#line 1209 "subs_functions/subs_functions.bas"
do{
#line 1209 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1209 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1209,"subs_functions.bas");}while(r);
#line 1210 "subs_functions/subs_functions.bas"
do{
#line 1210 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COPYIMAGE(imageHandle&[, mode])",32));
#line 1210 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1210 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1210,"subs_functions.bas");}while(r);
#line 1211 "subs_functions/subs_functions.bas"
do{
#line 1211 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1211 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1211,"subs_functions.bas");}while(r);
#line 1213 "subs_functions/subs_functions.bas"
do{
#line 1213 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1213,"subs_functions.bas");}while(r);
#line 1214 "subs_functions/subs_functions.bas"
do{
#line 1214 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SaveImage",10));
#line 1214 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1214 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1214,"subs_functions.bas");}while(r);
#line 1215 "subs_functions/subs_functions.bas"
do{
#line 1215 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 4ll ;
#line 1215 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1215,"subs_functions.bas");}while(r);
#line 1216 "subs_functions/subs_functions.bas"
do{
#line 1216 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1216 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1216,"subs_functions.bas");}while(r);
#line 1217 "subs_functions/subs_functions.bas"
do{
#line 1217 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__saveimage",14));
#line 1217 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1217 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1217,"subs_functions.bas");}while(r);
#line 1218 "subs_functions/subs_functions.bas"
do{
#line 1218 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1218 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1218,"subs_functions.bas");}while(r);
#line 1219 "subs_functions/subs_functions.bas"
do{
#line 1219 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 1219 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1219 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1219,"subs_functions.bas");}while(r);
#line 1220 "subs_functions/subs_functions.bas"
do{
#line 1220 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
#line 1220 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1220 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1220,"subs_functions.bas");}while(r);
#line 1221 "subs_functions/subs_functions.bas"
do{
#line 1221 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SAVEIMAGE fileName$[, imageHandle&][, requirements$])",54));
#line 1221 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1221 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1221,"subs_functions.bas");}while(r);
#line 1222 "subs_functions/subs_functions.bas"
do{
#line 1222 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1222,"subs_functions.bas");}while(r);
#line 1226 "subs_functions/subs_functions.bas"
do{
#line 1226 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1226 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1226,"subs_functions.bas");}while(r);
#line 1227 "subs_functions/subs_functions.bas"
do{
#line 1227 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Source",7));
#line 1227 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1227 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1227,"subs_functions.bas");}while(r);
#line 1228 "subs_functions/subs_functions.bas"
do{
#line 1228 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1228 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1228,"subs_functions.bas");}while(r);
#line 1229 "subs_functions/subs_functions.bas"
do{
#line 1229 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__source",11));
#line 1229 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1229 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1229,"subs_functions.bas");}while(r);
#line 1230 "subs_functions/subs_functions.bas"
do{
#line 1230 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1230 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1230,"subs_functions.bas");}while(r);
#line 1231 "subs_functions/subs_functions.bas"
do{
#line 1231 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1231 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1231,"subs_functions.bas");}while(r);
#line 1232 "subs_functions/subs_functions.bas"
do{
#line 1232 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?",1));
#line 1232 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1232 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1232,"subs_functions.bas");}while(r);
#line 1233 "subs_functions/subs_functions.bas"
do{
#line 1233 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SOURCE handle&",15));
#line 1233 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1233 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1233,"subs_functions.bas");}while(r);
#line 1234 "subs_functions/subs_functions.bas"
do{
#line 1234 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1234 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1234,"subs_functions.bas");}while(r);
#line 1236 "subs_functions/subs_functions.bas"
do{
#line 1236 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1236 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1236,"subs_functions.bas");}while(r);
#line 1237 "subs_functions/subs_functions.bas"
do{
#line 1237 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dest",5));
#line 1237 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1237 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1237,"subs_functions.bas");}while(r);
#line 1238 "subs_functions/subs_functions.bas"
do{
#line 1238 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1238 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1238,"subs_functions.bas");}while(r);
#line 1239 "subs_functions/subs_functions.bas"
do{
#line 1239 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__dest",9));
#line 1239 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1239 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1239,"subs_functions.bas");}while(r);
#line 1240 "subs_functions/subs_functions.bas"
do{
#line 1240 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1240 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1240,"subs_functions.bas");}while(r);
#line 1241 "subs_functions/subs_functions.bas"
do{
#line 1241 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1241 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1241 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1241,"subs_functions.bas");}while(r);
#line 1242 "subs_functions/subs_functions.bas"
do{
#line 1242 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?",1));
#line 1242 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1242 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1242,"subs_functions.bas");}while(r);
#line 1243 "subs_functions/subs_functions.bas"
do{
#line 1243 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEST imageHandle&",18));
#line 1243 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1243 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1243,"subs_functions.bas");}while(r);
#line 1244 "subs_functions/subs_functions.bas"
do{
#line 1244 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1244 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1244,"subs_functions.bas");}while(r);
#line 1246 "subs_functions/subs_functions.bas"
do{
#line 1246 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1246 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1246,"subs_functions.bas");}while(r);
#line 1247 "subs_functions/subs_functions.bas"
do{
#line 1247 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Source",7));
#line 1247 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1247 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1247,"subs_functions.bas");}while(r);
#line 1248 "subs_functions/subs_functions.bas"
do{
#line 1248 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1248 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1248,"subs_functions.bas");}while(r);
#line 1249 "subs_functions/subs_functions.bas"
do{
#line 1249 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__source",12));
#line 1249 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1249 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1249,"subs_functions.bas");}while(r);
#line 1250 "subs_functions/subs_functions.bas"
do{
#line 1250 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1250 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1250,"subs_functions.bas");}while(r);
#line 1251 "subs_functions/subs_functions.bas"
do{
#line 1251 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SOURCE",7));
#line 1251 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1251,"subs_functions.bas");}while(r);
#line 1252 "subs_functions/subs_functions.bas"
do{
#line 1252 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1252 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1252,"subs_functions.bas");}while(r);
#line 1254 "subs_functions/subs_functions.bas"
do{
#line 1254 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1254 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1254,"subs_functions.bas");}while(r);
#line 1255 "subs_functions/subs_functions.bas"
do{
#line 1255 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dest",5));
#line 1255 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1255 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1255,"subs_functions.bas");}while(r);
#line 1256 "subs_functions/subs_functions.bas"
do{
#line 1256 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1256 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1256,"subs_functions.bas");}while(r);
#line 1257 "subs_functions/subs_functions.bas"
do{
#line 1257 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__dest",10));
#line 1257 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1257 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1257,"subs_functions.bas");}while(r);
#line 1258 "subs_functions/subs_functions.bas"
do{
#line 1258 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1258 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1258,"subs_functions.bas");}while(r);
#line 1259 "subs_functions/subs_functions.bas"
do{
#line 1259 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEST",5));
#line 1259 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1259 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1259,"subs_functions.bas");}while(r);
#line 1260 "subs_functions/subs_functions.bas"
do{
#line 1260 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1260 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1260,"subs_functions.bas");}while(r);
#line 1262 "subs_functions/subs_functions.bas"
do{
#line 1262 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1262 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1262,"subs_functions.bas");}while(r);
#line 1263 "subs_functions/subs_functions.bas"
do{
#line 1263 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Display",8));
#line 1263 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1263 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1263,"subs_functions.bas");}while(r);
#line 1264 "subs_functions/subs_functions.bas"
do{
#line 1264 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1264 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1264,"subs_functions.bas");}while(r);
#line 1265 "subs_functions/subs_functions.bas"
do{
#line 1265 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__display",13));
#line 1265 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1265 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1265,"subs_functions.bas");}while(r);
#line 1266 "subs_functions/subs_functions.bas"
do{
#line 1266 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1266 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1266,"subs_functions.bas");}while(r);
#line 1267 "subs_functions/subs_functions.bas"
do{
#line 1267 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DISPLAY",8));
#line 1267 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1267 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1267,"subs_functions.bas");}while(r);
#line 1268 "subs_functions/subs_functions.bas"
do{
#line 1268 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1268 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1268,"subs_functions.bas");}while(r);
#line 1272 "subs_functions/subs_functions.bas"
do{
#line 1272 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1272 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1272,"subs_functions.bas");}while(r);
#line 1273 "subs_functions/subs_functions.bas"
do{
#line 1273 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blend",6));
#line 1273 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1273 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1273,"subs_functions.bas");}while(r);
#line 1274 "subs_functions/subs_functions.bas"
do{
#line 1274 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1274 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1274,"subs_functions.bas");}while(r);
#line 1275 "subs_functions/subs_functions.bas"
do{
#line 1275 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__blend",10));
#line 1275 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1275 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1275,"subs_functions.bas");}while(r);
#line 1276 "subs_functions/subs_functions.bas"
do{
#line 1276 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1276 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1276,"subs_functions.bas");}while(r);
#line 1277 "subs_functions/subs_functions.bas"
do{
#line 1277 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1277 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1277 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1277,"subs_functions.bas");}while(r);
#line 1278 "subs_functions/subs_functions.bas"
do{
#line 1278 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1278 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1278 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1278,"subs_functions.bas");}while(r);
#line 1279 "subs_functions/subs_functions.bas"
do{
#line 1279 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLEND [imageHandle&]",21));
#line 1279 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1279 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1279,"subs_functions.bas");}while(r);
#line 1280 "subs_functions/subs_functions.bas"
do{
#line 1280 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1280 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1280,"subs_functions.bas");}while(r);
#line 1282 "subs_functions/subs_functions.bas"
do{
#line 1282 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1282 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1282,"subs_functions.bas");}while(r);
#line 1283 "subs_functions/subs_functions.bas"
do{
#line 1283 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DontBlend",10));
#line 1283 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1283 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1283,"subs_functions.bas");}while(r);
#line 1284 "subs_functions/subs_functions.bas"
do{
#line 1284 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1284 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1284,"subs_functions.bas");}while(r);
#line 1285 "subs_functions/subs_functions.bas"
do{
#line 1285 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__dontblend",14));
#line 1285 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1285 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1285,"subs_functions.bas");}while(r);
#line 1286 "subs_functions/subs_functions.bas"
do{
#line 1286 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1286 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1286,"subs_functions.bas");}while(r);
#line 1287 "subs_functions/subs_functions.bas"
do{
#line 1287 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1287 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1287 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1287,"subs_functions.bas");}while(r);
#line 1288 "subs_functions/subs_functions.bas"
do{
#line 1288 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1288 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1288 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1288,"subs_functions.bas");}while(r);
#line 1289 "subs_functions/subs_functions.bas"
do{
#line 1289 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DONTBLEND [imageHandle&]",25));
#line 1289 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1289,"subs_functions.bas");}while(r);
#line 1290 "subs_functions/subs_functions.bas"
do{
#line 1290 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1290 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1290,"subs_functions.bas");}while(r);
#line 1292 "subs_functions/subs_functions.bas"
do{
#line 1292 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1292 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1292,"subs_functions.bas");}while(r);
#line 1293 "subs_functions/subs_functions.bas"
do{
#line 1293 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClearColor",11));
#line 1293 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1293 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1293,"subs_functions.bas");}while(r);
#line 1294 "subs_functions/subs_functions.bas"
do{
#line 1294 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1294 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1294,"subs_functions.bas");}while(r);
#line 1295 "subs_functions/subs_functions.bas"
do{
#line 1295 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__clearcolor",15));
#line 1295 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1295 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1295,"subs_functions.bas");}while(r);
#line 1296 "subs_functions/subs_functions.bas"
do{
#line 1296 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1296 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1296,"subs_functions.bas");}while(r);
#line 1297 "subs_functions/subs_functions.bas"
do{
#line 1297 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1297 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1297 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1297,"subs_functions.bas");}while(r);
#line 1298 "subs_functions/subs_functions.bas"
do{
#line 1298 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_None}][?][,?]",16));
#line 1298 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1298 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1298,"subs_functions.bas");}while(r);
#line 1299 "subs_functions/subs_functions.bas"
do{
#line 1299 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLEARCOLOR {color&|_None}[,dest_handle&]",41));
#line 1299 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1299,"subs_functions.bas");}while(r);
#line 1300 "subs_functions/subs_functions.bas"
do{
#line 1300 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1300 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1300,"subs_functions.bas");}while(r);
#line 1304 "subs_functions/subs_functions.bas"
do{
#line 1304 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1304 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1304,"subs_functions.bas");}while(r);
#line 1305 "subs_functions/subs_functions.bas"
do{
#line 1305 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PutImage",9));
#line 1305 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1305 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1305,"subs_functions.bas");}while(r);
#line 1306 "subs_functions/subs_functions.bas"
do{
#line 1306 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1306 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1306,"subs_functions.bas");}while(r);
#line 1307 "subs_functions/subs_functions.bas"
do{
#line 1307 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__putimage",13));
#line 1307 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1307 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1307,"subs_functions.bas");}while(r);
#line 1308 "subs_functions/subs_functions.bas"
do{
#line 1308 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 10 ;
#line 1308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1308,"subs_functions.bas");}while(r);
#line 1309 "subs_functions/subs_functions.bas"
do{
#line 1309 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 1309 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1309 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1309,"subs_functions.bas");}while(r);
#line 1310 "subs_functions/subs_functions.bas"
do{
#line 1310 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[[{Step}](?,?)[-[{Step}](?,?)]][,[?][,[?][,[[{Step}](?,?)[-[{Step}](?,?)]][,{_Smooth}]]]]",89));
#line 1310 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1310 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1310,"subs_functions.bas");}while(r);
#line 1311 "subs_functions/subs_functions.bas"
do{
#line 1311 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PUTIMAGE [STEP] [(dx1, dy1)-[STEP][(dx2, dy2)]][, sourceHandle&][, destHandle&][, ][STEP][(sx1, sy1)[-STEP][(sx2, sy2)]][_SMOOTH]",130));
#line 1311 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1311 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1311,"subs_functions.bas");}while(r);
#line 1312 "subs_functions/subs_functions.bas"
do{
#line 1312 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1312 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1312,"subs_functions.bas");}while(r);
#line 1314 "subs_functions/subs_functions.bas"
do{
#line 1314 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1314 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1314,"subs_functions.bas");}while(r);
#line 1315 "subs_functions/subs_functions.bas"
do{
#line 1315 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapTriangle",12));
#line 1315 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1315 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1315,"subs_functions.bas");}while(r);
#line 1316 "subs_functions/subs_functions.bas"
do{
#line 1316 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1316 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1316,"subs_functions.bas");}while(r);
#line 1317 "subs_functions/subs_functions.bas"
do{
#line 1317 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__maptriangle",16));
#line 1317 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1317 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1317,"subs_functions.bas");}while(r);
#line 1318 "subs_functions/subs_functions.bas"
do{
#line 1318 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 19 ;
#line 1318 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1318,"subs_functions.bas");}while(r);
#line 1319 "subs_functions/subs_functions.bas"
do{
#line 1319 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1319 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1319 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1319,"subs_functions.bas");}while(r);
#line 1320 "subs_functions/subs_functions.bas"
do{
#line 1320 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Clockwise|_AntiClockwise}][{_Seamless}](?,?)-(?,?)-(?,?)[,?]{To}(?,?[,?])-(?,?[,?])-(?,?[,?])[,[?][,{_Smooth|_SmoothShrunk|_SmoothStretched}]]",145));
#line 1320 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1320 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1320,"subs_functions.bas");}while(r);
#line 1321 "subs_functions/subs_functions.bas"
do{
#line 1321 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MAPTRIANGLE [{_SEAMLESS}] (sx1, sy1)-(sx2, sy2)-(sx3, sy3), source& TO (dx1, dy1)-(dx2, dy2)-(dx3, dy3)[, destination&][{_SMOOTH|_SMOOTHSHRUNK|_SMOOTHSTRETCHED}]]",163));
#line 1321 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1321 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1321,"subs_functions.bas");}while(r);
#line 1322 "subs_functions/subs_functions.bas"
do{
#line 1322 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1322 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1322,"subs_functions.bas");}while(r);
#line 1324 "subs_functions/subs_functions.bas"
do{
#line 1324 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1324 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1324,"subs_functions.bas");}while(r);
#line 1325 "subs_functions/subs_functions.bas"
do{
#line 1325 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DepthBuffer",12));
#line 1325 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1325 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1325,"subs_functions.bas");}while(r);
#line 1326 "subs_functions/subs_functions.bas"
do{
#line 1326 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1326 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1326,"subs_functions.bas");}while(r);
#line 1327 "subs_functions/subs_functions.bas"
do{
#line 1327 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__depthbuffer",16));
#line 1327 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1327,"subs_functions.bas");}while(r);
#line 1328 "subs_functions/subs_functions.bas"
do{
#line 1328 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1328 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1328,"subs_functions.bas");}while(r);
#line 1329 "subs_functions/subs_functions.bas"
do{
#line 1329 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1329 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1329 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1329,"subs_functions.bas");}while(r);
#line 1330 "subs_functions/subs_functions.bas"
do{
#line 1330 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off|Lock|_Clear}[,?]",24));
#line 1330 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1330 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1330,"subs_functions.bas");}while(r);
#line 1331 "subs_functions/subs_functions.bas"
do{
#line 1331 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEPTHBUFFER {On|Off|Lock|_Clear}[,handle&]",43));
#line 1331 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1331 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1331,"subs_functions.bas");}while(r);
#line 1332 "subs_functions/subs_functions.bas"
do{
#line 1332 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1332 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1332,"subs_functions.bas");}while(r);
#line 1334 "subs_functions/subs_functions.bas"
do{
#line 1334 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1334 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1334,"subs_functions.bas");}while(r);
#line 1335 "subs_functions/subs_functions.bas"
do{
#line 1335 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SetAlpha",9));
#line 1335 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1335 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1335,"subs_functions.bas");}while(r);
#line 1336 "subs_functions/subs_functions.bas"
do{
#line 1336 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1336 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1336,"subs_functions.bas");}while(r);
#line 1337 "subs_functions/subs_functions.bas"
do{
#line 1337 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__setalpha",13));
#line 1337 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1337 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1337,"subs_functions.bas");}while(r);
#line 1338 "subs_functions/subs_functions.bas"
do{
#line 1338 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1338 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1338,"subs_functions.bas");}while(r);
#line 1339 "subs_functions/subs_functions.bas"
do{
#line 1339 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1339 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1339 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1339,"subs_functions.bas");}while(r);
#line 1340 "subs_functions/subs_functions.bas"
do{
#line 1340 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?[{To}?]][,?]]",18));
#line 1340 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1340 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1340,"subs_functions.bas");}while(r);
#line 1341 "subs_functions/subs_functions.bas"
do{
#line 1341 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SETALPHA alpha& or _SETALPHA color1& TO color2&[, imageHandle&]",64));
#line 1341 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1341 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1341,"subs_functions.bas");}while(r);
#line 1342 "subs_functions/subs_functions.bas"
do{
#line 1342 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1342 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1342,"subs_functions.bas");}while(r);
#line 1346 "subs_functions/subs_functions.bas"
do{
#line 1346 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1346 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1346,"subs_functions.bas");}while(r);
#line 1347 "subs_functions/subs_functions.bas"
do{
#line 1347 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Width",6));
#line 1347 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1347 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1347,"subs_functions.bas");}while(r);
#line 1348 "subs_functions/subs_functions.bas"
do{
#line 1348 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1348 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1348,"subs_functions.bas");}while(r);
#line 1349 "subs_functions/subs_functions.bas"
do{
#line 1349 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__width",11));
#line 1349 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1349 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1349,"subs_functions.bas");}while(r);
#line 1350 "subs_functions/subs_functions.bas"
do{
#line 1350 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1350 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1350,"subs_functions.bas");}while(r);
#line 1351 "subs_functions/subs_functions.bas"
do{
#line 1351 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1351 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1351 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1351,"subs_functions.bas");}while(r);
#line 1352 "subs_functions/subs_functions.bas"
do{
#line 1352 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1352 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1352 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1352,"subs_functions.bas");}while(r);
#line 1353 "subs_functions/subs_functions.bas"
do{
#line 1353 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1353 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1353,"subs_functions.bas");}while(r);
#line 1354 "subs_functions/subs_functions.bas"
do{
#line 1354 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WIDTH(imageHandle&)",20));
#line 1354 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1354 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1354,"subs_functions.bas");}while(r);
#line 1355 "subs_functions/subs_functions.bas"
do{
#line 1355 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1355 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1355,"subs_functions.bas");}while(r);
#line 1357 "subs_functions/subs_functions.bas"
do{
#line 1357 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1357 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1357,"subs_functions.bas");}while(r);
#line 1358 "subs_functions/subs_functions.bas"
do{
#line 1358 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Height",7));
#line 1358 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1358 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1358,"subs_functions.bas");}while(r);
#line 1359 "subs_functions/subs_functions.bas"
do{
#line 1359 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1359 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1359,"subs_functions.bas");}while(r);
#line 1360 "subs_functions/subs_functions.bas"
do{
#line 1360 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__height",12));
#line 1360 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1360 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1360,"subs_functions.bas");}while(r);
#line 1361 "subs_functions/subs_functions.bas"
do{
#line 1361 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1361 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1361,"subs_functions.bas");}while(r);
#line 1362 "subs_functions/subs_functions.bas"
do{
#line 1362 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1362 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1362 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1362,"subs_functions.bas");}while(r);
#line 1363 "subs_functions/subs_functions.bas"
do{
#line 1363 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1363 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1363 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1363,"subs_functions.bas");}while(r);
#line 1364 "subs_functions/subs_functions.bas"
do{
#line 1364 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1364 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1364,"subs_functions.bas");}while(r);
#line 1365 "subs_functions/subs_functions.bas"
do{
#line 1365 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_HEIGHT(imageHandle&)",21));
#line 1365 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1365 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1365,"subs_functions.bas");}while(r);
#line 1366 "subs_functions/subs_functions.bas"
do{
#line 1366 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1366 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1366,"subs_functions.bas");}while(r);
#line 1368 "subs_functions/subs_functions.bas"
do{
#line 1368 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1368 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1368,"subs_functions.bas");}while(r);
#line 1369 "subs_functions/subs_functions.bas"
do{
#line 1369 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PixelSize",10));
#line 1369 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1369 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1369,"subs_functions.bas");}while(r);
#line 1370 "subs_functions/subs_functions.bas"
do{
#line 1370 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1370 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1370,"subs_functions.bas");}while(r);
#line 1371 "subs_functions/subs_functions.bas"
do{
#line 1371 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__pixelsize",15));
#line 1371 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1371 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1371,"subs_functions.bas");}while(r);
#line 1372 "subs_functions/subs_functions.bas"
do{
#line 1372 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1372 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1372,"subs_functions.bas");}while(r);
#line 1373 "subs_functions/subs_functions.bas"
do{
#line 1373 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1373 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1373 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1373,"subs_functions.bas");}while(r);
#line 1374 "subs_functions/subs_functions.bas"
do{
#line 1374 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1374 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1374 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1374,"subs_functions.bas");}while(r);
#line 1375 "subs_functions/subs_functions.bas"
do{
#line 1375 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1375 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1375,"subs_functions.bas");}while(r);
#line 1376 "subs_functions/subs_functions.bas"
do{
#line 1376 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PIXELSIZE[(imageHandle&)]",26));
#line 1376 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1376 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1376,"subs_functions.bas");}while(r);
#line 1377 "subs_functions/subs_functions.bas"
do{
#line 1377 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1377 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1377,"subs_functions.bas");}while(r);
#line 1379 "subs_functions/subs_functions.bas"
do{
#line 1379 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1379 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1379,"subs_functions.bas");}while(r);
#line 1380 "subs_functions/subs_functions.bas"
do{
#line 1380 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClearColor",11));
#line 1380 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1380 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1380,"subs_functions.bas");}while(r);
#line 1381 "subs_functions/subs_functions.bas"
do{
#line 1381 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1381 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1381,"subs_functions.bas");}while(r);
#line 1382 "subs_functions/subs_functions.bas"
do{
#line 1382 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__clearcolor",16));
#line 1382 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1382 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1382,"subs_functions.bas");}while(r);
#line 1383 "subs_functions/subs_functions.bas"
do{
#line 1383 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1383 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1383,"subs_functions.bas");}while(r);
#line 1384 "subs_functions/subs_functions.bas"
do{
#line 1384 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1384 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1384 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1384,"subs_functions.bas");}while(r);
#line 1385 "subs_functions/subs_functions.bas"
do{
#line 1385 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1385 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1385 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1385,"subs_functions.bas");}while(r);
#line 1386 "subs_functions/subs_functions.bas"
do{
#line 1386 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1386 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1386,"subs_functions.bas");}while(r);
#line 1387 "subs_functions/subs_functions.bas"
do{
#line 1387 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CLEARCOLOR[(sourceHandle&)]",28));
#line 1387 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1387 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1387,"subs_functions.bas");}while(r);
#line 1388 "subs_functions/subs_functions.bas"
do{
#line 1388 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1388 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1388,"subs_functions.bas");}while(r);
#line 1390 "subs_functions/subs_functions.bas"
do{
#line 1390 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1390 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1390,"subs_functions.bas");}while(r);
#line 1391 "subs_functions/subs_functions.bas"
do{
#line 1391 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blend",6));
#line 1391 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1391 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1391,"subs_functions.bas");}while(r);
#line 1392 "subs_functions/subs_functions.bas"
do{
#line 1392 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1392 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1392,"subs_functions.bas");}while(r);
#line 1393 "subs_functions/subs_functions.bas"
do{
#line 1393 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__blend",11));
#line 1393 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1393 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1393,"subs_functions.bas");}while(r);
#line 1394 "subs_functions/subs_functions.bas"
do{
#line 1394 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1394 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1394,"subs_functions.bas");}while(r);
#line 1395 "subs_functions/subs_functions.bas"
do{
#line 1395 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1395 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1395 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1395,"subs_functions.bas");}while(r);
#line 1396 "subs_functions/subs_functions.bas"
do{
#line 1396 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1396 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1396 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1396,"subs_functions.bas");}while(r);
#line 1397 "subs_functions/subs_functions.bas"
do{
#line 1397 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1397 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1397,"subs_functions.bas");}while(r);
#line 1398 "subs_functions/subs_functions.bas"
do{
#line 1398 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLEND[(imageHandle&)]",22));
#line 1398 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1398 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1398,"subs_functions.bas");}while(r);
#line 1399 "subs_functions/subs_functions.bas"
do{
#line 1399 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1399 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1399,"subs_functions.bas");}while(r);
#line 1401 "subs_functions/subs_functions.bas"
do{
#line 1401 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1401 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1401,"subs_functions.bas");}while(r);
#line 1402 "subs_functions/subs_functions.bas"
do{
#line 1402 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DefaultColor",13));
#line 1402 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1402 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1402,"subs_functions.bas");}while(r);
#line 1403 "subs_functions/subs_functions.bas"
do{
#line 1403 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1403 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1403,"subs_functions.bas");}while(r);
#line 1404 "subs_functions/subs_functions.bas"
do{
#line 1404 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__defaultcolor",18));
#line 1404 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1404 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1404,"subs_functions.bas");}while(r);
#line 1405 "subs_functions/subs_functions.bas"
do{
#line 1405 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1405 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1405,"subs_functions.bas");}while(r);
#line 1406 "subs_functions/subs_functions.bas"
do{
#line 1406 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1406 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1406 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1406,"subs_functions.bas");}while(r);
#line 1407 "subs_functions/subs_functions.bas"
do{
#line 1407 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1407 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1407 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1407,"subs_functions.bas");}while(r);
#line 1408 "subs_functions/subs_functions.bas"
do{
#line 1408 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1408 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1408,"subs_functions.bas");}while(r);
#line 1409 "subs_functions/subs_functions.bas"
do{
#line 1409 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEFAULTCOLOR[(imageHandle&)]",29));
#line 1409 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1409 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1409,"subs_functions.bas");}while(r);
#line 1410 "subs_functions/subs_functions.bas"
do{
#line 1410 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1410 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1410,"subs_functions.bas");}while(r);
#line 1412 "subs_functions/subs_functions.bas"
do{
#line 1412 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1412 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1412,"subs_functions.bas");}while(r);
#line 1413 "subs_functions/subs_functions.bas"
do{
#line 1413 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_BackgroundColor",16));
#line 1413 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1413 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1413,"subs_functions.bas");}while(r);
#line 1414 "subs_functions/subs_functions.bas"
do{
#line 1414 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1414 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1414,"subs_functions.bas");}while(r);
#line 1415 "subs_functions/subs_functions.bas"
do{
#line 1415 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__backgroundcolor",21));
#line 1415 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1415 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1415,"subs_functions.bas");}while(r);
#line 1416 "subs_functions/subs_functions.bas"
do{
#line 1416 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1416 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1416,"subs_functions.bas");}while(r);
#line 1417 "subs_functions/subs_functions.bas"
do{
#line 1417 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1417 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1417 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1417,"subs_functions.bas");}while(r);
#line 1418 "subs_functions/subs_functions.bas"
do{
#line 1418 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1418 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1418 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1418,"subs_functions.bas");}while(r);
#line 1419 "subs_functions/subs_functions.bas"
do{
#line 1419 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1419 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1419,"subs_functions.bas");}while(r);
#line 1420 "subs_functions/subs_functions.bas"
do{
#line 1420 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BACKGROUNDCOLOR(imageHandle&)]",31));
#line 1420 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1420 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1420,"subs_functions.bas");}while(r);
#line 1421 "subs_functions/subs_functions.bas"
do{
#line 1421 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1421 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1421,"subs_functions.bas");}while(r);
#line 1425 "subs_functions/subs_functions.bas"
do{
#line 1425 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1425 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1425,"subs_functions.bas");}while(r);
#line 1426 "subs_functions/subs_functions.bas"
do{
#line 1426 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PaletteColor",13));
#line 1426 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1426 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1426,"subs_functions.bas");}while(r);
#line 1427 "subs_functions/subs_functions.bas"
do{
#line 1427 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1427 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1427,"subs_functions.bas");}while(r);
#line 1428 "subs_functions/subs_functions.bas"
do{
#line 1428 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__palettecolor",18));
#line 1428 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1428 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1428,"subs_functions.bas");}while(r);
#line 1429 "subs_functions/subs_functions.bas"
do{
#line 1429 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1429 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1429,"subs_functions.bas");}while(r);
#line 1430 "subs_functions/subs_functions.bas"
do{
#line 1430 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1430 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1430 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1430,"subs_functions.bas");}while(r);
#line 1431 "subs_functions/subs_functions.bas"
do{
#line 1431 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1431 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1431 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1431,"subs_functions.bas");}while(r);
#line 1432 "subs_functions/subs_functions.bas"
do{
#line 1432 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1432 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1432,"subs_functions.bas");}while(r);
#line 1433 "subs_functions/subs_functions.bas"
do{
#line 1433 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PALETTECOLOR(attributeNumber%, imgHandle&)",43));
#line 1433 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1433 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1433,"subs_functions.bas");}while(r);
#line 1434 "subs_functions/subs_functions.bas"
do{
#line 1434 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1434 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1434,"subs_functions.bas");}while(r);
#line 1436 "subs_functions/subs_functions.bas"
do{
#line 1436 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1436 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1436,"subs_functions.bas");}while(r);
#line 1437 "subs_functions/subs_functions.bas"
do{
#line 1437 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PaletteColor",13));
#line 1437 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1437 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1437,"subs_functions.bas");}while(r);
#line 1438 "subs_functions/subs_functions.bas"
do{
#line 1438 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1438 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1438,"subs_functions.bas");}while(r);
#line 1439 "subs_functions/subs_functions.bas"
do{
#line 1439 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__palettecolor",17));
#line 1439 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1439 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1439,"subs_functions.bas");}while(r);
#line 1440 "subs_functions/subs_functions.bas"
do{
#line 1440 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1440 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1440,"subs_functions.bas");}while(r);
#line 1441 "subs_functions/subs_functions.bas"
do{
#line 1441 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1441 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1441 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1441,"subs_functions.bas");}while(r);
#line 1442 "subs_functions/subs_functions.bas"
do{
#line 1442 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 1442 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1442 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1442,"subs_functions.bas");}while(r);
#line 1443 "subs_functions/subs_functions.bas"
do{
#line 1443 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PALETTECOLOR attribute%, newColor&[, imgHandle&]",49));
#line 1443 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1443 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1443,"subs_functions.bas");}while(r);
#line 1444 "subs_functions/subs_functions.bas"
do{
#line 1444 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1444 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1444,"subs_functions.bas");}while(r);
#line 1446 "subs_functions/subs_functions.bas"
do{
#line 1446 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1446 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1446,"subs_functions.bas");}while(r);
#line 1447 "subs_functions/subs_functions.bas"
do{
#line 1447 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CopyPalette",12));
#line 1447 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1447 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1447,"subs_functions.bas");}while(r);
#line 1448 "subs_functions/subs_functions.bas"
do{
#line 1448 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1448 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1448,"subs_functions.bas");}while(r);
#line 1449 "subs_functions/subs_functions.bas"
do{
#line 1449 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__copypalette",16));
#line 1449 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1449 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1449,"subs_functions.bas");}while(r);
#line 1450 "subs_functions/subs_functions.bas"
do{
#line 1450 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1450 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1450,"subs_functions.bas");}while(r);
#line 1451 "subs_functions/subs_functions.bas"
do{
#line 1451 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1451 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1451 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1451,"subs_functions.bas");}while(r);
#line 1452 "subs_functions/subs_functions.bas"
do{
#line 1452 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,?]",7));
#line 1452 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1452 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1452,"subs_functions.bas");}while(r);
#line 1453 "subs_functions/subs_functions.bas"
do{
#line 1453 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COPYPALETTE [sourceImageHandle&[, destinationImageHandle&]]",60));
#line 1453 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1453 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1453,"subs_functions.bas");}while(r);
#line 1454 "subs_functions/subs_functions.bas"
do{
#line 1454 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1454 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1454,"subs_functions.bas");}while(r);
#line 1458 "subs_functions/subs_functions.bas"
do{
#line 1458 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1458 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1458,"subs_functions.bas");}while(r);
#line 1459 "subs_functions/subs_functions.bas"
do{
#line 1459 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LoadFont",9));
#line 1459 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1459 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1459,"subs_functions.bas");}while(r);
#line 1459 "subs_functions/subs_functions.bas"
do{
#line 1459 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1459 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1459,"subs_functions.bas");}while(r);
#line 1460 "subs_functions/subs_functions.bas"
do{
#line 1460 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1460 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1460,"subs_functions.bas");}while(r);
#line 1461 "subs_functions/subs_functions.bas"
do{
#line 1461 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__loadfont",14));
#line 1461 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1461 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1461,"subs_functions.bas");}while(r);
#line 1462 "subs_functions/subs_functions.bas"
do{
#line 1462 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1462 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1462,"subs_functions.bas");}while(r);
#line 1463 "subs_functions/subs_functions.bas"
do{
#line 1463 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1463 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1463 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1463,"subs_functions.bas");}while(r);
#line 1464 "subs_functions/subs_functions.bas"
do{
#line 1464 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,[?][,[?]]]",15));
#line 1464 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1464 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1464,"subs_functions.bas");}while(r);
#line 1465 "subs_functions/subs_functions.bas"
do{
#line 1465 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1465 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1465,"subs_functions.bas");}while(r);
#line 1466 "subs_functions/subs_functions.bas"
do{
#line 1466 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_LOADFONT(fileName$, size&[, ",29),func_chr( 34 )),qbs_new_txt_len("{MONOSPACE|, UNICODE|, DONTBLEND|, MEMORY|, AUTOMONO}",53)),func_chr( 34 )),qbs_new_txt_len("][, fontIndex])",15)));
#line 1466 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1466 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1466,"subs_functions.bas");}while(r);
#line 1467 "subs_functions/subs_functions.bas"
do{
#line 1467 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1467 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1467,"subs_functions.bas");}while(r);
#line 1469 "subs_functions/subs_functions.bas"
do{
#line 1469 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1469 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1469,"subs_functions.bas");}while(r);
#line 1470 "subs_functions/subs_functions.bas"
do{
#line 1470 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Font",5));
#line 1470 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1470 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1470,"subs_functions.bas");}while(r);
#line 1471 "subs_functions/subs_functions.bas"
do{
#line 1471 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1471 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1471,"subs_functions.bas");}while(r);
#line 1472 "subs_functions/subs_functions.bas"
do{
#line 1472 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__font",9));
#line 1472 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1472 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1472,"subs_functions.bas");}while(r);
#line 1473 "subs_functions/subs_functions.bas"
do{
#line 1473 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1473 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1473,"subs_functions.bas");}while(r);
#line 1474 "subs_functions/subs_functions.bas"
do{
#line 1474 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1474 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1474 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1474,"subs_functions.bas");}while(r);
#line 1475 "subs_functions/subs_functions.bas"
do{
#line 1475 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1475 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1475 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1475,"subs_functions.bas");}while(r);
#line 1476 "subs_functions/subs_functions.bas"
do{
#line 1476 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FONT fontHandle&[, imageHandle&]",33));
#line 1476 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1476 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1476,"subs_functions.bas");}while(r);
#line 1477 "subs_functions/subs_functions.bas"
do{
#line 1477 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1477 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1477,"subs_functions.bas");}while(r);
#line 1479 "subs_functions/subs_functions.bas"
do{
#line 1479 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1479 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1479,"subs_functions.bas");}while(r);
#line 1480 "subs_functions/subs_functions.bas"
do{
#line 1480 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FontWidth",10));
#line 1480 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1480 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1480,"subs_functions.bas");}while(r);
#line 1481 "subs_functions/subs_functions.bas"
do{
#line 1481 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1481 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1481,"subs_functions.bas");}while(r);
#line 1482 "subs_functions/subs_functions.bas"
do{
#line 1482 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fontwidth",15));
#line 1482 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1482 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1482,"subs_functions.bas");}while(r);
#line 1483 "subs_functions/subs_functions.bas"
do{
#line 1483 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1483 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1483,"subs_functions.bas");}while(r);
#line 1484 "subs_functions/subs_functions.bas"
do{
#line 1484 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1484 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1484 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1484,"subs_functions.bas");}while(r);
#line 1485 "subs_functions/subs_functions.bas"
do{
#line 1485 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1485 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1485 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1485,"subs_functions.bas");}while(r);
#line 1486 "subs_functions/subs_functions.bas"
do{
#line 1486 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1486 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1486,"subs_functions.bas");}while(r);
#line 1487 "subs_functions/subs_functions.bas"
do{
#line 1487 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FONTWIDTH[(fontHandle&)]",25));
#line 1487 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1487 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1487,"subs_functions.bas");}while(r);
#line 1488 "subs_functions/subs_functions.bas"
do{
#line 1488 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1488 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1488,"subs_functions.bas");}while(r);
#line 1490 "subs_functions/subs_functions.bas"
do{
#line 1490 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1490 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1490,"subs_functions.bas");}while(r);
#line 1491 "subs_functions/subs_functions.bas"
do{
#line 1491 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FontHeight",11));
#line 1491 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1491 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1491,"subs_functions.bas");}while(r);
#line 1492 "subs_functions/subs_functions.bas"
do{
#line 1492 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1492 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1492,"subs_functions.bas");}while(r);
#line 1493 "subs_functions/subs_functions.bas"
do{
#line 1493 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__fontheight",16));
#line 1493 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1493 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1493,"subs_functions.bas");}while(r);
#line 1494 "subs_functions/subs_functions.bas"
do{
#line 1494 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1494 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1494,"subs_functions.bas");}while(r);
#line 1495 "subs_functions/subs_functions.bas"
do{
#line 1495 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1495 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1495 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1495,"subs_functions.bas");}while(r);
#line 1496 "subs_functions/subs_functions.bas"
do{
#line 1496 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1496 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1496 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1496,"subs_functions.bas");}while(r);
#line 1497 "subs_functions/subs_functions.bas"
do{
#line 1497 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1497 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1497,"subs_functions.bas");}while(r);
#line 1498 "subs_functions/subs_functions.bas"
do{
#line 1498 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FONTHEIGHT[(fontHandle&)]",26));
#line 1498 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1498 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1498,"subs_functions.bas");}while(r);
#line 1499 "subs_functions/subs_functions.bas"
do{
#line 1499 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1499 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1499,"subs_functions.bas");}while(r);
#line 1501 "subs_functions/subs_functions.bas"
do{
#line 1501 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1501 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1501,"subs_functions.bas");}while(r);
#line 1502 "subs_functions/subs_functions.bas"
do{
#line 1502 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Font",5));
#line 1502 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1502 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1502,"subs_functions.bas");}while(r);
#line 1503 "subs_functions/subs_functions.bas"
do{
#line 1503 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1503 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1503,"subs_functions.bas");}while(r);
#line 1504 "subs_functions/subs_functions.bas"
do{
#line 1504 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__font",10));
#line 1504 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1504 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1504,"subs_functions.bas");}while(r);
#line 1505 "subs_functions/subs_functions.bas"
do{
#line 1505 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1505 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1505,"subs_functions.bas");}while(r);
#line 1506 "subs_functions/subs_functions.bas"
do{
#line 1506 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1506 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1506 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1506,"subs_functions.bas");}while(r);
#line 1507 "subs_functions/subs_functions.bas"
do{
#line 1507 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1507 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1507 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1507,"subs_functions.bas");}while(r);
#line 1508 "subs_functions/subs_functions.bas"
do{
#line 1508 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1508 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1508,"subs_functions.bas");}while(r);
#line 1509 "subs_functions/subs_functions.bas"
do{
#line 1509 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FONT[(imageHandle&)]",21));
#line 1509 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1509 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1509,"subs_functions.bas");}while(r);
#line 1510 "subs_functions/subs_functions.bas"
do{
#line 1510 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1510 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1510,"subs_functions.bas");}while(r);
#line 1512 "subs_functions/subs_functions.bas"
do{
#line 1512 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1512 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1512,"subs_functions.bas");}while(r);
#line 1513 "subs_functions/subs_functions.bas"
do{
#line 1513 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintString",12));
#line 1513 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1513 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1513,"subs_functions.bas");}while(r);
#line 1514 "subs_functions/subs_functions.bas"
do{
#line 1514 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1514 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1514,"subs_functions.bas");}while(r);
#line 1515 "subs_functions/subs_functions.bas"
do{
#line 1515 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__printstring",16));
#line 1515 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1515 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1515,"subs_functions.bas");}while(r);
#line 1516 "subs_functions/subs_functions.bas"
do{
#line 1516 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1516 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1516,"subs_functions.bas");}while(r);
#line 1517 "subs_functions/subs_functions.bas"
do{
#line 1517 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1517 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1517 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1517,"subs_functions.bas");}while(r);
#line 1518 "subs_functions/subs_functions.bas"
do{
#line 1518 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,?]",19));
#line 1518 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1518 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1518,"subs_functions.bas");}while(r);
#line 1519 "subs_functions/subs_functions.bas"
do{
#line 1519 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PRINTSTRING(x, y), text$[, imageHandle&]",41));
#line 1519 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1519 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1519,"subs_functions.bas");}while(r);
#line 1520 "subs_functions/subs_functions.bas"
do{
#line 1520 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1520 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1520,"subs_functions.bas");}while(r);
#line 1522 "subs_functions/subs_functions.bas"
do{
#line 1522 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1522 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1522,"subs_functions.bas");}while(r);
#line 1523 "subs_functions/subs_functions.bas"
do{
#line 1523 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintWidth",11));
#line 1523 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1523 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1523,"subs_functions.bas");}while(r);
#line 1524 "subs_functions/subs_functions.bas"
do{
#line 1524 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1524 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1524,"subs_functions.bas");}while(r);
#line 1525 "subs_functions/subs_functions.bas"
do{
#line 1525 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__printwidth",16));
#line 1525 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1525 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1525,"subs_functions.bas");}while(r);
#line 1526 "subs_functions/subs_functions.bas"
do{
#line 1526 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1526 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1526,"subs_functions.bas");}while(r);
#line 1527 "subs_functions/subs_functions.bas"
do{
#line 1527 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1527 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1527 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1527,"subs_functions.bas");}while(r);
#line 1528 "subs_functions/subs_functions.bas"
do{
#line 1528 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1528 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1528 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1528,"subs_functions.bas");}while(r);
#line 1529 "subs_functions/subs_functions.bas"
do{
#line 1529 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1529 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1529,"subs_functions.bas");}while(r);
#line 1530 "subs_functions/subs_functions.bas"
do{
#line 1530 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PRINTWIDTH(textToPrint$[, destinationHandle&])",47));
#line 1530 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1530 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1530,"subs_functions.bas");}while(r);
#line 1531 "subs_functions/subs_functions.bas"
do{
#line 1531 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1531 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1531,"subs_functions.bas");}while(r);
#line 1533 "subs_functions/subs_functions.bas"
do{
#line 1533 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1533 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1533,"subs_functions.bas");}while(r);
#line 1534 "subs_functions/subs_functions.bas"
do{
#line 1534 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeFont",9));
#line 1534 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1534 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1534,"subs_functions.bas");}while(r);
#line 1535 "subs_functions/subs_functions.bas"
do{
#line 1535 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1535 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1535,"subs_functions.bas");}while(r);
#line 1536 "subs_functions/subs_functions.bas"
do{
#line 1536 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__freefont",13));
#line 1536 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1536 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1536,"subs_functions.bas");}while(r);
#line 1537 "subs_functions/subs_functions.bas"
do{
#line 1537 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1537 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1537,"subs_functions.bas");}while(r);
#line 1538 "subs_functions/subs_functions.bas"
do{
#line 1538 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1538 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1538 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1538,"subs_functions.bas");}while(r);
#line 1539 "subs_functions/subs_functions.bas"
do{
#line 1539 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?",1));
#line 1539 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1539 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1539,"subs_functions.bas");}while(r);
#line 1540 "subs_functions/subs_functions.bas"
do{
#line 1540 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FREEFONT fontHandle&",21));
#line 1540 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1540 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1540,"subs_functions.bas");}while(r);
#line 1541 "subs_functions/subs_functions.bas"
do{
#line 1541 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1541 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1541,"subs_functions.bas");}while(r);
#line 1543 "subs_functions/subs_functions.bas"
do{
#line 1543 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1543 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1543,"subs_functions.bas");}while(r);
#line 1544 "subs_functions/subs_functions.bas"
do{
#line 1544 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintMode",10));
#line 1544 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1544 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1544,"subs_functions.bas");}while(r);
#line 1545 "subs_functions/subs_functions.bas"
do{
#line 1545 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1545 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1545,"subs_functions.bas");}while(r);
#line 1546 "subs_functions/subs_functions.bas"
do{
#line 1546 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__printmode",14));
#line 1546 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1546 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1546,"subs_functions.bas");}while(r);
#line 1547 "subs_functions/subs_functions.bas"
do{
#line 1547 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1547 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1547,"subs_functions.bas");}while(r);
#line 1548 "subs_functions/subs_functions.bas"
do{
#line 1548 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1548 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1548 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1548,"subs_functions.bas");}while(r);
#line 1549 "subs_functions/subs_functions.bas"
do{
#line 1549 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{_FillBackground|_KeepBackground|_OnlyBackground}[,?]",53));
#line 1549 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1549 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1549,"subs_functions.bas");}while(r);
#line 1550 "subs_functions/subs_functions.bas"
do{
#line 1550 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PRINTMODE {_FillBackground|_KeepBackground|_OnlyBackground}[, imageHandle&]",76));
#line 1550 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1550 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1550,"subs_functions.bas");}while(r);
#line 1551 "subs_functions/subs_functions.bas"
do{
#line 1551 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1551 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1551,"subs_functions.bas");}while(r);
#line 1553 "subs_functions/subs_functions.bas"
do{
#line 1553 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1553 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1553,"subs_functions.bas");}while(r);
#line 1554 "subs_functions/subs_functions.bas"
do{
#line 1554 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintMode",10));
#line 1554 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1554 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1554,"subs_functions.bas");}while(r);
#line 1555 "subs_functions/subs_functions.bas"
do{
#line 1555 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1555 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1555,"subs_functions.bas");}while(r);
#line 1556 "subs_functions/subs_functions.bas"
do{
#line 1556 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__printmode",15));
#line 1556 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1556 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1556,"subs_functions.bas");}while(r);
#line 1557 "subs_functions/subs_functions.bas"
do{
#line 1557 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1557 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1557,"subs_functions.bas");}while(r);
#line 1558 "subs_functions/subs_functions.bas"
do{
#line 1558 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1558 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1558 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1558,"subs_functions.bas");}while(r);
#line 1559 "subs_functions/subs_functions.bas"
do{
#line 1559 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1559 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1559 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1559,"subs_functions.bas");}while(r);
#line 1560 "subs_functions/subs_functions.bas"
do{
#line 1560 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1560 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1560,"subs_functions.bas");}while(r);
#line 1561 "subs_functions/subs_functions.bas"
do{
#line 1561 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PRINTMODE[(imageHandle&)]",26));
#line 1561 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1561 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1561,"subs_functions.bas");}while(r);
#line 1562 "subs_functions/subs_functions.bas"
do{
#line 1562 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1562 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1562,"subs_functions.bas");}while(r);
#line 1564 "subs_functions/subs_functions.bas"
do{
#line 1564 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1564 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1564,"subs_functions.bas");}while(r);
#line 1565 "subs_functions/subs_functions.bas"
do{
#line 1565 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UFontHeight",12));
#line 1565 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1565 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1565,"subs_functions.bas");}while(r);
#line 1566 "subs_functions/subs_functions.bas"
do{
#line 1566 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1566 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1566,"subs_functions.bas");}while(r);
#line 1567 "subs_functions/subs_functions.bas"
do{
#line 1567 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1567 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1567,"subs_functions.bas");}while(r);
#line 1568 "subs_functions/subs_functions.bas"
do{
#line 1568 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__UFontHeight",17));
#line 1568 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1568 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1568,"subs_functions.bas");}while(r);
#line 1569 "subs_functions/subs_functions.bas"
do{
#line 1569 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1569 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1569,"subs_functions.bas");}while(r);
#line 1570 "subs_functions/subs_functions.bas"
do{
#line 1570 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1570 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1570 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1570,"subs_functions.bas");}while(r);
#line 1571 "subs_functions/subs_functions.bas"
do{
#line 1571 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1571 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1571 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1571,"subs_functions.bas");}while(r);
#line 1572 "subs_functions/subs_functions.bas"
do{
#line 1572 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1572 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1572,"subs_functions.bas");}while(r);
#line 1573 "subs_functions/subs_functions.bas"
do{
#line 1573 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_UFONTHEIGHT&[(fontHandle&)]",28));
#line 1573 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1573 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1573,"subs_functions.bas");}while(r);
#line 1574 "subs_functions/subs_functions.bas"
do{
#line 1574 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1574 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1574,"subs_functions.bas");}while(r);
#line 1576 "subs_functions/subs_functions.bas"
do{
#line 1576 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1576 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1576,"subs_functions.bas");}while(r);
#line 1577 "subs_functions/subs_functions.bas"
do{
#line 1577 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UPrintWidth",12));
#line 1577 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1577 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1577,"subs_functions.bas");}while(r);
#line 1578 "subs_functions/subs_functions.bas"
do{
#line 1578 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1578 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1578,"subs_functions.bas");}while(r);
#line 1579 "subs_functions/subs_functions.bas"
do{
#line 1579 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1579 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1579,"subs_functions.bas");}while(r);
#line 1580 "subs_functions/subs_functions.bas"
do{
#line 1580 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__UPrintWidth",17));
#line 1580 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1580 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1580,"subs_functions.bas");}while(r);
#line 1581 "subs_functions/subs_functions.bas"
do{
#line 1581 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1581 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1581,"subs_functions.bas");}while(r);
#line 1582 "subs_functions/subs_functions.bas"
do{
#line 1582 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1582 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1582 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1582,"subs_functions.bas");}while(r);
#line 1583 "subs_functions/subs_functions.bas"
do{
#line 1583 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
#line 1583 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1583 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1583,"subs_functions.bas");}while(r);
#line 1584 "subs_functions/subs_functions.bas"
do{
#line 1584 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1584 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1584,"subs_functions.bas");}while(r);
#line 1585 "subs_functions/subs_functions.bas"
do{
#line 1585 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_UPRINTWIDTH&(text$[, utfEncoding&][, fontHandle&])",51));
#line 1585 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1585 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1585,"subs_functions.bas");}while(r);
#line 1586 "subs_functions/subs_functions.bas"
do{
#line 1586 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1586 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1586,"subs_functions.bas");}while(r);
#line 1588 "subs_functions/subs_functions.bas"
do{
#line 1588 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1588 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1588,"subs_functions.bas");}while(r);
#line 1589 "subs_functions/subs_functions.bas"
do{
#line 1589 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ULineSpacing",13));
#line 1589 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1589 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1589,"subs_functions.bas");}while(r);
#line 1590 "subs_functions/subs_functions.bas"
do{
#line 1590 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1590 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1590,"subs_functions.bas");}while(r);
#line 1591 "subs_functions/subs_functions.bas"
do{
#line 1591 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1591 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1591,"subs_functions.bas");}while(r);
#line 1592 "subs_functions/subs_functions.bas"
do{
#line 1592 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__ULineSpacing",18));
#line 1592 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1592 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1592,"subs_functions.bas");}while(r);
#line 1593 "subs_functions/subs_functions.bas"
do{
#line 1593 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1593 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1593,"subs_functions.bas");}while(r);
#line 1594 "subs_functions/subs_functions.bas"
do{
#line 1594 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1594 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1594 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1594,"subs_functions.bas");}while(r);
#line 1595 "subs_functions/subs_functions.bas"
do{
#line 1595 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1595 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1595 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1595,"subs_functions.bas");}while(r);
#line 1596 "subs_functions/subs_functions.bas"
do{
#line 1596 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1596 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1596,"subs_functions.bas");}while(r);
#line 1597 "subs_functions/subs_functions.bas"
do{
#line 1597 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ULINESPACING&[(fontHandle&)]",29));
#line 1597 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1597 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1597,"subs_functions.bas");}while(r);
#line 1598 "subs_functions/subs_functions.bas"
do{
#line 1598 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1598 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1598,"subs_functions.bas");}while(r);
#line 1600 "subs_functions/subs_functions.bas"
do{
#line 1600 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1600 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1600,"subs_functions.bas");}while(r);
#line 1601 "subs_functions/subs_functions.bas"
do{
#line 1601 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UPrintString",13));
#line 1601 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1601 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1601,"subs_functions.bas");}while(r);
#line 1602 "subs_functions/subs_functions.bas"
do{
#line 1602 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1602 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1602,"subs_functions.bas");}while(r);
#line 1603 "subs_functions/subs_functions.bas"
do{
#line 1603 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1603 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1603,"subs_functions.bas");}while(r);
#line 1604 "subs_functions/subs_functions.bas"
do{
#line 1604 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__UPrintString",17));
#line 1604 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1604 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1604,"subs_functions.bas");}while(r);
#line 1605 "subs_functions/subs_functions.bas"
do{
#line 1605 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 7 ;
#line 1605 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1605,"subs_functions.bas");}while(r);
#line 1606 "subs_functions/subs_functions.bas"
do{
#line 1606 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1606 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1606 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1606,"subs_functions.bas");}while(r);
#line 1607 "subs_functions/subs_functions.bas"
do{
#line 1607 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("(?,?),?[,[?][,[?][,[?][,?]]]]",29));
#line 1607 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1607 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1607,"subs_functions.bas");}while(r);
#line 1608 "subs_functions/subs_functions.bas"
do{
#line 1608 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_UPRINTSTRING (x&, y&), text$[, maxWidth&][, utfEncoding&][, fontHandle&][, imageHandle&]",89));
#line 1608 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1608 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1608,"subs_functions.bas");}while(r);
#line 1609 "subs_functions/subs_functions.bas"
do{
#line 1609 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1609 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1609,"subs_functions.bas");}while(r);
#line 1611 "subs_functions/subs_functions.bas"
do{
#line 1611 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1611 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1611,"subs_functions.bas");}while(r);
#line 1612 "subs_functions/subs_functions.bas"
do{
#line 1612 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UCharPos",9));
#line 1612 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1612 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1612,"subs_functions.bas");}while(r);
#line 1613 "subs_functions/subs_functions.bas"
do{
#line 1613 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 1613 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1613,"subs_functions.bas");}while(r);
#line 1614 "subs_functions/subs_functions.bas"
do{
#line 1614 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1614 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1614,"subs_functions.bas");}while(r);
#line 1615 "subs_functions/subs_functions.bas"
do{
#line 1615 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__UCharPos",14));
#line 1615 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1615 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1615,"subs_functions.bas");}while(r);
#line 1616 "subs_functions/subs_functions.bas"
do{
#line 1616 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1616 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1616,"subs_functions.bas");}while(r);
#line 1617 "subs_functions/subs_functions.bas"
do{
#line 1617 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string( -2 )),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1617 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1617 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1617,"subs_functions.bas");}while(r);
#line 1618 "subs_functions/subs_functions.bas"
do{
#line 1618 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
#line 1618 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1618 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1618,"subs_functions.bas");}while(r);
#line 1619 "subs_functions/subs_functions.bas"
do{
#line 1619 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1619 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1619,"subs_functions.bas");}while(r);
#line 1620 "subs_functions/subs_functions.bas"
do{
#line 1620 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_UCHARPOS&(text$[, posArray&([index&])][, utfEncoding&][, fontHandle&])",71));
#line 1620 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1620 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1620,"subs_functions.bas");}while(r);
#line 1621 "subs_functions/subs_functions.bas"
do{
#line 1621 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1621 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1621,"subs_functions.bas");}while(r);
#line 1625 "subs_functions/subs_functions.bas"
do{
#line 1625 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1625 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1625,"subs_functions.bas");}while(r);
#line 1626 "subs_functions/subs_functions.bas"
do{
#line 1626 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGBA",5));
#line 1626 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1626 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1626,"subs_functions.bas");}while(r);
#line 1627 "subs_functions/subs_functions.bas"
do{
#line 1627 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1627 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1627,"subs_functions.bas");}while(r);
#line 1628 "subs_functions/subs_functions.bas"
do{
#line 1628 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__rgba",10));
#line 1628 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1628 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1628,"subs_functions.bas");}while(r);
#line 1629 "subs_functions/subs_functions.bas"
do{
#line 1629 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 1629 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1629,"subs_functions.bas");}while(r);
#line 1630 "subs_functions/subs_functions.bas"
do{
#line 1630 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1630 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1630 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1630,"subs_functions.bas");}while(r);
#line 1631 "subs_functions/subs_functions.bas"
do{
#line 1631 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?,?,?[,?]",11));
#line 1631 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1631 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1631,"subs_functions.bas");}while(r);
#line 1632 "subs_functions/subs_functions.bas"
do{
#line 1632 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1632 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1632,"subs_functions.bas");}while(r);
#line 1633 "subs_functions/subs_functions.bas"
do{
#line 1633 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RGBA(red&, green&, blue&, alpha&[, imageHandle&])",50));
#line 1633 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1633 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1633,"subs_functions.bas");}while(r);
#line 1634 "subs_functions/subs_functions.bas"
do{
#line 1634 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1634 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1634,"subs_functions.bas");}while(r);
#line 1636 "subs_functions/subs_functions.bas"
do{
#line 1636 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1636 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1636,"subs_functions.bas");}while(r);
#line 1637 "subs_functions/subs_functions.bas"
do{
#line 1637 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGB",4));
#line 1637 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1637 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1637,"subs_functions.bas");}while(r);
#line 1638 "subs_functions/subs_functions.bas"
do{
#line 1638 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1638 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1638,"subs_functions.bas");}while(r);
#line 1639 "subs_functions/subs_functions.bas"
do{
#line 1639 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__rgb",9));
#line 1639 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1639 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1639,"subs_functions.bas");}while(r);
#line 1640 "subs_functions/subs_functions.bas"
do{
#line 1640 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1640 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1640,"subs_functions.bas");}while(r);
#line 1641 "subs_functions/subs_functions.bas"
do{
#line 1641 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1641 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1641 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1641,"subs_functions.bas");}while(r);
#line 1642 "subs_functions/subs_functions.bas"
do{
#line 1642 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?,?[,?]",9));
#line 1642 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1642 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1642,"subs_functions.bas");}while(r);
#line 1643 "subs_functions/subs_functions.bas"
do{
#line 1643 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1643 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1643,"subs_functions.bas");}while(r);
#line 1644 "subs_functions/subs_functions.bas"
do{
#line 1644 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RGB(red&, green&, blue&[, imageHandle&])",41));
#line 1644 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1644 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1644,"subs_functions.bas");}while(r);
#line 1645 "subs_functions/subs_functions.bas"
do{
#line 1645 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1645 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1645,"subs_functions.bas");}while(r);
#line 1647 "subs_functions/subs_functions.bas"
do{
#line 1647 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1647 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1647,"subs_functions.bas");}while(r);
#line 1648 "subs_functions/subs_functions.bas"
do{
#line 1648 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Red",4));
#line 1648 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1648 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1648,"subs_functions.bas");}while(r);
#line 1649 "subs_functions/subs_functions.bas"
do{
#line 1649 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1649 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1649,"subs_functions.bas");}while(r);
#line 1650 "subs_functions/subs_functions.bas"
do{
#line 1650 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__red",9));
#line 1650 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1650 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1650,"subs_functions.bas");}while(r);
#line 1651 "subs_functions/subs_functions.bas"
do{
#line 1651 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1651 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1651,"subs_functions.bas");}while(r);
#line 1652 "subs_functions/subs_functions.bas"
do{
#line 1652 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 1652 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1652 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1652,"subs_functions.bas");}while(r);
#line 1653 "subs_functions/subs_functions.bas"
do{
#line 1653 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1653 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1653 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1653,"subs_functions.bas");}while(r);
#line 1654 "subs_functions/subs_functions.bas"
do{
#line 1654 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1654 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1654,"subs_functions.bas");}while(r);
#line 1655 "subs_functions/subs_functions.bas"
do{
#line 1655 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RED(rgbaColorIndex&[, imageHandle&])",37));
#line 1655 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1655 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1655,"subs_functions.bas");}while(r);
#line 1656 "subs_functions/subs_functions.bas"
do{
#line 1656 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1656 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1656,"subs_functions.bas");}while(r);
#line 1658 "subs_functions/subs_functions.bas"
do{
#line 1658 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1658 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1658,"subs_functions.bas");}while(r);
#line 1659 "subs_functions/subs_functions.bas"
do{
#line 1659 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Green",6));
#line 1659 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1659 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1659,"subs_functions.bas");}while(r);
#line 1660 "subs_functions/subs_functions.bas"
do{
#line 1660 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1660 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1660,"subs_functions.bas");}while(r);
#line 1661 "subs_functions/subs_functions.bas"
do{
#line 1661 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__green",11));
#line 1661 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1661 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1661,"subs_functions.bas");}while(r);
#line 1662 "subs_functions/subs_functions.bas"
do{
#line 1662 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1662 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1662,"subs_functions.bas");}while(r);
#line 1663 "subs_functions/subs_functions.bas"
do{
#line 1663 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 1663 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1663 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1663,"subs_functions.bas");}while(r);
#line 1664 "subs_functions/subs_functions.bas"
do{
#line 1664 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1664 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1664 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1664,"subs_functions.bas");}while(r);
#line 1665 "subs_functions/subs_functions.bas"
do{
#line 1665 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1665 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1665,"subs_functions.bas");}while(r);
#line 1666 "subs_functions/subs_functions.bas"
do{
#line 1666 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_GREEN(rgbaColorIndex&[, imageHandle&])",39));
#line 1666 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1666 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1666,"subs_functions.bas");}while(r);
#line 1667 "subs_functions/subs_functions.bas"
do{
#line 1667 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1667 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1667,"subs_functions.bas");}while(r);
#line 1669 "subs_functions/subs_functions.bas"
do{
#line 1669 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1669 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1669,"subs_functions.bas");}while(r);
#line 1670 "subs_functions/subs_functions.bas"
do{
#line 1670 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blue",5));
#line 1670 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1670 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1670,"subs_functions.bas");}while(r);
#line 1671 "subs_functions/subs_functions.bas"
do{
#line 1671 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1671 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1671,"subs_functions.bas");}while(r);
#line 1672 "subs_functions/subs_functions.bas"
do{
#line 1672 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__blue",10));
#line 1672 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1672 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1672,"subs_functions.bas");}while(r);
#line 1673 "subs_functions/subs_functions.bas"
do{
#line 1673 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1673 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1673,"subs_functions.bas");}while(r);
#line 1674 "subs_functions/subs_functions.bas"
do{
#line 1674 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 1674 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1674 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1674,"subs_functions.bas");}while(r);
#line 1675 "subs_functions/subs_functions.bas"
do{
#line 1675 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1675 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1675 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1675,"subs_functions.bas");}while(r);
#line 1676 "subs_functions/subs_functions.bas"
do{
#line 1676 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1676 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1676,"subs_functions.bas");}while(r);
#line 1677 "subs_functions/subs_functions.bas"
do{
#line 1677 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLUE(rgbaColorIndex&[, imageHandle&])",38));
#line 1677 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1677 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1677,"subs_functions.bas");}while(r);
#line 1678 "subs_functions/subs_functions.bas"
do{
#line 1678 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1678 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1678,"subs_functions.bas");}while(r);
#line 1680 "subs_functions/subs_functions.bas"
do{
#line 1680 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1680 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1680,"subs_functions.bas");}while(r);
#line 1681 "subs_functions/subs_functions.bas"
do{
#line 1681 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Alpha",6));
#line 1681 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1681 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1681,"subs_functions.bas");}while(r);
#line 1682 "subs_functions/subs_functions.bas"
do{
#line 1682 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1682 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1682,"subs_functions.bas");}while(r);
#line 1683 "subs_functions/subs_functions.bas"
do{
#line 1683 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__alpha",11));
#line 1683 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1683 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1683,"subs_functions.bas");}while(r);
#line 1684 "subs_functions/subs_functions.bas"
do{
#line 1684 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1684 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1684,"subs_functions.bas");}while(r);
#line 1685 "subs_functions/subs_functions.bas"
do{
#line 1685 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 1685 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1685 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1685,"subs_functions.bas");}while(r);
#line 1686 "subs_functions/subs_functions.bas"
do{
#line 1686 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 1686 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1686 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1686,"subs_functions.bas");}while(r);
#line 1687 "subs_functions/subs_functions.bas"
do{
#line 1687 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1687 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1687,"subs_functions.bas");}while(r);
#line 1688 "subs_functions/subs_functions.bas"
do{
#line 1688 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ALPHA(color~&[, imageHandle&])",31));
#line 1688 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1688 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1688,"subs_functions.bas");}while(r);
#line 1689 "subs_functions/subs_functions.bas"
do{
#line 1689 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1689 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1689,"subs_functions.bas");}while(r);
#line 1691 "subs_functions/subs_functions.bas"
do{
#line 1691 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1691 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1691,"subs_functions.bas");}while(r);
#line 1692 "subs_functions/subs_functions.bas"
do{
#line 1692 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGBA32",7));
#line 1692 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1692 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1692,"subs_functions.bas");}while(r);
#line 1693 "subs_functions/subs_functions.bas"
do{
#line 1693 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1693 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1693,"subs_functions.bas");}while(r);
#line 1694 "subs_functions/subs_functions.bas"
do{
#line 1694 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__rgba32",12));
#line 1694 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1694 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1694,"subs_functions.bas");}while(r);
#line 1695 "subs_functions/subs_functions.bas"
do{
#line 1695 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1695 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1695,"subs_functions.bas");}while(r);
#line 1696 "subs_functions/subs_functions.bas"
do{
#line 1696 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1696 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1696 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1696,"subs_functions.bas");}while(r);
#line 1697 "subs_functions/subs_functions.bas"
do{
#line 1697 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1697 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1697,"subs_functions.bas");}while(r);
#line 1698 "subs_functions/subs_functions.bas"
do{
#line 1698 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RGBA32(red&, green&, blue&, alpha&)",36));
#line 1698 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1698 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1698,"subs_functions.bas");}while(r);
#line 1699 "subs_functions/subs_functions.bas"
do{
#line 1699 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1699 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1699,"subs_functions.bas");}while(r);
#line 1701 "subs_functions/subs_functions.bas"
do{
#line 1701 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1701 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1701,"subs_functions.bas");}while(r);
#line 1702 "subs_functions/subs_functions.bas"
do{
#line 1702 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGB32",6));
#line 1702 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1702 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1702,"subs_functions.bas");}while(r);
#line 1703 "subs_functions/subs_functions.bas"
do{
#line 1703 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1703 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1703,"subs_functions.bas");}while(r);
#line 1704 "subs_functions/subs_functions.bas"
do{
#line 1704 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__rgb32",11));
#line 1704 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1704 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1704,"subs_functions.bas");}while(r);
#line 1705 "subs_functions/subs_functions.bas"
do{
#line 1705 "subs_functions/subs_functions.bas"
*(int8*)(((char*)__UDT_ID)+((0+812)))= -1 ;
#line 1705 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1705,"subs_functions.bas");}while(r);
#line 1706 "subs_functions/subs_functions.bas"
do{
#line 1706 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+815)))= 1 ;
#line 1706 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1706,"subs_functions.bas");}while(r);
#line 1707 "subs_functions/subs_functions.bas"
do{
#line 1707 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1707 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1707,"subs_functions.bas");}while(r);
#line 1708 "subs_functions/subs_functions.bas"
do{
#line 1708 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1708 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1708 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1708,"subs_functions.bas");}while(r);
#line 1709 "subs_functions/subs_functions.bas"
do{
#line 1709 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1709 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1709,"subs_functions.bas");}while(r);
#line 1710 "subs_functions/subs_functions.bas"
do{
#line 1710 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RGB32(red&, green&, blue&[, alpha&]) or _RGB32(intensity&[, alpha&])",69));
#line 1710 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1710 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1710,"subs_functions.bas");}while(r);
#line 1711 "subs_functions/subs_functions.bas"
do{
#line 1711 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1711 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1711,"subs_functions.bas");}while(r);
#line 1713 "subs_functions/subs_functions.bas"
do{
#line 1713 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1713 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1713,"subs_functions.bas");}while(r);
#line 1714 "subs_functions/subs_functions.bas"
do{
#line 1714 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Red32",6));
#line 1714 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1714 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1714,"subs_functions.bas");}while(r);
#line 1715 "subs_functions/subs_functions.bas"
do{
#line 1715 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1715 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1715,"subs_functions.bas");}while(r);
#line 1716 "subs_functions/subs_functions.bas"
do{
#line 1716 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__red32",11));
#line 1716 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1716 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1716,"subs_functions.bas");}while(r);
#line 1717 "subs_functions/subs_functions.bas"
do{
#line 1717 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1717 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1717,"subs_functions.bas");}while(r);
#line 1718 "subs_functions/subs_functions.bas"
do{
#line 1718 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1718 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1718 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1718,"subs_functions.bas");}while(r);
#line 1719 "subs_functions/subs_functions.bas"
do{
#line 1719 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1719 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1719,"subs_functions.bas");}while(r);
#line 1720 "subs_functions/subs_functions.bas"
do{
#line 1720 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RED32(rgbaColor&)",18));
#line 1720 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1720 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1720,"subs_functions.bas");}while(r);
#line 1721 "subs_functions/subs_functions.bas"
do{
#line 1721 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1721 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1721,"subs_functions.bas");}while(r);
#line 1723 "subs_functions/subs_functions.bas"
do{
#line 1723 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1723 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1723,"subs_functions.bas");}while(r);
#line 1724 "subs_functions/subs_functions.bas"
do{
#line 1724 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Green32",8));
#line 1724 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1724 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1724,"subs_functions.bas");}while(r);
#line 1725 "subs_functions/subs_functions.bas"
do{
#line 1725 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1725 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1725,"subs_functions.bas");}while(r);
#line 1726 "subs_functions/subs_functions.bas"
do{
#line 1726 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__green32",13));
#line 1726 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1726 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1726,"subs_functions.bas");}while(r);
#line 1727 "subs_functions/subs_functions.bas"
do{
#line 1727 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1727 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1727,"subs_functions.bas");}while(r);
#line 1728 "subs_functions/subs_functions.bas"
do{
#line 1728 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1728 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1728 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1728,"subs_functions.bas");}while(r);
#line 1729 "subs_functions/subs_functions.bas"
do{
#line 1729 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1729 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1729,"subs_functions.bas");}while(r);
#line 1730 "subs_functions/subs_functions.bas"
do{
#line 1730 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_GREEN32(rgbaColor&)",20));
#line 1730 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1730 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1730,"subs_functions.bas");}while(r);
#line 1731 "subs_functions/subs_functions.bas"
do{
#line 1731 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1731 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1731,"subs_functions.bas");}while(r);
#line 1733 "subs_functions/subs_functions.bas"
do{
#line 1733 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1733 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1733,"subs_functions.bas");}while(r);
#line 1734 "subs_functions/subs_functions.bas"
do{
#line 1734 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blue32",7));
#line 1734 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1734 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1734,"subs_functions.bas");}while(r);
#line 1735 "subs_functions/subs_functions.bas"
do{
#line 1735 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1735 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1735,"subs_functions.bas");}while(r);
#line 1736 "subs_functions/subs_functions.bas"
do{
#line 1736 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__blue32",12));
#line 1736 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1736 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1736,"subs_functions.bas");}while(r);
#line 1737 "subs_functions/subs_functions.bas"
do{
#line 1737 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1737 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1737,"subs_functions.bas");}while(r);
#line 1738 "subs_functions/subs_functions.bas"
do{
#line 1738 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1738 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1738 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1738,"subs_functions.bas");}while(r);
#line 1739 "subs_functions/subs_functions.bas"
do{
#line 1739 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1739 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1739,"subs_functions.bas");}while(r);
#line 1740 "subs_functions/subs_functions.bas"
do{
#line 1740 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BLUE32(rgbaColor&)",19));
#line 1740 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1740 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1740,"subs_functions.bas");}while(r);
#line 1741 "subs_functions/subs_functions.bas"
do{
#line 1741 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1741 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1741,"subs_functions.bas");}while(r);
#line 1743 "subs_functions/subs_functions.bas"
do{
#line 1743 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1743 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1743,"subs_functions.bas");}while(r);
#line 1744 "subs_functions/subs_functions.bas"
do{
#line 1744 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Alpha32",8));
#line 1744 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1744 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1744,"subs_functions.bas");}while(r);
#line 1745 "subs_functions/subs_functions.bas"
do{
#line 1745 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1745 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1745,"subs_functions.bas");}while(r);
#line 1746 "subs_functions/subs_functions.bas"
do{
#line 1746 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__alpha32",13));
#line 1746 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1746 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1746,"subs_functions.bas");}while(r);
#line 1747 "subs_functions/subs_functions.bas"
do{
#line 1747 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1747 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1747,"subs_functions.bas");}while(r);
#line 1748 "subs_functions/subs_functions.bas"
do{
#line 1748 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1748 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1748 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1748,"subs_functions.bas");}while(r);
#line 1749 "subs_functions/subs_functions.bas"
do{
#line 1749 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1749 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1749,"subs_functions.bas");}while(r);
#line 1750 "subs_functions/subs_functions.bas"
do{
#line 1750 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ALPHA32(rgbaColor&)",20));
#line 1750 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1750 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1750,"subs_functions.bas");}while(r);
#line 1751 "subs_functions/subs_functions.bas"
do{
#line 1751 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1751 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1751,"subs_functions.bas");}while(r);
#line 1753 "subs_functions/subs_functions.bas"
do{
#line 1753 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1753 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1753,"subs_functions.bas");}while(r);
#line 1754 "subs_functions/subs_functions.bas"
do{
#line 1754 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_HSB32",6));
#line 1754 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1754 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1754,"subs_functions.bas");}while(r);
#line 1755 "subs_functions/subs_functions.bas"
do{
#line 1755 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1755 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1755,"subs_functions.bas");}while(r);
#line 1756 "subs_functions/subs_functions.bas"
do{
#line 1756 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__hsb32",11));
#line 1756 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1756 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1756,"subs_functions.bas");}while(r);
#line 1757 "subs_functions/subs_functions.bas"
do{
#line 1757 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1757 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1757,"subs_functions.bas");}while(r);
#line 1758 "subs_functions/subs_functions.bas"
do{
#line 1758 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 1758 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1758 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1758,"subs_functions.bas");}while(r);
#line 1759 "subs_functions/subs_functions.bas"
do{
#line 1759 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1759 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1759,"subs_functions.bas");}while(r);
#line 1760 "subs_functions/subs_functions.bas"
do{
#line 1760 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_HSB32(hue#, saturation#, brightness#)",38));
#line 1760 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1760 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1760,"subs_functions.bas");}while(r);
#line 1761 "subs_functions/subs_functions.bas"
do{
#line 1761 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1761 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1761,"subs_functions.bas");}while(r);
#line 1763 "subs_functions/subs_functions.bas"
do{
#line 1763 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1763 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1763,"subs_functions.bas");}while(r);
#line 1764 "subs_functions/subs_functions.bas"
do{
#line 1764 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_HSBA32",7));
#line 1764 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1764 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1764,"subs_functions.bas");}while(r);
#line 1765 "subs_functions/subs_functions.bas"
do{
#line 1765 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1765 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1765,"subs_functions.bas");}while(r);
#line 1766 "subs_functions/subs_functions.bas"
do{
#line 1766 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__hsba32",12));
#line 1766 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1766 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1766,"subs_functions.bas");}while(r);
#line 1767 "subs_functions/subs_functions.bas"
do{
#line 1767 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 1767 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1767,"subs_functions.bas");}while(r);
#line 1768 "subs_functions/subs_functions.bas"
do{
#line 1768 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 1768 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1768 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1768,"subs_functions.bas");}while(r);
#line 1769 "subs_functions/subs_functions.bas"
do{
#line 1769 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 1769 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1769,"subs_functions.bas");}while(r);
#line 1770 "subs_functions/subs_functions.bas"
do{
#line 1770 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_HSBA32(hue#, saturation#, brightness#, alpha#)",47));
#line 1770 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1770 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1770,"subs_functions.bas");}while(r);
#line 1771 "subs_functions/subs_functions.bas"
do{
#line 1771 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1771 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1771,"subs_functions.bas");}while(r);
#line 1773 "subs_functions/subs_functions.bas"
do{
#line 1773 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1773 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1773,"subs_functions.bas");}while(r);
#line 1774 "subs_functions/subs_functions.bas"
do{
#line 1774 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Hue32",6));
#line 1774 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1774 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1774,"subs_functions.bas");}while(r);
#line 1775 "subs_functions/subs_functions.bas"
do{
#line 1775 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1775 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1775,"subs_functions.bas");}while(r);
#line 1776 "subs_functions/subs_functions.bas"
do{
#line 1776 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__hue32",11));
#line 1776 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1776 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1776,"subs_functions.bas");}while(r);
#line 1777 "subs_functions/subs_functions.bas"
do{
#line 1777 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1777 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1777,"subs_functions.bas");}while(r);
#line 1778 "subs_functions/subs_functions.bas"
do{
#line 1778 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1778 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1778 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1778,"subs_functions.bas");}while(r);
#line 1779 "subs_functions/subs_functions.bas"
do{
#line 1779 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1779 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1779,"subs_functions.bas");}while(r);
#line 1780 "subs_functions/subs_functions.bas"
do{
#line 1780 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_HUE32(rgbaColor&)",18));
#line 1780 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1780 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1780,"subs_functions.bas");}while(r);
#line 1781 "subs_functions/subs_functions.bas"
do{
#line 1781 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1781 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1781,"subs_functions.bas");}while(r);
#line 1783 "subs_functions/subs_functions.bas"
do{
#line 1783 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1783 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1783,"subs_functions.bas");}while(r);
#line 1784 "subs_functions/subs_functions.bas"
do{
#line 1784 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Saturation32",13));
#line 1784 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1784 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1784,"subs_functions.bas");}while(r);
#line 1785 "subs_functions/subs_functions.bas"
do{
#line 1785 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1785 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1785,"subs_functions.bas");}while(r);
#line 1786 "subs_functions/subs_functions.bas"
do{
#line 1786 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sat32",11));
#line 1786 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1786 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1786,"subs_functions.bas");}while(r);
#line 1787 "subs_functions/subs_functions.bas"
do{
#line 1787 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1787 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1787,"subs_functions.bas");}while(r);
#line 1788 "subs_functions/subs_functions.bas"
do{
#line 1788 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1788 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1788 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1788,"subs_functions.bas");}while(r);
#line 1789 "subs_functions/subs_functions.bas"
do{
#line 1789 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1789 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1789,"subs_functions.bas");}while(r);
#line 1790 "subs_functions/subs_functions.bas"
do{
#line 1790 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SATURATION32(rgbaColor&)",25));
#line 1790 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1790 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1790,"subs_functions.bas");}while(r);
#line 1791 "subs_functions/subs_functions.bas"
do{
#line 1791 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1791 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1791,"subs_functions.bas");}while(r);
#line 1793 "subs_functions/subs_functions.bas"
do{
#line 1793 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1793 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1793,"subs_functions.bas");}while(r);
#line 1794 "subs_functions/subs_functions.bas"
do{
#line 1794 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Brightness32",13));
#line 1794 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1794 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1794,"subs_functions.bas");}while(r);
#line 1795 "subs_functions/subs_functions.bas"
do{
#line 1795 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1795 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1795,"subs_functions.bas");}while(r);
#line 1796 "subs_functions/subs_functions.bas"
do{
#line 1796 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__bri32",11));
#line 1796 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1796 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1796,"subs_functions.bas");}while(r);
#line 1797 "subs_functions/subs_functions.bas"
do{
#line 1797 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1797 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1797,"subs_functions.bas");}while(r);
#line 1798 "subs_functions/subs_functions.bas"
do{
#line 1798 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 1798 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1798 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1798,"subs_functions.bas");}while(r);
#line 1799 "subs_functions/subs_functions.bas"
do{
#line 1799 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1799 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1799,"subs_functions.bas");}while(r);
#line 1800 "subs_functions/subs_functions.bas"
do{
#line 1800 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BRIGHTNESS32(rgbaColor&)",25));
#line 1800 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1800 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1800,"subs_functions.bas");}while(r);
#line 1801 "subs_functions/subs_functions.bas"
do{
#line 1801 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1801 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1801,"subs_functions.bas");}while(r);
#line 1803 "subs_functions/subs_functions.bas"
do{
#line 1803 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1803 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1803,"subs_functions.bas");}while(r);
#line 1804 "subs_functions/subs_functions.bas"
do{
#line 1804 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Draw",4));
#line 1804 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1804 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1804,"subs_functions.bas");}while(r);
#line 1805 "subs_functions/subs_functions.bas"
do{
#line 1805 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1805 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1805,"subs_functions.bas");}while(r);
#line 1806 "subs_functions/subs_functions.bas"
do{
#line 1806 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_draw",8));
#line 1806 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1806 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1806,"subs_functions.bas");}while(r);
#line 1807 "subs_functions/subs_functions.bas"
do{
#line 1807 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1807 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1807,"subs_functions.bas");}while(r);
#line 1808 "subs_functions/subs_functions.bas"
do{
#line 1808 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1808 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1808 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1808,"subs_functions.bas");}while(r);
#line 1809 "subs_functions/subs_functions.bas"
do{
#line 1809 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("DRAW drawString$",16));
#line 1809 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1809 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1809,"subs_functions.bas");}while(r);
#line 1810 "subs_functions/subs_functions.bas"
do{
#line 1810 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1810 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1810,"subs_functions.bas");}while(r);
#line 1814 "subs_functions/subs_functions.bas"
do{
#line 1814 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1814 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1814,"subs_functions.bas");}while(r);
#line 1815 "subs_functions/subs_functions.bas"
do{
#line 1815 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseShow",10));
#line 1815 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1815 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1815,"subs_functions.bas");}while(r);
#line 1816 "subs_functions/subs_functions.bas"
do{
#line 1816 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1816 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1816,"subs_functions.bas");}while(r);
#line 1817 "subs_functions/subs_functions.bas"
do{
#line 1817 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__mouseshow",14));
#line 1817 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1817 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1817,"subs_functions.bas");}while(r);
#line 1818 "subs_functions/subs_functions.bas"
do{
#line 1818 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1818 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1818,"subs_functions.bas");}while(r);
#line 1819 "subs_functions/subs_functions.bas"
do{
#line 1819 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1819 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1819 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1819,"subs_functions.bas");}while(r);
#line 1820 "subs_functions/subs_functions.bas"
do{
#line 1820 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1820 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1820 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1820,"subs_functions.bas");}while(r);
#line 1821 "subs_functions/subs_functions.bas"
do{
#line 1821 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSESHOW [cursorShape$]",25));
#line 1821 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1821 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1821,"subs_functions.bas");}while(r);
#line 1822 "subs_functions/subs_functions.bas"
do{
#line 1822 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1822 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1822,"subs_functions.bas");}while(r);
#line 1824 "subs_functions/subs_functions.bas"
do{
#line 1824 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1824 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1824,"subs_functions.bas");}while(r);
#line 1825 "subs_functions/subs_functions.bas"
do{
#line 1825 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseCursor",12));
#line 1825 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1825 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1825,"subs_functions.bas");}while(r);
#line 1826 "subs_functions/subs_functions.bas"
do{
#line 1826 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1826 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1826,"subs_functions.bas");}while(r);
#line 1827 "subs_functions/subs_functions.bas"
do{
#line 1827 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__mousecursor",16));
#line 1827 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1827 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1827,"subs_functions.bas");}while(r);
#line 1828 "subs_functions/subs_functions.bas"
do{
#line 1828 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 1828 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1828,"subs_functions.bas");}while(r);
#line 1829 "subs_functions/subs_functions.bas"
do{
#line 1829 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 1829 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1829 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1829,"subs_functions.bas");}while(r);
#line 1830 "subs_functions/subs_functions.bas"
do{
#line 1830 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,(?,?)]",9));
#line 1830 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1830 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1830,"subs_functions.bas");}while(r);
#line 1831 "subs_functions/subs_functions.bas"
do{
#line 1831 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSECURSOR imageHandle& [, (hotspotX&, hotspotY&)]",52));
#line 1831 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1831 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1831,"subs_functions.bas");}while(r);
#line 1832 "subs_functions/subs_functions.bas"
do{
#line 1832 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1832 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1832,"subs_functions.bas");}while(r);
#line 1834 "subs_functions/subs_functions.bas"
do{
#line 1834 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1834 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1834,"subs_functions.bas");}while(r);
#line 1835 "subs_functions/subs_functions.bas"
do{
#line 1835 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseHide",10));
#line 1835 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1835 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1835,"subs_functions.bas");}while(r);
#line 1836 "subs_functions/subs_functions.bas"
do{
#line 1836 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1836 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1836,"subs_functions.bas");}while(r);
#line 1837 "subs_functions/subs_functions.bas"
do{
#line 1837 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__mousehide",14));
#line 1837 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1837 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1837,"subs_functions.bas");}while(r);
#line 1838 "subs_functions/subs_functions.bas"
do{
#line 1838 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1838 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1838,"subs_functions.bas");}while(r);
#line 1839 "subs_functions/subs_functions.bas"
do{
#line 1839 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1839 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1839 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1839,"subs_functions.bas");}while(r);
#line 1840 "subs_functions/subs_functions.bas"
do{
#line 1840 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Hide|_Disable}]",18));
#line 1840 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1840 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1840,"subs_functions.bas");}while(r);
#line 1841 "subs_functions/subs_functions.bas"
do{
#line 1841 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEHIDE [_DISABLE]",21));
#line 1841 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1841 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1841,"subs_functions.bas");}while(r);
#line 1842 "subs_functions/subs_functions.bas"
do{
#line 1842 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1842 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1842,"subs_functions.bas");}while(r);
#line 1844 "subs_functions/subs_functions.bas"
do{
#line 1844 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1844 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1844,"subs_functions.bas");}while(r);
#line 1845 "subs_functions/subs_functions.bas"
do{
#line 1845 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseDisabled",14));
#line 1845 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1845 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1845,"subs_functions.bas");}while(r);
#line 1846 "subs_functions/subs_functions.bas"
do{
#line 1846 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1846 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1846,"subs_functions.bas");}while(r);
#line 1847 "subs_functions/subs_functions.bas"
do{
#line 1847 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousedisabled",19));
#line 1847 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1847 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1847,"subs_functions.bas");}while(r);
#line 1848 "subs_functions/subs_functions.bas"
do{
#line 1848 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1848 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1848,"subs_functions.bas");}while(r);
#line 1849 "subs_functions/subs_functions.bas"
do{
#line 1849 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1849 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1849,"subs_functions.bas");}while(r);
#line 1850 "subs_functions/subs_functions.bas"
do{
#line 1850 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEDISABLED",14));
#line 1850 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1850 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1850,"subs_functions.bas");}while(r);
#line 1851 "subs_functions/subs_functions.bas"
do{
#line 1851 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1851 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1851,"subs_functions.bas");}while(r);
#line 1853 "subs_functions/subs_functions.bas"
do{
#line 1853 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1853 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1853,"subs_functions.bas");}while(r);
#line 1854 "subs_functions/subs_functions.bas"
do{
#line 1854 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseHidden",12));
#line 1854 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1854 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1854,"subs_functions.bas");}while(r);
#line 1855 "subs_functions/subs_functions.bas"
do{
#line 1855 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1855 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1855,"subs_functions.bas");}while(r);
#line 1856 "subs_functions/subs_functions.bas"
do{
#line 1856 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousehidden",17));
#line 1856 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1856 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1856,"subs_functions.bas");}while(r);
#line 1857 "subs_functions/subs_functions.bas"
do{
#line 1857 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1857 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1857,"subs_functions.bas");}while(r);
#line 1858 "subs_functions/subs_functions.bas"
do{
#line 1858 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1858 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1858,"subs_functions.bas");}while(r);
#line 1859 "subs_functions/subs_functions.bas"
do{
#line 1859 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEHIDDEN",12));
#line 1859 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1859 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1859,"subs_functions.bas");}while(r);
#line 1860 "subs_functions/subs_functions.bas"
do{
#line 1860 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1860 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1860,"subs_functions.bas");}while(r);
#line 1862 "subs_functions/subs_functions.bas"
do{
#line 1862 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1862 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1862,"subs_functions.bas");}while(r);
#line 1863 "subs_functions/subs_functions.bas"
do{
#line 1863 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseInput",11));
#line 1863 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1863 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1863,"subs_functions.bas");}while(r);
#line 1864 "subs_functions/subs_functions.bas"
do{
#line 1864 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1864 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1864,"subs_functions.bas");}while(r);
#line 1865 "subs_functions/subs_functions.bas"
do{
#line 1865 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mouseinput",16));
#line 1865 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1865 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1865,"subs_functions.bas");}while(r);
#line 1866 "subs_functions/subs_functions.bas"
do{
#line 1866 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1866 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1866,"subs_functions.bas");}while(r);
#line 1867 "subs_functions/subs_functions.bas"
do{
#line 1867 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1867 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1867,"subs_functions.bas");}while(r);
#line 1868 "subs_functions/subs_functions.bas"
do{
#line 1868 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEINPUT",11));
#line 1868 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1868 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1868,"subs_functions.bas");}while(r);
#line 1869 "subs_functions/subs_functions.bas"
do{
#line 1869 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1869 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1869,"subs_functions.bas");}while(r);
#line 1871 "subs_functions/subs_functions.bas"
do{
#line 1871 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1871 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1871,"subs_functions.bas");}while(r);
#line 1872 "subs_functions/subs_functions.bas"
do{
#line 1872 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseX",7));
#line 1872 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1872 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1872,"subs_functions.bas");}while(r);
#line 1873 "subs_functions/subs_functions.bas"
do{
#line 1873 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1873 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1873,"subs_functions.bas");}while(r);
#line 1874 "subs_functions/subs_functions.bas"
do{
#line 1874 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousex",12));
#line 1874 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1874 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1874,"subs_functions.bas");}while(r);
#line 1875 "subs_functions/subs_functions.bas"
do{
#line 1875 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1875 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1875,"subs_functions.bas");}while(r);
#line 1876 "subs_functions/subs_functions.bas"
do{
#line 1876 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1876 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1876,"subs_functions.bas");}while(r);
#line 1877 "subs_functions/subs_functions.bas"
do{
#line 1877 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEX",7));
#line 1877 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1877 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1877,"subs_functions.bas");}while(r);
#line 1878 "subs_functions/subs_functions.bas"
do{
#line 1878 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1878 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1878,"subs_functions.bas");}while(r);
#line 1880 "subs_functions/subs_functions.bas"
do{
#line 1880 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1880 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1880,"subs_functions.bas");}while(r);
#line 1881 "subs_functions/subs_functions.bas"
do{
#line 1881 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseY",7));
#line 1881 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1881 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1881,"subs_functions.bas");}while(r);
#line 1882 "subs_functions/subs_functions.bas"
do{
#line 1882 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1882 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1882,"subs_functions.bas");}while(r);
#line 1883 "subs_functions/subs_functions.bas"
do{
#line 1883 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousey",12));
#line 1883 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1883 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1883,"subs_functions.bas");}while(r);
#line 1884 "subs_functions/subs_functions.bas"
do{
#line 1884 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1884 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1884,"subs_functions.bas");}while(r);
#line 1885 "subs_functions/subs_functions.bas"
do{
#line 1885 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1885 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1885,"subs_functions.bas");}while(r);
#line 1886 "subs_functions/subs_functions.bas"
do{
#line 1886 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEY",7));
#line 1886 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1886 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1886,"subs_functions.bas");}while(r);
#line 1887 "subs_functions/subs_functions.bas"
do{
#line 1887 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1887 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1887,"subs_functions.bas");}while(r);
#line 1889 "subs_functions/subs_functions.bas"
do{
#line 1889 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1889 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1889,"subs_functions.bas");}while(r);
#line 1890 "subs_functions/subs_functions.bas"
do{
#line 1890 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMovementX",15));
#line 1890 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1890 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1890,"subs_functions.bas");}while(r);
#line 1891 "subs_functions/subs_functions.bas"
do{
#line 1891 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1891 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1891,"subs_functions.bas");}while(r);
#line 1892 "subs_functions/subs_functions.bas"
do{
#line 1892 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousemovementx",20));
#line 1892 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1892 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1892,"subs_functions.bas");}while(r);
#line 1893 "subs_functions/subs_functions.bas"
do{
#line 1893 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1893 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1893,"subs_functions.bas");}while(r);
#line 1894 "subs_functions/subs_functions.bas"
do{
#line 1894 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1894 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1894,"subs_functions.bas");}while(r);
#line 1895 "subs_functions/subs_functions.bas"
do{
#line 1895 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEMOVEMENTX",15));
#line 1895 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1895 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1895,"subs_functions.bas");}while(r);
#line 1896 "subs_functions/subs_functions.bas"
do{
#line 1896 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1896 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1896,"subs_functions.bas");}while(r);
#line 1898 "subs_functions/subs_functions.bas"
do{
#line 1898 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1898 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1898,"subs_functions.bas");}while(r);
#line 1899 "subs_functions/subs_functions.bas"
do{
#line 1899 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMovementY",15));
#line 1899 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1899 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1899,"subs_functions.bas");}while(r);
#line 1900 "subs_functions/subs_functions.bas"
do{
#line 1900 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1900 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1900,"subs_functions.bas");}while(r);
#line 1901 "subs_functions/subs_functions.bas"
do{
#line 1901 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousemovementy",20));
#line 1901 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1901 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1901,"subs_functions.bas");}while(r);
#line 1902 "subs_functions/subs_functions.bas"
do{
#line 1902 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1902 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1902,"subs_functions.bas");}while(r);
#line 1903 "subs_functions/subs_functions.bas"
do{
#line 1903 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 1903 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1903,"subs_functions.bas");}while(r);
#line 1904 "subs_functions/subs_functions.bas"
do{
#line 1904 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEMOVEMENTY",15));
#line 1904 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1904 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1904,"subs_functions.bas");}while(r);
#line 1905 "subs_functions/subs_functions.bas"
do{
#line 1905 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1905 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1905,"subs_functions.bas");}while(r);
#line 1907 "subs_functions/subs_functions.bas"
do{
#line 1907 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1907 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1907,"subs_functions.bas");}while(r);
#line 1908 "subs_functions/subs_functions.bas"
do{
#line 1908 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseButton",12));
#line 1908 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1908 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1908,"subs_functions.bas");}while(r);
#line 1909 "subs_functions/subs_functions.bas"
do{
#line 1909 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1909 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1909,"subs_functions.bas");}while(r);
#line 1910 "subs_functions/subs_functions.bas"
do{
#line 1910 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousebutton",17));
#line 1910 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1910 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1910,"subs_functions.bas");}while(r);
#line 1911 "subs_functions/subs_functions.bas"
do{
#line 1911 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1911 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1911,"subs_functions.bas");}while(r);
#line 1912 "subs_functions/subs_functions.bas"
do{
#line 1912 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1912 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1912 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1912,"subs_functions.bas");}while(r);
#line 1913 "subs_functions/subs_functions.bas"
do{
#line 1913 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1913 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1913,"subs_functions.bas");}while(r);
#line 1914 "subs_functions/subs_functions.bas"
do{
#line 1914 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEBUTTON(buttonNumber)",26));
#line 1914 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1914 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1914,"subs_functions.bas");}while(r);
#line 1915 "subs_functions/subs_functions.bas"
do{
#line 1915 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1915 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1915,"subs_functions.bas");}while(r);
#line 1917 "subs_functions/subs_functions.bas"
do{
#line 1917 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1917 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1917,"subs_functions.bas");}while(r);
#line 1918 "subs_functions/subs_functions.bas"
do{
#line 1918 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseWheel",11));
#line 1918 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1918 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1918,"subs_functions.bas");}while(r);
#line 1919 "subs_functions/subs_functions.bas"
do{
#line 1919 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1919 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1919,"subs_functions.bas");}while(r);
#line 1920 "subs_functions/subs_functions.bas"
do{
#line 1920 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__mousewheel",16));
#line 1920 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1920 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1920,"subs_functions.bas");}while(r);
#line 1921 "subs_functions/subs_functions.bas"
do{
#line 1921 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 1921 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1921,"subs_functions.bas");}while(r);
#line 1922 "subs_functions/subs_functions.bas"
do{
#line 1922 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1922 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1922,"subs_functions.bas");}while(r);
#line 1923 "subs_functions/subs_functions.bas"
do{
#line 1923 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 1923 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1923 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1923,"subs_functions.bas");}while(r);
#line 1924 "subs_functions/subs_functions.bas"
do{
#line 1924 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 1924 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1924 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1924,"subs_functions.bas");}while(r);
#line 1925 "subs_functions/subs_functions.bas"
do{
#line 1925 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MOUSEWHEEL [axis]",18));
#line 1925 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1925 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1925,"subs_functions.bas");}while(r);
#line 1926 "subs_functions/subs_functions.bas"
do{
#line 1926 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1926 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1926,"subs_functions.bas");}while(r);
#line 1928 "subs_functions/subs_functions.bas"
do{
#line 1928 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1928 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1928,"subs_functions.bas");}while(r);
#line 1929 "subs_functions/subs_functions.bas"
do{
#line 1929 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("FreeFile",8));
#line 1929 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1929 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1929,"subs_functions.bas");}while(r);
#line 1930 "subs_functions/subs_functions.bas"
do{
#line 1930 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 1930 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1930,"subs_functions.bas");}while(r);
#line 1931 "subs_functions/subs_functions.bas"
do{
#line 1931 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_freefile",13));
#line 1931 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1931 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1931,"subs_functions.bas");}while(r);
#line 1932 "subs_functions/subs_functions.bas"
do{
#line 1932 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 1932 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1932,"subs_functions.bas");}while(r);
#line 1933 "subs_functions/subs_functions.bas"
do{
#line 1933 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_FREEFILE",9));
#line 1933 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1933 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1933,"subs_functions.bas");}while(r);
#line 1934 "subs_functions/subs_functions.bas"
do{
#line 1934 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1934 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1934,"subs_functions.bas");}while(r);
#line 1936 "subs_functions/subs_functions.bas"
do{
#line 1936 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1936 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1936,"subs_functions.bas");}while(r);
#line 1937 "subs_functions/subs_functions.bas"
do{
#line 1937 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Name",4));
#line 1937 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1937 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1937,"subs_functions.bas");}while(r);
#line 1938 "subs_functions/subs_functions.bas"
do{
#line 1938 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1938 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1938,"subs_functions.bas");}while(r);
#line 1939 "subs_functions/subs_functions.bas"
do{
#line 1939 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_name",8));
#line 1939 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1939 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1939,"subs_functions.bas");}while(r);
#line 1940 "subs_functions/subs_functions.bas"
do{
#line 1940 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 1940 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1940,"subs_functions.bas");}while(r);
#line 1941 "subs_functions/subs_functions.bas"
do{
#line 1941 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 1941 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1941 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1941,"subs_functions.bas");}while(r);
#line 1942 "subs_functions/subs_functions.bas"
do{
#line 1942 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?{As}?",6));
#line 1942 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1942 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1942,"subs_functions.bas");}while(r);
#line 1943 "subs_functions/subs_functions.bas"
do{
#line 1943 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("NAME oldFileOrFolderName$ AS newFileOrFolderName$",49));
#line 1943 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1943 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1943,"subs_functions.bas");}while(r);
#line 1944 "subs_functions/subs_functions.bas"
do{
#line 1944 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1944 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1944,"subs_functions.bas");}while(r);
#line 1946 "subs_functions/subs_functions.bas"
do{
#line 1946 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1946 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1946,"subs_functions.bas");}while(r);
#line 1947 "subs_functions/subs_functions.bas"
do{
#line 1947 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Kill",4));
#line 1947 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1947 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1947,"subs_functions.bas");}while(r);
#line 1948 "subs_functions/subs_functions.bas"
do{
#line 1948 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1948 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1948,"subs_functions.bas");}while(r);
#line 1949 "subs_functions/subs_functions.bas"
do{
#line 1949 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_kill",8));
#line 1949 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1949 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1949,"subs_functions.bas");}while(r);
#line 1950 "subs_functions/subs_functions.bas"
do{
#line 1950 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1950 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1950,"subs_functions.bas");}while(r);
#line 1951 "subs_functions/subs_functions.bas"
do{
#line 1951 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1951 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1951 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1951,"subs_functions.bas");}while(r);
#line 1952 "subs_functions/subs_functions.bas"
do{
#line 1952 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("KILL fileSpec$",14));
#line 1952 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1952 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1952,"subs_functions.bas");}while(r);
#line 1953 "subs_functions/subs_functions.bas"
do{
#line 1953 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1953 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1953,"subs_functions.bas");}while(r);
#line 1955 "subs_functions/subs_functions.bas"
do{
#line 1955 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1955 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1955,"subs_functions.bas");}while(r);
#line 1956 "subs_functions/subs_functions.bas"
do{
#line 1956 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("ChDir",5));
#line 1956 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1956 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1956,"subs_functions.bas");}while(r);
#line 1957 "subs_functions/subs_functions.bas"
do{
#line 1957 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1957 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1957,"subs_functions.bas");}while(r);
#line 1958 "subs_functions/subs_functions.bas"
do{
#line 1958 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_chdir",9));
#line 1958 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1958 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1958,"subs_functions.bas");}while(r);
#line 1959 "subs_functions/subs_functions.bas"
do{
#line 1959 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1959 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1959,"subs_functions.bas");}while(r);
#line 1960 "subs_functions/subs_functions.bas"
do{
#line 1960 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1960 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1960 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1960,"subs_functions.bas");}while(r);
#line 1961 "subs_functions/subs_functions.bas"
do{
#line 1961 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CHDIR path$",11));
#line 1961 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1961 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1961,"subs_functions.bas");}while(r);
#line 1962 "subs_functions/subs_functions.bas"
do{
#line 1962 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1962 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1962,"subs_functions.bas");}while(r);
#line 1964 "subs_functions/subs_functions.bas"
do{
#line 1964 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1964 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1964,"subs_functions.bas");}while(r);
#line 1965 "subs_functions/subs_functions.bas"
do{
#line 1965 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MkDir",5));
#line 1965 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1965 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1965,"subs_functions.bas");}while(r);
#line 1966 "subs_functions/subs_functions.bas"
do{
#line 1966 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1966 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1966,"subs_functions.bas");}while(r);
#line 1967 "subs_functions/subs_functions.bas"
do{
#line 1967 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_mkdir",9));
#line 1967 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1967 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1967,"subs_functions.bas");}while(r);
#line 1968 "subs_functions/subs_functions.bas"
do{
#line 1968 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1968 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1968,"subs_functions.bas");}while(r);
#line 1969 "subs_functions/subs_functions.bas"
do{
#line 1969 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1969 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1969 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1969,"subs_functions.bas");}while(r);
#line 1970 "subs_functions/subs_functions.bas"
do{
#line 1970 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKDIR pathSpec$",15));
#line 1970 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1970 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1970,"subs_functions.bas");}while(r);
#line 1971 "subs_functions/subs_functions.bas"
do{
#line 1971 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1971 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1971,"subs_functions.bas");}while(r);
#line 1973 "subs_functions/subs_functions.bas"
do{
#line 1973 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1973 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1973,"subs_functions.bas");}while(r);
#line 1974 "subs_functions/subs_functions.bas"
do{
#line 1974 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RmDir",5));
#line 1974 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1974 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1974,"subs_functions.bas");}while(r);
#line 1975 "subs_functions/subs_functions.bas"
do{
#line 1975 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1975 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1975,"subs_functions.bas");}while(r);
#line 1976 "subs_functions/subs_functions.bas"
do{
#line 1976 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_rmdir",9));
#line 1976 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1976 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1976,"subs_functions.bas");}while(r);
#line 1977 "subs_functions/subs_functions.bas"
do{
#line 1977 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1977 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1977,"subs_functions.bas");}while(r);
#line 1978 "subs_functions/subs_functions.bas"
do{
#line 1978 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1978 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1978 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1978,"subs_functions.bas");}while(r);
#line 1979 "subs_functions/subs_functions.bas"
do{
#line 1979 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("RMDIR path$",11));
#line 1979 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1979 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1979,"subs_functions.bas");}while(r);
#line 1980 "subs_functions/subs_functions.bas"
do{
#line 1980 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1980 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1980,"subs_functions.bas");}while(r);
#line 1982 "subs_functions/subs_functions.bas"
do{
#line 1982 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1982 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1982,"subs_functions.bas");}while(r);
#line 1983 "subs_functions/subs_functions.bas"
do{
#line 1983 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Chain",5));
#line 1983 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1983 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1983,"subs_functions.bas");}while(r);
#line 1984 "subs_functions/subs_functions.bas"
do{
#line 1984 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1984 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1984,"subs_functions.bas");}while(r);
#line 1985 "subs_functions/subs_functions.bas"
do{
#line 1985 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_chain",9));
#line 1985 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1985 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1985,"subs_functions.bas");}while(r);
#line 1986 "subs_functions/subs_functions.bas"
do{
#line 1986 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1986 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1986,"subs_functions.bas");}while(r);
#line 1987 "subs_functions/subs_functions.bas"
do{
#line 1987 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1987 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1987 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1987,"subs_functions.bas");}while(r);
#line 1988 "subs_functions/subs_functions.bas"
do{
#line 1988 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CHAIN moduleName$",17));
#line 1988 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1988 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1988,"subs_functions.bas");}while(r);
#line 1989 "subs_functions/subs_functions.bas"
do{
#line 1989 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 1989 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1989,"subs_functions.bas");}while(r);
#line 1991 "subs_functions/subs_functions.bas"
do{
#line 1991 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 1991 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1991,"subs_functions.bas");}while(r);
#line 1992 "subs_functions/subs_functions.bas"
do{
#line 1992 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
#line 1992 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1992 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1992,"subs_functions.bas");}while(r);
#line 1993 "subs_functions/subs_functions.bas"
do{
#line 1993 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 1993 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1993,"subs_functions.bas");}while(r);
#line 1994 "subs_functions/subs_functions.bas"
do{
#line 1994 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_shell2",10));
#line 1994 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1994 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1994,"subs_functions.bas");}while(r);
#line 1995 "subs_functions/subs_functions.bas"
do{
#line 1995 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 1995 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1995,"subs_functions.bas");}while(r);
#line 1996 "subs_functions/subs_functions.bas"
do{
#line 1996 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 1996 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1996 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1996,"subs_functions.bas");}while(r);
#line 1997 "subs_functions/subs_functions.bas"
do{
#line 1997 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{_Hide}[{_DontWait}][?]",23));
#line 1997 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1997 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1997,"subs_functions.bas");}while(r);
#line 1998 "subs_functions/subs_functions.bas"
do{
#line 1998 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("_Hide",5));
#line 1998 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1998 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1998,"subs_functions.bas");}while(r);
#line 1999 "subs_functions/subs_functions.bas"
do{
#line 1999 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
#line 1999 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 1999 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,1999,"subs_functions.bas");}while(r);
#line 2000 "subs_functions/subs_functions.bas"
do{
#line 2000 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2000 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2000,"subs_functions.bas");}while(r);
#line 2002 "subs_functions/subs_functions.bas"
do{
#line 2002 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2002 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2002,"subs_functions.bas");}while(r);
#line 2003 "subs_functions/subs_functions.bas"
do{
#line 2003 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
#line 2003 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2003 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2003,"subs_functions.bas");}while(r);
#line 2004 "subs_functions/subs_functions.bas"
do{
#line 2004 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2004 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2004,"subs_functions.bas");}while(r);
#line 2005 "subs_functions/subs_functions.bas"
do{
#line 2005 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_shell3",10));
#line 2005 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2005 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2005,"subs_functions.bas");}while(r);
#line 2006 "subs_functions/subs_functions.bas"
do{
#line 2006 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2006 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2006,"subs_functions.bas");}while(r);
#line 2007 "subs_functions/subs_functions.bas"
do{
#line 2007 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2007 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2007 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2007,"subs_functions.bas");}while(r);
#line 2008 "subs_functions/subs_functions.bas"
do{
#line 2008 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{_DontWait}[{_Hide}][?]",23));
#line 2008 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2008 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2008,"subs_functions.bas");}while(r);
#line 2009 "subs_functions/subs_functions.bas"
do{
#line 2009 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("_DontWait",9));
#line 2009 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2009 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2009,"subs_functions.bas");}while(r);
#line 2010 "subs_functions/subs_functions.bas"
do{
#line 2010 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
#line 2010 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2010 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2010,"subs_functions.bas");}while(r);
#line 2011 "subs_functions/subs_functions.bas"
do{
#line 2011 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2011 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2011,"subs_functions.bas");}while(r);
#line 2013 "subs_functions/subs_functions.bas"
do{
#line 2013 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2013 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2013,"subs_functions.bas");}while(r);
#line 2014 "subs_functions/subs_functions.bas"
do{
#line 2014 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
#line 2014 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2014 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2014,"subs_functions.bas");}while(r);
#line 2015 "subs_functions/subs_functions.bas"
do{
#line 2015 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2015 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2015,"subs_functions.bas");}while(r);
#line 2016 "subs_functions/subs_functions.bas"
do{
#line 2016 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_shell",9));
#line 2016 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2016 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2016,"subs_functions.bas");}while(r);
#line 2017 "subs_functions/subs_functions.bas"
do{
#line 2017 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2017 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2017,"subs_functions.bas");}while(r);
#line 2018 "subs_functions/subs_functions.bas"
do{
#line 2018 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2018 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2018 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2018,"subs_functions.bas");}while(r);
#line 2019 "subs_functions/subs_functions.bas"
do{
#line 2019 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2019 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2019 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2019,"subs_functions.bas");}while(r);
#line 2021 "subs_functions/subs_functions.bas"
do{
#line 2021 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
#line 2021 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2021 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2021,"subs_functions.bas");}while(r);
#line 2022 "subs_functions/subs_functions.bas"
do{
#line 2022 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2022 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2022,"subs_functions.bas");}while(r);
#line 2024 "subs_functions/subs_functions.bas"
do{
#line 2024 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2024 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2024,"subs_functions.bas");}while(r);
#line 2025 "subs_functions/subs_functions.bas"
do{
#line 2025 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
#line 2025 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2025 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2025,"subs_functions.bas");}while(r);
#line 2026 "subs_functions/subs_functions.bas"
do{
#line 2026 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2026 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2026,"subs_functions.bas");}while(r);
#line 2027 "subs_functions/subs_functions.bas"
do{
#line 2027 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_shell",10));
#line 2027 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2027 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2027,"subs_functions.bas");}while(r);
#line 2028 "subs_functions/subs_functions.bas"
do{
#line 2028 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2028 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2028,"subs_functions.bas");}while(r);
#line 2029 "subs_functions/subs_functions.bas"
do{
#line 2029 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2029 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2029 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2029,"subs_functions.bas");}while(r);
#line 2030 "subs_functions/subs_functions.bas"
do{
#line 2030 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
#line 2030 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2030,"subs_functions.bas");}while(r);
#line 2031 "subs_functions/subs_functions.bas"
do{
#line 2031 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SHELL(commandToRun$)",20));
#line 2031 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2031 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2031,"subs_functions.bas");}while(r);
#line 2032 "subs_functions/subs_functions.bas"
do{
#line 2032 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2032 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2032,"subs_functions.bas");}while(r);
#line 2034 "subs_functions/subs_functions.bas"
do{
#line 2034 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2034 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2034,"subs_functions.bas");}while(r);
#line 2035 "subs_functions/subs_functions.bas"
do{
#line 2035 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShellHide",10));
#line 2035 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2035 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2035,"subs_functions.bas");}while(r);
#line 2036 "subs_functions/subs_functions.bas"
do{
#line 2036 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2036 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2036,"subs_functions.bas");}while(r);
#line 2037 "subs_functions/subs_functions.bas"
do{
#line 2037 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__shellhide",15));
#line 2037 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2037 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2037,"subs_functions.bas");}while(r);
#line 2038 "subs_functions/subs_functions.bas"
do{
#line 2038 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2038 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2038,"subs_functions.bas");}while(r);
#line 2039 "subs_functions/subs_functions.bas"
do{
#line 2039 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2039 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2039 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2039,"subs_functions.bas");}while(r);
#line 2040 "subs_functions/subs_functions.bas"
do{
#line 2040 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
#line 2040 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2040,"subs_functions.bas");}while(r);
#line 2041 "subs_functions/subs_functions.bas"
do{
#line 2041 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SHELLHIDE(commandToRun$)",25));
#line 2041 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2041 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2041,"subs_functions.bas");}while(r);
#line 2042 "subs_functions/subs_functions.bas"
do{
#line 2042 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2042 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2042,"subs_functions.bas");}while(r);
#line 2044 "subs_functions/subs_functions.bas"
do{
#line 2044 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2044 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2044,"subs_functions.bas");}while(r);
#line 2045 "subs_functions/subs_functions.bas"
do{
#line 2045 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Command",7));
#line 2045 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2045 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2045,"subs_functions.bas");}while(r);
#line 2046 "subs_functions/subs_functions.bas"
do{
#line 2046 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2046 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2046 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2046,"subs_functions.bas");}while(r);
#line 2047 "subs_functions/subs_functions.bas"
do{
#line 2047 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2047 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2047,"subs_functions.bas");}while(r);
#line 2048 "subs_functions/subs_functions.bas"
do{
#line 2048 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_command",12));
#line 2048 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2048 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2048,"subs_functions.bas");}while(r);
#line 2049 "subs_functions/subs_functions.bas"
do{
#line 2049 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2049 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2049,"subs_functions.bas");}while(r);
#line 2050 "subs_functions/subs_functions.bas"
do{
#line 2050 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2050 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2050 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2050,"subs_functions.bas");}while(r);
#line 2051 "subs_functions/subs_functions.bas"
do{
#line 2051 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2051 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2051,"subs_functions.bas");}while(r);
#line 2052 "subs_functions/subs_functions.bas"
do{
#line 2052 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2052 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2052 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2052,"subs_functions.bas");}while(r);
#line 2053 "subs_functions/subs_functions.bas"
do{
#line 2053 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("COMMAND$[(index%)]",18));
#line 2053 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2053 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2053,"subs_functions.bas");}while(r);
#line 2054 "subs_functions/subs_functions.bas"
do{
#line 2054 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2054 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2054,"subs_functions.bas");}while(r);
#line 2056 "subs_functions/subs_functions.bas"
do{
#line 2056 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2056 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2056,"subs_functions.bas");}while(r);
#line 2057 "subs_functions/subs_functions.bas"
do{
#line 2057 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CommandCount",13));
#line 2057 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2057 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2057,"subs_functions.bas");}while(r);
#line 2058 "subs_functions/subs_functions.bas"
do{
#line 2058 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2058 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2058,"subs_functions.bas");}while(r);
#line 2059 "subs_functions/subs_functions.bas"
do{
#line 2059 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__commandcount",18));
#line 2059 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2059 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2059,"subs_functions.bas");}while(r);
#line 2060 "subs_functions/subs_functions.bas"
do{
#line 2060 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2060 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2060,"subs_functions.bas");}while(r);
#line 2061 "subs_functions/subs_functions.bas"
do{
#line 2061 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COMMANDCOUNT",13));
#line 2061 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2061 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2061,"subs_functions.bas");}while(r);
#line 2062 "subs_functions/subs_functions.bas"
do{
#line 2062 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2062 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2062,"subs_functions.bas");}while(r);
#line 2066 "subs_functions/subs_functions.bas"
do{
#line 2066 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2066 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2066,"subs_functions.bas");}while(r);
#line 2067 "subs_functions/subs_functions.bas"
do{
#line 2067 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Beep",4));
#line 2067 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2067 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2067,"subs_functions.bas");}while(r);
#line 2068 "subs_functions/subs_functions.bas"
do{
#line 2068 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2068 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2068,"subs_functions.bas");}while(r);
#line 2069 "subs_functions/subs_functions.bas"
do{
#line 2069 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_beep",8));
#line 2069 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2069 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2069,"subs_functions.bas");}while(r);
#line 2070 "subs_functions/subs_functions.bas"
do{
#line 2070 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 2070 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2070,"subs_functions.bas");}while(r);
#line 2071 "subs_functions/subs_functions.bas"
do{
#line 2071 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("BEEP",4));
#line 2071 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2071 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2071,"subs_functions.bas");}while(r);
#line 2072 "subs_functions/subs_functions.bas"
do{
#line 2072 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2072 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2072,"subs_functions.bas");}while(r);
#line 2074 "subs_functions/subs_functions.bas"
do{
#line 2074 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2074 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2074,"subs_functions.bas");}while(r);
#line 2075 "subs_functions/subs_functions.bas"
do{
#line 2075 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Play",4));
#line 2075 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2075 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2075,"subs_functions.bas");}while(r);
#line 2075 "subs_functions/subs_functions.bas"
do{
#line 2075 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2075 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2075,"subs_functions.bas");}while(r);
#line 2076 "subs_functions/subs_functions.bas"
do{
#line 2076 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2076 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2076,"subs_functions.bas");}while(r);
#line 2077 "subs_functions/subs_functions.bas"
do{
#line 2077 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_play",8));
#line 2077 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2077 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2077,"subs_functions.bas");}while(r);
#line 2078 "subs_functions/subs_functions.bas"
do{
#line 2078 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 2078 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2078,"subs_functions.bas");}while(r);
#line 2079 "subs_functions/subs_functions.bas"
do{
#line 2079 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2079 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2079 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2079,"subs_functions.bas");}while(r);
#line 2080 "subs_functions/subs_functions.bas"
do{
#line 2080 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
#line 2080 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2080 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2080,"subs_functions.bas");}while(r);
#line 2081 "subs_functions/subs_functions.bas"
do{
#line 2081 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PLAY voiceCommands1$[, voiceCommands2$][, voiceCommands3$][, voiceCommands4$]",77));
#line 2081 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2081 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2081,"subs_functions.bas");}while(r);
#line 2082 "subs_functions/subs_functions.bas"
do{
#line 2082 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2082 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2082,"subs_functions.bas");}while(r);
#line 2084 "subs_functions/subs_functions.bas"
do{
#line 2084 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2084 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2084,"subs_functions.bas");}while(r);
#line 2085 "subs_functions/subs_functions.bas"
do{
#line 2085 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Play",4));
#line 2085 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2085 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2085,"subs_functions.bas");}while(r);
#line 2085 "subs_functions/subs_functions.bas"
do{
#line 2085 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2085 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2085,"subs_functions.bas");}while(r);
#line 2086 "subs_functions/subs_functions.bas"
do{
#line 2086 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2086 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2086,"subs_functions.bas");}while(r);
#line 2087 "subs_functions/subs_functions.bas"
do{
#line 2087 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_play",9));
#line 2087 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2087 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2087,"subs_functions.bas");}while(r);
#line 2088 "subs_functions/subs_functions.bas"
do{
#line 2088 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2088 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2088,"subs_functions.bas");}while(r);
#line 2089 "subs_functions/subs_functions.bas"
do{
#line 2089 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 2089 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2089 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2089,"subs_functions.bas");}while(r);
#line 2090 "subs_functions/subs_functions.bas"
do{
#line 2090 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2090 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2090 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2090,"subs_functions.bas");}while(r);
#line 2091 "subs_functions/subs_functions.bas"
do{
#line 2091 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2091 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2091,"subs_functions.bas");}while(r);
#line 2092 "subs_functions/subs_functions.bas"
do{
#line 2092 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PLAY [voice&]",13));
#line 2092 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2092 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2092,"subs_functions.bas");}while(r);
#line 2093 "subs_functions/subs_functions.bas"
do{
#line 2093 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2093 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2093,"subs_functions.bas");}while(r);
#line 2095 "subs_functions/subs_functions.bas"
do{
#line 2095 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2095 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2095,"subs_functions.bas");}while(r);
#line 2096 "subs_functions/subs_functions.bas"
do{
#line 2096 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sound",5));
#line 2096 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2096 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2096,"subs_functions.bas");}while(r);
#line 2096 "subs_functions/subs_functions.bas"
do{
#line 2096 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2096 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2096,"subs_functions.bas");}while(r);
#line 2097 "subs_functions/subs_functions.bas"
do{
#line 2097 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2097 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2097,"subs_functions.bas");}while(r);
#line 2098 "subs_functions/subs_functions.bas"
do{
#line 2098 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_sound",9));
#line 2098 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2098 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2098,"subs_functions.bas");}while(r);
#line 2099 "subs_functions/subs_functions.bas"
do{
#line 2099 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 8 ;
#line 2099 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2099,"subs_functions.bas");}while(r);
#line 2100 "subs_functions/subs_functions.bas"
do{
#line 2100 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2100 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2100 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2100,"subs_functions.bas");}while(r);
#line 2101 "subs_functions/subs_functions.bas"
do{
#line 2101 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?,?[,[?][,[?][,[?][,[?][,?]]]]]][{Wait|Resume}]",48));
#line 2101 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2101 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2101,"subs_functions.bas");}while(r);
#line 2102 "subs_functions/subs_functions.bas"
do{
#line 2102 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SOUND [frequency!, duration![, volume!][, panPosition!][, waveform&][, waveformParameters!][, voice&]] [{Wait|Resume}]",118));
#line 2102 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2102 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2102,"subs_functions.bas");}while(r);
#line 2103 "subs_functions/subs_functions.bas"
do{
#line 2103 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2103 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2103,"subs_functions.bas");}while(r);
#line 2105 "subs_functions/subs_functions.bas"
do{
#line 2105 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2105 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2105,"subs_functions.bas");}while(r);
#line 2106 "subs_functions/subs_functions.bas"
do{
#line 2106 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Wave",5));
#line 2106 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2106,"subs_functions.bas");}while(r);
#line 2106 "subs_functions/subs_functions.bas"
do{
#line 2106 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2106,"subs_functions.bas");}while(r);
#line 2107 "subs_functions/subs_functions.bas"
do{
#line 2107 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2107 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2107,"subs_functions.bas");}while(r);
#line 2108 "subs_functions/subs_functions.bas"
do{
#line 2108 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__wave",9));
#line 2108 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2108 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2108,"subs_functions.bas");}while(r);
#line 2109 "subs_functions/subs_functions.bas"
do{
#line 2109 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2109 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2109,"subs_functions.bas");}while(r);
#line 2110 "subs_functions/subs_functions.bas"
do{
#line 2110 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2110 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2110 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2110,"subs_functions.bas");}while(r);
#line 2111 "subs_functions/subs_functions.bas"
do{
#line 2111 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 2111 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2111 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2111,"subs_functions.bas");}while(r);
#line 2112 "subs_functions/subs_functions.bas"
do{
#line 2112 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_WAVE voice&, waveDefinition%%([index&])[, frameCount&]",55));
#line 2112 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2112 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2112,"subs_functions.bas");}while(r);
#line 2113 "subs_functions/subs_functions.bas"
do{
#line 2113 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2113 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2113,"subs_functions.bas");}while(r);
#line 2115 "subs_functions/subs_functions.bas"
do{
#line 2115 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2115 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2115,"subs_functions.bas");}while(r);
#line 2116 "subs_functions/subs_functions.bas"
do{
#line 2116 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRate",8));
#line 2116 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2116 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2116,"subs_functions.bas");}while(r);
#line 2116 "subs_functions/subs_functions.bas"
do{
#line 2116 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2116 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2116,"subs_functions.bas");}while(r);
#line 2117 "subs_functions/subs_functions.bas"
do{
#line 2117 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2117 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2117,"subs_functions.bas");}while(r);
#line 2118 "subs_functions/subs_functions.bas"
do{
#line 2118 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndrate",13));
#line 2118 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2118 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2118,"subs_functions.bas");}while(r);
#line 2119 "subs_functions/subs_functions.bas"
do{
#line 2119 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2119 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2119,"subs_functions.bas");}while(r);
#line 2120 "subs_functions/subs_functions.bas"
do{
#line 2120 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDRATE",8));
#line 2120 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2120 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2120,"subs_functions.bas");}while(r);
#line 2121 "subs_functions/subs_functions.bas"
do{
#line 2121 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2121 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2121,"subs_functions.bas");}while(r);
#line 2123 "subs_functions/subs_functions.bas"
do{
#line 2123 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2123 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2123,"subs_functions.bas");}while(r);
#line 2124 "subs_functions/subs_functions.bas"
do{
#line 2124 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRaw",7));
#line 2124 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2124,"subs_functions.bas");}while(r);
#line 2124 "subs_functions/subs_functions.bas"
do{
#line 2124 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2124,"subs_functions.bas");}while(r);
#line 2125 "subs_functions/subs_functions.bas"
do{
#line 2125 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2125 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2125,"subs_functions.bas");}while(r);
#line 2126 "subs_functions/subs_functions.bas"
do{
#line 2126 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndraw",11));
#line 2126 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2126 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2126,"subs_functions.bas");}while(r);
#line 2127 "subs_functions/subs_functions.bas"
do{
#line 2127 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2127 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2127,"subs_functions.bas");}while(r);
#line 2128 "subs_functions/subs_functions.bas"
do{
#line 2128 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2128 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2128 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2128,"subs_functions.bas");}while(r);
#line 2129 "subs_functions/subs_functions.bas"
do{
#line 2129 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
#line 2129 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2129 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2129,"subs_functions.bas");}while(r);
#line 2130 "subs_functions/subs_functions.bas"
do{
#line 2130 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDRAW leftSample[, rightSample][, pipeHandle&]",48));
#line 2130 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2130 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2130,"subs_functions.bas");}while(r);
#line 2131 "subs_functions/subs_functions.bas"
do{
#line 2131 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2131 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2131,"subs_functions.bas");}while(r);
#line 2133 "subs_functions/subs_functions.bas"
do{
#line 2133 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2133 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2133,"subs_functions.bas");}while(r);
#line 2134 "subs_functions/subs_functions.bas"
do{
#line 2134 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawBatch",12));
#line 2134 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2134 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2134,"subs_functions.bas");}while(r);
#line 2134 "subs_functions/subs_functions.bas"
do{
#line 2134 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2134 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2134,"subs_functions.bas");}while(r);
#line 2135 "subs_functions/subs_functions.bas"
do{
#line 2135 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2135 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2135,"subs_functions.bas");}while(r);
#line 2136 "subs_functions/subs_functions.bas"
do{
#line 2136 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndrawbatch",16));
#line 2136 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2136 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2136,"subs_functions.bas");}while(r);
#line 2137 "subs_functions/subs_functions.bas"
do{
#line 2137 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 2137 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2137,"subs_functions.bas");}while(r);
#line 2138 "subs_functions/subs_functions.bas"
do{
#line 2138 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string( -3 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2138 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2138 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2138,"subs_functions.bas");}while(r);
#line 2139 "subs_functions/subs_functions.bas"
do{
#line 2139 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
#line 2139 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2139 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2139,"subs_functions.bas");}while(r);
#line 2140 "subs_functions/subs_functions.bas"
do{
#line 2140 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDRAWBATCH sampleFrameArray!([index&])[, channels&][, pipeHandle&][, frameCount&]",83));
#line 2140 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2140 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2140,"subs_functions.bas");}while(r);
#line 2141 "subs_functions/subs_functions.bas"
do{
#line 2141 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2141 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2141,"subs_functions.bas");}while(r);
#line 2143 "subs_functions/subs_functions.bas"
do{
#line 2143 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2143 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2143,"subs_functions.bas");}while(r);
#line 2144 "subs_functions/subs_functions.bas"
do{
#line 2144 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawDone",11));
#line 2144 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2144 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2144,"subs_functions.bas");}while(r);
#line 2144 "subs_functions/subs_functions.bas"
do{
#line 2144 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2144 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2144,"subs_functions.bas");}while(r);
#line 2145 "subs_functions/subs_functions.bas"
do{
#line 2145 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2145 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2145,"subs_functions.bas");}while(r);
#line 2146 "subs_functions/subs_functions.bas"
do{
#line 2146 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndrawdone",15));
#line 2146 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2146 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2146,"subs_functions.bas");}while(r);
#line 2147 "subs_functions/subs_functions.bas"
do{
#line 2147 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2147 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2147,"subs_functions.bas");}while(r);
#line 2148 "subs_functions/subs_functions.bas"
do{
#line 2148 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2148 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2148 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2148,"subs_functions.bas");}while(r);
#line 2149 "subs_functions/subs_functions.bas"
do{
#line 2149 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2149 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2149 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2149,"subs_functions.bas");}while(r);
#line 2150 "subs_functions/subs_functions.bas"
do{
#line 2150 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDRAWDONE [pipeHandle&]",25));
#line 2150 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2150 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2150,"subs_functions.bas");}while(r);
#line 2151 "subs_functions/subs_functions.bas"
do{
#line 2151 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2151 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2151,"subs_functions.bas");}while(r);
#line 2153 "subs_functions/subs_functions.bas"
do{
#line 2153 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2153 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2153,"subs_functions.bas");}while(r);
#line 2154 "subs_functions/subs_functions.bas"
do{
#line 2154 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndOpenRaw",11));
#line 2154 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2154,"subs_functions.bas");}while(r);
#line 2154 "subs_functions/subs_functions.bas"
do{
#line 2154 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2154,"subs_functions.bas");}while(r);
#line 2155 "subs_functions/subs_functions.bas"
do{
#line 2155 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2155 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2155,"subs_functions.bas");}while(r);
#line 2156 "subs_functions/subs_functions.bas"
do{
#line 2156 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndopenraw",16));
#line 2156 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2156 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2156,"subs_functions.bas");}while(r);
#line 2157 "subs_functions/subs_functions.bas"
do{
#line 2157 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2157 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2157,"subs_functions.bas");}while(r);
#line 2158 "subs_functions/subs_functions.bas"
do{
#line 2158 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDOPENRAW",11));
#line 2158 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2158 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2158,"subs_functions.bas");}while(r);
#line 2159 "subs_functions/subs_functions.bas"
do{
#line 2159 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2159 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2159,"subs_functions.bas");}while(r);
#line 2161 "subs_functions/subs_functions.bas"
do{
#line 2161 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2161 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2161,"subs_functions.bas");}while(r);
#line 2162 "subs_functions/subs_functions.bas"
do{
#line 2162 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawLen",10));
#line 2162 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2162 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2162,"subs_functions.bas");}while(r);
#line 2162 "subs_functions/subs_functions.bas"
do{
#line 2162 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2162 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2162,"subs_functions.bas");}while(r);
#line 2163 "subs_functions/subs_functions.bas"
do{
#line 2163 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2163 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2163,"subs_functions.bas");}while(r);
#line 2164 "subs_functions/subs_functions.bas"
do{
#line 2164 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndrawlen",15));
#line 2164 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2164 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2164,"subs_functions.bas");}while(r);
#line 2165 "subs_functions/subs_functions.bas"
do{
#line 2165 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2165 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2165,"subs_functions.bas");}while(r);
#line 2166 "subs_functions/subs_functions.bas"
do{
#line 2166 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2166 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2166 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2166,"subs_functions.bas");}while(r);
#line 2167 "subs_functions/subs_functions.bas"
do{
#line 2167 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2167 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2167 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2167,"subs_functions.bas");}while(r);
#line 2168 "subs_functions/subs_functions.bas"
do{
#line 2168 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2168 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2168,"subs_functions.bas");}while(r);
#line 2169 "subs_functions/subs_functions.bas"
do{
#line 2169 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDRAWLEN [pipeHandle&]",24));
#line 2169 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2169 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2169,"subs_functions.bas");}while(r);
#line 2170 "subs_functions/subs_functions.bas"
do{
#line 2170 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2170 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2170,"subs_functions.bas");}while(r);
#line 2172 "subs_functions/subs_functions.bas"
do{
#line 2172 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2172 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2172,"subs_functions.bas");}while(r);
#line 2173 "subs_functions/subs_functions.bas"
do{
#line 2173 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLen",7));
#line 2173 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2173,"subs_functions.bas");}while(r);
#line 2173 "subs_functions/subs_functions.bas"
do{
#line 2173 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2173,"subs_functions.bas");}while(r);
#line 2174 "subs_functions/subs_functions.bas"
do{
#line 2174 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2174 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2174,"subs_functions.bas");}while(r);
#line 2175 "subs_functions/subs_functions.bas"
do{
#line 2175 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndlen",12));
#line 2175 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2175 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2175,"subs_functions.bas");}while(r);
#line 2176 "subs_functions/subs_functions.bas"
do{
#line 2176 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2176 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2176,"subs_functions.bas");}while(r);
#line 2177 "subs_functions/subs_functions.bas"
do{
#line 2177 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2177 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2177 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2177,"subs_functions.bas");}while(r);
#line 2178 "subs_functions/subs_functions.bas"
do{
#line 2178 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2178 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2178,"subs_functions.bas");}while(r);
#line 2179 "subs_functions/subs_functions.bas"
do{
#line 2179 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDLEN(handle&)",16));
#line 2179 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2179 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2179,"subs_functions.bas");}while(r);
#line 2180 "subs_functions/subs_functions.bas"
do{
#line 2180 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2180 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2180,"subs_functions.bas");}while(r);
#line 2182 "subs_functions/subs_functions.bas"
do{
#line 2182 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2182 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2182,"subs_functions.bas");}while(r);
#line 2183 "subs_functions/subs_functions.bas"
do{
#line 2183 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPaused",10));
#line 2183 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2183,"subs_functions.bas");}while(r);
#line 2183 "subs_functions/subs_functions.bas"
do{
#line 2183 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2183,"subs_functions.bas");}while(r);
#line 2184 "subs_functions/subs_functions.bas"
do{
#line 2184 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2184 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2184,"subs_functions.bas");}while(r);
#line 2185 "subs_functions/subs_functions.bas"
do{
#line 2185 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndpaused",15));
#line 2185 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2185 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2185,"subs_functions.bas");}while(r);
#line 2186 "subs_functions/subs_functions.bas"
do{
#line 2186 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2186 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2186,"subs_functions.bas");}while(r);
#line 2187 "subs_functions/subs_functions.bas"
do{
#line 2187 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2187 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2187 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2187,"subs_functions.bas");}while(r);
#line 2188 "subs_functions/subs_functions.bas"
do{
#line 2188 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2188 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2188,"subs_functions.bas");}while(r);
#line 2189 "subs_functions/subs_functions.bas"
do{
#line 2189 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPAUSED(handle&)",19));
#line 2189 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2189 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2189,"subs_functions.bas");}while(r);
#line 2190 "subs_functions/subs_functions.bas"
do{
#line 2190 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2190 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2190,"subs_functions.bas");}while(r);
#line 2192 "subs_functions/subs_functions.bas"
do{
#line 2192 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2192 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2192,"subs_functions.bas");}while(r);
#line 2193 "subs_functions/subs_functions.bas"
do{
#line 2193 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlayFile",12));
#line 2193 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2193,"subs_functions.bas");}while(r);
#line 2193 "subs_functions/subs_functions.bas"
do{
#line 2193 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2193,"subs_functions.bas");}while(r);
#line 2194 "subs_functions/subs_functions.bas"
do{
#line 2194 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2194 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2194,"subs_functions.bas");}while(r);
#line 2195 "subs_functions/subs_functions.bas"
do{
#line 2195 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndplayfile",16));
#line 2195 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2195 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2195,"subs_functions.bas");}while(r);
#line 2196 "subs_functions/subs_functions.bas"
do{
#line 2196 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2196 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2196,"subs_functions.bas");}while(r);
#line 2197 "subs_functions/subs_functions.bas"
do{
#line 2197 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
#line 2197 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2197 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2197,"subs_functions.bas");}while(r);
#line 2198 "subs_functions/subs_functions.bas"
do{
#line 2198 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
#line 2198 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2198 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2198,"subs_functions.bas");}while(r);
#line 2199 "subs_functions/subs_functions.bas"
do{
#line 2199 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPLAYFILE fileName$[, , volume!]",35));
#line 2199 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2199 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2199,"subs_functions.bas");}while(r);
#line 2200 "subs_functions/subs_functions.bas"
do{
#line 2200 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2200 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2200,"subs_functions.bas");}while(r);
#line 2202 "subs_functions/subs_functions.bas"
do{
#line 2202 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2202 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2202,"subs_functions.bas");}while(r);
#line 2203 "subs_functions/subs_functions.bas"
do{
#line 2203 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlayCopy",12));
#line 2203 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2203,"subs_functions.bas");}while(r);
#line 2203 "subs_functions/subs_functions.bas"
do{
#line 2203 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2203,"subs_functions.bas");}while(r);
#line 2204 "subs_functions/subs_functions.bas"
do{
#line 2204 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2204 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2204,"subs_functions.bas");}while(r);
#line 2205 "subs_functions/subs_functions.bas"
do{
#line 2205 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndplaycopy",16));
#line 2205 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2205 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2205,"subs_functions.bas");}while(r);
#line 2206 "subs_functions/subs_functions.bas"
do{
#line 2206 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 2206 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2206,"subs_functions.bas");}while(r);
#line 2207 "subs_functions/subs_functions.bas"
do{
#line 2207 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
#line 2207 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2207 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2207,"subs_functions.bas");}while(r);
#line 2208 "subs_functions/subs_functions.bas"
do{
#line 2208 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,[?][,[?][,[?]]]]]",25));
#line 2208 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2208 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2208,"subs_functions.bas");}while(r);
#line 2209 "subs_functions/subs_functions.bas"
do{
#line 2209 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPLAYCOPY handle&[, volume!][, x!][, y!][, z!]",49));
#line 2209 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2209 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2209,"subs_functions.bas");}while(r);
#line 2210 "subs_functions/subs_functions.bas"
do{
#line 2210 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2210 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2210,"subs_functions.bas");}while(r);
#line 2212 "subs_functions/subs_functions.bas"
do{
#line 2212 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2212 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2212,"subs_functions.bas");}while(r);
#line 2213 "subs_functions/subs_functions.bas"
do{
#line 2213 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndStop",8));
#line 2213 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2213,"subs_functions.bas");}while(r);
#line 2213 "subs_functions/subs_functions.bas"
do{
#line 2213 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2213,"subs_functions.bas");}while(r);
#line 2214 "subs_functions/subs_functions.bas"
do{
#line 2214 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2214 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2214,"subs_functions.bas");}while(r);
#line 2215 "subs_functions/subs_functions.bas"
do{
#line 2215 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndstop",12));
#line 2215 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2215 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2215,"subs_functions.bas");}while(r);
#line 2216 "subs_functions/subs_functions.bas"
do{
#line 2216 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2216 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2216,"subs_functions.bas");}while(r);
#line 2217 "subs_functions/subs_functions.bas"
do{
#line 2217 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2217 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2217 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2217,"subs_functions.bas");}while(r);
#line 2218 "subs_functions/subs_functions.bas"
do{
#line 2218 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDSTOP handle&",16));
#line 2218 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2218 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2218,"subs_functions.bas");}while(r);
#line 2219 "subs_functions/subs_functions.bas"
do{
#line 2219 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2219 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2219,"subs_functions.bas");}while(r);
#line 2221 "subs_functions/subs_functions.bas"
do{
#line 2221 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2221 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2221,"subs_functions.bas");}while(r);
#line 2222 "subs_functions/subs_functions.bas"
do{
#line 2222 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLoop",8));
#line 2222 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2222,"subs_functions.bas");}while(r);
#line 2222 "subs_functions/subs_functions.bas"
do{
#line 2222 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2222,"subs_functions.bas");}while(r);
#line 2223 "subs_functions/subs_functions.bas"
do{
#line 2223 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2223 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2223,"subs_functions.bas");}while(r);
#line 2224 "subs_functions/subs_functions.bas"
do{
#line 2224 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndloop",12));
#line 2224 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2224 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2224,"subs_functions.bas");}while(r);
#line 2225 "subs_functions/subs_functions.bas"
do{
#line 2225 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2225 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2225,"subs_functions.bas");}while(r);
#line 2226 "subs_functions/subs_functions.bas"
do{
#line 2226 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2226 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2226 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2226,"subs_functions.bas");}while(r);
#line 2227 "subs_functions/subs_functions.bas"
do{
#line 2227 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDLOOP handle&",16));
#line 2227 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2227 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2227,"subs_functions.bas");}while(r);
#line 2228 "subs_functions/subs_functions.bas"
do{
#line 2228 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2228 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2228,"subs_functions.bas");}while(r);
#line 2230 "subs_functions/subs_functions.bas"
do{
#line 2230 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2230 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2230,"subs_functions.bas");}while(r);
#line 2231 "subs_functions/subs_functions.bas"
do{
#line 2231 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLimit",9));
#line 2231 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2231,"subs_functions.bas");}while(r);
#line 2231 "subs_functions/subs_functions.bas"
do{
#line 2231 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2231,"subs_functions.bas");}while(r);
#line 2232 "subs_functions/subs_functions.bas"
do{
#line 2232 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2232 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2232,"subs_functions.bas");}while(r);
#line 2233 "subs_functions/subs_functions.bas"
do{
#line 2233 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndlimit",13));
#line 2233 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2233 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2233,"subs_functions.bas");}while(r);
#line 2234 "subs_functions/subs_functions.bas"
do{
#line 2234 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2234 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2234,"subs_functions.bas");}while(r);
#line 2235 "subs_functions/subs_functions.bas"
do{
#line 2235 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 2235 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2235 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2235,"subs_functions.bas");}while(r);
#line 2236 "subs_functions/subs_functions.bas"
do{
#line 2236 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDLIMIT handle&, numberOfSeconds#",35));
#line 2236 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2236 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2236,"subs_functions.bas");}while(r);
#line 2237 "subs_functions/subs_functions.bas"
do{
#line 2237 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2237 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2237,"subs_functions.bas");}while(r);
#line 2239 "subs_functions/subs_functions.bas"
do{
#line 2239 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2239 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2239,"subs_functions.bas");}while(r);
#line 2240 "subs_functions/subs_functions.bas"
do{
#line 2240 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndOpen",8));
#line 2240 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2240 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2240,"subs_functions.bas");}while(r);
#line 2240 "subs_functions/subs_functions.bas"
do{
#line 2240 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2240 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2240,"subs_functions.bas");}while(r);
#line 2241 "subs_functions/subs_functions.bas"
do{
#line 2241 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2241 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2241,"subs_functions.bas");}while(r);
#line 2242 "subs_functions/subs_functions.bas"
do{
#line 2242 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndopen",13));
#line 2242 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2242 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2242,"subs_functions.bas");}while(r);
#line 2243 "subs_functions/subs_functions.bas"
do{
#line 2243 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2243 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2243,"subs_functions.bas");}while(r);
#line 2244 "subs_functions/subs_functions.bas"
do{
#line 2244 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2244 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2244 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2244,"subs_functions.bas");}while(r);
#line 2245 "subs_functions/subs_functions.bas"
do{
#line 2245 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2245 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2245 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2245,"subs_functions.bas");}while(r);
#line 2246 "subs_functions/subs_functions.bas"
do{
#line 2246 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2246 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2246,"subs_functions.bas");}while(r);
#line 2247 "subs_functions/subs_functions.bas"
do{
#line 2247 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDOPEN(fileName$[, capabilities$])",36));
#line 2247 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2247 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2247,"subs_functions.bas");}while(r);
#line 2248 "subs_functions/subs_functions.bas"
do{
#line 2248 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2248 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2248,"subs_functions.bas");}while(r);
#line 2250 "subs_functions/subs_functions.bas"
do{
#line 2250 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2250 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2250,"subs_functions.bas");}while(r);
#line 2251 "subs_functions/subs_functions.bas"
do{
#line 2251 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndSetPos",10));
#line 2251 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2251,"subs_functions.bas");}while(r);
#line 2251 "subs_functions/subs_functions.bas"
do{
#line 2251 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2251,"subs_functions.bas");}while(r);
#line 2252 "subs_functions/subs_functions.bas"
do{
#line 2252 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2252 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2252,"subs_functions.bas");}while(r);
#line 2253 "subs_functions/subs_functions.bas"
do{
#line 2253 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndsetpos",14));
#line 2253 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2253 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2253,"subs_functions.bas");}while(r);
#line 2254 "subs_functions/subs_functions.bas"
do{
#line 2254 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2254 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2254,"subs_functions.bas");}while(r);
#line 2255 "subs_functions/subs_functions.bas"
do{
#line 2255 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
#line 2255 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2255 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2255,"subs_functions.bas");}while(r);
#line 2256 "subs_functions/subs_functions.bas"
do{
#line 2256 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDSETPOS handle&, position#",29));
#line 2256 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2256 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2256,"subs_functions.bas");}while(r);
#line 2257 "subs_functions/subs_functions.bas"
do{
#line 2257 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2257 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2257,"subs_functions.bas");}while(r);
#line 2259 "subs_functions/subs_functions.bas"
do{
#line 2259 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2259 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2259,"subs_functions.bas");}while(r);
#line 2260 "subs_functions/subs_functions.bas"
do{
#line 2260 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndGetPos",10));
#line 2260 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2260 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2260,"subs_functions.bas");}while(r);
#line 2260 "subs_functions/subs_functions.bas"
do{
#line 2260 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2260 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2260,"subs_functions.bas");}while(r);
#line 2261 "subs_functions/subs_functions.bas"
do{
#line 2261 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2261 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2261,"subs_functions.bas");}while(r);
#line 2262 "subs_functions/subs_functions.bas"
do{
#line 2262 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndgetpos",15));
#line 2262 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2262 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2262,"subs_functions.bas");}while(r);
#line 2263 "subs_functions/subs_functions.bas"
do{
#line 2263 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2263 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2263,"subs_functions.bas");}while(r);
#line 2264 "subs_functions/subs_functions.bas"
do{
#line 2264 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2264 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2264 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2264,"subs_functions.bas");}while(r);
#line 2265 "subs_functions/subs_functions.bas"
do{
#line 2265 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2265 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2265,"subs_functions.bas");}while(r);
#line 2266 "subs_functions/subs_functions.bas"
do{
#line 2266 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDGETPOS(handle&)",19));
#line 2266 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2266 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2266,"subs_functions.bas");}while(r);
#line 2267 "subs_functions/subs_functions.bas"
do{
#line 2267 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2267 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2267,"subs_functions.bas");}while(r);
#line 2269 "subs_functions/subs_functions.bas"
do{
#line 2269 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2269 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2269,"subs_functions.bas");}while(r);
#line 2270 "subs_functions/subs_functions.bas"
do{
#line 2270 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlaying",11));
#line 2270 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2270 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2270,"subs_functions.bas");}while(r);
#line 2270 "subs_functions/subs_functions.bas"
do{
#line 2270 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2270 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2270,"subs_functions.bas");}while(r);
#line 2271 "subs_functions/subs_functions.bas"
do{
#line 2271 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2271 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2271,"subs_functions.bas");}while(r);
#line 2272 "subs_functions/subs_functions.bas"
do{
#line 2272 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndplaying",16));
#line 2272 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2272 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2272,"subs_functions.bas");}while(r);
#line 2273 "subs_functions/subs_functions.bas"
do{
#line 2273 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2273 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2273,"subs_functions.bas");}while(r);
#line 2274 "subs_functions/subs_functions.bas"
do{
#line 2274 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2274 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2274 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2274,"subs_functions.bas");}while(r);
#line 2275 "subs_functions/subs_functions.bas"
do{
#line 2275 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2275 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2275,"subs_functions.bas");}while(r);
#line 2276 "subs_functions/subs_functions.bas"
do{
#line 2276 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPLAYING(handle&)",20));
#line 2276 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2276 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2276,"subs_functions.bas");}while(r);
#line 2277 "subs_functions/subs_functions.bas"
do{
#line 2277 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2277 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2277,"subs_functions.bas");}while(r);
#line 2279 "subs_functions/subs_functions.bas"
do{
#line 2279 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2279 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2279,"subs_functions.bas");}while(r);
#line 2280 "subs_functions/subs_functions.bas"
do{
#line 2280 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPause",9));
#line 2280 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2280 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2280,"subs_functions.bas");}while(r);
#line 2280 "subs_functions/subs_functions.bas"
do{
#line 2280 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2280 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2280,"subs_functions.bas");}while(r);
#line 2281 "subs_functions/subs_functions.bas"
do{
#line 2281 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2281 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2281,"subs_functions.bas");}while(r);
#line 2282 "subs_functions/subs_functions.bas"
do{
#line 2282 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndpause",13));
#line 2282 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2282 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2282,"subs_functions.bas");}while(r);
#line 2283 "subs_functions/subs_functions.bas"
do{
#line 2283 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2283 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2283,"subs_functions.bas");}while(r);
#line 2284 "subs_functions/subs_functions.bas"
do{
#line 2284 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2284 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2284 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2284,"subs_functions.bas");}while(r);
#line 2285 "subs_functions/subs_functions.bas"
do{
#line 2285 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPAUSE handle&",17));
#line 2285 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2285 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2285,"subs_functions.bas");}while(r);
#line 2286 "subs_functions/subs_functions.bas"
do{
#line 2286 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2286 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2286,"subs_functions.bas");}while(r);
#line 2288 "subs_functions/subs_functions.bas"
do{
#line 2288 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2288 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2288,"subs_functions.bas");}while(r);
#line 2289 "subs_functions/subs_functions.bas"
do{
#line 2289 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndBal",7));
#line 2289 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2289,"subs_functions.bas");}while(r);
#line 2289 "subs_functions/subs_functions.bas"
do{
#line 2289 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2289,"subs_functions.bas");}while(r);
#line 2290 "subs_functions/subs_functions.bas"
do{
#line 2290 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2290 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2290,"subs_functions.bas");}while(r);
#line 2291 "subs_functions/subs_functions.bas"
do{
#line 2291 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndbal",11));
#line 2291 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2291 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2291,"subs_functions.bas");}while(r);
#line 2292 "subs_functions/subs_functions.bas"
do{
#line 2292 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 2292 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2292,"subs_functions.bas");}while(r);
#line 2293 "subs_functions/subs_functions.bas"
do{
#line 2293 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2293 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2293 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2293,"subs_functions.bas");}while(r);
#line 2294 "subs_functions/subs_functions.bas"
do{
#line 2294 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,[?][,[?][,[?][,[?]]]]",23));
#line 2294 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2294 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2294,"subs_functions.bas");}while(r);
#line 2295 "subs_functions/subs_functions.bas"
do{
#line 2295 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDBAL handle&[, x!][, y!][, z!]",33));
#line 2295 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2295 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2295,"subs_functions.bas");}while(r);
#line 2296 "subs_functions/subs_functions.bas"
do{
#line 2296 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2296 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2296,"subs_functions.bas");}while(r);
#line 2298 "subs_functions/subs_functions.bas"
do{
#line 2298 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2298 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2298,"subs_functions.bas");}while(r);
#line 2299 "subs_functions/subs_functions.bas"
do{
#line 2299 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndVol",7));
#line 2299 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2299,"subs_functions.bas");}while(r);
#line 2299 "subs_functions/subs_functions.bas"
do{
#line 2299 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2299,"subs_functions.bas");}while(r);
#line 2300 "subs_functions/subs_functions.bas"
do{
#line 2300 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2300 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2300,"subs_functions.bas");}while(r);
#line 2301 "subs_functions/subs_functions.bas"
do{
#line 2301 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndvol",11));
#line 2301 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2301 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2301,"subs_functions.bas");}while(r);
#line 2302 "subs_functions/subs_functions.bas"
do{
#line 2302 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2302 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2302,"subs_functions.bas");}while(r);
#line 2303 "subs_functions/subs_functions.bas"
do{
#line 2303 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
#line 2303 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2303 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2303,"subs_functions.bas");}while(r);
#line 2304 "subs_functions/subs_functions.bas"
do{
#line 2304 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDVOL handle&, volume!",24));
#line 2304 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2304 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2304,"subs_functions.bas");}while(r);
#line 2305 "subs_functions/subs_functions.bas"
do{
#line 2305 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2305 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2305,"subs_functions.bas");}while(r);
#line 2307 "subs_functions/subs_functions.bas"
do{
#line 2307 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2307 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2307,"subs_functions.bas");}while(r);
#line 2308 "subs_functions/subs_functions.bas"
do{
#line 2308 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlay",8));
#line 2308 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2308,"subs_functions.bas");}while(r);
#line 2308 "subs_functions/subs_functions.bas"
do{
#line 2308 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2308,"subs_functions.bas");}while(r);
#line 2309 "subs_functions/subs_functions.bas"
do{
#line 2309 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2309 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2309,"subs_functions.bas");}while(r);
#line 2310 "subs_functions/subs_functions.bas"
do{
#line 2310 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndplay",12));
#line 2310 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2310 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2310,"subs_functions.bas");}while(r);
#line 2311 "subs_functions/subs_functions.bas"
do{
#line 2311 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2311 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2311,"subs_functions.bas");}while(r);
#line 2312 "subs_functions/subs_functions.bas"
do{
#line 2312 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2312 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2312 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2312,"subs_functions.bas");}while(r);
#line 2313 "subs_functions/subs_functions.bas"
do{
#line 2313 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDPLAY handle&",16));
#line 2313 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2313 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2313,"subs_functions.bas");}while(r);
#line 2314 "subs_functions/subs_functions.bas"
do{
#line 2314 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2314 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2314,"subs_functions.bas");}while(r);
#line 2316 "subs_functions/subs_functions.bas"
do{
#line 2316 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2316 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2316,"subs_functions.bas");}while(r);
#line 2317 "subs_functions/subs_functions.bas"
do{
#line 2317 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndCopy",8));
#line 2317 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2317 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2317,"subs_functions.bas");}while(r);
#line 2317 "subs_functions/subs_functions.bas"
do{
#line 2317 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2317 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2317,"subs_functions.bas");}while(r);
#line 2318 "subs_functions/subs_functions.bas"
do{
#line 2318 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2318 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2318,"subs_functions.bas");}while(r);
#line 2319 "subs_functions/subs_functions.bas"
do{
#line 2319 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndcopy",13));
#line 2319 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2319 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2319,"subs_functions.bas");}while(r);
#line 2320 "subs_functions/subs_functions.bas"
do{
#line 2320 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2320 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2320,"subs_functions.bas");}while(r);
#line 2321 "subs_functions/subs_functions.bas"
do{
#line 2321 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2321 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2321 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2321,"subs_functions.bas");}while(r);
#line 2322 "subs_functions/subs_functions.bas"
do{
#line 2322 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2322 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2322,"subs_functions.bas");}while(r);
#line 2323 "subs_functions/subs_functions.bas"
do{
#line 2323 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDCOPY(handle&)",17));
#line 2323 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2323 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2323,"subs_functions.bas");}while(r);
#line 2324 "subs_functions/subs_functions.bas"
do{
#line 2324 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2324 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2324,"subs_functions.bas");}while(r);
#line 2326 "subs_functions/subs_functions.bas"
do{
#line 2326 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2326 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2326,"subs_functions.bas");}while(r);
#line 2327 "subs_functions/subs_functions.bas"
do{
#line 2327 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndClose",9));
#line 2327 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2327,"subs_functions.bas");}while(r);
#line 2327 "subs_functions/subs_functions.bas"
do{
#line 2327 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2327,"subs_functions.bas");}while(r);
#line 2328 "subs_functions/subs_functions.bas"
do{
#line 2328 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2328 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2328,"subs_functions.bas");}while(r);
#line 2329 "subs_functions/subs_functions.bas"
do{
#line 2329 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__sndclose",13));
#line 2329 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2329 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2329,"subs_functions.bas");}while(r);
#line 2330 "subs_functions/subs_functions.bas"
do{
#line 2330 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2330 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2330,"subs_functions.bas");}while(r);
#line 2331 "subs_functions/subs_functions.bas"
do{
#line 2331 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2331 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2331 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2331,"subs_functions.bas");}while(r);
#line 2332 "subs_functions/subs_functions.bas"
do{
#line 2332 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDCLOSE handle&",17));
#line 2332 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2332 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2332,"subs_functions.bas");}while(r);
#line 2333 "subs_functions/subs_functions.bas"
do{
#line 2333 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2333 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2333,"subs_functions.bas");}while(r);
#line 2335 "subs_functions/subs_functions.bas"
do{
#line 2335 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2335 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2335,"subs_functions.bas");}while(r);
#line 2336 "subs_functions/subs_functions.bas"
do{
#line 2336 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndNew",7));
#line 2336 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2336 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2336,"subs_functions.bas");}while(r);
#line 2337 "subs_functions/subs_functions.bas"
do{
#line 2337 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2337 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2337,"subs_functions.bas");}while(r);
#line 2338 "subs_functions/subs_functions.bas"
do{
#line 2338 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2338 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2338,"subs_functions.bas");}while(r);
#line 2339 "subs_functions/subs_functions.bas"
do{
#line 2339 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__sndnew",12));
#line 2339 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2339 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2339,"subs_functions.bas");}while(r);
#line 2340 "subs_functions/subs_functions.bas"
do{
#line 2340 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 2340 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2340,"subs_functions.bas");}while(r);
#line 2341 "subs_functions/subs_functions.bas"
do{
#line 2341 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2341 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2341 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2341,"subs_functions.bas");}while(r);
#line 2342 "subs_functions/subs_functions.bas"
do{
#line 2342 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
#line 2342 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2342 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2342,"subs_functions.bas");}while(r);
#line 2343 "subs_functions/subs_functions.bas"
do{
#line 2343 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2343 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2343,"subs_functions.bas");}while(r);
#line 2344 "subs_functions/subs_functions.bas"
do{
#line 2344 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SNDNEW(frames&[, channels&][, bits&][, sampleRate&])",53));
#line 2344 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2344 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2344,"subs_functions.bas");}while(r);
#line 2345 "subs_functions/subs_functions.bas"
do{
#line 2345 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2345 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2345,"subs_functions.bas");}while(r);
#line 2347 "subs_functions/subs_functions.bas"
do{
#line 2347 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2347 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2347,"subs_functions.bas");}while(r);
#line 2348 "subs_functions/subs_functions.bas"
do{
#line 2348 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MIDISoundBank",14));
#line 2348 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2348 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2348,"subs_functions.bas");}while(r);
#line 2349 "subs_functions/subs_functions.bas"
do{
#line 2349 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 2ll ;
#line 2349 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2349,"subs_functions.bas");}while(r);
#line 2350 "subs_functions/subs_functions.bas"
do{
#line 2350 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2350 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2350,"subs_functions.bas");}while(r);
#line 2351 "subs_functions/subs_functions.bas"
do{
#line 2351 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__midisoundbank",18));
#line 2351 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2351 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2351,"subs_functions.bas");}while(r);
#line 2352 "subs_functions/subs_functions.bas"
do{
#line 2352 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2352 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2352,"subs_functions.bas");}while(r);
#line 2353 "subs_functions/subs_functions.bas"
do{
#line 2353 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2353 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2353 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2353,"subs_functions.bas");}while(r);
#line 2354 "subs_functions/subs_functions.bas"
do{
#line 2354 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2354 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2354 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2354,"subs_functions.bas");}while(r);
#line 2355 "subs_functions/subs_functions.bas"
do{
#line 2355 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MIDISOUNDBANK fileName$[, capabilities$]",41));
#line 2355 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2355 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2355,"subs_functions.bas");}while(r);
#line 2356 "subs_functions/subs_functions.bas"
do{
#line 2356 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2356 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2356,"subs_functions.bas");}while(r);
#line 2358 "subs_functions/subs_functions.bas"
do{
#line 2358 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2358 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2358,"subs_functions.bas");}while(r);
#line 2359 "subs_functions/subs_functions.bas"
do{
#line 2359 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Input",5));
#line 2359 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2359 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2359,"subs_functions.bas");}while(r);
#line 2360 "subs_functions/subs_functions.bas"
do{
#line 2360 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2360 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2360 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2360,"subs_functions.bas");}while(r);
#line 2361 "subs_functions/subs_functions.bas"
do{
#line 2361 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2361 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2361,"subs_functions.bas");}while(r);
#line 2362 "subs_functions/subs_functions.bas"
do{
#line 2362 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_input",10));
#line 2362 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2362 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2362,"subs_functions.bas");}while(r);
#line 2363 "subs_functions/subs_functions.bas"
do{
#line 2363 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2363 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2363,"subs_functions.bas");}while(r);
#line 2364 "subs_functions/subs_functions.bas"
do{
#line 2364 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2364 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2364 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2364,"subs_functions.bas");}while(r);
#line 2365 "subs_functions/subs_functions.bas"
do{
#line 2365 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2365 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2365 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2365,"subs_functions.bas");}while(r);
#line 2366 "subs_functions/subs_functions.bas"
do{
#line 2366 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2366 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2366,"subs_functions.bas");}while(r);
#line 2367 "subs_functions/subs_functions.bas"
do{
#line 2367 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("INPUT$(numberOfBytes%[, fileOrPortNumber])",42));
#line 2367 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2367 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2367,"subs_functions.bas");}while(r);
#line 2368 "subs_functions/subs_functions.bas"
do{
#line 2368 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2368 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2368,"subs_functions.bas");}while(r);
#line 2370 "subs_functions/subs_functions.bas"
do{
#line 2370 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2370 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2370,"subs_functions.bas");}while(r);
#line 2371 "subs_functions/subs_functions.bas"
do{
#line 2371 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Seek",4));
#line 2371 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2371 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2371,"subs_functions.bas");}while(r);
#line 2372 "subs_functions/subs_functions.bas"
do{
#line 2372 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2372 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2372,"subs_functions.bas");}while(r);
#line 2373 "subs_functions/subs_functions.bas"
do{
#line 2373 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_seek",8));
#line 2373 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2373 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2373,"subs_functions.bas");}while(r);
#line 2374 "subs_functions/subs_functions.bas"
do{
#line 2374 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2374 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2374,"subs_functions.bas");}while(r);
#line 2375 "subs_functions/subs_functions.bas"
do{
#line 2375 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2375 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2375 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2375,"subs_functions.bas");}while(r);
#line 2376 "subs_functions/subs_functions.bas"
do{
#line 2376 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[#]?,?",6));
#line 2376 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2376 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2376,"subs_functions.bas");}while(r);
#line 2377 "subs_functions/subs_functions.bas"
do{
#line 2377 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SEEK filenumber&, position",26));
#line 2377 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2377 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2377,"subs_functions.bas");}while(r);
#line 2378 "subs_functions/subs_functions.bas"
do{
#line 2378 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2378 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2378,"subs_functions.bas");}while(r);
#line 2380 "subs_functions/subs_functions.bas"
do{
#line 2380 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2380 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2380,"subs_functions.bas");}while(r);
#line 2381 "subs_functions/subs_functions.bas"
do{
#line 2381 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Seek",4));
#line 2381 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2381 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2381,"subs_functions.bas");}while(r);
#line 2382 "subs_functions/subs_functions.bas"
do{
#line 2382 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2382 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2382,"subs_functions.bas");}while(r);
#line 2383 "subs_functions/subs_functions.bas"
do{
#line 2383 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_seek",9));
#line 2383 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2383 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2383,"subs_functions.bas");}while(r);
#line 2384 "subs_functions/subs_functions.bas"
do{
#line 2384 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2384 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2384,"subs_functions.bas");}while(r);
#line 2385 "subs_functions/subs_functions.bas"
do{
#line 2385 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2385 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2385 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2385,"subs_functions.bas");}while(r);
#line 2386 "subs_functions/subs_functions.bas"
do{
#line 2386 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2386 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2386,"subs_functions.bas");}while(r);
#line 2387 "subs_functions/subs_functions.bas"
do{
#line 2387 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SEEK(filenumber&)",17));
#line 2387 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2387 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2387,"subs_functions.bas");}while(r);
#line 2388 "subs_functions/subs_functions.bas"
do{
#line 2388 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2388 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2388,"subs_functions.bas");}while(r);
#line 2390 "subs_functions/subs_functions.bas"
do{
#line 2390 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2390 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2390,"subs_functions.bas");}while(r);
#line 2391 "subs_functions/subs_functions.bas"
do{
#line 2391 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Loc",3));
#line 2391 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2391 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2391,"subs_functions.bas");}while(r);
#line 2392 "subs_functions/subs_functions.bas"
do{
#line 2392 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2392 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2392,"subs_functions.bas");}while(r);
#line 2393 "subs_functions/subs_functions.bas"
do{
#line 2393 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_loc",8));
#line 2393 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2393 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2393,"subs_functions.bas");}while(r);
#line 2394 "subs_functions/subs_functions.bas"
do{
#line 2394 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2394 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2394,"subs_functions.bas");}while(r);
#line 2395 "subs_functions/subs_functions.bas"
do{
#line 2395 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2395 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2395 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2395,"subs_functions.bas");}while(r);
#line 2396 "subs_functions/subs_functions.bas"
do{
#line 2396 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2396 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2396,"subs_functions.bas");}while(r);
#line 2397 "subs_functions/subs_functions.bas"
do{
#line 2397 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LOC(fileOrPortNumber%)",22));
#line 2397 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2397 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2397,"subs_functions.bas");}while(r);
#line 2398 "subs_functions/subs_functions.bas"
do{
#line 2398 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2398 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2398,"subs_functions.bas");}while(r);
#line 2400 "subs_functions/subs_functions.bas"
do{
#line 2400 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2400 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2400,"subs_functions.bas");}while(r);
#line 2401 "subs_functions/subs_functions.bas"
do{
#line 2401 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("EOF",3));
#line 2401 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2401 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2401,"subs_functions.bas");}while(r);
#line 2402 "subs_functions/subs_functions.bas"
do{
#line 2402 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2402 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2402,"subs_functions.bas");}while(r);
#line 2403 "subs_functions/subs_functions.bas"
do{
#line 2403 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_eof",8));
#line 2403 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2403 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2403,"subs_functions.bas");}while(r);
#line 2404 "subs_functions/subs_functions.bas"
do{
#line 2404 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2404 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2404,"subs_functions.bas");}while(r);
#line 2405 "subs_functions/subs_functions.bas"
do{
#line 2405 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2405 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2405 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2405,"subs_functions.bas");}while(r);
#line 2406 "subs_functions/subs_functions.bas"
do{
#line 2406 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2406 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2406,"subs_functions.bas");}while(r);
#line 2407 "subs_functions/subs_functions.bas"
do{
#line 2407 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("EOF(fileNumber&)",16));
#line 2407 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2407 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2407,"subs_functions.bas");}while(r);
#line 2408 "subs_functions/subs_functions.bas"
do{
#line 2408 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2408 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2408,"subs_functions.bas");}while(r);
#line 2410 "subs_functions/subs_functions.bas"
do{
#line 2410 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2410 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2410,"subs_functions.bas");}while(r);
#line 2411 "subs_functions/subs_functions.bas"
do{
#line 2411 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LOF",3));
#line 2411 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2411 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2411,"subs_functions.bas");}while(r);
#line 2412 "subs_functions/subs_functions.bas"
do{
#line 2412 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2412 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2412,"subs_functions.bas");}while(r);
#line 2413 "subs_functions/subs_functions.bas"
do{
#line 2413 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_lof",8));
#line 2413 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2413 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2413,"subs_functions.bas");}while(r);
#line 2414 "subs_functions/subs_functions.bas"
do{
#line 2414 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2414 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2414,"subs_functions.bas");}while(r);
#line 2415 "subs_functions/subs_functions.bas"
do{
#line 2415 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2415 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2415 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2415,"subs_functions.bas");}while(r);
#line 2416 "subs_functions/subs_functions.bas"
do{
#line 2416 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2416 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2416,"subs_functions.bas");}while(r);
#line 2417 "subs_functions/subs_functions.bas"
do{
#line 2417 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LOF(fileNumber&)",16));
#line 2417 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2417 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2417,"subs_functions.bas");}while(r);
#line 2418 "subs_functions/subs_functions.bas"
do{
#line 2418 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2418 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2418,"subs_functions.bas");}while(r);
#line 2420 "subs_functions/subs_functions.bas"
do{
#line 2420 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2420 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2420,"subs_functions.bas");}while(r);
#line 2421 "subs_functions/subs_functions.bas"
do{
#line 2421 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Screen",6));
#line 2421 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2421 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2421,"subs_functions.bas");}while(r);
#line 2422 "subs_functions/subs_functions.bas"
do{
#line 2422 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2422 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2422,"subs_functions.bas");}while(r);
#line 2423 "subs_functions/subs_functions.bas"
do{
#line 2423 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_screen",11));
#line 2423 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2423 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2423,"subs_functions.bas");}while(r);
#line 2424 "subs_functions/subs_functions.bas"
do{
#line 2424 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2424 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2424,"subs_functions.bas");}while(r);
#line 2425 "subs_functions/subs_functions.bas"
do{
#line 2425 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2425 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2425 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2425,"subs_functions.bas");}while(r);
#line 2426 "subs_functions/subs_functions.bas"
do{
#line 2426 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 2426 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2426 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2426,"subs_functions.bas");}while(r);
#line 2427 "subs_functions/subs_functions.bas"
do{
#line 2427 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 2427 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2427,"subs_functions.bas");}while(r);
#line 2428 "subs_functions/subs_functions.bas"
do{
#line 2428 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SCREEN(x, y[, colorflag%])",26));
#line 2428 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2428 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2428,"subs_functions.bas");}while(r);
#line 2429 "subs_functions/subs_functions.bas"
do{
#line 2429 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2429 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2429,"subs_functions.bas");}while(r);
#line 2431 "subs_functions/subs_functions.bas"
do{
#line 2431 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2431 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2431,"subs_functions.bas");}while(r);
#line 2432 "subs_functions/subs_functions.bas"
do{
#line 2432 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PMap",4));
#line 2432 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2432 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2432,"subs_functions.bas");}while(r);
#line 2433 "subs_functions/subs_functions.bas"
do{
#line 2433 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2433 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2433,"subs_functions.bas");}while(r);
#line 2434 "subs_functions/subs_functions.bas"
do{
#line 2434 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_pmap",9));
#line 2434 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2434 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2434,"subs_functions.bas");}while(r);
#line 2435 "subs_functions/subs_functions.bas"
do{
#line 2435 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2435 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2435,"subs_functions.bas");}while(r);
#line 2436 "subs_functions/subs_functions.bas"
do{
#line 2436 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2436 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2436 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2436,"subs_functions.bas");}while(r);
#line 2437 "subs_functions/subs_functions.bas"
do{
#line 2437 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 2437 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2437,"subs_functions.bas");}while(r);
#line 2438 "subs_functions/subs_functions.bas"
do{
#line 2438 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PMAP(coordinate, function_number%)",34));
#line 2438 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2438 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2438,"subs_functions.bas");}while(r);
#line 2439 "subs_functions/subs_functions.bas"
do{
#line 2439 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2439 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2439,"subs_functions.bas");}while(r);
#line 2441 "subs_functions/subs_functions.bas"
do{
#line 2441 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2441 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2441,"subs_functions.bas");}while(r);
#line 2442 "subs_functions/subs_functions.bas"
do{
#line 2442 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Point",5));
#line 2442 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2442 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2442,"subs_functions.bas");}while(r);
#line 2443 "subs_functions/subs_functions.bas"
do{
#line 2443 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2443 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2443,"subs_functions.bas");}while(r);
#line 2444 "subs_functions/subs_functions.bas"
do{
#line 2444 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_point",10));
#line 2444 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2444 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2444,"subs_functions.bas");}while(r);
#line 2445 "subs_functions/subs_functions.bas"
do{
#line 2445 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2445 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2445,"subs_functions.bas");}while(r);
#line 2446 "subs_functions/subs_functions.bas"
do{
#line 2446 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
#line 2446 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2446 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2446,"subs_functions.bas");}while(r);
#line 2447 "subs_functions/subs_functions.bas"
do{
#line 2447 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2447 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2447 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2447,"subs_functions.bas");}while(r);
#line 2448 "subs_functions/subs_functions.bas"
do{
#line 2448 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2448 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2448,"subs_functions.bas");}while(r);
#line 2449 "subs_functions/subs_functions.bas"
do{
#line 2449 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("POINT(x, y) or POINT({0|1|2|3})",31));
#line 2449 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2449 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2449,"subs_functions.bas");}while(r);
#line 2450 "subs_functions/subs_functions.bas"
do{
#line 2450 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2450 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2450,"subs_functions.bas");}while(r);
#line 2452 "subs_functions/subs_functions.bas"
do{
#line 2452 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2452 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2452,"subs_functions.bas");}while(r);
#line 2453 "subs_functions/subs_functions.bas"
do{
#line 2453 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Tab",3));
#line 2453 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2453 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2453,"subs_functions.bas");}while(r);
#line 2454 "subs_functions/subs_functions.bas"
do{
#line 2454 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2454 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2454,"subs_functions.bas");}while(r);
#line 2455 "subs_functions/subs_functions.bas"
do{
#line 2455 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_tab",8));
#line 2455 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2455 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2455,"subs_functions.bas");}while(r);
#line 2456 "subs_functions/subs_functions.bas"
do{
#line 2456 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2456 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2456,"subs_functions.bas");}while(r);
#line 2457 "subs_functions/subs_functions.bas"
do{
#line 2457 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2457 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2457 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2457,"subs_functions.bas");}while(r);
#line 2458 "subs_functions/subs_functions.bas"
do{
#line 2458 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2458 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2458,"subs_functions.bas");}while(r);
#line 2459 "subs_functions/subs_functions.bas"
do{
#line 2459 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TAB(column%)",12));
#line 2459 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2459 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2459,"subs_functions.bas");}while(r);
#line 2460 "subs_functions/subs_functions.bas"
do{
#line 2460 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2460 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2460,"subs_functions.bas");}while(r);
#line 2462 "subs_functions/subs_functions.bas"
do{
#line 2462 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2462 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2462,"subs_functions.bas");}while(r);
#line 2463 "subs_functions/subs_functions.bas"
do{
#line 2463 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Spc",3));
#line 2463 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2463 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2463,"subs_functions.bas");}while(r);
#line 2464 "subs_functions/subs_functions.bas"
do{
#line 2464 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2464 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2464,"subs_functions.bas");}while(r);
#line 2465 "subs_functions/subs_functions.bas"
do{
#line 2465 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_spc",8));
#line 2465 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2465 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2465,"subs_functions.bas");}while(r);
#line 2466 "subs_functions/subs_functions.bas"
do{
#line 2466 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2466 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2466,"subs_functions.bas");}while(r);
#line 2467 "subs_functions/subs_functions.bas"
do{
#line 2467 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2467 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2467 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2467,"subs_functions.bas");}while(r);
#line 2468 "subs_functions/subs_functions.bas"
do{
#line 2468 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2468 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2468,"subs_functions.bas");}while(r);
#line 2469 "subs_functions/subs_functions.bas"
do{
#line 2469 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SPC(count%)",11));
#line 2469 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2469 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2469,"subs_functions.bas");}while(r);
#line 2470 "subs_functions/subs_functions.bas"
do{
#line 2470 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2470 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2470,"subs_functions.bas");}while(r);
#line 2472 "subs_functions/subs_functions.bas"
do{
#line 2472 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2472 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2472,"subs_functions.bas");}while(r);
#line 2473 "subs_functions/subs_functions.bas"
do{
#line 2473 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Wait",4));
#line 2473 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2473 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2473,"subs_functions.bas");}while(r);
#line 2474 "subs_functions/subs_functions.bas"
do{
#line 2474 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2474 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2474,"subs_functions.bas");}while(r);
#line 2475 "subs_functions/subs_functions.bas"
do{
#line 2475 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_wait",8));
#line 2475 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2475 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2475,"subs_functions.bas");}while(r);
#line 2476 "subs_functions/subs_functions.bas"
do{
#line 2476 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2476 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2476,"subs_functions.bas");}while(r);
#line 2477 "subs_functions/subs_functions.bas"
do{
#line 2477 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2477 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2477 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2477,"subs_functions.bas");}while(r);
#line 2478 "subs_functions/subs_functions.bas"
do{
#line 2478 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?[,?]",7));
#line 2478 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2478 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2478,"subs_functions.bas");}while(r);
#line 2479 "subs_functions/subs_functions.bas"
do{
#line 2479 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("WAIT port%, andMask%[, xorMask%]",32));
#line 2479 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2479 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2479,"subs_functions.bas");}while(r);
#line 2480 "subs_functions/subs_functions.bas"
do{
#line 2480 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2480 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2480,"subs_functions.bas");}while(r);
#line 2482 "subs_functions/subs_functions.bas"
do{
#line 2482 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2482 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2482,"subs_functions.bas");}while(r);
#line 2483 "subs_functions/subs_functions.bas"
do{
#line 2483 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Inp",3));
#line 2483 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2483 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2483,"subs_functions.bas");}while(r);
#line 2484 "subs_functions/subs_functions.bas"
do{
#line 2484 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2484 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2484,"subs_functions.bas");}while(r);
#line 2485 "subs_functions/subs_functions.bas"
do{
#line 2485 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_inp",8));
#line 2485 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2485 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2485,"subs_functions.bas");}while(r);
#line 2486 "subs_functions/subs_functions.bas"
do{
#line 2486 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2486 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2486,"subs_functions.bas");}while(r);
#line 2487 "subs_functions/subs_functions.bas"
do{
#line 2487 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2487 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2487 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2487,"subs_functions.bas");}while(r);
#line 2488 "subs_functions/subs_functions.bas"
do{
#line 2488 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2488 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2488,"subs_functions.bas");}while(r);
#line 2489 "subs_functions/subs_functions.bas"
do{
#line 2489 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("INP(address)",12));
#line 2489 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2489 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2489,"subs_functions.bas");}while(r);
#line 2490 "subs_functions/subs_functions.bas"
do{
#line 2490 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2490 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2490,"subs_functions.bas");}while(r);
#line 2492 "subs_functions/subs_functions.bas"
do{
#line 2492 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2492 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2492,"subs_functions.bas");}while(r);
#line 2493 "subs_functions/subs_functions.bas"
do{
#line 2493 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Pos",3));
#line 2493 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2493 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2493,"subs_functions.bas");}while(r);
#line 2494 "subs_functions/subs_functions.bas"
do{
#line 2494 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2494 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2494,"subs_functions.bas");}while(r);
#line 2495 "subs_functions/subs_functions.bas"
do{
#line 2495 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_pos",8));
#line 2495 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2495 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2495,"subs_functions.bas");}while(r);
#line 2496 "subs_functions/subs_functions.bas"
do{
#line 2496 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2496 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2496,"subs_functions.bas");}while(r);
#line 2497 "subs_functions/subs_functions.bas"
do{
#line 2497 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2497 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2497 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2497,"subs_functions.bas");}while(r);
#line 2498 "subs_functions/subs_functions.bas"
do{
#line 2498 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2498 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2498,"subs_functions.bas");}while(r);
#line 2499 "subs_functions/subs_functions.bas"
do{
#line 2499 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("POS(0)",6));
#line 2499 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2499 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2499,"subs_functions.bas");}while(r);
#line 2500 "subs_functions/subs_functions.bas"
do{
#line 2500 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2500 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2500,"subs_functions.bas");}while(r);
#line 2502 "subs_functions/subs_functions.bas"
do{
#line 2502 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2502 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2502,"subs_functions.bas");}while(r);
#line 2503 "subs_functions/subs_functions.bas"
do{
#line 2503 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sgn",3));
#line 2503 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2503 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2503,"subs_functions.bas");}while(r);
#line 2504 "subs_functions/subs_functions.bas"
do{
#line 2504 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2504 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2504,"subs_functions.bas");}while(r);
#line 2505 "subs_functions/subs_functions.bas"
do{
#line 2505 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_sgn",8));
#line 2505 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2505 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2505,"subs_functions.bas");}while(r);
#line 2506 "subs_functions/subs_functions.bas"
do{
#line 2506 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2506 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2506,"subs_functions.bas");}while(r);
#line 2507 "subs_functions/subs_functions.bas"
do{
#line 2507 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2507 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2507 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2507,"subs_functions.bas");}while(r);
#line 2508 "subs_functions/subs_functions.bas"
do{
#line 2508 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2508 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2508,"subs_functions.bas");}while(r);
#line 2509 "subs_functions/subs_functions.bas"
do{
#line 2509 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SGN(value)",10));
#line 2509 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2509 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2509,"subs_functions.bas");}while(r);
#line 2510 "subs_functions/subs_functions.bas"
do{
#line 2510 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2510 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2510,"subs_functions.bas");}while(r);
#line 2512 "subs_functions/subs_functions.bas"
do{
#line 2512 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2512 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2512,"subs_functions.bas");}while(r);
#line 2513 "subs_functions/subs_functions.bas"
do{
#line 2513 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LBound",6));
#line 2513 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2513 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2513,"subs_functions.bas");}while(r);
#line 2514 "subs_functions/subs_functions.bas"
do{
#line 2514 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2514 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2514,"subs_functions.bas");}while(r);
#line 2515 "subs_functions/subs_functions.bas"
do{
#line 2515 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2515 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2515,"subs_functions.bas");}while(r);
#line 2516 "subs_functions/subs_functions.bas"
do{
#line 2516 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2516 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2516 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2516,"subs_functions.bas");}while(r);
#line 2517 "subs_functions/subs_functions.bas"
do{
#line 2517 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,[?]",5));
#line 2517 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2517 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2517,"subs_functions.bas");}while(r);
#line 2518 "subs_functions/subs_functions.bas"
do{
#line 2518 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2518 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2518,"subs_functions.bas");}while(r);
#line 2519 "subs_functions/subs_functions.bas"
do{
#line 2519 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LBOUND(arrayName[, dimension%])",31));
#line 2519 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2519 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2519,"subs_functions.bas");}while(r);
#line 2520 "subs_functions/subs_functions.bas"
do{
#line 2520 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2520 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2520,"subs_functions.bas");}while(r);
#line 2522 "subs_functions/subs_functions.bas"
do{
#line 2522 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2522 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2522,"subs_functions.bas");}while(r);
#line 2523 "subs_functions/subs_functions.bas"
do{
#line 2523 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("UBound",6));
#line 2523 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2523 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2523,"subs_functions.bas");}while(r);
#line 2524 "subs_functions/subs_functions.bas"
do{
#line 2524 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2524 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2524,"subs_functions.bas");}while(r);
#line 2525 "subs_functions/subs_functions.bas"
do{
#line 2525 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2525 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2525,"subs_functions.bas");}while(r);
#line 2526 "subs_functions/subs_functions.bas"
do{
#line 2526 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2526 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2526 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2526,"subs_functions.bas");}while(r);
#line 2527 "subs_functions/subs_functions.bas"
do{
#line 2527 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,[?]",5));
#line 2527 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2527 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2527,"subs_functions.bas");}while(r);
#line 2528 "subs_functions/subs_functions.bas"
do{
#line 2528 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2528 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2528,"subs_functions.bas");}while(r);
#line 2529 "subs_functions/subs_functions.bas"
do{
#line 2529 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("UBOUND(arrayName[, dimension%])",31));
#line 2529 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2529 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2529,"subs_functions.bas");}while(r);
#line 2530 "subs_functions/subs_functions.bas"
do{
#line 2530 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2530 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2530,"subs_functions.bas");}while(r);
#line 2532 "subs_functions/subs_functions.bas"
do{
#line 2532 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2532 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2532,"subs_functions.bas");}while(r);
#line 2533 "subs_functions/subs_functions.bas"
do{
#line 2533 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Bin",4));
#line 2533 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2533 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2533,"subs_functions.bas");}while(r);
#line 2534 "subs_functions/subs_functions.bas"
do{
#line 2534 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2534 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2534 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2534,"subs_functions.bas");}while(r);
#line 2535 "subs_functions/subs_functions.bas"
do{
#line 2535 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2535 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2535,"subs_functions.bas");}while(r);
#line 2536 "subs_functions/subs_functions.bas"
do{
#line 2536 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2536 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2536,"subs_functions.bas");}while(r);
#line 2537 "subs_functions/subs_functions.bas"
do{
#line 2537 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2537 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2537 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2537,"subs_functions.bas");}while(r);
#line 2538 "subs_functions/subs_functions.bas"
do{
#line 2538 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2538 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2538,"subs_functions.bas");}while(r);
#line 2539 "subs_functions/subs_functions.bas"
do{
#line 2539 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BIN$(number)",13));
#line 2539 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2539 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2539,"subs_functions.bas");}while(r);
#line 2540 "subs_functions/subs_functions.bas"
do{
#line 2540 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2540 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2540,"subs_functions.bas");}while(r);
#line 2542 "subs_functions/subs_functions.bas"
do{
#line 2542 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2542 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2542,"subs_functions.bas");}while(r);
#line 2543 "subs_functions/subs_functions.bas"
do{
#line 2543 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Oct",3));
#line 2543 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2543 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2543,"subs_functions.bas");}while(r);
#line 2544 "subs_functions/subs_functions.bas"
do{
#line 2544 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2544 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2544 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2544,"subs_functions.bas");}while(r);
#line 2545 "subs_functions/subs_functions.bas"
do{
#line 2545 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2545 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2545,"subs_functions.bas");}while(r);
#line 2546 "subs_functions/subs_functions.bas"
do{
#line 2546 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2546 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2546,"subs_functions.bas");}while(r);
#line 2547 "subs_functions/subs_functions.bas"
do{
#line 2547 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2547 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2547 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2547,"subs_functions.bas");}while(r);
#line 2548 "subs_functions/subs_functions.bas"
do{
#line 2548 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2548 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2548,"subs_functions.bas");}while(r);
#line 2549 "subs_functions/subs_functions.bas"
do{
#line 2549 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("OCT$(number)",12));
#line 2549 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2549 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2549,"subs_functions.bas");}while(r);
#line 2550 "subs_functions/subs_functions.bas"
do{
#line 2550 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2550 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2550,"subs_functions.bas");}while(r);
#line 2552 "subs_functions/subs_functions.bas"
do{
#line 2552 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2552 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2552,"subs_functions.bas");}while(r);
#line 2553 "subs_functions/subs_functions.bas"
do{
#line 2553 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Hex",3));
#line 2553 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2553 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2553,"subs_functions.bas");}while(r);
#line 2554 "subs_functions/subs_functions.bas"
do{
#line 2554 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2554 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2554 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2554,"subs_functions.bas");}while(r);
#line 2555 "subs_functions/subs_functions.bas"
do{
#line 2555 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2555 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2555,"subs_functions.bas");}while(r);
#line 2556 "subs_functions/subs_functions.bas"
do{
#line 2556 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2556 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2556,"subs_functions.bas");}while(r);
#line 2557 "subs_functions/subs_functions.bas"
do{
#line 2557 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2557 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2557 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2557,"subs_functions.bas");}while(r);
#line 2558 "subs_functions/subs_functions.bas"
do{
#line 2558 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2558 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2558,"subs_functions.bas");}while(r);
#line 2559 "subs_functions/subs_functions.bas"
do{
#line 2559 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("HEX$(decimalNumber)",19));
#line 2559 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2559 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2559,"subs_functions.bas");}while(r);
#line 2560 "subs_functions/subs_functions.bas"
do{
#line 2560 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2560 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2560,"subs_functions.bas");}while(r);
#line 2562 "subs_functions/subs_functions.bas"
do{
#line 2562 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2562 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2562,"subs_functions.bas");}while(r);
#line 2563 "subs_functions/subs_functions.bas"
do{
#line 2563 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sleep",5));
#line 2563 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2563 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2563,"subs_functions.bas");}while(r);
#line 2564 "subs_functions/subs_functions.bas"
do{
#line 2564 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2564 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2564,"subs_functions.bas");}while(r);
#line 2565 "subs_functions/subs_functions.bas"
do{
#line 2565 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_sleep",9));
#line 2565 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2565 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2565,"subs_functions.bas");}while(r);
#line 2566 "subs_functions/subs_functions.bas"
do{
#line 2566 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2566 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2566,"subs_functions.bas");}while(r);
#line 2567 "subs_functions/subs_functions.bas"
do{
#line 2567 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2567 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2567 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2567,"subs_functions.bas");}while(r);
#line 2568 "subs_functions/subs_functions.bas"
do{
#line 2568 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 2568 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2568 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2568,"subs_functions.bas");}while(r);
#line 2569 "subs_functions/subs_functions.bas"
do{
#line 2569 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SLEEP seconds%",14));
#line 2569 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2569 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2569,"subs_functions.bas");}while(r);
#line 2570 "subs_functions/subs_functions.bas"
do{
#line 2570 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2570 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2570,"subs_functions.bas");}while(r);
#line 2572 "subs_functions/subs_functions.bas"
do{
#line 2572 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2572 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2572,"subs_functions.bas");}while(r);
#line 2573 "subs_functions/subs_functions.bas"
do{
#line 2573 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Exp",3));
#line 2573 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2573 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2573,"subs_functions.bas");}while(r);
#line 2574 "subs_functions/subs_functions.bas"
do{
#line 2574 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2574 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2574,"subs_functions.bas");}while(r);
#line 2575 "subs_functions/subs_functions.bas"
do{
#line 2575 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2575 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2575,"subs_functions.bas");}while(r);
#line 2576 "subs_functions/subs_functions.bas"
do{
#line 2576 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2576 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2576 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2576,"subs_functions.bas");}while(r);
#line 2577 "subs_functions/subs_functions.bas"
do{
#line 2577 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 2577 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2577,"subs_functions.bas");}while(r);
#line 2578 "subs_functions/subs_functions.bas"
do{
#line 2578 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("EXP(numericExpression)",22));
#line 2578 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2578 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2578,"subs_functions.bas");}while(r);
#line 2579 "subs_functions/subs_functions.bas"
do{
#line 2579 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2579 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2579,"subs_functions.bas");}while(r);
#line 2581 "subs_functions/subs_functions.bas"
do{
#line 2581 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2581 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2581,"subs_functions.bas");}while(r);
#line 2582 "subs_functions/subs_functions.bas"
do{
#line 2582 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Fix",3));
#line 2582 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2582 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2582,"subs_functions.bas");}while(r);
#line 2583 "subs_functions/subs_functions.bas"
do{
#line 2583 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2583 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2583,"subs_functions.bas");}while(r);
#line 2584 "subs_functions/subs_functions.bas"
do{
#line 2584 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2584 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2584,"subs_functions.bas");}while(r);
#line 2585 "subs_functions/subs_functions.bas"
do{
#line 2585 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2585 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2585 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2585,"subs_functions.bas");}while(r);
#line 2586 "subs_functions/subs_functions.bas"
do{
#line 2586 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 2586 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2586,"subs_functions.bas");}while(r);
#line 2587 "subs_functions/subs_functions.bas"
do{
#line 2587 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("FIX(expression)",15));
#line 2587 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2587 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2587,"subs_functions.bas");}while(r);
#line 2588 "subs_functions/subs_functions.bas"
do{
#line 2588 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2588 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2588,"subs_functions.bas");}while(r);
#line 2590 "subs_functions/subs_functions.bas"
do{
#line 2590 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2590 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2590,"subs_functions.bas");}while(r);
#line 2591 "subs_functions/subs_functions.bas"
do{
#line 2591 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Int",3));
#line 2591 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2591 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2591,"subs_functions.bas");}while(r);
#line 2592 "subs_functions/subs_functions.bas"
do{
#line 2592 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2592 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2592,"subs_functions.bas");}while(r);
#line 2593 "subs_functions/subs_functions.bas"
do{
#line 2593 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2593 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2593,"subs_functions.bas");}while(r);
#line 2594 "subs_functions/subs_functions.bas"
do{
#line 2594 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2594 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2594 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2594,"subs_functions.bas");}while(r);
#line 2595 "subs_functions/subs_functions.bas"
do{
#line 2595 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 2595 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2595,"subs_functions.bas");}while(r);
#line 2596 "subs_functions/subs_functions.bas"
do{
#line 2596 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("INT(expression)",15));
#line 2596 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2596 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2596,"subs_functions.bas");}while(r);
#line 2597 "subs_functions/subs_functions.bas"
do{
#line 2597 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2597 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2597,"subs_functions.bas");}while(r);
#line 2599 "subs_functions/subs_functions.bas"
do{
#line 2599 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2599 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2599,"subs_functions.bas");}while(r);
#line 2600 "subs_functions/subs_functions.bas"
do{
#line 2600 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CDbl",4));
#line 2600 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2600 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2600,"subs_functions.bas");}while(r);
#line 2601 "subs_functions/subs_functions.bas"
do{
#line 2601 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2601 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2601,"subs_functions.bas");}while(r);
#line 2602 "subs_functions/subs_functions.bas"
do{
#line 2602 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2602 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2602,"subs_functions.bas");}while(r);
#line 2603 "subs_functions/subs_functions.bas"
do{
#line 2603 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2603 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2603 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2603,"subs_functions.bas");}while(r);
#line 2604 "subs_functions/subs_functions.bas"
do{
#line 2604 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2604 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2604,"subs_functions.bas");}while(r);
#line 2605 "subs_functions/subs_functions.bas"
do{
#line 2605 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CDBL(expression)",16));
#line 2605 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2605 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2605,"subs_functions.bas");}while(r);
#line 2606 "subs_functions/subs_functions.bas"
do{
#line 2606 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2606 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2606,"subs_functions.bas");}while(r);
#line 2608 "subs_functions/subs_functions.bas"
do{
#line 2608 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2608 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2608,"subs_functions.bas");}while(r);
#line 2609 "subs_functions/subs_functions.bas"
do{
#line 2609 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CSng",4));
#line 2609 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2609 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2609,"subs_functions.bas");}while(r);
#line 2610 "subs_functions/subs_functions.bas"
do{
#line 2610 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2610 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2610,"subs_functions.bas");}while(r);
#line 2611 "subs_functions/subs_functions.bas"
do{
#line 2611 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2611 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2611,"subs_functions.bas");}while(r);
#line 2612 "subs_functions/subs_functions.bas"
do{
#line 2612 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2612 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2612 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2612,"subs_functions.bas");}while(r);
#line 2613 "subs_functions/subs_functions.bas"
do{
#line 2613 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 2613 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2613,"subs_functions.bas");}while(r);
#line 2614 "subs_functions/subs_functions.bas"
do{
#line 2614 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CSNG(expression)",16));
#line 2614 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2614 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2614,"subs_functions.bas");}while(r);
#line 2615 "subs_functions/subs_functions.bas"
do{
#line 2615 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2615 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2615,"subs_functions.bas");}while(r);
#line 2617 "subs_functions/subs_functions.bas"
do{
#line 2617 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2617 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2617,"subs_functions.bas");}while(r);
#line 2618 "subs_functions/subs_functions.bas"
do{
#line 2618 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Round",6));
#line 2618 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2618 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2618,"subs_functions.bas");}while(r);
#line 2619 "subs_functions/subs_functions.bas"
do{
#line 2619 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2619 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2619,"subs_functions.bas");}while(r);
#line 2620 "subs_functions/subs_functions.bas"
do{
#line 2620 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2620 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2620,"subs_functions.bas");}while(r);
#line 2621 "subs_functions/subs_functions.bas"
do{
#line 2621 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2621 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2621 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2621,"subs_functions.bas");}while(r);
#line 2622 "subs_functions/subs_functions.bas"
do{
#line 2622 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
#line 2622 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2622,"subs_functions.bas");}while(r);
#line 2623 "subs_functions/subs_functions.bas"
do{
#line 2623 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ROUND(number)",14));
#line 2623 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2623 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2623,"subs_functions.bas");}while(r);
#line 2624 "subs_functions/subs_functions.bas"
do{
#line 2624 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2624 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2624,"subs_functions.bas");}while(r);
#line 2626 "subs_functions/subs_functions.bas"
do{
#line 2626 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2626 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2626,"subs_functions.bas");}while(r);
#line 2627 "subs_functions/subs_functions.bas"
do{
#line 2627 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CInt",4));
#line 2627 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2627 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2627,"subs_functions.bas");}while(r);
#line 2628 "subs_functions/subs_functions.bas"
do{
#line 2628 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2628 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2628,"subs_functions.bas");}while(r);
#line 2629 "subs_functions/subs_functions.bas"
do{
#line 2629 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2629 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2629,"subs_functions.bas");}while(r);
#line 2630 "subs_functions/subs_functions.bas"
do{
#line 2630 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2630 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2630 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2630,"subs_functions.bas");}while(r);
#line 2631 "subs_functions/subs_functions.bas"
do{
#line 2631 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
#line 2631 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2631,"subs_functions.bas");}while(r);
#line 2632 "subs_functions/subs_functions.bas"
do{
#line 2632 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CINT(expression)",16));
#line 2632 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2632 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2632,"subs_functions.bas");}while(r);
#line 2633 "subs_functions/subs_functions.bas"
do{
#line 2633 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2633 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2633,"subs_functions.bas");}while(r);
#line 2635 "subs_functions/subs_functions.bas"
do{
#line 2635 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2635 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2635,"subs_functions.bas");}while(r);
#line 2636 "subs_functions/subs_functions.bas"
do{
#line 2636 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CLng",4));
#line 2636 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2636 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2636,"subs_functions.bas");}while(r);
#line 2637 "subs_functions/subs_functions.bas"
do{
#line 2637 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2637 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2637,"subs_functions.bas");}while(r);
#line 2638 "subs_functions/subs_functions.bas"
do{
#line 2638 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2638 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2638,"subs_functions.bas");}while(r);
#line 2639 "subs_functions/subs_functions.bas"
do{
#line 2639 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 2639 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2639 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2639,"subs_functions.bas");}while(r);
#line 2640 "subs_functions/subs_functions.bas"
do{
#line 2640 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
#line 2640 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2640,"subs_functions.bas");}while(r);
#line 2641 "subs_functions/subs_functions.bas"
do{
#line 2641 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CLNG(expression)",16));
#line 2641 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2641 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2641,"subs_functions.bas");}while(r);
#line 2642 "subs_functions/subs_functions.bas"
do{
#line 2642 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2642 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2642,"subs_functions.bas");}while(r);
#line 2644 "subs_functions/subs_functions.bas"
do{
#line 2644 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2644 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2644,"subs_functions.bas");}while(r);
#line 2645 "subs_functions/subs_functions.bas"
do{
#line 2645 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Time",4));
#line 2645 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2645 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2645,"subs_functions.bas");}while(r);
#line 2646 "subs_functions/subs_functions.bas"
do{
#line 2646 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2646 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2646 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2646,"subs_functions.bas");}while(r);
#line 2647 "subs_functions/subs_functions.bas"
do{
#line 2647 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2647 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2647,"subs_functions.bas");}while(r);
#line 2648 "subs_functions/subs_functions.bas"
do{
#line 2648 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_time",8));
#line 2648 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2648 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2648,"subs_functions.bas");}while(r);
#line 2649 "subs_functions/subs_functions.bas"
do{
#line 2649 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2649 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2649,"subs_functions.bas");}while(r);
#line 2650 "subs_functions/subs_functions.bas"
do{
#line 2650 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2650 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2650 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2650,"subs_functions.bas");}while(r);
#line 2651 "subs_functions/subs_functions.bas"
do{
#line 2651 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("=?",2));
#line 2651 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2651 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2651,"subs_functions.bas");}while(r);
#line 2652 "subs_functions/subs_functions.bas"
do{
#line 2652 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TIME$ = timeToSet$",18));
#line 2652 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2652 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2652,"subs_functions.bas");}while(r);
#line 2653 "subs_functions/subs_functions.bas"
do{
#line 2653 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2653 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2653,"subs_functions.bas");}while(r);
#line 2655 "subs_functions/subs_functions.bas"
do{
#line 2655 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2655 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2655,"subs_functions.bas");}while(r);
#line 2656 "subs_functions/subs_functions.bas"
do{
#line 2656 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Time",4));
#line 2656 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2656 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2656,"subs_functions.bas");}while(r);
#line 2657 "subs_functions/subs_functions.bas"
do{
#line 2657 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2657 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2657 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2657,"subs_functions.bas");}while(r);
#line 2658 "subs_functions/subs_functions.bas"
do{
#line 2658 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2658 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2658,"subs_functions.bas");}while(r);
#line 2659 "subs_functions/subs_functions.bas"
do{
#line 2659 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_time",9));
#line 2659 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2659 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2659,"subs_functions.bas");}while(r);
#line 2660 "subs_functions/subs_functions.bas"
do{
#line 2660 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2660 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2660,"subs_functions.bas");}while(r);
#line 2661 "subs_functions/subs_functions.bas"
do{
#line 2661 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TIME$",5));
#line 2661 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2661 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2661,"subs_functions.bas");}while(r);
#line 2662 "subs_functions/subs_functions.bas"
do{
#line 2662 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2662 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2662,"subs_functions.bas");}while(r);
#line 2664 "subs_functions/subs_functions.bas"
do{
#line 2664 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2664 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2664,"subs_functions.bas");}while(r);
#line 2665 "subs_functions/subs_functions.bas"
do{
#line 2665 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Date",4));
#line 2665 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2665 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2665,"subs_functions.bas");}while(r);
#line 2666 "subs_functions/subs_functions.bas"
do{
#line 2666 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2666 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2666 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2666,"subs_functions.bas");}while(r);
#line 2667 "subs_functions/subs_functions.bas"
do{
#line 2667 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2667 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2667,"subs_functions.bas");}while(r);
#line 2668 "subs_functions/subs_functions.bas"
do{
#line 2668 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_date",8));
#line 2668 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2668 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2668,"subs_functions.bas");}while(r);
#line 2669 "subs_functions/subs_functions.bas"
do{
#line 2669 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2669 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2669,"subs_functions.bas");}while(r);
#line 2670 "subs_functions/subs_functions.bas"
do{
#line 2670 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2670 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2670 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2670,"subs_functions.bas");}while(r);
#line 2671 "subs_functions/subs_functions.bas"
do{
#line 2671 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("=?",2));
#line 2671 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2671 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2671,"subs_functions.bas");}while(r);
#line 2672 "subs_functions/subs_functions.bas"
do{
#line 2672 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("DATE$ = dateToSet$",18));
#line 2672 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2672 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2672,"subs_functions.bas");}while(r);
#line 2673 "subs_functions/subs_functions.bas"
do{
#line 2673 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2673 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2673,"subs_functions.bas");}while(r);
#line 2675 "subs_functions/subs_functions.bas"
do{
#line 2675 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2675 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2675,"subs_functions.bas");}while(r);
#line 2676 "subs_functions/subs_functions.bas"
do{
#line 2676 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Date",4));
#line 2676 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2676 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2676,"subs_functions.bas");}while(r);
#line 2677 "subs_functions/subs_functions.bas"
do{
#line 2677 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2677 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2677 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2677,"subs_functions.bas");}while(r);
#line 2678 "subs_functions/subs_functions.bas"
do{
#line 2678 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2678 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2678,"subs_functions.bas");}while(r);
#line 2679 "subs_functions/subs_functions.bas"
do{
#line 2679 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_date",9));
#line 2679 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2679 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2679,"subs_functions.bas");}while(r);
#line 2680 "subs_functions/subs_functions.bas"
do{
#line 2680 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2680 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2680,"subs_functions.bas");}while(r);
#line 2681 "subs_functions/subs_functions.bas"
do{
#line 2681 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("DATE$",5));
#line 2681 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2681 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2681,"subs_functions.bas");}while(r);
#line 2682 "subs_functions/subs_functions.bas"
do{
#line 2682 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2682 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2682,"subs_functions.bas");}while(r);
#line 2684 "subs_functions/subs_functions.bas"
do{
#line 2684 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2684 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2684,"subs_functions.bas");}while(r);
#line 2685 "subs_functions/subs_functions.bas"
do{
#line 2685 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CsrLin",6));
#line 2685 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2685 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2685,"subs_functions.bas");}while(r);
#line 2686 "subs_functions/subs_functions.bas"
do{
#line 2686 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2686 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2686,"subs_functions.bas");}while(r);
#line 2687 "subs_functions/subs_functions.bas"
do{
#line 2687 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_csrlin",11));
#line 2687 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2687 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2687,"subs_functions.bas");}while(r);
#line 2688 "subs_functions/subs_functions.bas"
do{
#line 2688 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2688 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2688,"subs_functions.bas");}while(r);
#line 2689 "subs_functions/subs_functions.bas"
do{
#line 2689 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CSRLIN",6));
#line 2689 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2689 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2689,"subs_functions.bas");}while(r);
#line 2690 "subs_functions/subs_functions.bas"
do{
#line 2690 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2690 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2690,"subs_functions.bas");}while(r);
#line 2693 "subs_functions/subs_functions.bas"
do{
#line 2693 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2693 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2693,"subs_functions.bas");}while(r);
#line 2694 "subs_functions/subs_functions.bas"
do{
#line 2694 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Paint",5));
#line 2694 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2694 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2694,"subs_functions.bas");}while(r);
#line 2695 "subs_functions/subs_functions.bas"
do{
#line 2695 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2695 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2695,"subs_functions.bas");}while(r);
#line 2696 "subs_functions/subs_functions.bas"
do{
#line 2696 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_paint",9));
#line 2696 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2696 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2696,"subs_functions.bas");}while(r);
#line 2697 "subs_functions/subs_functions.bas"
do{
#line 2697 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 2697 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2697,"subs_functions.bas");}while(r);
#line 2698 "subs_functions/subs_functions.bas"
do{
#line 2698 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2698 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2698 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2698,"subs_functions.bas");}while(r);
#line 2699 "subs_functions/subs_functions.bas"
do{
#line 2699 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?)[,[?][,[?][,?]]]",29));
#line 2699 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2699 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2699,"subs_functions.bas");}while(r);
#line 2701 "subs_functions/subs_functions.bas"
do{
#line 2701 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PAINT [STEP] (x!, y!)[,[fillColor&] [,[bordercolor&] [,pattern$]]]",66));
#line 2701 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2701 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2701,"subs_functions.bas");}while(r);
#line 2702 "subs_functions/subs_functions.bas"
do{
#line 2702 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2702 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2702,"subs_functions.bas");}while(r);
#line 2704 "subs_functions/subs_functions.bas"
do{
#line 2704 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2704 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2704,"subs_functions.bas");}while(r);
#line 2705 "subs_functions/subs_functions.bas"
do{
#line 2705 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Circle",6));
#line 2705 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2705 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2705,"subs_functions.bas");}while(r);
#line 2706 "subs_functions/subs_functions.bas"
do{
#line 2706 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2706 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2706,"subs_functions.bas");}while(r);
#line 2707 "subs_functions/subs_functions.bas"
do{
#line 2707 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_circle",10));
#line 2707 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2707 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2707,"subs_functions.bas");}while(r);
#line 2708 "subs_functions/subs_functions.bas"
do{
#line 2708 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 7 ;
#line 2708 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2708,"subs_functions.bas");}while(r);
#line 2709 "subs_functions/subs_functions.bas"
do{
#line 2709 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
#line 2709 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2709 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2709,"subs_functions.bas");}while(r);
#line 2710 "subs_functions/subs_functions.bas"
do{
#line 2710 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[?][,[?][,[?][,?]]]]",37));
#line 2710 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2710 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2710,"subs_functions.bas");}while(r);
#line 2712 "subs_functions/subs_functions.bas"
do{
#line 2712 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CIRCLE [STEP] (x!, y!), radius![, [color&] [, [start!] [, [end!] [, aspect!]]]]",79));
#line 2712 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2712 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2712,"subs_functions.bas");}while(r);
#line 2713 "subs_functions/subs_functions.bas"
do{
#line 2713 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2713 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2713,"subs_functions.bas");}while(r);
#line 2715 "subs_functions/subs_functions.bas"
do{
#line 2715 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2715 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2715,"subs_functions.bas");}while(r);
#line 2716 "subs_functions/subs_functions.bas"
do{
#line 2716 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("BLoad",5));
#line 2716 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2716 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2716,"subs_functions.bas");}while(r);
#line 2717 "subs_functions/subs_functions.bas"
do{
#line 2717 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2717 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2717,"subs_functions.bas");}while(r);
#line 2718 "subs_functions/subs_functions.bas"
do{
#line 2718 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_bload",9));
#line 2718 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2718 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2718,"subs_functions.bas");}while(r);
#line 2719 "subs_functions/subs_functions.bas"
do{
#line 2719 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2719 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2719,"subs_functions.bas");}while(r);
#line 2720 "subs_functions/subs_functions.bas"
do{
#line 2720 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2720 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2720 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2720,"subs_functions.bas");}while(r);
#line 2721 "subs_functions/subs_functions.bas"
do{
#line 2721 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2721 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2721 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2721,"subs_functions.bas");}while(r);
#line 2722 "subs_functions/subs_functions.bas"
do{
#line 2722 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("BLOAD fileName$, VARPTR(imageArray%(index))",43));
#line 2722 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2722 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2722,"subs_functions.bas");}while(r);
#line 2723 "subs_functions/subs_functions.bas"
do{
#line 2723 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2723 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2723,"subs_functions.bas");}while(r);
#line 2725 "subs_functions/subs_functions.bas"
do{
#line 2725 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2725 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2725,"subs_functions.bas");}while(r);
#line 2726 "subs_functions/subs_functions.bas"
do{
#line 2726 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("BSave",5));
#line 2726 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2726 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2726,"subs_functions.bas");}while(r);
#line 2727 "subs_functions/subs_functions.bas"
do{
#line 2727 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2727 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2727,"subs_functions.bas");}while(r);
#line 2728 "subs_functions/subs_functions.bas"
do{
#line 2728 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_bsave",9));
#line 2728 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2728 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2728,"subs_functions.bas");}while(r);
#line 2729 "subs_functions/subs_functions.bas"
do{
#line 2729 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2729 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2729,"subs_functions.bas");}while(r);
#line 2730 "subs_functions/subs_functions.bas"
do{
#line 2730 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2730 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2730 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2730,"subs_functions.bas");}while(r);
#line 2731 "subs_functions/subs_functions.bas"
do{
#line 2731 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("BSAVE saveFile$, VARPTR(array(index)), fileSize&",48));
#line 2731 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2731 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2731,"subs_functions.bas");}while(r);
#line 2732 "subs_functions/subs_functions.bas"
do{
#line 2732 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2732 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2732,"subs_functions.bas");}while(r);
#line 2735 "subs_functions/subs_functions.bas"
do{
#line 2735 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2735 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2735,"subs_functions.bas");}while(r);
#line 2736 "subs_functions/subs_functions.bas"
do{
#line 2736 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
#line 2736 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2736 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2736,"subs_functions.bas");}while(r);
#line 2737 "subs_functions/subs_functions.bas"
do{
#line 2737 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2737 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2737,"subs_functions.bas");}while(r);
#line 2738 "subs_functions/subs_functions.bas"
do{
#line 2738 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_graphics_get",16));
#line 2738 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2738 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2738,"subs_functions.bas");}while(r);
#line 2739 "subs_functions/subs_functions.bas"
do{
#line 2739 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 6 ;
#line 2739 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2739,"subs_functions.bas");}while(r);
#line 2740 "subs_functions/subs_functions.bas"
do{
#line 2740 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2740 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2740 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2740,"subs_functions.bas");}while(r);
#line 2741 "subs_functions/subs_functions.bas"
do{
#line 2741 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33));
#line 2741 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2741 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2741,"subs_functions.bas");}while(r);
#line 2742 "subs_functions/subs_functions.bas"
do{
#line 2742 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("Step",4));
#line 2742 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2742 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2742,"subs_functions.bas");}while(r);
#line 2743 "subs_functions/subs_functions.bas"
do{
#line 2743 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82));
#line 2743 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2743 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2743,"subs_functions.bas");}while(r);
#line 2744 "subs_functions/subs_functions.bas"
do{
#line 2744 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2744 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2744,"subs_functions.bas");}while(r);
#line 2746 "subs_functions/subs_functions.bas"
do{
#line 2746 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2746 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2746,"subs_functions.bas");}while(r);
#line 2747 "subs_functions/subs_functions.bas"
do{
#line 2747 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
#line 2747 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2747 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2747,"subs_functions.bas");}while(r);
#line 2748 "subs_functions/subs_functions.bas"
do{
#line 2748 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2748 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2748,"subs_functions.bas");}while(r);
#line 2749 "subs_functions/subs_functions.bas"
do{
#line 2749 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_graphics_get",16));
#line 2749 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2749 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2749,"subs_functions.bas");}while(r);
#line 2750 "subs_functions/subs_functions.bas"
do{
#line 2750 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 6 ;
#line 2750 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2750,"subs_functions.bas");}while(r);
#line 2751 "subs_functions/subs_functions.bas"
do{
#line 2751 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2751 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2751 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2751,"subs_functions.bas");}while(r);
#line 2752 "subs_functions/subs_functions.bas"
do{
#line 2752 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33));
#line 2752 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2752 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2752,"subs_functions.bas");}while(r);
#line 2753 "subs_functions/subs_functions.bas"
do{
#line 2753 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("(",1));
#line 2753 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2753 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2753,"subs_functions.bas");}while(r);
#line 2754 "subs_functions/subs_functions.bas"
do{
#line 2754 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82));
#line 2754 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2754 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2754,"subs_functions.bas");}while(r);
#line 2755 "subs_functions/subs_functions.bas"
do{
#line 2755 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2755 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2755,"subs_functions.bas");}while(r);
#line 2758 "subs_functions/subs_functions.bas"
do{
#line 2758 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2758 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2758,"subs_functions.bas");}while(r);
#line 2759 "subs_functions/subs_functions.bas"
do{
#line 2759 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
#line 2759 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2759 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2759,"subs_functions.bas");}while(r);
#line 2760 "subs_functions/subs_functions.bas"
do{
#line 2760 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2760 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2760,"subs_functions.bas");}while(r);
#line 2761 "subs_functions/subs_functions.bas"
do{
#line 2761 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_graphics_put",16));
#line 2761 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2761 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2761,"subs_functions.bas");}while(r);
#line 2762 "subs_functions/subs_functions.bas"
do{
#line 2762 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 2762 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2762,"subs_functions.bas");}while(r);
#line 2763 "subs_functions/subs_functions.bas"
do{
#line 2763 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2763 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2763 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2763,"subs_functions.bas");}while(r);
#line 2764 "subs_functions/subs_functions.bas"
do{
#line 2764 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57));
#line 2764 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2764 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2764,"subs_functions.bas");}while(r);
#line 2767 "subs_functions/subs_functions.bas"
do{
#line 2767 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("Step",4));
#line 2767 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2767 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2767,"subs_functions.bas");}while(r);
#line 2768 "subs_functions/subs_functions.bas"
do{
#line 2768 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP]  [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92));
#line 2768 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2768 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2768,"subs_functions.bas");}while(r);
#line 2769 "subs_functions/subs_functions.bas"
do{
#line 2769 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2769 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2769,"subs_functions.bas");}while(r);
#line 2771 "subs_functions/subs_functions.bas"
do{
#line 2771 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2771 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2771,"subs_functions.bas");}while(r);
#line 2772 "subs_functions/subs_functions.bas"
do{
#line 2772 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
#line 2772 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2772 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2772,"subs_functions.bas");}while(r);
#line 2773 "subs_functions/subs_functions.bas"
do{
#line 2773 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2773 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2773,"subs_functions.bas");}while(r);
#line 2774 "subs_functions/subs_functions.bas"
do{
#line 2774 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_graphics_put",16));
#line 2774 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2774 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2774,"subs_functions.bas");}while(r);
#line 2775 "subs_functions/subs_functions.bas"
do{
#line 2775 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 2775 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2775,"subs_functions.bas");}while(r);
#line 2776 "subs_functions/subs_functions.bas"
do{
#line 2776 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string( -3 )),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 2776 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2776 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2776,"subs_functions.bas");}while(r);
#line 2777 "subs_functions/subs_functions.bas"
do{
#line 2777 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57));
#line 2777 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2777 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2777,"subs_functions.bas");}while(r);
#line 2780 "subs_functions/subs_functions.bas"
do{
#line 2780 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("(",1));
#line 2780 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2780 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2780,"subs_functions.bas");}while(r);
#line 2781 "subs_functions/subs_functions.bas"
do{
#line 2781 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP]  [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92));
#line 2781 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2781 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2781,"subs_functions.bas");}while(r);
#line 2782 "subs_functions/subs_functions.bas"
do{
#line 2782 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2782 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2782,"subs_functions.bas");}while(r);
#line 2784 "subs_functions/subs_functions.bas"
do{
#line 2784 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2784 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2784,"subs_functions.bas");}while(r);
#line 2785 "subs_functions/subs_functions.bas"
do{
#line 2785 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
#line 2785 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2785 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2785,"subs_functions.bas");}while(r);
#line 2786 "subs_functions/subs_functions.bas"
do{
#line 2786 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2786 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2786,"subs_functions.bas");}while(r);
#line 2787 "subs_functions/subs_functions.bas"
do{
#line 2787 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_get",7));
#line 2787 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2787 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2787,"subs_functions.bas");}while(r);
#line 2788 "subs_functions/subs_functions.bas"
do{
#line 2788 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2788 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2788,"subs_functions.bas");}while(r);
#line 2789 "subs_functions/subs_functions.bas"
do{
#line 2789 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 )));
#line 2789 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2789 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2789,"subs_functions.bas");}while(r);
#line 2791 "subs_functions/subs_functions.bas"
do{
#line 2791 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14));
#line 2791 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2791 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2791,"subs_functions.bas");}while(r);
#line 2792 "subs_functions/subs_functions.bas"
do{
#line 2792 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("GET #fileNumber&, [position][, targetVariable|targetArray()}]",61));
#line 2792 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2792 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2792,"subs_functions.bas");}while(r);
#line 2793 "subs_functions/subs_functions.bas"
do{
#line 2793 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2793 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2793,"subs_functions.bas");}while(r);
#line 2795 "subs_functions/subs_functions.bas"
do{
#line 2795 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2795 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2795,"subs_functions.bas");}while(r);
#line 2796 "subs_functions/subs_functions.bas"
do{
#line 2796 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
#line 2796 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2796 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2796,"subs_functions.bas");}while(r);
#line 2797 "subs_functions/subs_functions.bas"
do{
#line 2797 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2797 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2797,"subs_functions.bas");}while(r);
#line 2798 "subs_functions/subs_functions.bas"
do{
#line 2798 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_put",7));
#line 2798 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2798 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2798,"subs_functions.bas");}while(r);
#line 2799 "subs_functions/subs_functions.bas"
do{
#line 2799 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 2799 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2799,"subs_functions.bas");}while(r);
#line 2800 "subs_functions/subs_functions.bas"
do{
#line 2800 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 )));
#line 2800 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2800 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2800,"subs_functions.bas");}while(r);
#line 2802 "subs_functions/subs_functions.bas"
do{
#line 2802 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14));
#line 2802 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2802 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2802,"subs_functions.bas");}while(r);
#line 2803 "subs_functions/subs_functions.bas"
do{
#line 2803 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PUT #filenumber&, [position][, {holdingvariable|holdingarray()}]",64));
#line 2803 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2803 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2803,"subs_functions.bas");}while(r);
#line 2804 "subs_functions/subs_functions.bas"
do{
#line 2804 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2804 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2804,"subs_functions.bas");}while(r);
#line 2806 "subs_functions/subs_functions.bas"
do{
#line 2806 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2806 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2806,"subs_functions.bas");}while(r);
#line 2807 "subs_functions/subs_functions.bas"
do{
#line 2807 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Open",4));
#line 2807 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2807 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2807,"subs_functions.bas");}while(r);
#line 2808 "subs_functions/subs_functions.bas"
do{
#line 2808 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2808 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2808,"subs_functions.bas");}while(r);
#line 2809 "subs_functions/subs_functions.bas"
do{
#line 2809 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_open",8));
#line 2809 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2809 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2809,"subs_functions.bas");}while(r);
#line 2810 "subs_functions/subs_functions.bas"
do{
#line 2810 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 6 ;
#line 2810 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2810,"subs_functions.bas");}while(r);
#line 2811 "subs_functions/subs_functions.bas"
do{
#line 2811 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2811 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2811 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2811,"subs_functions.bas");}while(r);
#line 2812 "subs_functions/subs_functions.bas"
do{
#line 2812 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[{For Random|For Binary|For Input|For Output|For Append}][{Access Read Write|Access Read|Access Write}][{Shared|Lock Read Write|Lock Read|Lock Write}]{As}[#]?[{Len =}?]",169));
#line 2812 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2812 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2812,"subs_functions.bas");}while(r);
#line 2813 "subs_functions/subs_functions.bas"
do{
#line 2813 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("OPEN fileName$ [FOR mode] [ACCESS|LOCK|SHARED [{READ|WRITE}] AS [#]fileNumber& [LEN = recordLength]",99));
#line 2813 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2813 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2813,"subs_functions.bas");}while(r);
#line 2814 "subs_functions/subs_functions.bas"
do{
#line 2814 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2814 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2814,"subs_functions.bas");}while(r);
#line 2816 "subs_functions/subs_functions.bas"
do{
#line 2816 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2816 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2816,"subs_functions.bas");}while(r);
#line 2817 "subs_functions/subs_functions.bas"
do{
#line 2817 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Open",4));
#line 2817 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2817 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2817,"subs_functions.bas");}while(r);
#line 2818 "subs_functions/subs_functions.bas"
do{
#line 2818 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 2818 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2818,"subs_functions.bas");}while(r);
#line 2819 "subs_functions/subs_functions.bas"
do{
#line 2819 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_open_gwbasic",16));
#line 2819 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2819 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2819,"subs_functions.bas");}while(r);
#line 2820 "subs_functions/subs_functions.bas"
do{
#line 2820 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 2820 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2820,"subs_functions.bas");}while(r);
#line 2821 "subs_functions/subs_functions.bas"
do{
#line 2821 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2821 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2821 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2821,"subs_functions.bas");}while(r);
#line 2822 "subs_functions/subs_functions.bas"
do{
#line 2822 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,[#]?,?[,?]",12));
#line 2822 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2822 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2822,"subs_functions.bas");}while(r);
#line 2823 "subs_functions/subs_functions.bas"
do{
#line 2823 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("OPEN modeLetter$, [#]fileNumber&, fileName$[, recordLength]",59));
#line 2823 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2823 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2823,"subs_functions.bas");}while(r);
#line 2824 "subs_functions/subs_functions.bas"
do{
#line 2824 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2824 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2824,"subs_functions.bas");}while(r);
#line 2826 "subs_functions/subs_functions.bas"
do{
#line 2826 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2826 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2826,"subs_functions.bas");}while(r);
#line 2827 "subs_functions/subs_functions.bas"
do{
#line 2827 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Val",3));
#line 2827 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2827 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2827,"subs_functions.bas");}while(r);
#line 2828 "subs_functions/subs_functions.bas"
do{
#line 2828 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2828 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2828,"subs_functions.bas");}while(r);
#line 2830 "subs_functions/subs_functions.bas"
do{
#line 2830 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2830 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2830,"subs_functions.bas");}while(r);
#line 2831 "subs_functions/subs_functions.bas"
do{
#line 2831 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2831 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2831 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2831,"subs_functions.bas");}while(r);
#line 2832 "subs_functions/subs_functions.bas"
do{
#line 2832 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 2832 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2832 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2832,"subs_functions.bas");}while(r);
#line 2833 "subs_functions/subs_functions.bas"
do{
#line 2833 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2833 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2833,"subs_functions.bas");}while(r);
#line 2834 "subs_functions/subs_functions.bas"
do{
#line 2834 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VAL(stringValue$[, numericalType])",34));
#line 2834 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2834 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2834,"subs_functions.bas");}while(r);
#line 2835 "subs_functions/subs_functions.bas"
do{
#line 2835 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2835 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2835,"subs_functions.bas");}while(r);
#line 2837 "subs_functions/subs_functions.bas"
do{
#line 2837 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2837 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2837,"subs_functions.bas");}while(r);
#line 2838 "subs_functions/subs_functions.bas"
do{
#line 2838 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKSMBF",6));
#line 2838 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2838 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2838,"subs_functions.bas");}while(r);
#line 2839 "subs_functions/subs_functions.bas"
do{
#line 2839 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2839 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2839 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2839,"subs_functions.bas");}while(r);
#line 2840 "subs_functions/subs_functions.bas"
do{
#line 2840 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2840 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2840,"subs_functions.bas");}while(r);
#line 2841 "subs_functions/subs_functions.bas"
do{
#line 2841 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_mksmbf",11));
#line 2841 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2841 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2841,"subs_functions.bas");}while(r);
#line 2842 "subs_functions/subs_functions.bas"
do{
#line 2842 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2842 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2842,"subs_functions.bas");}while(r);
#line 2843 "subs_functions/subs_functions.bas"
do{
#line 2843 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER));
#line 2843 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2843 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2843,"subs_functions.bas");}while(r);
#line 2844 "subs_functions/subs_functions.bas"
do{
#line 2844 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2844 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2844,"subs_functions.bas");}while(r);
#line 2845 "subs_functions/subs_functions.bas"
do{
#line 2845 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKSMBF$(value!)",15));
#line 2845 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2845 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2845,"subs_functions.bas");}while(r);
#line 2846 "subs_functions/subs_functions.bas"
do{
#line 2846 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2846 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2846,"subs_functions.bas");}while(r);
#line 2848 "subs_functions/subs_functions.bas"
do{
#line 2848 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2848 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2848,"subs_functions.bas");}while(r);
#line 2849 "subs_functions/subs_functions.bas"
do{
#line 2849 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKDMBF",6));
#line 2849 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2849 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2849,"subs_functions.bas");}while(r);
#line 2850 "subs_functions/subs_functions.bas"
do{
#line 2850 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2850 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2850 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2850,"subs_functions.bas");}while(r);
#line 2851 "subs_functions/subs_functions.bas"
do{
#line 2851 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2851 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2851,"subs_functions.bas");}while(r);
#line 2852 "subs_functions/subs_functions.bas"
do{
#line 2852 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_mkdmbf",11));
#line 2852 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2852 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2852,"subs_functions.bas");}while(r);
#line 2853 "subs_functions/subs_functions.bas"
do{
#line 2853 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2853 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2853,"subs_functions.bas");}while(r);
#line 2854 "subs_functions/subs_functions.bas"
do{
#line 2854 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 2854 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2854 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2854,"subs_functions.bas");}while(r);
#line 2855 "subs_functions/subs_functions.bas"
do{
#line 2855 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2855 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2855,"subs_functions.bas");}while(r);
#line 2856 "subs_functions/subs_functions.bas"
do{
#line 2856 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKDMBF$(value#)",15));
#line 2856 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2856 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2856,"subs_functions.bas");}while(r);
#line 2857 "subs_functions/subs_functions.bas"
do{
#line 2857 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2857 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2857,"subs_functions.bas");}while(r);
#line 2859 "subs_functions/subs_functions.bas"
do{
#line 2859 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2859 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2859,"subs_functions.bas");}while(r);
#line 2860 "subs_functions/subs_functions.bas"
do{
#line 2860 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKI",3));
#line 2860 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2860 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2860,"subs_functions.bas");}while(r);
#line 2861 "subs_functions/subs_functions.bas"
do{
#line 2861 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2861 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2861 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2861,"subs_functions.bas");}while(r);
#line 2862 "subs_functions/subs_functions.bas"
do{
#line 2862 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2862 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2862,"subs_functions.bas");}while(r);
#line 2863 "subs_functions/subs_functions.bas"
do{
#line 2863 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2863 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2863 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2863,"subs_functions.bas");}while(r);
#line 2864 "subs_functions/subs_functions.bas"
do{
#line 2864 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2864 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2864,"subs_functions.bas");}while(r);
#line 2865 "subs_functions/subs_functions.bas"
do{
#line 2865 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER));
#line 2865 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2865 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2865,"subs_functions.bas");}while(r);
#line 2866 "subs_functions/subs_functions.bas"
do{
#line 2866 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2866 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2866,"subs_functions.bas");}while(r);
#line 2867 "subs_functions/subs_functions.bas"
do{
#line 2867 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKI$(integerVariableOrLiteral%)",31));
#line 2867 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2867 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2867,"subs_functions.bas");}while(r);
#line 2868 "subs_functions/subs_functions.bas"
do{
#line 2868 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2868 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2868,"subs_functions.bas");}while(r);
#line 2870 "subs_functions/subs_functions.bas"
do{
#line 2870 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2870 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2870,"subs_functions.bas");}while(r);
#line 2871 "subs_functions/subs_functions.bas"
do{
#line 2871 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKL",3));
#line 2871 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2871 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2871,"subs_functions.bas");}while(r);
#line 2872 "subs_functions/subs_functions.bas"
do{
#line 2872 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2872 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2872 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2872,"subs_functions.bas");}while(r);
#line 2873 "subs_functions/subs_functions.bas"
do{
#line 2873 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2873 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2873,"subs_functions.bas");}while(r);
#line 2874 "subs_functions/subs_functions.bas"
do{
#line 2874 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2874 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2874 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2874,"subs_functions.bas");}while(r);
#line 2875 "subs_functions/subs_functions.bas"
do{
#line 2875 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2875 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2875,"subs_functions.bas");}while(r);
#line 2876 "subs_functions/subs_functions.bas"
do{
#line 2876 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 2876 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2876 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2876,"subs_functions.bas");}while(r);
#line 2877 "subs_functions/subs_functions.bas"
do{
#line 2877 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2877 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2877,"subs_functions.bas");}while(r);
#line 2878 "subs_functions/subs_functions.bas"
do{
#line 2878 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKL$(longVariableOrLiteral&)",28));
#line 2878 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2878 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2878,"subs_functions.bas");}while(r);
#line 2879 "subs_functions/subs_functions.bas"
do{
#line 2879 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2879 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2879,"subs_functions.bas");}while(r);
#line 2881 "subs_functions/subs_functions.bas"
do{
#line 2881 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2881 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2881,"subs_functions.bas");}while(r);
#line 2882 "subs_functions/subs_functions.bas"
do{
#line 2882 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKS",3));
#line 2882 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2882 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2882,"subs_functions.bas");}while(r);
#line 2883 "subs_functions/subs_functions.bas"
do{
#line 2883 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2883 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2883 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2883,"subs_functions.bas");}while(r);
#line 2884 "subs_functions/subs_functions.bas"
do{
#line 2884 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2884 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2884,"subs_functions.bas");}while(r);
#line 2885 "subs_functions/subs_functions.bas"
do{
#line 2885 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2885 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2885 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2885,"subs_functions.bas");}while(r);
#line 2886 "subs_functions/subs_functions.bas"
do{
#line 2886 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2886 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2886,"subs_functions.bas");}while(r);
#line 2887 "subs_functions/subs_functions.bas"
do{
#line 2887 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER));
#line 2887 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2887 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2887,"subs_functions.bas");}while(r);
#line 2888 "subs_functions/subs_functions.bas"
do{
#line 2888 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2888 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2888,"subs_functions.bas");}while(r);
#line 2889 "subs_functions/subs_functions.bas"
do{
#line 2889 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKS$(singlePrecisionVariableOrLiteral!)",39));
#line 2889 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2889 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2889,"subs_functions.bas");}while(r);
#line 2890 "subs_functions/subs_functions.bas"
do{
#line 2890 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2890 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2890,"subs_functions.bas");}while(r);
#line 2892 "subs_functions/subs_functions.bas"
do{
#line 2892 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2892 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2892,"subs_functions.bas");}while(r);
#line 2893 "subs_functions/subs_functions.bas"
do{
#line 2893 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKD",3));
#line 2893 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2893 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2893,"subs_functions.bas");}while(r);
#line 2894 "subs_functions/subs_functions.bas"
do{
#line 2894 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2894 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2894 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2894,"subs_functions.bas");}while(r);
#line 2895 "subs_functions/subs_functions.bas"
do{
#line 2895 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2895 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2895,"subs_functions.bas");}while(r);
#line 2896 "subs_functions/subs_functions.bas"
do{
#line 2896 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2896 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2896 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2896,"subs_functions.bas");}while(r);
#line 2897 "subs_functions/subs_functions.bas"
do{
#line 2897 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2897 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2897,"subs_functions.bas");}while(r);
#line 2898 "subs_functions/subs_functions.bas"
do{
#line 2898 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 2898 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2898 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2898,"subs_functions.bas");}while(r);
#line 2899 "subs_functions/subs_functions.bas"
do{
#line 2899 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2899 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2899,"subs_functions.bas");}while(r);
#line 2900 "subs_functions/subs_functions.bas"
do{
#line 2900 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MKD$(doublePrecisionVariableOrLiteral#)",39));
#line 2900 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2900 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2900,"subs_functions.bas");}while(r);
#line 2901 "subs_functions/subs_functions.bas"
do{
#line 2901 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2901 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2901,"subs_functions.bas");}while(r);
#line 2903 "subs_functions/subs_functions.bas"
do{
#line 2903 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2903 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2903,"subs_functions.bas");}while(r);
#line 2904 "subs_functions/subs_functions.bas"
do{
#line 2904 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MK",3));
#line 2904 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2904 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2904,"subs_functions.bas");}while(r);
#line 2905 "subs_functions/subs_functions.bas"
do{
#line 2905 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2905 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2905 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2905,"subs_functions.bas");}while(r);
#line 2906 "subs_functions/subs_functions.bas"
do{
#line 2906 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2906 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2906,"subs_functions.bas");}while(r);
#line 2907 "subs_functions/subs_functions.bas"
do{
#line 2907 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2907 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2907 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2907,"subs_functions.bas");}while(r);
#line 2908 "subs_functions/subs_functions.bas"
do{
#line 2908 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2908 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2908,"subs_functions.bas");}while(r);
#line 2909 "subs_functions/subs_functions.bas"
do{
#line 2909 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string( -1 )));
#line 2909 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2909 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2909,"subs_functions.bas");}while(r);
#line 2910 "subs_functions/subs_functions.bas"
do{
#line 2910 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2910 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2910,"subs_functions.bas");}while(r);
#line 2911 "subs_functions/subs_functions.bas"
do{
#line 2911 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MK$(numericalType, numericalValue)",35));
#line 2911 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2911 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2911,"subs_functions.bas");}while(r);
#line 2912 "subs_functions/subs_functions.bas"
do{
#line 2912 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2912 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2912,"subs_functions.bas");}while(r);
#line 2914 "subs_functions/subs_functions.bas"
do{
#line 2914 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2914 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2914,"subs_functions.bas");}while(r);
#line 2915 "subs_functions/subs_functions.bas"
do{
#line 2915 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVSMBF",6));
#line 2915 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2915 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2915,"subs_functions.bas");}while(r);
#line 2916 "subs_functions/subs_functions.bas"
do{
#line 2916 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2916 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2916,"subs_functions.bas");}while(r);
#line 2917 "subs_functions/subs_functions.bas"
do{
#line 2917 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_cvsmbf",11));
#line 2917 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2917 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2917,"subs_functions.bas");}while(r);
#line 2918 "subs_functions/subs_functions.bas"
do{
#line 2918 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2918 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2918,"subs_functions.bas");}while(r);
#line 2919 "subs_functions/subs_functions.bas"
do{
#line 2919 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2919 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2919 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2919,"subs_functions.bas");}while(r);
#line 2920 "subs_functions/subs_functions.bas"
do{
#line 2920 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 2920 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2920,"subs_functions.bas");}while(r);
#line 2921 "subs_functions/subs_functions.bas"
do{
#line 2921 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVSMBF(stringData$)",19));
#line 2921 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2921 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2921,"subs_functions.bas");}while(r);
#line 2922 "subs_functions/subs_functions.bas"
do{
#line 2922 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2922 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2922,"subs_functions.bas");}while(r);
#line 2924 "subs_functions/subs_functions.bas"
do{
#line 2924 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2924 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2924,"subs_functions.bas");}while(r);
#line 2925 "subs_functions/subs_functions.bas"
do{
#line 2925 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVDMBF",6));
#line 2925 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2925 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2925,"subs_functions.bas");}while(r);
#line 2926 "subs_functions/subs_functions.bas"
do{
#line 2926 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2926 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2926,"subs_functions.bas");}while(r);
#line 2927 "subs_functions/subs_functions.bas"
do{
#line 2927 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_cvdmbf",11));
#line 2927 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2927 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2927,"subs_functions.bas");}while(r);
#line 2928 "subs_functions/subs_functions.bas"
do{
#line 2928 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2928 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2928,"subs_functions.bas");}while(r);
#line 2929 "subs_functions/subs_functions.bas"
do{
#line 2929 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2929 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2929 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2929,"subs_functions.bas");}while(r);
#line 2930 "subs_functions/subs_functions.bas"
do{
#line 2930 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2930 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2930,"subs_functions.bas");}while(r);
#line 2931 "subs_functions/subs_functions.bas"
do{
#line 2931 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVDMBF(stringData$)",19));
#line 2931 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2931 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2931,"subs_functions.bas");}while(r);
#line 2932 "subs_functions/subs_functions.bas"
do{
#line 2932 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2932 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2932,"subs_functions.bas");}while(r);
#line 2934 "subs_functions/subs_functions.bas"
do{
#line 2934 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2934 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2934,"subs_functions.bas");}while(r);
#line 2935 "subs_functions/subs_functions.bas"
do{
#line 2935 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVI",3));
#line 2935 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2935 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2935,"subs_functions.bas");}while(r);
#line 2936 "subs_functions/subs_functions.bas"
do{
#line 2936 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2936 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2936,"subs_functions.bas");}while(r);
#line 2937 "subs_functions/subs_functions.bas"
do{
#line 2937 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2937 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2937 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2937,"subs_functions.bas");}while(r);
#line 2938 "subs_functions/subs_functions.bas"
do{
#line 2938 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2938 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2938,"subs_functions.bas");}while(r);
#line 2939 "subs_functions/subs_functions.bas"
do{
#line 2939 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2939 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2939 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2939,"subs_functions.bas");}while(r);
#line 2940 "subs_functions/subs_functions.bas"
do{
#line 2940 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
#line 2940 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2940,"subs_functions.bas");}while(r);
#line 2941 "subs_functions/subs_functions.bas"
do{
#line 2941 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVI(stringData$)",16));
#line 2941 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2941 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2941,"subs_functions.bas");}while(r);
#line 2942 "subs_functions/subs_functions.bas"
do{
#line 2942 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2942 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2942,"subs_functions.bas");}while(r);
#line 2944 "subs_functions/subs_functions.bas"
do{
#line 2944 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2944 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2944,"subs_functions.bas");}while(r);
#line 2945 "subs_functions/subs_functions.bas"
do{
#line 2945 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVL",3));
#line 2945 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2945 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2945,"subs_functions.bas");}while(r);
#line 2946 "subs_functions/subs_functions.bas"
do{
#line 2946 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2946 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2946,"subs_functions.bas");}while(r);
#line 2947 "subs_functions/subs_functions.bas"
do{
#line 2947 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2947 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2947 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2947,"subs_functions.bas");}while(r);
#line 2948 "subs_functions/subs_functions.bas"
do{
#line 2948 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2948 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2948,"subs_functions.bas");}while(r);
#line 2949 "subs_functions/subs_functions.bas"
do{
#line 2949 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2949 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2949 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2949,"subs_functions.bas");}while(r);
#line 2950 "subs_functions/subs_functions.bas"
do{
#line 2950 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 2950 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2950,"subs_functions.bas");}while(r);
#line 2951 "subs_functions/subs_functions.bas"
do{
#line 2951 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVL(stringData$)",16));
#line 2951 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2951 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2951,"subs_functions.bas");}while(r);
#line 2952 "subs_functions/subs_functions.bas"
do{
#line 2952 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2952 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2952,"subs_functions.bas");}while(r);
#line 2954 "subs_functions/subs_functions.bas"
do{
#line 2954 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2954 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2954,"subs_functions.bas");}while(r);
#line 2955 "subs_functions/subs_functions.bas"
do{
#line 2955 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVS",3));
#line 2955 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2955 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2955,"subs_functions.bas");}while(r);
#line 2956 "subs_functions/subs_functions.bas"
do{
#line 2956 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2956 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2956,"subs_functions.bas");}while(r);
#line 2957 "subs_functions/subs_functions.bas"
do{
#line 2957 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2957 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2957 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2957,"subs_functions.bas");}while(r);
#line 2958 "subs_functions/subs_functions.bas"
do{
#line 2958 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2958 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2958,"subs_functions.bas");}while(r);
#line 2959 "subs_functions/subs_functions.bas"
do{
#line 2959 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2959 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2959 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2959,"subs_functions.bas");}while(r);
#line 2960 "subs_functions/subs_functions.bas"
do{
#line 2960 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 2960 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2960,"subs_functions.bas");}while(r);
#line 2961 "subs_functions/subs_functions.bas"
do{
#line 2961 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVS(stringData$)",16));
#line 2961 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2961 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2961,"subs_functions.bas");}while(r);
#line 2962 "subs_functions/subs_functions.bas"
do{
#line 2962 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2962 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2962,"subs_functions.bas");}while(r);
#line 2964 "subs_functions/subs_functions.bas"
do{
#line 2964 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2964 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2964,"subs_functions.bas");}while(r);
#line 2965 "subs_functions/subs_functions.bas"
do{
#line 2965 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVD",3));
#line 2965 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2965 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2965,"subs_functions.bas");}while(r);
#line 2966 "subs_functions/subs_functions.bas"
do{
#line 2966 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2966 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2966,"subs_functions.bas");}while(r);
#line 2967 "subs_functions/subs_functions.bas"
do{
#line 2967 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2967 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2967 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2967,"subs_functions.bas");}while(r);
#line 2968 "subs_functions/subs_functions.bas"
do{
#line 2968 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 2968 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2968,"subs_functions.bas");}while(r);
#line 2969 "subs_functions/subs_functions.bas"
do{
#line 2969 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 2969 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2969 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2969,"subs_functions.bas");}while(r);
#line 2970 "subs_functions/subs_functions.bas"
do{
#line 2970 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 2970 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2970,"subs_functions.bas");}while(r);
#line 2971 "subs_functions/subs_functions.bas"
do{
#line 2971 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CVD(stringData$)",16));
#line 2971 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2971 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2971,"subs_functions.bas");}while(r);
#line 2972 "subs_functions/subs_functions.bas"
do{
#line 2972 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2972 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2972,"subs_functions.bas");}while(r);
#line 2974 "subs_functions/subs_functions.bas"
do{
#line 2974 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2974 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2974,"subs_functions.bas");}while(r);
#line 2975 "subs_functions/subs_functions.bas"
do{
#line 2975 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CV",3));
#line 2975 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2975 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2975,"subs_functions.bas");}while(r);
#line 2976 "subs_functions/subs_functions.bas"
do{
#line 2976 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2976 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2976,"subs_functions.bas");}while(r);
#line 2977 "subs_functions/subs_functions.bas"
do{
#line 2977 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 2977 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2977 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2977,"subs_functions.bas");}while(r);
#line 2978 "subs_functions/subs_functions.bas"
do{
#line 2978 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2978 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2978,"subs_functions.bas");}while(r);
#line 2979 "subs_functions/subs_functions.bas"
do{
#line 2979 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 2979 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2979 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2979,"subs_functions.bas");}while(r);
#line 2980 "subs_functions/subs_functions.bas"
do{
#line 2980 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))= -1 ;
#line 2980 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2980,"subs_functions.bas");}while(r);
#line 2981 "subs_functions/subs_functions.bas"
do{
#line 2981 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CV(numericalType, MKstringValue$)",34));
#line 2981 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2981 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2981,"subs_functions.bas");}while(r);
#line 2982 "subs_functions/subs_functions.bas"
do{
#line 2982 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2982 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2982,"subs_functions.bas");}while(r);
#line 2984 "subs_functions/subs_functions.bas"
do{
#line 2984 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2984 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2984,"subs_functions.bas");}while(r);
#line 2985 "subs_functions/subs_functions.bas"
do{
#line 2985 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("String",6));
#line 2985 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2985 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2985,"subs_functions.bas");}while(r);
#line 2986 "subs_functions/subs_functions.bas"
do{
#line 2986 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2986 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2986 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2986,"subs_functions.bas");}while(r);
#line 2987 "subs_functions/subs_functions.bas"
do{
#line 2987 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2987 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2987,"subs_functions.bas");}while(r);
#line 2988 "subs_functions/subs_functions.bas"
do{
#line 2988 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_string",11));
#line 2988 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2988 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2988,"subs_functions.bas");}while(r);
#line 2989 "subs_functions/subs_functions.bas"
do{
#line 2989 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 2989 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2989,"subs_functions.bas");}while(r);
#line 2990 "subs_functions/subs_functions.bas"
do{
#line 2990 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 2990 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2990 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2990,"subs_functions.bas");}while(r);
#line 2991 "subs_functions/subs_functions.bas"
do{
#line 2991 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 2991 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2991,"subs_functions.bas");}while(r);
#line 2992 "subs_functions/subs_functions.bas"
do{
#line 2992 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("STRING$(count&, {character$ | ASCIIcode%})",42));
#line 2992 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2992 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2992,"subs_functions.bas");}while(r);
#line 2993 "subs_functions/subs_functions.bas"
do{
#line 2993 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 2993 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2993,"subs_functions.bas");}while(r);
#line 2995 "subs_functions/subs_functions.bas"
do{
#line 2995 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 2995 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2995,"subs_functions.bas");}while(r);
#line 2996 "subs_functions/subs_functions.bas"
do{
#line 2996 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Space",5));
#line 2996 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2996 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2996,"subs_functions.bas");}while(r);
#line 2997 "subs_functions/subs_functions.bas"
do{
#line 2997 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 2997 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2997 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2997,"subs_functions.bas");}while(r);
#line 2998 "subs_functions/subs_functions.bas"
do{
#line 2998 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 2998 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2998,"subs_functions.bas");}while(r);
#line 2999 "subs_functions/subs_functions.bas"
do{
#line 2999 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_space",10));
#line 2999 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 2999 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,2999,"subs_functions.bas");}while(r);
#line 3000 "subs_functions/subs_functions.bas"
do{
#line 3000 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3000 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3000,"subs_functions.bas");}while(r);
#line 3001 "subs_functions/subs_functions.bas"
do{
#line 3001 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3001 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3001 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3001,"subs_functions.bas");}while(r);
#line 3002 "subs_functions/subs_functions.bas"
do{
#line 3002 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3002 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3002,"subs_functions.bas");}while(r);
#line 3003 "subs_functions/subs_functions.bas"
do{
#line 3003 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SPACE$(count&)",14));
#line 3003 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3003 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3003,"subs_functions.bas");}while(r);
#line 3004 "subs_functions/subs_functions.bas"
do{
#line 3004 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3004 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3004,"subs_functions.bas");}while(r);
#line 3006 "subs_functions/subs_functions.bas"
do{
#line 3006 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3006 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3006,"subs_functions.bas");}while(r);
#line 3007 "subs_functions/subs_functions.bas"
do{
#line 3007 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("InStr",5));
#line 3007 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3007 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3007,"subs_functions.bas");}while(r);
#line 3008 "subs_functions/subs_functions.bas"
do{
#line 3008 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3008 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3008,"subs_functions.bas");}while(r);
#line 3009 "subs_functions/subs_functions.bas"
do{
#line 3009 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_instr",10));
#line 3009 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3009 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3009,"subs_functions.bas");}while(r);
#line 3010 "subs_functions/subs_functions.bas"
do{
#line 3010 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3010 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3010,"subs_functions.bas");}while(r);
#line 3011 "subs_functions/subs_functions.bas"
do{
#line 3011 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 3011 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3011 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3011,"subs_functions.bas");}while(r);
#line 3012 "subs_functions/subs_functions.bas"
do{
#line 3012 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3012 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3012,"subs_functions.bas");}while(r);
#line 3013 "subs_functions/subs_functions.bas"
do{
#line 3013 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?],?,?",7));
#line 3013 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3013 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3013,"subs_functions.bas");}while(r);
#line 3014 "subs_functions/subs_functions.bas"
do{
#line 3014 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("INSTR([start%,] baseString$, searchString$)",43));
#line 3014 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3014 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3014,"subs_functions.bas");}while(r);
#line 3015 "subs_functions/subs_functions.bas"
do{
#line 3015 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3015 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3015,"subs_functions.bas");}while(r);
#line 3017 "subs_functions/subs_functions.bas"
do{
#line 3017 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3017 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3017,"subs_functions.bas");}while(r);
#line 3018 "subs_functions/subs_functions.bas"
do{
#line 3018 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InStrRev",9));
#line 3018 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3018 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3018,"subs_functions.bas");}while(r);
#line 3019 "subs_functions/subs_functions.bas"
do{
#line 3019 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3019 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3019,"subs_functions.bas");}while(r);
#line 3020 "subs_functions/subs_functions.bas"
do{
#line 3020 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__instrrev",14));
#line 3020 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3020 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3020,"subs_functions.bas");}while(r);
#line 3021 "subs_functions/subs_functions.bas"
do{
#line 3021 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3021 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3021,"subs_functions.bas");}while(r);
#line 3022 "subs_functions/subs_functions.bas"
do{
#line 3022 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 3022 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3022 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3022,"subs_functions.bas");}while(r);
#line 3023 "subs_functions/subs_functions.bas"
do{
#line 3023 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3023 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3023,"subs_functions.bas");}while(r);
#line 3024 "subs_functions/subs_functions.bas"
do{
#line 3024 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?],?,?",7));
#line 3024 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3024 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3024,"subs_functions.bas");}while(r);
#line 3025 "subs_functions/subs_functions.bas"
do{
#line 3025 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_INSTRREV([start%,] baseString$, searchString$)",47));
#line 3025 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3025 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3025,"subs_functions.bas");}while(r);
#line 3026 "subs_functions/subs_functions.bas"
do{
#line 3026 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3026 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3026,"subs_functions.bas");}while(r);
#line 3028 "subs_functions/subs_functions.bas"
do{
#line 3028 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3028 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3028,"subs_functions.bas");}while(r);
#line 3029 "subs_functions/subs_functions.bas"
do{
#line 3029 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Mid",3));
#line 3029 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3029 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3029,"subs_functions.bas");}while(r);
#line 3030 "subs_functions/subs_functions.bas"
do{
#line 3030 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3030 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3030 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3030,"subs_functions.bas");}while(r);
#line 3031 "subs_functions/subs_functions.bas"
do{
#line 3031 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3031 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3031,"subs_functions.bas");}while(r);
#line 3032 "subs_functions/subs_functions.bas"
do{
#line 3032 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_mid",8));
#line 3032 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3032 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3032,"subs_functions.bas");}while(r);
#line 3033 "subs_functions/subs_functions.bas"
do{
#line 3033 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3033 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3033,"subs_functions.bas");}while(r);
#line 3034 "subs_functions/subs_functions.bas"
do{
#line 3034 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3034 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3034 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3034,"subs_functions.bas");}while(r);
#line 3035 "subs_functions/subs_functions.bas"
do{
#line 3035 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3035 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3035,"subs_functions.bas");}while(r);
#line 3036 "subs_functions/subs_functions.bas"
do{
#line 3036 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?,?,[?]",7));
#line 3036 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3036 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3036,"subs_functions.bas");}while(r);
#line 3037 "subs_functions/subs_functions.bas"
do{
#line 3037 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("MID$(stringValue$, startPosition%[, bytes%])",44));
#line 3037 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3037 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3037,"subs_functions.bas");}while(r);
#line 3038 "subs_functions/subs_functions.bas"
do{
#line 3038 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3038 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3038,"subs_functions.bas");}while(r);
#line 3040 "subs_functions/subs_functions.bas"
do{
#line 3040 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3040 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3040,"subs_functions.bas");}while(r);
#line 3041 "subs_functions/subs_functions.bas"
do{
#line 3041 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("SAdd",4));
#line 3041 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3041 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3041,"subs_functions.bas");}while(r);
#line 3042 "subs_functions/subs_functions.bas"
do{
#line 3042 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3042 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3042,"subs_functions.bas");}while(r);
#line 3043 "subs_functions/subs_functions.bas"
do{
#line 3043 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3043 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3043 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3043,"subs_functions.bas");}while(r);
#line 3044 "subs_functions/subs_functions.bas"
do{
#line 3044 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3044 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3044,"subs_functions.bas");}while(r);
#line 3045 "subs_functions/subs_functions.bas"
do{
#line 3045 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3045 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3045 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3045,"subs_functions.bas");}while(r);
#line 3046 "subs_functions/subs_functions.bas"
do{
#line 3046 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3046 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3046,"subs_functions.bas");}while(r);
#line 3047 "subs_functions/subs_functions.bas"
do{
#line 3047 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SADD(stringVariable$)",21));
#line 3047 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3047 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3047,"subs_functions.bas");}while(r);
#line 3048 "subs_functions/subs_functions.bas"
do{
#line 3048 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3048 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3048,"subs_functions.bas");}while(r);
#line 3050 "subs_functions/subs_functions.bas"
do{
#line 3050 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3050 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3050,"subs_functions.bas");}while(r);
#line 3051 "subs_functions/subs_functions.bas"
do{
#line 3051 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Cls",3));
#line 3051 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3051 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3051,"subs_functions.bas");}while(r);
#line 3052 "subs_functions/subs_functions.bas"
do{
#line 3052 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3052 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3052,"subs_functions.bas");}while(r);
#line 3053 "subs_functions/subs_functions.bas"
do{
#line 3053 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_clsDest",11));
#line 3053 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3053 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3053,"subs_functions.bas");}while(r);
#line 3054 "subs_functions/subs_functions.bas"
do{
#line 3054 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3054 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3054,"subs_functions.bas");}while(r);
#line 3055 "subs_functions/subs_functions.bas"
do{
#line 3055 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3055 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3055 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3055,"subs_functions.bas");}while(r);
#line 3056 "subs_functions/subs_functions.bas"
do{
#line 3056 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
#line 3056 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3056 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3056,"subs_functions.bas");}while(r);
#line 3057 "subs_functions/subs_functions.bas"
do{
#line 3057 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CLS [method%][, bgColor&][, dest&]",34));
#line 3057 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3057 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3057,"subs_functions.bas");}while(r);
#line 3058 "subs_functions/subs_functions.bas"
do{
#line 3058 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3058 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3058,"subs_functions.bas");}while(r);
#line 3060 "subs_functions/subs_functions.bas"
do{
#line 3060 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3060 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3060,"subs_functions.bas");}while(r);
#line 3061 "subs_functions/subs_functions.bas"
do{
#line 3061 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sqr",3));
#line 3061 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3061 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3061,"subs_functions.bas");}while(r);
#line 3062 "subs_functions/subs_functions.bas"
do{
#line 3062 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3062 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3062,"subs_functions.bas");}while(r);
#line 3063 "subs_functions/subs_functions.bas"
do{
#line 3063 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_sqr",8));
#line 3063 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3063 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3063,"subs_functions.bas");}while(r);
#line 3064 "subs_functions/subs_functions.bas"
do{
#line 3064 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3064 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3064,"subs_functions.bas");}while(r);
#line 3065 "subs_functions/subs_functions.bas"
do{
#line 3065 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3065 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3065 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3065,"subs_functions.bas");}while(r);
#line 3066 "subs_functions/subs_functions.bas"
do{
#line 3066 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3066 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3066,"subs_functions.bas");}while(r);
#line 3067 "subs_functions/subs_functions.bas"
do{
#line 3067 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SQR(value)",10));
#line 3067 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3067 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3067,"subs_functions.bas");}while(r);
#line 3068 "subs_functions/subs_functions.bas"
do{
#line 3068 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3068 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3068,"subs_functions.bas");}while(r);
#line 3070 "subs_functions/subs_functions.bas"
do{
#line 3070 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3070 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3070,"subs_functions.bas");}while(r);
#line 3071 "subs_functions/subs_functions.bas"
do{
#line 3071 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Chr",3));
#line 3071 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3071 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3071,"subs_functions.bas");}while(r);
#line 3072 "subs_functions/subs_functions.bas"
do{
#line 3072 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3072 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3072 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3072,"subs_functions.bas");}while(r);
#line 3073 "subs_functions/subs_functions.bas"
do{
#line 3073 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3073 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3073,"subs_functions.bas");}while(r);
#line 3074 "subs_functions/subs_functions.bas"
do{
#line 3074 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_chr",8));
#line 3074 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3074 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3074,"subs_functions.bas");}while(r);
#line 3075 "subs_functions/subs_functions.bas"
do{
#line 3075 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3075 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3075,"subs_functions.bas");}while(r);
#line 3076 "subs_functions/subs_functions.bas"
do{
#line 3076 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3076 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3076 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3076,"subs_functions.bas");}while(r);
#line 3077 "subs_functions/subs_functions.bas"
do{
#line 3077 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3077 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3077,"subs_functions.bas");}while(r);
#line 3078 "subs_functions/subs_functions.bas"
do{
#line 3078 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("CHR$(code%)",11));
#line 3078 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3078 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3078,"subs_functions.bas");}while(r);
#line 3079 "subs_functions/subs_functions.bas"
do{
#line 3079 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3079 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3079,"subs_functions.bas");}while(r);
#line 3081 "subs_functions/subs_functions.bas"
do{
#line 3081 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3081 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3081,"subs_functions.bas");}while(r);
#line 3082 "subs_functions/subs_functions.bas"
do{
#line 3082 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarPtr",6));
#line 3082 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3082 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3082,"subs_functions.bas");}while(r);
#line 3083 "subs_functions/subs_functions.bas"
do{
#line 3083 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3083 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3083,"subs_functions.bas");}while(r);
#line 3084 "subs_functions/subs_functions.bas"
do{
#line 3084 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3084 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3084 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3084,"subs_functions.bas");}while(r);
#line 3085 "subs_functions/subs_functions.bas"
do{
#line 3085 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3085 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3085,"subs_functions.bas");}while(r);
#line 3086 "subs_functions/subs_functions.bas"
do{
#line 3086 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3086 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3086 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3086,"subs_functions.bas");}while(r);
#line 3087 "subs_functions/subs_functions.bas"
do{
#line 3087 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3087 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3087,"subs_functions.bas");}while(r);
#line 3088 "subs_functions/subs_functions.bas"
do{
#line 3088 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3088 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3088 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3088,"subs_functions.bas");}while(r);
#line 3089 "subs_functions/subs_functions.bas"
do{
#line 3089 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41));
#line 3089 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3089 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3089,"subs_functions.bas");}while(r);
#line 3090 "subs_functions/subs_functions.bas"
do{
#line 3090 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3090 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3090,"subs_functions.bas");}while(r);
#line 3092 "subs_functions/subs_functions.bas"
do{
#line 3092 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3092 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3092,"subs_functions.bas");}while(r);
#line 3093 "subs_functions/subs_functions.bas"
do{
#line 3093 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarPtr",6));
#line 3093 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3093 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3093,"subs_functions.bas");}while(r);
#line 3094 "subs_functions/subs_functions.bas"
do{
#line 3094 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3094 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3094,"subs_functions.bas");}while(r);
#line 3095 "subs_functions/subs_functions.bas"
do{
#line 3095 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3095 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3095 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3095,"subs_functions.bas");}while(r);
#line 3096 "subs_functions/subs_functions.bas"
do{
#line 3096 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3096 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3096,"subs_functions.bas");}while(r);
#line 3097 "subs_functions/subs_functions.bas"
do{
#line 3097 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3097 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3097 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3097,"subs_functions.bas");}while(r);
#line 3098 "subs_functions/subs_functions.bas"
do{
#line 3098 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3098 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3098,"subs_functions.bas");}while(r);
#line 3099 "subs_functions/subs_functions.bas"
do{
#line 3099 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41));
#line 3099 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3099 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3099,"subs_functions.bas");}while(r);
#line 3100 "subs_functions/subs_functions.bas"
do{
#line 3100 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3100 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3100,"subs_functions.bas");}while(r);
#line 3102 "subs_functions/subs_functions.bas"
do{
#line 3102 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3102 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3102,"subs_functions.bas");}while(r);
#line 3103 "subs_functions/subs_functions.bas"
do{
#line 3103 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Offset",7));
#line 3103 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3103 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3103,"subs_functions.bas");}while(r);
#line 3104 "subs_functions/subs_functions.bas"
do{
#line 3104 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3104 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3104,"subs_functions.bas");}while(r);
#line 3105 "subs_functions/subs_functions.bas"
do{
#line 3105 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3105 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3105 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3105,"subs_functions.bas");}while(r);
#line 3106 "subs_functions/subs_functions.bas"
do{
#line 3106 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3106,"subs_functions.bas");}while(r);
#line 3107 "subs_functions/subs_functions.bas"
do{
#line 3107 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3107 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3107 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3107,"subs_functions.bas");}while(r);
#line 3108 "subs_functions/subs_functions.bas"
do{
#line 3108 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER;
#line 3108 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3108,"subs_functions.bas");}while(r);
#line 3109 "subs_functions/subs_functions.bas"
do{
#line 3109 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_OFFSET(variable)",17));
#line 3109 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3109 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3109,"subs_functions.bas");}while(r);
#line 3110 "subs_functions/subs_functions.bas"
do{
#line 3110 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3110 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3110,"subs_functions.bas");}while(r);
#line 3112 "subs_functions/subs_functions.bas"
do{
#line 3112 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3112 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3112,"subs_functions.bas");}while(r);
#line 3113 "subs_functions/subs_functions.bas"
do{
#line 3113 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarSeg",6));
#line 3113 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3113 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3113,"subs_functions.bas");}while(r);
#line 3114 "subs_functions/subs_functions.bas"
do{
#line 3114 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3114 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3114,"subs_functions.bas");}while(r);
#line 3115 "subs_functions/subs_functions.bas"
do{
#line 3115 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3115 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3115 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3115,"subs_functions.bas");}while(r);
#line 3116 "subs_functions/subs_functions.bas"
do{
#line 3116 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3116 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3116,"subs_functions.bas");}while(r);
#line 3117 "subs_functions/subs_functions.bas"
do{
#line 3117 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3117 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3117 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3117,"subs_functions.bas");}while(r);
#line 3118 "subs_functions/subs_functions.bas"
do{
#line 3118 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3118 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3118,"subs_functions.bas");}while(r);
#line 3119 "subs_functions/subs_functions.bas"
do{
#line 3119 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VARSEG(variable_name[(start_index)])",36));
#line 3119 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3119 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3119,"subs_functions.bas");}while(r);
#line 3120 "subs_functions/subs_functions.bas"
do{
#line 3120 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3120 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3120,"subs_functions.bas");}while(r);
#line 3122 "subs_functions/subs_functions.bas"
do{
#line 3122 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3122 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3122,"subs_functions.bas");}while(r);
#line 3123 "subs_functions/subs_functions.bas"
do{
#line 3123 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Poke",4));
#line 3123 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3123 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3123,"subs_functions.bas");}while(r);
#line 3124 "subs_functions/subs_functions.bas"
do{
#line 3124 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3124,"subs_functions.bas");}while(r);
#line 3125 "subs_functions/subs_functions.bas"
do{
#line 3125 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_poke",8));
#line 3125 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3125 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3125,"subs_functions.bas");}while(r);
#line 3126 "subs_functions/subs_functions.bas"
do{
#line 3126 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3126 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3126,"subs_functions.bas");}while(r);
#line 3127 "subs_functions/subs_functions.bas"
do{
#line 3127 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3127 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3127 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3127,"subs_functions.bas");}while(r);
#line 3128 "subs_functions/subs_functions.bas"
do{
#line 3128 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("POKE segment_offset, offset_value",33));
#line 3128 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3128 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3128,"subs_functions.bas");}while(r);
#line 3129 "subs_functions/subs_functions.bas"
do{
#line 3129 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3129 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3129,"subs_functions.bas");}while(r);
#line 3131 "subs_functions/subs_functions.bas"
do{
#line 3131 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3131 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3131,"subs_functions.bas");}while(r);
#line 3132 "subs_functions/subs_functions.bas"
do{
#line 3132 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Peek",4));
#line 3132 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3132 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3132,"subs_functions.bas");}while(r);
#line 3133 "subs_functions/subs_functions.bas"
do{
#line 3133 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3133 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3133,"subs_functions.bas");}while(r);
#line 3134 "subs_functions/subs_functions.bas"
do{
#line 3134 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_peek",9));
#line 3134 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3134 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3134,"subs_functions.bas");}while(r);
#line 3135 "subs_functions/subs_functions.bas"
do{
#line 3135 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3135 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3135,"subs_functions.bas");}while(r);
#line 3136 "subs_functions/subs_functions.bas"
do{
#line 3136 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3136 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3136 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3136,"subs_functions.bas");}while(r);
#line 3137 "subs_functions/subs_functions.bas"
do{
#line 3137 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3137 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3137,"subs_functions.bas");}while(r);
#line 3138 "subs_functions/subs_functions.bas"
do{
#line 3138 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PEEK(segment_offset)",20));
#line 3138 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3138 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3138,"subs_functions.bas");}while(r);
#line 3139 "subs_functions/subs_functions.bas"
do{
#line 3139 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3139 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3139,"subs_functions.bas");}while(r);
#line 3141 "subs_functions/subs_functions.bas"
do{
#line 3141 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3141 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3141,"subs_functions.bas");}while(r);
#line 3142 "subs_functions/subs_functions.bas"
do{
#line 3142 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Def",3));
#line 3142 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3142 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3142,"subs_functions.bas");}while(r);
#line 3143 "subs_functions/subs_functions.bas"
do{
#line 3143 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3143 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3143,"subs_functions.bas");}while(r);
#line 3144 "subs_functions/subs_functions.bas"
do{
#line 3144 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_defseg",10));
#line 3144 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3144 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3144,"subs_functions.bas");}while(r);
#line 3145 "subs_functions/subs_functions.bas"
do{
#line 3145 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3145 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3145,"subs_functions.bas");}while(r);
#line 3146 "subs_functions/subs_functions.bas"
do{
#line 3146 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3146 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3146 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3146,"subs_functions.bas");}while(r);
#line 3147 "subs_functions/subs_functions.bas"
do{
#line 3147 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{Seg}[=?]",9));
#line 3147 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3147 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3147,"subs_functions.bas");}while(r);
#line 3148 "subs_functions/subs_functions.bas"
do{
#line 3148 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("Seg",3));
#line 3148 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3148 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3148,"subs_functions.bas");}while(r);
#line 3149 "subs_functions/subs_functions.bas"
do{
#line 3149 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("DEF SEG [=][{segment|VARSEG(variable}]",38));
#line 3149 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3149 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3149,"subs_functions.bas");}while(r);
#line 3150 "subs_functions/subs_functions.bas"
do{
#line 3150 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3150 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3150,"subs_functions.bas");}while(r);
#line 3152 "subs_functions/subs_functions.bas"
do{
#line 3152 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3152 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3152,"subs_functions.bas");}while(r);
#line 3153 "subs_functions/subs_functions.bas"
do{
#line 3153 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sin",3));
#line 3153 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3153 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3153,"subs_functions.bas");}while(r);
#line 3154 "subs_functions/subs_functions.bas"
do{
#line 3154 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3154,"subs_functions.bas");}while(r);
#line 3155 "subs_functions/subs_functions.bas"
do{
#line 3155 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::sin",8));
#line 3155 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3155 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3155,"subs_functions.bas");}while(r);
#line 3156 "subs_functions/subs_functions.bas"
do{
#line 3156 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3156 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3156,"subs_functions.bas");}while(r);
#line 3157 "subs_functions/subs_functions.bas"
do{
#line 3157 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3157 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3157 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3157,"subs_functions.bas");}while(r);
#line 3158 "subs_functions/subs_functions.bas"
do{
#line 3158 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3158 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3158,"subs_functions.bas");}while(r);
#line 3159 "subs_functions/subs_functions.bas"
do{
#line 3159 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SIN(radian_angle!)",18));
#line 3159 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3159 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3159,"subs_functions.bas");}while(r);
#line 3160 "subs_functions/subs_functions.bas"
do{
#line 3160 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3160 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3160,"subs_functions.bas");}while(r);
#line 3162 "subs_functions/subs_functions.bas"
do{
#line 3162 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3162 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3162,"subs_functions.bas");}while(r);
#line 3163 "subs_functions/subs_functions.bas"
do{
#line 3163 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Cos",3));
#line 3163 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3163 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3163,"subs_functions.bas");}while(r);
#line 3164 "subs_functions/subs_functions.bas"
do{
#line 3164 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3164 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3164,"subs_functions.bas");}while(r);
#line 3165 "subs_functions/subs_functions.bas"
do{
#line 3165 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::cos",8));
#line 3165 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3165 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3165,"subs_functions.bas");}while(r);
#line 3166 "subs_functions/subs_functions.bas"
do{
#line 3166 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3166 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3166,"subs_functions.bas");}while(r);
#line 3167 "subs_functions/subs_functions.bas"
do{
#line 3167 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3167 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3167 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3167,"subs_functions.bas");}while(r);
#line 3168 "subs_functions/subs_functions.bas"
do{
#line 3168 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3168 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3168,"subs_functions.bas");}while(r);
#line 3169 "subs_functions/subs_functions.bas"
do{
#line 3169 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("COS(radian_angle!)",18));
#line 3169 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3169 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3169,"subs_functions.bas");}while(r);
#line 3170 "subs_functions/subs_functions.bas"
do{
#line 3170 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3170 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3170,"subs_functions.bas");}while(r);
#line 3172 "subs_functions/subs_functions.bas"
do{
#line 3172 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3172 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3172,"subs_functions.bas");}while(r);
#line 3173 "subs_functions/subs_functions.bas"
do{
#line 3173 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Tan",3));
#line 3173 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3173,"subs_functions.bas");}while(r);
#line 3174 "subs_functions/subs_functions.bas"
do{
#line 3174 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3174 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3174,"subs_functions.bas");}while(r);
#line 3175 "subs_functions/subs_functions.bas"
do{
#line 3175 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::tan",8));
#line 3175 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3175 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3175,"subs_functions.bas");}while(r);
#line 3176 "subs_functions/subs_functions.bas"
do{
#line 3176 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3176 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3176,"subs_functions.bas");}while(r);
#line 3177 "subs_functions/subs_functions.bas"
do{
#line 3177 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3177 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3177 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3177,"subs_functions.bas");}while(r);
#line 3178 "subs_functions/subs_functions.bas"
do{
#line 3178 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3178 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3178,"subs_functions.bas");}while(r);
#line 3179 "subs_functions/subs_functions.bas"
do{
#line 3179 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TAN(radian_angle!)",18));
#line 3179 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3179 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3179,"subs_functions.bas");}while(r);
#line 3180 "subs_functions/subs_functions.bas"
do{
#line 3180 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3180 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3180,"subs_functions.bas");}while(r);
#line 3182 "subs_functions/subs_functions.bas"
do{
#line 3182 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3182 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3182,"subs_functions.bas");}while(r);
#line 3183 "subs_functions/subs_functions.bas"
do{
#line 3183 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Atn",3));
#line 3183 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3183,"subs_functions.bas");}while(r);
#line 3184 "subs_functions/subs_functions.bas"
do{
#line 3184 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3184 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3184,"subs_functions.bas");}while(r);
#line 3185 "subs_functions/subs_functions.bas"
do{
#line 3185 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::atan",9));
#line 3185 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3185 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3185,"subs_functions.bas");}while(r);
#line 3186 "subs_functions/subs_functions.bas"
do{
#line 3186 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3186 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3186,"subs_functions.bas");}while(r);
#line 3187 "subs_functions/subs_functions.bas"
do{
#line 3187 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3187 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3187 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3187,"subs_functions.bas");}while(r);
#line 3188 "subs_functions/subs_functions.bas"
do{
#line 3188 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3188 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3188,"subs_functions.bas");}while(r);
#line 3189 "subs_functions/subs_functions.bas"
do{
#line 3189 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ATN(tangent!)",13));
#line 3189 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3189 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3189,"subs_functions.bas");}while(r);
#line 3190 "subs_functions/subs_functions.bas"
do{
#line 3190 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3190 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3190,"subs_functions.bas");}while(r);
#line 3192 "subs_functions/subs_functions.bas"
do{
#line 3192 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3192 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3192,"subs_functions.bas");}while(r);
#line 3193 "subs_functions/subs_functions.bas"
do{
#line 3193 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Log",3));
#line 3193 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3193,"subs_functions.bas");}while(r);
#line 3194 "subs_functions/subs_functions.bas"
do{
#line 3194 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3194 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3194,"subs_functions.bas");}while(r);
#line 3195 "subs_functions/subs_functions.bas"
do{
#line 3195 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_log",8));
#line 3195 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3195 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3195,"subs_functions.bas");}while(r);
#line 3196 "subs_functions/subs_functions.bas"
do{
#line 3196 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3196 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3196,"subs_functions.bas");}while(r);
#line 3197 "subs_functions/subs_functions.bas"
do{
#line 3197 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3197 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3197 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3197,"subs_functions.bas");}while(r);
#line 3198 "subs_functions/subs_functions.bas"
do{
#line 3198 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3198 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3198,"subs_functions.bas");}while(r);
#line 3199 "subs_functions/subs_functions.bas"
do{
#line 3199 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LOG(value)",10));
#line 3199 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3199 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3199,"subs_functions.bas");}while(r);
#line 3200 "subs_functions/subs_functions.bas"
do{
#line 3200 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3200 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3200,"subs_functions.bas");}while(r);
#line 3202 "subs_functions/subs_functions.bas"
do{
#line 3202 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3202 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3202,"subs_functions.bas");}while(r);
#line 3203 "subs_functions/subs_functions.bas"
do{
#line 3203 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Abs",3));
#line 3203 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3203,"subs_functions.bas");}while(r);
#line 3204 "subs_functions/subs_functions.bas"
do{
#line 3204 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3204 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3204,"subs_functions.bas");}while(r);
#line 3205 "subs_functions/subs_functions.bas"
do{
#line 3205 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_abs",8));
#line 3205 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3205 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3205,"subs_functions.bas");}while(r);
#line 3206 "subs_functions/subs_functions.bas"
do{
#line 3206 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3206 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3206,"subs_functions.bas");}while(r);
#line 3207 "subs_functions/subs_functions.bas"
do{
#line 3207 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3207 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3207 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3207,"subs_functions.bas");}while(r);
#line 3208 "subs_functions/subs_functions.bas"
do{
#line 3208 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3208 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3208,"subs_functions.bas");}while(r);
#line 3209 "subs_functions/subs_functions.bas"
do{
#line 3209 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ABS(numericalValue)",19));
#line 3209 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3209 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3209,"subs_functions.bas");}while(r);
#line 3210 "subs_functions/subs_functions.bas"
do{
#line 3210 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3210 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3210,"subs_functions.bas");}while(r);
#line 3212 "subs_functions/subs_functions.bas"
do{
#line 3212 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3212 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3212,"subs_functions.bas");}while(r);
#line 3213 "subs_functions/subs_functions.bas"
do{
#line 3213 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Erl",3));
#line 3213 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3213,"subs_functions.bas");}while(r);
#line 3214 "subs_functions/subs_functions.bas"
do{
#line 3214 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3214 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3214,"subs_functions.bas");}while(r);
#line 3215 "subs_functions/subs_functions.bas"
do{
#line 3215 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("get_error_erl",13));
#line 3215 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3215 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3215,"subs_functions.bas");}while(r);
#line 3216 "subs_functions/subs_functions.bas"
do{
#line 3216 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3216 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3216,"subs_functions.bas");}while(r);
#line 3217 "subs_functions/subs_functions.bas"
do{
#line 3217 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 3217 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3217,"subs_functions.bas");}while(r);
#line 3218 "subs_functions/subs_functions.bas"
do{
#line 3218 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ERL",3));
#line 3218 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3218 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3218,"subs_functions.bas");}while(r);
#line 3219 "subs_functions/subs_functions.bas"
do{
#line 3219 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3219 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3219,"subs_functions.bas");}while(r);
#line 3221 "subs_functions/subs_functions.bas"
do{
#line 3221 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3221 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3221,"subs_functions.bas");}while(r);
#line 3222 "subs_functions/subs_functions.bas"
do{
#line 3222 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Err",3));
#line 3222 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3222,"subs_functions.bas");}while(r);
#line 3223 "subs_functions/subs_functions.bas"
do{
#line 3223 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3223 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3223,"subs_functions.bas");}while(r);
#line 3224 "subs_functions/subs_functions.bas"
do{
#line 3224 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("get_error_err",13));
#line 3224 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3224 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3224,"subs_functions.bas");}while(r);
#line 3225 "subs_functions/subs_functions.bas"
do{
#line 3225 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3225 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3225,"subs_functions.bas");}while(r);
#line 3226 "subs_functions/subs_functions.bas"
do{
#line 3226 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 3226 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3226,"subs_functions.bas");}while(r);
#line 3227 "subs_functions/subs_functions.bas"
do{
#line 3227 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ERR",3));
#line 3227 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3227 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3227,"subs_functions.bas");}while(r);
#line 3228 "subs_functions/subs_functions.bas"
do{
#line 3228 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3228 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3228,"subs_functions.bas");}while(r);
#line 3230 "subs_functions/subs_functions.bas"
do{
#line 3230 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3230 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3230,"subs_functions.bas");}while(r);
#line 3231 "subs_functions/subs_functions.bas"
do{
#line 3231 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Error",5));
#line 3231 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3231,"subs_functions.bas");}while(r);
#line 3232 "subs_functions/subs_functions.bas"
do{
#line 3232 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3232 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3232,"subs_functions.bas");}while(r);
#line 3233 "subs_functions/subs_functions.bas"
do{
#line 3233 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("error",5));
#line 3233 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3233 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3233,"subs_functions.bas");}while(r);
#line 3234 "subs_functions/subs_functions.bas"
do{
#line 3234 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3234 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3234,"subs_functions.bas");}while(r);
#line 3235 "subs_functions/subs_functions.bas"
do{
#line 3235 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
#line 3235 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3235 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3235,"subs_functions.bas");}while(r);
#line 3236 "subs_functions/subs_functions.bas"
do{
#line 3236 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ERROR codeNumber%",17));
#line 3236 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3236 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3236,"subs_functions.bas");}while(r);
#line 3237 "subs_functions/subs_functions.bas"
do{
#line 3237 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3237 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3237,"subs_functions.bas");}while(r);
#line 3239 "subs_functions/subs_functions.bas"
do{
#line 3239 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3239 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3239,"subs_functions.bas");}while(r);
#line 3240 "subs_functions/subs_functions.bas"
do{
#line 3240 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Line",4));
#line 3240 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3240 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3240,"subs_functions.bas");}while(r);
#line 3241 "subs_functions/subs_functions.bas"
do{
#line 3241 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3241 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3241,"subs_functions.bas");}while(r);
#line 3242 "subs_functions/subs_functions.bas"
do{
#line 3242 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_line",8));
#line 3242 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3242 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3242,"subs_functions.bas");}while(r);
#line 3243 "subs_functions/subs_functions.bas"
do{
#line 3243 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 7 ;
#line 3243 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3243,"subs_functions.bas");}while(r);
#line 3244 "subs_functions/subs_functions.bas"
do{
#line 3244 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3244 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3244 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3244,"subs_functions.bas");}while(r);
#line 3245 "subs_functions/subs_functions.bas"
do{
#line 3245 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[[{Step}](?,?)]-[{Step}](?,?)[,[?][,[{B|BF}][,?]]]",50));
#line 3245 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3245 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3245,"subs_functions.bas");}while(r);
#line 3246 "subs_functions/subs_functions.bas"
do{
#line 3246 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LINE [STEP] [(column1, row1)]-[STEP] (column2, row2), color[, [{B|BF}], style%]",79));
#line 3246 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3246 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3246,"subs_functions.bas");}while(r);
#line 3247 "subs_functions/subs_functions.bas"
do{
#line 3247 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3247 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3247,"subs_functions.bas");}while(r);
#line 3249 "subs_functions/subs_functions.bas"
do{
#line 3249 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3249 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3249,"subs_functions.bas");}while(r);
#line 3250 "subs_functions/subs_functions.bas"
do{
#line 3250 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Timer",5));
#line 3250 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3250 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3250,"subs_functions.bas");}while(r);
#line 3251 "subs_functions/subs_functions.bas"
do{
#line 3251 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3251,"subs_functions.bas");}while(r);
#line 3252 "subs_functions/subs_functions.bas"
do{
#line 3252 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_timer",10));
#line 3252 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3252 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3252,"subs_functions.bas");}while(r);
#line 3253 "subs_functions/subs_functions.bas"
do{
#line 3253 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3253 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3253,"subs_functions.bas");}while(r);
#line 3254 "subs_functions/subs_functions.bas"
do{
#line 3254 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 3254 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3254 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3254,"subs_functions.bas");}while(r);
#line 3255 "subs_functions/subs_functions.bas"
do{
#line 3255 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 3255 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3255,"subs_functions.bas");}while(r);
#line 3256 "subs_functions/subs_functions.bas"
do{
#line 3256 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 3256 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3256 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3256,"subs_functions.bas");}while(r);
#line 3257 "subs_functions/subs_functions.bas"
do{
#line 3257 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("TIMER[(accuracy!)]",18));
#line 3257 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3257 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3257,"subs_functions.bas");}while(r);
#line 3258 "subs_functions/subs_functions.bas"
do{
#line 3258 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3258 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3258,"subs_functions.bas");}while(r);
#line 3260 "subs_functions/subs_functions.bas"
do{
#line 3260 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3260 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3260,"subs_functions.bas");}while(r);
#line 3261 "subs_functions/subs_functions.bas"
do{
#line 3261 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Uptime",7));
#line 3261 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3261 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3261,"subs_functions.bas");}while(r);
#line 3262 "subs_functions/subs_functions.bas"
do{
#line 3262 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3262 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3262,"subs_functions.bas");}while(r);
#line 3263 "subs_functions/subs_functions.bas"
do{
#line 3263 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("GLUTEmu_TimeGet",15));
#line 3263 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3263 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3263,"subs_functions.bas");}while(r);
#line 3264 "subs_functions/subs_functions.bas"
do{
#line 3264 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 3264 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3264,"subs_functions.bas");}while(r);
#line 3265 "subs_functions/subs_functions.bas"
do{
#line 3265 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_UPTIME",7));
#line 3265 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3265 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3265,"subs_functions.bas");}while(r);
#line 3266 "subs_functions/subs_functions.bas"
do{
#line 3266 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3266 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3266,"subs_functions.bas");}while(r);
#line 3268 "subs_functions/subs_functions.bas"
do{
#line 3268 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3268 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3268,"subs_functions.bas");}while(r);
#line 3269 "subs_functions/subs_functions.bas"
do{
#line 3269 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Rnd",3));
#line 3269 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3269 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3269,"subs_functions.bas");}while(r);
#line 3270 "subs_functions/subs_functions.bas"
do{
#line 3270 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3270 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3270,"subs_functions.bas");}while(r);
#line 3271 "subs_functions/subs_functions.bas"
do{
#line 3271 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_rnd",8));
#line 3271 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3271 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3271,"subs_functions.bas");}while(r);
#line 3272 "subs_functions/subs_functions.bas"
do{
#line 3272 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3272 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3272,"subs_functions.bas");}while(r);
#line 3273 "subs_functions/subs_functions.bas"
do{
#line 3273 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3273 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3273 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3273,"subs_functions.bas");}while(r);
#line 3274 "subs_functions/subs_functions.bas"
do{
#line 3274 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
#line 3274 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3274,"subs_functions.bas");}while(r);
#line 3275 "subs_functions/subs_functions.bas"
do{
#line 3275 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 3275 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3275 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3275,"subs_functions.bas");}while(r);
#line 3276 "subs_functions/subs_functions.bas"
do{
#line 3276 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("RND[(behavior)]",15));
#line 3276 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3276 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3276,"subs_functions.bas");}while(r);
#line 3277 "subs_functions/subs_functions.bas"
do{
#line 3277 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3277 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3277,"subs_functions.bas");}while(r);
#line 3279 "subs_functions/subs_functions.bas"
do{
#line 3279 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3279 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3279,"subs_functions.bas");}while(r);
#line 3280 "subs_functions/subs_functions.bas"
do{
#line 3280 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Randomize",9));
#line 3280 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3280 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3280,"subs_functions.bas");}while(r);
#line 3281 "subs_functions/subs_functions.bas"
do{
#line 3281 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3281 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3281,"subs_functions.bas");}while(r);
#line 3282 "subs_functions/subs_functions.bas"
do{
#line 3282 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_randomize",13));
#line 3282 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3282 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3282,"subs_functions.bas");}while(r);
#line 3283 "subs_functions/subs_functions.bas"
do{
#line 3283 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3283 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3283,"subs_functions.bas");}while(r);
#line 3284 "subs_functions/subs_functions.bas"
do{
#line 3284 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 3284 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3284 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3284,"subs_functions.bas");}while(r);
#line 3285 "subs_functions/subs_functions.bas"
do{
#line 3285 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[[{Using}]?]",12));
#line 3285 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3285 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3285,"subs_functions.bas");}while(r);
#line 3286 "subs_functions/subs_functions.bas"
do{
#line 3286 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("RANDOMIZE [USING] {seednumber|TIMER}",36));
#line 3286 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3286 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3286,"subs_functions.bas");}while(r);
#line 3287 "subs_functions/subs_functions.bas"
do{
#line 3287 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3287 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3287,"subs_functions.bas");}while(r);
#line 3289 "subs_functions/subs_functions.bas"
do{
#line 3289 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3289,"subs_functions.bas");}while(r);
#line 3290 "subs_functions/subs_functions.bas"
do{
#line 3290 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Out",3));
#line 3290 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3290 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3290,"subs_functions.bas");}while(r);
#line 3291 "subs_functions/subs_functions.bas"
do{
#line 3291 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3291 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3291,"subs_functions.bas");}while(r);
#line 3292 "subs_functions/subs_functions.bas"
do{
#line 3292 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_out",7));
#line 3292 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3292 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3292,"subs_functions.bas");}while(r);
#line 3293 "subs_functions/subs_functions.bas"
do{
#line 3293 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3293 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3293,"subs_functions.bas");}while(r);
#line 3294 "subs_functions/subs_functions.bas"
do{
#line 3294 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3294 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3294 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3294,"subs_functions.bas");}while(r);
#line 3295 "subs_functions/subs_functions.bas"
do{
#line 3295 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("OUT registerAddress%, value%",28));
#line 3295 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3295 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3295,"subs_functions.bas");}while(r);
#line 3296 "subs_functions/subs_functions.bas"
do{
#line 3296 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3296 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3296,"subs_functions.bas");}while(r);
#line 3298 "subs_functions/subs_functions.bas"
do{
#line 3298 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3298 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3298,"subs_functions.bas");}while(r);
#line 3299 "subs_functions/subs_functions.bas"
do{
#line 3299 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PCopy",5));
#line 3299 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3299,"subs_functions.bas");}while(r);
#line 3300 "subs_functions/subs_functions.bas"
do{
#line 3300 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3300 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3300,"subs_functions.bas");}while(r);
#line 3301 "subs_functions/subs_functions.bas"
do{
#line 3301 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_pcopy",9));
#line 3301 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3301 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3301,"subs_functions.bas");}while(r);
#line 3302 "subs_functions/subs_functions.bas"
do{
#line 3302 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3302 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3302,"subs_functions.bas");}while(r);
#line 3303 "subs_functions/subs_functions.bas"
do{
#line 3303 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3303 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3303 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3303,"subs_functions.bas");}while(r);
#line 3304 "subs_functions/subs_functions.bas"
do{
#line 3304 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PCOPY sourcePage%, destinationPage%",35));
#line 3304 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3304 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3304,"subs_functions.bas");}while(r);
#line 3305 "subs_functions/subs_functions.bas"
do{
#line 3305 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3305 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3305,"subs_functions.bas");}while(r);
#line 3307 "subs_functions/subs_functions.bas"
do{
#line 3307 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3307 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3307,"subs_functions.bas");}while(r);
#line 3308 "subs_functions/subs_functions.bas"
do{
#line 3308 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("View",4));
#line 3308 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3308,"subs_functions.bas");}while(r);
#line 3309 "subs_functions/subs_functions.bas"
do{
#line 3309 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3309 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3309,"subs_functions.bas");}while(r);
#line 3310 "subs_functions/subs_functions.bas"
do{
#line 3310 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_sub_view",12));
#line 3310 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3310 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3310,"subs_functions.bas");}while(r);
#line 3311 "subs_functions/subs_functions.bas"
do{
#line 3311 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 6 ;
#line 3311 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3311,"subs_functions.bas");}while(r);
#line 3312 "subs_functions/subs_functions.bas"
do{
#line 3312 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3312 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3312 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3312,"subs_functions.bas");}while(r);
#line 3313 "subs_functions/subs_functions.bas"
do{
#line 3313 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)[,[?][,?]]]",33));
#line 3313 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3313 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3313,"subs_functions.bas");}while(r);
#line 3314 "subs_functions/subs_functions.bas"
do{
#line 3314 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+2129))),256,1),qbs_new_txt_len("Print",5));
#line 3314 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3314 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3314,"subs_functions.bas");}while(r);
#line 3315 "subs_functions/subs_functions.bas"
do{
#line 3315 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VIEW [SCREEN] (column1, row1)-(column2, row2)[, color][, border]",64));
#line 3315 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3315 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3315,"subs_functions.bas");}while(r);
#line 3316 "subs_functions/subs_functions.bas"
do{
#line 3316 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3316 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3316,"subs_functions.bas");}while(r);
#line 3318 "subs_functions/subs_functions.bas"
do{
#line 3318 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3318 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3318,"subs_functions.bas");}while(r);
#line 3319 "subs_functions/subs_functions.bas"
do{
#line 3319 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("View",4));
#line 3319 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3319 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3319,"subs_functions.bas");}while(r);
#line 3320 "subs_functions/subs_functions.bas"
do{
#line 3320 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3320 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3320,"subs_functions.bas");}while(r);
#line 3321 "subs_functions/subs_functions.bas"
do{
#line 3321 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_sub_view_print",18));
#line 3321 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3321 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3321,"subs_functions.bas");}while(r);
#line 3322 "subs_functions/subs_functions.bas"
do{
#line 3322 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3322 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3322,"subs_functions.bas");}while(r);
#line 3323 "subs_functions/subs_functions.bas"
do{
#line 3323 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3323 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3323 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3323,"subs_functions.bas");}while(r);
#line 3324 "subs_functions/subs_functions.bas"
do{
#line 3324 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{Print}[?{To}?]",15));
#line 3324 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3324 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3324,"subs_functions.bas");}while(r);
#line 3325 "subs_functions/subs_functions.bas"
do{
#line 3325 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1873))),256,1),qbs_new_txt_len("Print",5));
#line 3325 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3325 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3325,"subs_functions.bas");}while(r);
#line 3326 "subs_functions/subs_functions.bas"
do{
#line 3326 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("VIEW PRINT [topRow% TO bottomRow%]",34));
#line 3326 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3326 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3326,"subs_functions.bas");}while(r);
#line 3327 "subs_functions/subs_functions.bas"
do{
#line 3327 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3327,"subs_functions.bas");}while(r);
#line 3329 "subs_functions/subs_functions.bas"
do{
#line 3329 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3329 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3329,"subs_functions.bas");}while(r);
#line 3330 "subs_functions/subs_functions.bas"
do{
#line 3330 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Window",6));
#line 3330 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3330 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3330,"subs_functions.bas");}while(r);
#line 3331 "subs_functions/subs_functions.bas"
do{
#line 3331 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3331 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3331,"subs_functions.bas");}while(r);
#line 3332 "subs_functions/subs_functions.bas"
do{
#line 3332 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_sub_window",14));
#line 3332 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3332 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3332,"subs_functions.bas");}while(r);
#line 3333 "subs_functions/subs_functions.bas"
do{
#line 3333 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 3333 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3333,"subs_functions.bas");}while(r);
#line 3334 "subs_functions/subs_functions.bas"
do{
#line 3334 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
#line 3334 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3334 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3334,"subs_functions.bas");}while(r);
#line 3335 "subs_functions/subs_functions.bas"
do{
#line 3335 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)]",23));
#line 3335 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3335 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3335,"subs_functions.bas");}while(r);
#line 3336 "subs_functions/subs_functions.bas"
do{
#line 3336 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("WINDOW [[SCREEN] (x1!, y1!) - (x2!, y2!)]",41));
#line 3336 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3336 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3336,"subs_functions.bas");}while(r);
#line 3337 "subs_functions/subs_functions.bas"
do{
#line 3337 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3337 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3337,"subs_functions.bas");}while(r);
#line 3339 "subs_functions/subs_functions.bas"
do{
#line 3339 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3339 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3339,"subs_functions.bas");}while(r);
#line 3340 "subs_functions/subs_functions.bas"
do{
#line 3340 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Locate",6));
#line 3340 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3340 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3340,"subs_functions.bas");}while(r);
#line 3341 "subs_functions/subs_functions.bas"
do{
#line 3341 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3341 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3341,"subs_functions.bas");}while(r);
#line 3342 "subs_functions/subs_functions.bas"
do{
#line 3342 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_sub_locate",14));
#line 3342 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3342 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3342,"subs_functions.bas");}while(r);
#line 3343 "subs_functions/subs_functions.bas"
do{
#line 3343 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 3343 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3343,"subs_functions.bas");}while(r);
#line 3344 "subs_functions/subs_functions.bas"
do{
#line 3344 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3344 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3344 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3344,"subs_functions.bas");}while(r);
#line 3345 "subs_functions/subs_functions.bas"
do{
#line 3345 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
#line 3345 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3345 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3345,"subs_functions.bas");}while(r);
#line 3346 "subs_functions/subs_functions.bas"
do{
#line 3346 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LOCATE [row%][, column%] [, cursor%][, cursorStart%, cursorStop%]",65));
#line 3346 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3346 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3346,"subs_functions.bas");}while(r);
#line 3347 "subs_functions/subs_functions.bas"
do{
#line 3347 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3347 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3347,"subs_functions.bas");}while(r);
#line 3349 "subs_functions/subs_functions.bas"
do{
#line 3349 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3349 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3349,"subs_functions.bas");}while(r);
#line 3350 "subs_functions/subs_functions.bas"
do{
#line 3350 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Color",5));
#line 3350 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3350 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3350,"subs_functions.bas");}while(r);
#line 3351 "subs_functions/subs_functions.bas"
do{
#line 3351 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3351 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3351,"subs_functions.bas");}while(r);
#line 3352 "subs_functions/subs_functions.bas"
do{
#line 3352 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_sub_color",13));
#line 3352 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3352 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3352,"subs_functions.bas");}while(r);
#line 3353 "subs_functions/subs_functions.bas"
do{
#line 3353 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 3353 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3353,"subs_functions.bas");}while(r);
#line 3354 "subs_functions/subs_functions.bas"
do{
#line 3354 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3354 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3354 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3354,"subs_functions.bas");}while(r);
#line 3355 "subs_functions/subs_functions.bas"
do{
#line 3355 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,?]]]",19));
#line 3355 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3355 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3355,"subs_functions.bas");}while(r);
#line 3356 "subs_functions/subs_functions.bas"
do{
#line 3356 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("COLOR [foreground&][, background&][, , destHandle&]",51));
#line 3356 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3356 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3356,"subs_functions.bas");}while(r);
#line 3357 "subs_functions/subs_functions.bas"
do{
#line 3357 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3357 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3357,"subs_functions.bas");}while(r);
#line 3359 "subs_functions/subs_functions.bas"
do{
#line 3359 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3359 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3359,"subs_functions.bas");}while(r);
#line 3360 "subs_functions/subs_functions.bas"
do{
#line 3360 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Palette",7));
#line 3360 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3360 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3360,"subs_functions.bas");}while(r);
#line 3361 "subs_functions/subs_functions.bas"
do{
#line 3361 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3361 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3361,"subs_functions.bas");}while(r);
#line 3362 "subs_functions/subs_functions.bas"
do{
#line 3362 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_palette",11));
#line 3362 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3362 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3362,"subs_functions.bas");}while(r);
#line 3363 "subs_functions/subs_functions.bas"
do{
#line 3363 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3363 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3363,"subs_functions.bas");}while(r);
#line 3364 "subs_functions/subs_functions.bas"
do{
#line 3364 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3364 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3364 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3364,"subs_functions.bas");}while(r);
#line 3365 "subs_functions/subs_functions.bas"
do{
#line 3365 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?,?]",5));
#line 3365 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3365 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3365,"subs_functions.bas");}while(r);
#line 3366 "subs_functions/subs_functions.bas"
do{
#line 3366 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PALETTE [attribute%, red% + (green% * 256) + (blue% * 65536)] or PALETTE [existingAttribute%, newAttribute%]",108));
#line 3366 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3366 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3366,"subs_functions.bas");}while(r);
#line 3367 "subs_functions/subs_functions.bas"
do{
#line 3367 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3367 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3367,"subs_functions.bas");}while(r);
#line 3369 "subs_functions/subs_functions.bas"
do{
#line 3369 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3369 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3369,"subs_functions.bas");}while(r);
#line 3370 "subs_functions/subs_functions.bas"
do{
#line 3370 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Width",5));
#line 3370 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3370 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3370,"subs_functions.bas");}while(r);
#line 3371 "subs_functions/subs_functions.bas"
do{
#line 3371 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3371 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3371,"subs_functions.bas");}while(r);
#line 3372 "subs_functions/subs_functions.bas"
do{
#line 3372 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbsub_width",11));
#line 3372 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3372 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3372,"subs_functions.bas");}while(r);
#line 3373 "subs_functions/subs_functions.bas"
do{
#line 3373 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 3373 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3373,"subs_functions.bas");}while(r);
#line 3374 "subs_functions/subs_functions.bas"
do{
#line 3374 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3374 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3374 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3374,"subs_functions.bas");}while(r);
#line 3375 "subs_functions/subs_functions.bas"
do{
#line 3375 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{#|LPrint}][?][,[?][,[?][,[?]]]]",33));
#line 3375 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3375 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3375,"subs_functions.bas");}while(r);
#line 3377 "subs_functions/subs_functions.bas"
do{
#line 3377 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("WIDTH [columns%][, rows%] or WIDTH {file_number|device}, columnwidth%",69));
#line 3377 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3377 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3377,"subs_functions.bas");}while(r);
#line 3378 "subs_functions/subs_functions.bas"
do{
#line 3378 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3378 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3378,"subs_functions.bas");}while(r);
#line 3380 "subs_functions/subs_functions.bas"
do{
#line 3380 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3380 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3380,"subs_functions.bas");}while(r);
#line 3381 "subs_functions/subs_functions.bas"
do{
#line 3381 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Screen",6));
#line 3381 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3381 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3381,"subs_functions.bas");}while(r);
#line 3382 "subs_functions/subs_functions.bas"
do{
#line 3382 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3382 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3382,"subs_functions.bas");}while(r);
#line 3383 "subs_functions/subs_functions.bas"
do{
#line 3383 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbg_screen",10));
#line 3383 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3383 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3383,"subs_functions.bas");}while(r);
#line 3384 "subs_functions/subs_functions.bas"
do{
#line 3384 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 3384 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3384,"subs_functions.bas");}while(r);
#line 3385 "subs_functions/subs_functions.bas"
do{
#line 3385 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3385 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3385 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3385,"subs_functions.bas");}while(r);
#line 3389 "subs_functions/subs_functions.bas"
do{
#line 3389 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,[{_ManualDisplay}?]]]]]",43));
#line 3389 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3389 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3389,"subs_functions.bas");}while(r);
#line 3390 "subs_functions/subs_functions.bas"
do{
#line 3390 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("SCREEN {mode%|imagehandle&} [, , active_page, visual_page]",58));
#line 3390 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3390 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3390,"subs_functions.bas");}while(r);
#line 3391 "subs_functions/subs_functions.bas"
do{
#line 3391 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3391 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3391,"subs_functions.bas");}while(r);
#line 3393 "subs_functions/subs_functions.bas"
do{
#line 3393 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3393 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3393,"subs_functions.bas");}while(r);
#line 3394 "subs_functions/subs_functions.bas"
do{
#line 3394 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PSet",4));
#line 3394 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3394 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3394,"subs_functions.bas");}while(r);
#line 3395 "subs_functions/subs_functions.bas"
do{
#line 3395 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3395 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3395,"subs_functions.bas");}while(r);
#line 3396 "subs_functions/subs_functions.bas"
do{
#line 3396 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_pset",8));
#line 3396 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3396 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3396,"subs_functions.bas");}while(r);
#line 3397 "subs_functions/subs_functions.bas"
do{
#line 3397 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3397 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3397,"subs_functions.bas");}while(r);
#line 3398 "subs_functions/subs_functions.bas"
do{
#line 3398 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3398 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3398 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3398,"subs_functions.bas");}while(r);
#line 3399 "subs_functions/subs_functions.bas"
do{
#line 3399 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17));
#line 3399 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3399 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3399,"subs_functions.bas");}while(r);
#line 3400 "subs_functions/subs_functions.bas"
do{
#line 3400 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PSET [STEP](column%, row%)[, colorAttribute]",44));
#line 3400 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3400 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3400,"subs_functions.bas");}while(r);
#line 3401 "subs_functions/subs_functions.bas"
do{
#line 3401 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3401 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3401,"subs_functions.bas");}while(r);
#line 3403 "subs_functions/subs_functions.bas"
do{
#line 3403 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3403 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3403,"subs_functions.bas");}while(r);
#line 3404 "subs_functions/subs_functions.bas"
do{
#line 3404 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PReset",6));
#line 3404 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3404 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3404,"subs_functions.bas");}while(r);
#line 3405 "subs_functions/subs_functions.bas"
do{
#line 3405 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3405 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3405,"subs_functions.bas");}while(r);
#line 3406 "subs_functions/subs_functions.bas"
do{
#line 3406 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_preset",10));
#line 3406 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3406 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3406,"subs_functions.bas");}while(r);
#line 3407 "subs_functions/subs_functions.bas"
do{
#line 3407 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 3407 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3407,"subs_functions.bas");}while(r);
#line 3408 "subs_functions/subs_functions.bas"
do{
#line 3408 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3408 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3408 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3408,"subs_functions.bas");}while(r);
#line 3409 "subs_functions/subs_functions.bas"
do{
#line 3409 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17));
#line 3409 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3409 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3409,"subs_functions.bas");}while(r);
#line 3410 "subs_functions/subs_functions.bas"
do{
#line 3410 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PRESET [STEP](column%, row%)[, colorAttribute]",46));
#line 3410 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3410 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3410,"subs_functions.bas");}while(r);
#line 3411 "subs_functions/subs_functions.bas"
do{
#line 3411 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3411 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3411,"subs_functions.bas");}while(r);
#line 3413 "subs_functions/subs_functions.bas"
do{
#line 3413 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3413 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3413,"subs_functions.bas");}while(r);
#line 3414 "subs_functions/subs_functions.bas"
do{
#line 3414 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
#line 3414 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3414 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3414,"subs_functions.bas");}while(r);
#line 3415 "subs_functions/subs_functions.bas"
do{
#line 3415 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3415 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3415,"subs_functions.bas");}while(r);
#line 3416 "subs_functions/subs_functions.bas"
do{
#line 3416 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_asc",7));
#line 3416 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3416 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3416,"subs_functions.bas");}while(r);
#line 3417 "subs_functions/subs_functions.bas"
do{
#line 3417 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3417 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3417,"subs_functions.bas");}while(r);
#line 3418 "subs_functions/subs_functions.bas"
do{
#line 3418 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3418 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3418 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3418,"subs_functions.bas");}while(r);
#line 3419 "subs_functions/subs_functions.bas"
do{
#line 3419 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3419 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3419,"subs_functions.bas");}while(r);
#line 3420 "subs_functions/subs_functions.bas"
do{
#line 3420 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("ASC(text$[, position%])",23));
#line 3420 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3420 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3420,"subs_functions.bas");}while(r);
#line 3421 "subs_functions/subs_functions.bas"
do{
#line 3421 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3421 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3421,"subs_functions.bas");}while(r);
#line 3423 "subs_functions/subs_functions.bas"
do{
#line 3423 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3423 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3423,"subs_functions.bas");}while(r);
#line 3424 "subs_functions/subs_functions.bas"
do{
#line 3424 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Len",3));
#line 3424 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3424 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3424,"subs_functions.bas");}while(r);
#line 3425 "subs_functions/subs_functions.bas"
do{
#line 3425 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3425 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3425,"subs_functions.bas");}while(r);
#line 3426 "subs_functions/subs_functions.bas"
do{
#line 3426 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("",0));
#line 3426 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3426 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3426,"subs_functions.bas");}while(r);
#line 3427 "subs_functions/subs_functions.bas"
do{
#line 3427 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3427 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3427,"subs_functions.bas");}while(r);
#line 3428 "subs_functions/subs_functions.bas"
do{
#line 3428 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3428 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3428 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3428,"subs_functions.bas");}while(r);
#line 3429 "subs_functions/subs_functions.bas"
do{
#line 3429 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3429 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3429,"subs_functions.bas");}while(r);
#line 3430 "subs_functions/subs_functions.bas"
do{
#line 3430 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LEN(literalTextOrVariable$)",27));
#line 3430 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3430 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3430,"subs_functions.bas");}while(r);
#line 3431 "subs_functions/subs_functions.bas"
do{
#line 3431 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3431 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3431,"subs_functions.bas");}while(r);
#line 3433 "subs_functions/subs_functions.bas"
do{
#line 3433 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3433 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3433,"subs_functions.bas");}while(r);
#line 3434 "subs_functions/subs_functions.bas"
do{
#line 3434 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("InKey",5));
#line 3434 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3434 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3434,"subs_functions.bas");}while(r);
#line 3435 "subs_functions/subs_functions.bas"
do{
#line 3435 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3435 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3435 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3435,"subs_functions.bas");}while(r);
#line 3436 "subs_functions/subs_functions.bas"
do{
#line 3436 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3436 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3436,"subs_functions.bas");}while(r);
#line 3437 "subs_functions/subs_functions.bas"
do{
#line 3437 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_inkey",9));
#line 3437 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3437 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3437,"subs_functions.bas");}while(r);
#line 3438 "subs_functions/subs_functions.bas"
do{
#line 3438 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3438 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3438,"subs_functions.bas");}while(r);
#line 3439 "subs_functions/subs_functions.bas"
do{
#line 3439 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("INKEY$",6));
#line 3439 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3439 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3439,"subs_functions.bas");}while(r);
#line 3440 "subs_functions/subs_functions.bas"
do{
#line 3440 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3440 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3440,"subs_functions.bas");}while(r);
#line 3442 "subs_functions/subs_functions.bas"
do{
#line 3442 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3442 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3442,"subs_functions.bas");}while(r);
#line 3443 "subs_functions/subs_functions.bas"
do{
#line 3443 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Str",3));
#line 3443 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3443 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3443,"subs_functions.bas");}while(r);
#line 3444 "subs_functions/subs_functions.bas"
do{
#line 3444 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3444 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3444 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3444,"subs_functions.bas");}while(r);
#line 3445 "subs_functions/subs_functions.bas"
do{
#line 3445 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3445 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3445,"subs_functions.bas");}while(r);
#line 3446 "subs_functions/subs_functions.bas"
do{
#line 3446 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_str",7));
#line 3446 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3446 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3446,"subs_functions.bas");}while(r);
#line 3447 "subs_functions/subs_functions.bas"
do{
#line 3447 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3447 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3447,"subs_functions.bas");}while(r);
#line 3448 "subs_functions/subs_functions.bas"
do{
#line 3448 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string( -1 ));
#line 3448 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3448 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3448,"subs_functions.bas");}while(r);
#line 3449 "subs_functions/subs_functions.bas"
do{
#line 3449 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3449 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3449,"subs_functions.bas");}while(r);
#line 3450 "subs_functions/subs_functions.bas"
do{
#line 3450 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("STR$(number)",12));
#line 3450 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3450 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3450,"subs_functions.bas");}while(r);
#line 3451 "subs_functions/subs_functions.bas"
do{
#line 3451 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3451 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3451,"subs_functions.bas");}while(r);
#line 3453 "subs_functions/subs_functions.bas"
do{
#line 3453 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3453 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3453,"subs_functions.bas");}while(r);
#line 3454 "subs_functions/subs_functions.bas"
do{
#line 3454 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ToStr",6));
#line 3454 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3454 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3454,"subs_functions.bas");}while(r);
#line 3455 "subs_functions/subs_functions.bas"
do{
#line 3455 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3455 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3455 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3455,"subs_functions.bas");}while(r);
#line 3456 "subs_functions/subs_functions.bas"
do{
#line 3456 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3456 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3456,"subs_functions.bas");}while(r);
#line 3457 "subs_functions/subs_functions.bas"
do{
#line 3457 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs__tostr",10));
#line 3457 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3457 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3457,"subs_functions.bas");}while(r);
#line 3458 "subs_functions/subs_functions.bas"
do{
#line 3458 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3458 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3458,"subs_functions.bas");}while(r);
#line 3459 "subs_functions/subs_functions.bas"
do{
#line 3459 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 3459 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3459 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3459,"subs_functions.bas");}while(r);
#line 3460 "subs_functions/subs_functions.bas"
do{
#line 3460 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3460 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3460 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3460,"subs_functions.bas");}while(r);
#line 3461 "subs_functions/subs_functions.bas"
do{
#line 3461 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3461 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3461,"subs_functions.bas");}while(r);
#line 3462 "subs_functions/subs_functions.bas"
do{
#line 3462 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TOSTR$(number[,digits])",24));
#line 3462 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3462 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3462,"subs_functions.bas");}while(r);
#line 3463 "subs_functions/subs_functions.bas"
do{
#line 3463 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3463 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3463,"subs_functions.bas");}while(r);
#line 3465 "subs_functions/subs_functions.bas"
do{
#line 3465 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3465 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3465,"subs_functions.bas");}while(r);
#line 3466 "subs_functions/subs_functions.bas"
do{
#line 3466 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("UCase",5));
#line 3466 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3466 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3466,"subs_functions.bas");}while(r);
#line 3467 "subs_functions/subs_functions.bas"
do{
#line 3467 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3467 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3467 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3467,"subs_functions.bas");}while(r);
#line 3468 "subs_functions/subs_functions.bas"
do{
#line 3468 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3468 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3468,"subs_functions.bas");}while(r);
#line 3469 "subs_functions/subs_functions.bas"
do{
#line 3469 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_ucase",9));
#line 3469 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3469 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3469,"subs_functions.bas");}while(r);
#line 3470 "subs_functions/subs_functions.bas"
do{
#line 3470 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3470 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3470,"subs_functions.bas");}while(r);
#line 3471 "subs_functions/subs_functions.bas"
do{
#line 3471 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3471 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3471 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3471,"subs_functions.bas");}while(r);
#line 3472 "subs_functions/subs_functions.bas"
do{
#line 3472 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3472 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3472,"subs_functions.bas");}while(r);
#line 3473 "subs_functions/subs_functions.bas"
do{
#line 3473 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("UCASE$(text$)",13));
#line 3473 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3473 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3473,"subs_functions.bas");}while(r);
#line 3474 "subs_functions/subs_functions.bas"
do{
#line 3474 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3474 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3474,"subs_functions.bas");}while(r);
#line 3476 "subs_functions/subs_functions.bas"
do{
#line 3476 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3476 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3476,"subs_functions.bas");}while(r);
#line 3477 "subs_functions/subs_functions.bas"
do{
#line 3477 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LCase",5));
#line 3477 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3477 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3477,"subs_functions.bas");}while(r);
#line 3478 "subs_functions/subs_functions.bas"
do{
#line 3478 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3478 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3478 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3478,"subs_functions.bas");}while(r);
#line 3479 "subs_functions/subs_functions.bas"
do{
#line 3479 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3479 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3479,"subs_functions.bas");}while(r);
#line 3480 "subs_functions/subs_functions.bas"
do{
#line 3480 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_lcase",9));
#line 3480 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3480 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3480,"subs_functions.bas");}while(r);
#line 3481 "subs_functions/subs_functions.bas"
do{
#line 3481 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3481 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3481,"subs_functions.bas");}while(r);
#line 3482 "subs_functions/subs_functions.bas"
do{
#line 3482 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3482 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3482 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3482,"subs_functions.bas");}while(r);
#line 3483 "subs_functions/subs_functions.bas"
do{
#line 3483 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3483 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3483,"subs_functions.bas");}while(r);
#line 3484 "subs_functions/subs_functions.bas"
do{
#line 3484 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LCASE$(text$)",13));
#line 3484 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3484 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3484,"subs_functions.bas");}while(r);
#line 3485 "subs_functions/subs_functions.bas"
do{
#line 3485 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3485 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3485,"subs_functions.bas");}while(r);
#line 3487 "subs_functions/subs_functions.bas"
do{
#line 3487 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3487 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3487,"subs_functions.bas");}while(r);
#line 3488 "subs_functions/subs_functions.bas"
do{
#line 3488 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Left",4));
#line 3488 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3488 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3488,"subs_functions.bas");}while(r);
#line 3489 "subs_functions/subs_functions.bas"
do{
#line 3489 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3489 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3489 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3489,"subs_functions.bas");}while(r);
#line 3490 "subs_functions/subs_functions.bas"
do{
#line 3490 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3490 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3490,"subs_functions.bas");}while(r);
#line 3491 "subs_functions/subs_functions.bas"
do{
#line 3491 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_left",8));
#line 3491 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3491 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3491,"subs_functions.bas");}while(r);
#line 3492 "subs_functions/subs_functions.bas"
do{
#line 3492 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3492 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3492,"subs_functions.bas");}while(r);
#line 3493 "subs_functions/subs_functions.bas"
do{
#line 3493 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3493 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3493 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3493,"subs_functions.bas");}while(r);
#line 3494 "subs_functions/subs_functions.bas"
do{
#line 3494 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3494 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3494,"subs_functions.bas");}while(r);
#line 3495 "subs_functions/subs_functions.bas"
do{
#line 3495 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LEFT$(stringValue$, numberOfCharacters%)",40));
#line 3495 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3495 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3495,"subs_functions.bas");}while(r);
#line 3496 "subs_functions/subs_functions.bas"
do{
#line 3496 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3496 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3496,"subs_functions.bas");}while(r);
#line 3498 "subs_functions/subs_functions.bas"
do{
#line 3498 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3498 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3498,"subs_functions.bas");}while(r);
#line 3499 "subs_functions/subs_functions.bas"
do{
#line 3499 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Right",5));
#line 3499 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3499 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3499,"subs_functions.bas");}while(r);
#line 3500 "subs_functions/subs_functions.bas"
do{
#line 3500 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3500 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3500 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3500,"subs_functions.bas");}while(r);
#line 3501 "subs_functions/subs_functions.bas"
do{
#line 3501 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3501 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3501,"subs_functions.bas");}while(r);
#line 3502 "subs_functions/subs_functions.bas"
do{
#line 3502 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_right",9));
#line 3502 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3502 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3502,"subs_functions.bas");}while(r);
#line 3503 "subs_functions/subs_functions.bas"
do{
#line 3503 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3503 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3503,"subs_functions.bas");}while(r);
#line 3504 "subs_functions/subs_functions.bas"
do{
#line 3504 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3504 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3504 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3504,"subs_functions.bas");}while(r);
#line 3505 "subs_functions/subs_functions.bas"
do{
#line 3505 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3505 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3505,"subs_functions.bas");}while(r);
#line 3506 "subs_functions/subs_functions.bas"
do{
#line 3506 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("RIGHT$(stringValue$, numberOfCharacters%)",41));
#line 3506 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3506 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3506,"subs_functions.bas");}while(r);
#line 3507 "subs_functions/subs_functions.bas"
do{
#line 3507 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3507 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3507,"subs_functions.bas");}while(r);
#line 3509 "subs_functions/subs_functions.bas"
do{
#line 3509 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3509 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3509,"subs_functions.bas");}while(r);
#line 3510 "subs_functions/subs_functions.bas"
do{
#line 3510 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LTrim",5));
#line 3510 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3510 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3510,"subs_functions.bas");}while(r);
#line 3511 "subs_functions/subs_functions.bas"
do{
#line 3511 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3511 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3511 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3511,"subs_functions.bas");}while(r);
#line 3512 "subs_functions/subs_functions.bas"
do{
#line 3512 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3512 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3512,"subs_functions.bas");}while(r);
#line 3513 "subs_functions/subs_functions.bas"
do{
#line 3513 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_ltrim",9));
#line 3513 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3513 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3513,"subs_functions.bas");}while(r);
#line 3514 "subs_functions/subs_functions.bas"
do{
#line 3514 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3514 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3514,"subs_functions.bas");}while(r);
#line 3515 "subs_functions/subs_functions.bas"
do{
#line 3515 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3515 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3515 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3515,"subs_functions.bas");}while(r);
#line 3516 "subs_functions/subs_functions.bas"
do{
#line 3516 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3516 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3516,"subs_functions.bas");}while(r);
#line 3517 "subs_functions/subs_functions.bas"
do{
#line 3517 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LTRIM$(text$)",13));
#line 3517 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3517 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3517,"subs_functions.bas");}while(r);
#line 3518 "subs_functions/subs_functions.bas"
do{
#line 3518 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3518 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3518,"subs_functions.bas");}while(r);
#line 3520 "subs_functions/subs_functions.bas"
do{
#line 3520 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3520 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3520,"subs_functions.bas");}while(r);
#line 3521 "subs_functions/subs_functions.bas"
do{
#line 3521 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RTrim",5));
#line 3521 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3521 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3521,"subs_functions.bas");}while(r);
#line 3522 "subs_functions/subs_functions.bas"
do{
#line 3522 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3522 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3522 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3522,"subs_functions.bas");}while(r);
#line 3523 "subs_functions/subs_functions.bas"
do{
#line 3523 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3523 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3523,"subs_functions.bas");}while(r);
#line 3524 "subs_functions/subs_functions.bas"
do{
#line 3524 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_rtrim",9));
#line 3524 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3524 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3524,"subs_functions.bas");}while(r);
#line 3525 "subs_functions/subs_functions.bas"
do{
#line 3525 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3525 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3525,"subs_functions.bas");}while(r);
#line 3526 "subs_functions/subs_functions.bas"
do{
#line 3526 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3526 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3526 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3526,"subs_functions.bas");}while(r);
#line 3527 "subs_functions/subs_functions.bas"
do{
#line 3527 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3527 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3527,"subs_functions.bas");}while(r);
#line 3528 "subs_functions/subs_functions.bas"
do{
#line 3528 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("RTRIM$(text$)",13));
#line 3528 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3528 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3528,"subs_functions.bas");}while(r);
#line 3529 "subs_functions/subs_functions.bas"
do{
#line 3529 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3529 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3529,"subs_functions.bas");}while(r);
#line 3531 "subs_functions/subs_functions.bas"
do{
#line 3531 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3531 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3531,"subs_functions.bas");}while(r);
#line 3532 "subs_functions/subs_functions.bas"
do{
#line 3532 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Trim",5));
#line 3532 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3532 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3532,"subs_functions.bas");}while(r);
#line 3533 "subs_functions/subs_functions.bas"
do{
#line 3533 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3533 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3533 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3533,"subs_functions.bas");}while(r);
#line 3534 "subs_functions/subs_functions.bas"
do{
#line 3534 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3534 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3534,"subs_functions.bas");}while(r);
#line 3535 "subs_functions/subs_functions.bas"
do{
#line 3535 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs__trim",9));
#line 3535 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3535 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3535,"subs_functions.bas");}while(r);
#line 3536 "subs_functions/subs_functions.bas"
do{
#line 3536 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3536 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3536,"subs_functions.bas");}while(r);
#line 3537 "subs_functions/subs_functions.bas"
do{
#line 3537 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3537 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3537 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3537,"subs_functions.bas");}while(r);
#line 3538 "subs_functions/subs_functions.bas"
do{
#line 3538 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3538 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3538,"subs_functions.bas");}while(r);
#line 3539 "subs_functions/subs_functions.bas"
do{
#line 3539 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TRIM$(text$)",13));
#line 3539 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3539 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3539,"subs_functions.bas");}while(r);
#line 3540 "subs_functions/subs_functions.bas"
do{
#line 3540 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3540 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3540,"subs_functions.bas");}while(r);
#line 3542 "subs_functions/subs_functions.bas"
do{
#line 3542 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3542 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3542,"subs_functions.bas");}while(r);
#line 3543 "subs_functions/subs_functions.bas"
do{
#line 3543 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Print",5));
#line 3543 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3543 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3543,"subs_functions.bas");}while(r);
#line 3544 "subs_functions/subs_functions.bas"
do{
#line 3544 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3544 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3544,"subs_functions.bas");}while(r);
#line 3545 "subs_functions/subs_functions.bas"
do{
#line 3545 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_print",9));
#line 3545 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3545 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3545,"subs_functions.bas");}while(r);
#line 3546 "subs_functions/subs_functions.bas"
do{
#line 3546 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3546 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3546,"subs_functions.bas");}while(r);
#line 3547 "subs_functions/subs_functions.bas"
do{
#line 3547 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3547 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3547 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3547,"subs_functions.bas");}while(r);
#line 3548 "subs_functions/subs_functions.bas"
do{
#line 3548 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("PRINT [expression] [{;|,] [expression...]",41));
#line 3548 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3548 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3548,"subs_functions.bas");}while(r);
#line 3549 "subs_functions/subs_functions.bas"
do{
#line 3549 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3549 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3549,"subs_functions.bas");}while(r);
#line 3551 "subs_functions/subs_functions.bas"
do{
#line 3551 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3551 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3551,"subs_functions.bas");}while(r);
#line 3552 "subs_functions/subs_functions.bas"
do{
#line 3552 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LPrint",6));
#line 3552 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3552 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3552,"subs_functions.bas");}while(r);
#line 3552 "subs_functions/subs_functions.bas"
do{
#line 3552 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 7ll ;
#line 3552 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3552,"subs_functions.bas");}while(r);
#line 3553 "subs_functions/subs_functions.bas"
do{
#line 3553 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3553 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3553,"subs_functions.bas");}while(r);
#line 3554 "subs_functions/subs_functions.bas"
do{
#line 3554 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("qbs_lprint",10));
#line 3554 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3554 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3554,"subs_functions.bas");}while(r);
#line 3555 "subs_functions/subs_functions.bas"
do{
#line 3555 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3555 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3555,"subs_functions.bas");}while(r);
#line 3556 "subs_functions/subs_functions.bas"
do{
#line 3556 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3556 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3556 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3556,"subs_functions.bas");}while(r);
#line 3557 "subs_functions/subs_functions.bas"
do{
#line 3557 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LPRINT [expression] [{;|,}]",27));
#line 3557 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3557 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3557,"subs_functions.bas");}while(r);
#line 3558 "subs_functions/subs_functions.bas"
do{
#line 3558 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3558 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3558,"subs_functions.bas");}while(r);
#line 3560 "subs_functions/subs_functions.bas"
do{
#line 3560 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3560 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3560,"subs_functions.bas");}while(r);
#line 3561 "subs_functions/subs_functions.bas"
do{
#line 3561 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LPos",4));
#line 3561 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3561 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3561,"subs_functions.bas");}while(r);
#line 3561 "subs_functions/subs_functions.bas"
do{
#line 3561 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 7ll ;
#line 3561 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3561,"subs_functions.bas");}while(r);
#line 3562 "subs_functions/subs_functions.bas"
do{
#line 3562 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3562 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3562,"subs_functions.bas");}while(r);
#line 3563 "subs_functions/subs_functions.bas"
do{
#line 3563 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_lpos",9));
#line 3563 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3563 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3563,"subs_functions.bas");}while(r);
#line 3564 "subs_functions/subs_functions.bas"
do{
#line 3564 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3564 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3564,"subs_functions.bas");}while(r);
#line 3565 "subs_functions/subs_functions.bas"
do{
#line 3565 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3565 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3565 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3565,"subs_functions.bas");}while(r);
#line 3566 "subs_functions/subs_functions.bas"
do{
#line 3566 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3566 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3566,"subs_functions.bas");}while(r);
#line 3567 "subs_functions/subs_functions.bas"
do{
#line 3567 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("LPOS(index%)",12));
#line 3567 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3567 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3567,"subs_functions.bas");}while(r);
#line 3568 "subs_functions/subs_functions.bas"
do{
#line 3568 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3568 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3568,"subs_functions.bas");}while(r);
#line 3571 "subs_functions/subs_functions.bas"
do{
#line 3571 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3571 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3571,"subs_functions.bas");}while(r);
#line 3572 "subs_functions/subs_functions.bas"
do{
#line 3572 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CWD",4));
#line 3572 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3572 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3572,"subs_functions.bas");}while(r);
#line 3573 "subs_functions/subs_functions.bas"
do{
#line 3573 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3573 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3573 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3573,"subs_functions.bas");}while(r);
#line 3574 "subs_functions/subs_functions.bas"
do{
#line 3574 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3574 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3574,"subs_functions.bas");}while(r);
#line 3575 "subs_functions/subs_functions.bas"
do{
#line 3575 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__cwd",9));
#line 3575 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3575 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3575,"subs_functions.bas");}while(r);
#line 3576 "subs_functions/subs_functions.bas"
do{
#line 3576 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3576 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3576,"subs_functions.bas");}while(r);
#line 3577 "subs_functions/subs_functions.bas"
do{
#line 3577 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CWD$",5));
#line 3577 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3577 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3577,"subs_functions.bas");}while(r);
#line 3578 "subs_functions/subs_functions.bas"
do{
#line 3578 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3578 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3578,"subs_functions.bas");}while(r);
#line 3581 "subs_functions/subs_functions.bas"
do{
#line 3581 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3581 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3581,"subs_functions.bas");}while(r);
#line 3582 "subs_functions/subs_functions.bas"
do{
#line 3582 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StartDir",9));
#line 3582 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3582 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3582,"subs_functions.bas");}while(r);
#line 3583 "subs_functions/subs_functions.bas"
do{
#line 3583 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3583 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3583 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3583,"subs_functions.bas");}while(r);
#line 3584 "subs_functions/subs_functions.bas"
do{
#line 3584 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3584 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3584,"subs_functions.bas");}while(r);
#line 3585 "subs_functions/subs_functions.bas"
do{
#line 3585 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__startdir",14));
#line 3585 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3585 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3585,"subs_functions.bas");}while(r);
#line 3586 "subs_functions/subs_functions.bas"
do{
#line 3586 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3586 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3586,"subs_functions.bas");}while(r);
#line 3587 "subs_functions/subs_functions.bas"
do{
#line 3587 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_STARTDIR$",10));
#line 3587 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3587 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3587,"subs_functions.bas");}while(r);
#line 3588 "subs_functions/subs_functions.bas"
do{
#line 3588 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3588 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3588,"subs_functions.bas");}while(r);
#line 3591 "subs_functions/subs_functions.bas"
do{
#line 3591 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3591 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3591,"subs_functions.bas");}while(r);
#line 3592 "subs_functions/subs_functions.bas"
do{
#line 3592 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dir",4));
#line 3592 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3592 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3592,"subs_functions.bas");}while(r);
#line 3593 "subs_functions/subs_functions.bas"
do{
#line 3593 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3593 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3593 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3593,"subs_functions.bas");}while(r);
#line 3594 "subs_functions/subs_functions.bas"
do{
#line 3594 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3594 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3594,"subs_functions.bas");}while(r);
#line 3595 "subs_functions/subs_functions.bas"
do{
#line 3595 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__dir",9));
#line 3595 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3595 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3595,"subs_functions.bas");}while(r);
#line 3596 "subs_functions/subs_functions.bas"
do{
#line 3596 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3596 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3596,"subs_functions.bas");}while(r);
#line 3597 "subs_functions/subs_functions.bas"
do{
#line 3597 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 3597 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3597 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3597,"subs_functions.bas");}while(r);
#line 3598 "subs_functions/subs_functions.bas"
do{
#line 3598 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3598 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3598,"subs_functions.bas");}while(r);
#line 3599 "subs_functions/subs_functions.bas"
do{
#line 3599 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("_DIR$(",6),func_chr( 34 )),qbs_new_txt_len("folderspecification",19)),func_chr( 34 )),qbs_new_txt_len(")",1)));
#line 3599 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3599 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3599,"subs_functions.bas");}while(r);
#line 3600 "subs_functions/subs_functions.bas"
do{
#line 3600 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3600 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3600,"subs_functions.bas");}while(r);
#line 3603 "subs_functions/subs_functions.bas"
do{
#line 3603 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3603 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3603,"subs_functions.bas");}while(r);
#line 3604 "subs_functions/subs_functions.bas"
do{
#line 3604 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InclErrorFile",14));
#line 3604 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3604 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3604,"subs_functions.bas");}while(r);
#line 3605 "subs_functions/subs_functions.bas"
do{
#line 3605 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 3605 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3605 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3605,"subs_functions.bas");}while(r);
#line 3606 "subs_functions/subs_functions.bas"
do{
#line 3606 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3606 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3606,"subs_functions.bas");}while(r);
#line 3607 "subs_functions/subs_functions.bas"
do{
#line 3607 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__inclerrorfile",19));
#line 3607 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3607 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3607,"subs_functions.bas");}while(r);
#line 3608 "subs_functions/subs_functions.bas"
do{
#line 3608 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 3608 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3608,"subs_functions.bas");}while(r);
#line 3609 "subs_functions/subs_functions.bas"
do{
#line 3609 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_INCLERRORFILE$",15));
#line 3609 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3609 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3609,"subs_functions.bas");}while(r);
#line 3610 "subs_functions/subs_functions.bas"
do{
#line 3610 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3610 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3610,"subs_functions.bas");}while(r);
#line 3612 "subs_functions/subs_functions.bas"
do{
#line 3612 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3612 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3612,"subs_functions.bas");}while(r);
#line 3613 "subs_functions/subs_functions.bas"
do{
#line 3613 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyClear",9));
#line 3613 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3613 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3613,"subs_functions.bas");}while(r);
#line 3614 "subs_functions/subs_functions.bas"
do{
#line 3614 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3614 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3614,"subs_functions.bas");}while(r);
#line 3615 "subs_functions/subs_functions.bas"
do{
#line 3615 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3615 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3615,"subs_functions.bas");}while(r);
#line 3616 "subs_functions/subs_functions.bas"
do{
#line 3616 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 3616 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3616 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3616,"subs_functions.bas");}while(r);
#line 3617 "subs_functions/subs_functions.bas"
do{
#line 3617 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 3617 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3617 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3617,"subs_functions.bas");}while(r);
#line 3618 "subs_functions/subs_functions.bas"
do{
#line 3618 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__keyclear",13));
#line 3618 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3618 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3618,"subs_functions.bas");}while(r);
#line 3619 "subs_functions/subs_functions.bas"
do{
#line 3619 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_KEYCLEAR buffer&",17));
#line 3619 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3619 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3619,"subs_functions.bas");}while(r);
#line 3620 "subs_functions/subs_functions.bas"
do{
#line 3620 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3620 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3620,"subs_functions.bas");}while(r);
#line 3622 "subs_functions/subs_functions.bas"
do{
#line 3622 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3622 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3622,"subs_functions.bas");}while(r);
#line 3623 "subs_functions/subs_functions.bas"
do{
#line 3623 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_D2R",4));
#line 3623 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3623 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3623,"subs_functions.bas");}while(r);
#line 3624 "subs_functions/subs_functions.bas"
do{
#line 3624 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3624 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3624,"subs_functions.bas");}while(r);
#line 3625 "subs_functions/subs_functions.bas"
do{
#line 3625 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_deg2rad",12));
#line 3625 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3625 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3625,"subs_functions.bas");}while(r);
#line 3626 "subs_functions/subs_functions.bas"
do{
#line 3626 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3626 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3626,"subs_functions.bas");}while(r);
#line 3627 "subs_functions/subs_functions.bas"
do{
#line 3627 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3627 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3627 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3627,"subs_functions.bas");}while(r);
#line 3628 "subs_functions/subs_functions.bas"
do{
#line 3628 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3628 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3628,"subs_functions.bas");}while(r);
#line 3629 "subs_functions/subs_functions.bas"
do{
#line 3629 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_D2R(angleInDegrees!)",21));
#line 3629 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3629 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3629,"subs_functions.bas");}while(r);
#line 3630 "subs_functions/subs_functions.bas"
do{
#line 3630 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3630 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3630,"subs_functions.bas");}while(r);
#line 3632 "subs_functions/subs_functions.bas"
do{
#line 3632 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3632 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3632,"subs_functions.bas");}while(r);
#line 3633 "subs_functions/subs_functions.bas"
do{
#line 3633 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_D2G",4));
#line 3633 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3633 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3633,"subs_functions.bas");}while(r);
#line 3634 "subs_functions/subs_functions.bas"
do{
#line 3634 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3634 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3634,"subs_functions.bas");}while(r);
#line 3635 "subs_functions/subs_functions.bas"
do{
#line 3635 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_deg2grad",13));
#line 3635 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3635 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3635,"subs_functions.bas");}while(r);
#line 3636 "subs_functions/subs_functions.bas"
do{
#line 3636 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3636 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3636,"subs_functions.bas");}while(r);
#line 3637 "subs_functions/subs_functions.bas"
do{
#line 3637 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3637 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3637 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3637,"subs_functions.bas");}while(r);
#line 3638 "subs_functions/subs_functions.bas"
do{
#line 3638 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3638 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3638,"subs_functions.bas");}while(r);
#line 3639 "subs_functions/subs_functions.bas"
do{
#line 3639 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_D2G(angleInDegrees!)",21));
#line 3639 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3639 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3639,"subs_functions.bas");}while(r);
#line 3640 "subs_functions/subs_functions.bas"
do{
#line 3640 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3640 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3640,"subs_functions.bas");}while(r);
#line 3642 "subs_functions/subs_functions.bas"
do{
#line 3642 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3642 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3642,"subs_functions.bas");}while(r);
#line 3643 "subs_functions/subs_functions.bas"
do{
#line 3643 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_R2D",4));
#line 3643 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3643 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3643,"subs_functions.bas");}while(r);
#line 3644 "subs_functions/subs_functions.bas"
do{
#line 3644 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3644 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3644,"subs_functions.bas");}while(r);
#line 3645 "subs_functions/subs_functions.bas"
do{
#line 3645 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_rad2deg",12));
#line 3645 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3645 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3645,"subs_functions.bas");}while(r);
#line 3646 "subs_functions/subs_functions.bas"
do{
#line 3646 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3646 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3646,"subs_functions.bas");}while(r);
#line 3647 "subs_functions/subs_functions.bas"
do{
#line 3647 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3647 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3647 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3647,"subs_functions.bas");}while(r);
#line 3648 "subs_functions/subs_functions.bas"
do{
#line 3648 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3648 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3648,"subs_functions.bas");}while(r);
#line 3649 "subs_functions/subs_functions.bas"
do{
#line 3649 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_R2D(angleInRadians!)",21));
#line 3649 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3649 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3649,"subs_functions.bas");}while(r);
#line 3650 "subs_functions/subs_functions.bas"
do{
#line 3650 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3650 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3650,"subs_functions.bas");}while(r);
#line 3652 "subs_functions/subs_functions.bas"
do{
#line 3652 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3652 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3652,"subs_functions.bas");}while(r);
#line 3653 "subs_functions/subs_functions.bas"
do{
#line 3653 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_R2G",4));
#line 3653 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3653 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3653,"subs_functions.bas");}while(r);
#line 3654 "subs_functions/subs_functions.bas"
do{
#line 3654 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3654 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3654,"subs_functions.bas");}while(r);
#line 3655 "subs_functions/subs_functions.bas"
do{
#line 3655 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_rad2grad",13));
#line 3655 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3655 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3655,"subs_functions.bas");}while(r);
#line 3656 "subs_functions/subs_functions.bas"
do{
#line 3656 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3656 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3656,"subs_functions.bas");}while(r);
#line 3657 "subs_functions/subs_functions.bas"
do{
#line 3657 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3657 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3657 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3657,"subs_functions.bas");}while(r);
#line 3658 "subs_functions/subs_functions.bas"
do{
#line 3658 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3658 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3658,"subs_functions.bas");}while(r);
#line 3659 "subs_functions/subs_functions.bas"
do{
#line 3659 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_R2G(angleInRadians!)",21));
#line 3659 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3659 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3659,"subs_functions.bas");}while(r);
#line 3660 "subs_functions/subs_functions.bas"
do{
#line 3660 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3660 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3660,"subs_functions.bas");}while(r);
#line 3662 "subs_functions/subs_functions.bas"
do{
#line 3662 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3662 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3662,"subs_functions.bas");}while(r);
#line 3663 "subs_functions/subs_functions.bas"
do{
#line 3663 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_G2D",4));
#line 3663 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3663 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3663,"subs_functions.bas");}while(r);
#line 3664 "subs_functions/subs_functions.bas"
do{
#line 3664 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3664 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3664,"subs_functions.bas");}while(r);
#line 3665 "subs_functions/subs_functions.bas"
do{
#line 3665 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_grad2deg",13));
#line 3665 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3665 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3665,"subs_functions.bas");}while(r);
#line 3666 "subs_functions/subs_functions.bas"
do{
#line 3666 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3666 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3666,"subs_functions.bas");}while(r);
#line 3667 "subs_functions/subs_functions.bas"
do{
#line 3667 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3667 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3667 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3667,"subs_functions.bas");}while(r);
#line 3668 "subs_functions/subs_functions.bas"
do{
#line 3668 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3668 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3668,"subs_functions.bas");}while(r);
#line 3669 "subs_functions/subs_functions.bas"
do{
#line 3669 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_G2D(gradient!)",15));
#line 3669 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3669 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3669,"subs_functions.bas");}while(r);
#line 3670 "subs_functions/subs_functions.bas"
do{
#line 3670 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3670 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3670,"subs_functions.bas");}while(r);
#line 3672 "subs_functions/subs_functions.bas"
do{
#line 3672 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3672 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3672,"subs_functions.bas");}while(r);
#line 3673 "subs_functions/subs_functions.bas"
do{
#line 3673 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_G2R",4));
#line 3673 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3673 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3673,"subs_functions.bas");}while(r);
#line 3674 "subs_functions/subs_functions.bas"
do{
#line 3674 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3674 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3674,"subs_functions.bas");}while(r);
#line 3675 "subs_functions/subs_functions.bas"
do{
#line 3675 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_grad2rad",13));
#line 3675 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3675 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3675,"subs_functions.bas");}while(r);
#line 3676 "subs_functions/subs_functions.bas"
do{
#line 3676 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3676 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3676,"subs_functions.bas");}while(r);
#line 3677 "subs_functions/subs_functions.bas"
do{
#line 3677 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3677 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3677 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3677,"subs_functions.bas");}while(r);
#line 3678 "subs_functions/subs_functions.bas"
do{
#line 3678 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3678 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3678,"subs_functions.bas");}while(r);
#line 3679 "subs_functions/subs_functions.bas"
do{
#line 3679 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_G2R(gradient!)",15));
#line 3679 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3679 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3679,"subs_functions.bas");}while(r);
#line 3680 "subs_functions/subs_functions.bas"
do{
#line 3680 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3680 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3680,"subs_functions.bas");}while(r);
#line 3682 "subs_functions/subs_functions.bas"
do{
#line 3682 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3682 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3682,"subs_functions.bas");}while(r);
#line 3683 "subs_functions/subs_functions.bas"
do{
#line 3683 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Atan2",6));
#line 3683 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3683 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3683,"subs_functions.bas");}while(r);
#line 3684 "subs_functions/subs_functions.bas"
do{
#line 3684 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3684 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3684,"subs_functions.bas");}while(r);
#line 3685 "subs_functions/subs_functions.bas"
do{
#line 3685 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::atan2",10));
#line 3685 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3685 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3685,"subs_functions.bas");}while(r);
#line 3686 "subs_functions/subs_functions.bas"
do{
#line 3686 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3686 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3686,"subs_functions.bas");}while(r);
#line 3687 "subs_functions/subs_functions.bas"
do{
#line 3687 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
#line 3687 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3687 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3687,"subs_functions.bas");}while(r);
#line 3688 "subs_functions/subs_functions.bas"
do{
#line 3688 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3688 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3688,"subs_functions.bas");}while(r);
#line 3689 "subs_functions/subs_functions.bas"
do{
#line 3689 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ATAN2(y, x)",12));
#line 3689 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3689 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3689,"subs_functions.bas");}while(r);
#line 3690 "subs_functions/subs_functions.bas"
do{
#line 3690 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3690 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3690,"subs_functions.bas");}while(r);
#line 3692 "subs_functions/subs_functions.bas"
do{
#line 3692 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3692 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3692,"subs_functions.bas");}while(r);
#line 3693 "subs_functions/subs_functions.bas"
do{
#line 3693 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Hypot",6));
#line 3693 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3693 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3693,"subs_functions.bas");}while(r);
#line 3694 "subs_functions/subs_functions.bas"
do{
#line 3694 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3694 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3694,"subs_functions.bas");}while(r);
#line 3695 "subs_functions/subs_functions.bas"
do{
#line 3695 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::hypot",10));
#line 3695 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3695 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3695,"subs_functions.bas");}while(r);
#line 3696 "subs_functions/subs_functions.bas"
do{
#line 3696 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3696 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3696,"subs_functions.bas");}while(r);
#line 3697 "subs_functions/subs_functions.bas"
do{
#line 3697 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
#line 3697 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3697 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3697,"subs_functions.bas");}while(r);
#line 3698 "subs_functions/subs_functions.bas"
do{
#line 3698 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3698 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3698,"subs_functions.bas");}while(r);
#line 3699 "subs_functions/subs_functions.bas"
do{
#line 3699 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_HYPOT(x, y)",12));
#line 3699 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3699 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3699,"subs_functions.bas");}while(r);
#line 3700 "subs_functions/subs_functions.bas"
do{
#line 3700 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3700 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3700,"subs_functions.bas");}while(r);
#line 3702 "subs_functions/subs_functions.bas"
do{
#line 3702 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3702 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3702,"subs_functions.bas");}while(r);
#line 3703 "subs_functions/subs_functions.bas"
do{
#line 3703 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Asin",5));
#line 3703 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3703 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3703,"subs_functions.bas");}while(r);
#line 3704 "subs_functions/subs_functions.bas"
do{
#line 3704 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3704 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3704,"subs_functions.bas");}while(r);
#line 3705 "subs_functions/subs_functions.bas"
do{
#line 3705 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::asin",9));
#line 3705 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3705 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3705,"subs_functions.bas");}while(r);
#line 3706 "subs_functions/subs_functions.bas"
do{
#line 3706 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3706 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3706,"subs_functions.bas");}while(r);
#line 3707 "subs_functions/subs_functions.bas"
do{
#line 3707 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3707 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3707 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3707,"subs_functions.bas");}while(r);
#line 3708 "subs_functions/subs_functions.bas"
do{
#line 3708 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3708 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3708,"subs_functions.bas");}while(r);
#line 3709 "subs_functions/subs_functions.bas"
do{
#line 3709 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ASIN(sine_value!)",18));
#line 3709 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3709 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3709,"subs_functions.bas");}while(r);
#line 3710 "subs_functions/subs_functions.bas"
do{
#line 3710 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3710 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3710,"subs_functions.bas");}while(r);
#line 3712 "subs_functions/subs_functions.bas"
do{
#line 3712 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3712 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3712,"subs_functions.bas");}while(r);
#line 3713 "subs_functions/subs_functions.bas"
do{
#line 3713 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Acos",5));
#line 3713 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3713 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3713,"subs_functions.bas");}while(r);
#line 3714 "subs_functions/subs_functions.bas"
do{
#line 3714 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3714 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3714,"subs_functions.bas");}while(r);
#line 3715 "subs_functions/subs_functions.bas"
do{
#line 3715 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::acos",9));
#line 3715 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3715 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3715,"subs_functions.bas");}while(r);
#line 3716 "subs_functions/subs_functions.bas"
do{
#line 3716 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3716 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3716,"subs_functions.bas");}while(r);
#line 3717 "subs_functions/subs_functions.bas"
do{
#line 3717 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3717 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3717 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3717,"subs_functions.bas");}while(r);
#line 3718 "subs_functions/subs_functions.bas"
do{
#line 3718 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3718 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3718,"subs_functions.bas");}while(r);
#line 3719 "subs_functions/subs_functions.bas"
do{
#line 3719 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ACOS(cosine_value!)",20));
#line 3719 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3719 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3719,"subs_functions.bas");}while(r);
#line 3720 "subs_functions/subs_functions.bas"
do{
#line 3720 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3720 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3720,"subs_functions.bas");}while(r);
#line 3722 "subs_functions/subs_functions.bas"
do{
#line 3722 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3722 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3722,"subs_functions.bas");}while(r);
#line 3723 "subs_functions/subs_functions.bas"
do{
#line 3723 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sinh",5));
#line 3723 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3723 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3723,"subs_functions.bas");}while(r);
#line 3724 "subs_functions/subs_functions.bas"
do{
#line 3724 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3724 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3724,"subs_functions.bas");}while(r);
#line 3725 "subs_functions/subs_functions.bas"
do{
#line 3725 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::sinh",9));
#line 3725 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3725 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3725,"subs_functions.bas");}while(r);
#line 3726 "subs_functions/subs_functions.bas"
do{
#line 3726 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3726 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3726,"subs_functions.bas");}while(r);
#line 3727 "subs_functions/subs_functions.bas"
do{
#line 3727 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3727 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3727 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3727,"subs_functions.bas");}while(r);
#line 3728 "subs_functions/subs_functions.bas"
do{
#line 3728 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3728 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3728,"subs_functions.bas");}while(r);
#line 3729 "subs_functions/subs_functions.bas"
do{
#line 3729 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SINH(value)",12));
#line 3729 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3729 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3729,"subs_functions.bas");}while(r);
#line 3730 "subs_functions/subs_functions.bas"
do{
#line 3730 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3730 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3730,"subs_functions.bas");}while(r);
#line 3732 "subs_functions/subs_functions.bas"
do{
#line 3732 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3732 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3732,"subs_functions.bas");}while(r);
#line 3733 "subs_functions/subs_functions.bas"
do{
#line 3733 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cosh",5));
#line 3733 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3733 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3733,"subs_functions.bas");}while(r);
#line 3734 "subs_functions/subs_functions.bas"
do{
#line 3734 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3734 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3734,"subs_functions.bas");}while(r);
#line 3735 "subs_functions/subs_functions.bas"
do{
#line 3735 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::cosh",9));
#line 3735 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3735 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3735,"subs_functions.bas");}while(r);
#line 3736 "subs_functions/subs_functions.bas"
do{
#line 3736 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3736 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3736,"subs_functions.bas");}while(r);
#line 3737 "subs_functions/subs_functions.bas"
do{
#line 3737 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3737 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3737 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3737,"subs_functions.bas");}while(r);
#line 3738 "subs_functions/subs_functions.bas"
do{
#line 3738 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3738 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3738,"subs_functions.bas");}while(r);
#line 3739 "subs_functions/subs_functions.bas"
do{
#line 3739 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COSH(value)",12));
#line 3739 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3739 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3739,"subs_functions.bas");}while(r);
#line 3740 "subs_functions/subs_functions.bas"
do{
#line 3740 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3740 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3740,"subs_functions.bas");}while(r);
#line 3742 "subs_functions/subs_functions.bas"
do{
#line 3742 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3742 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3742,"subs_functions.bas");}while(r);
#line 3743 "subs_functions/subs_functions.bas"
do{
#line 3743 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Tanh",5));
#line 3743 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3743 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3743,"subs_functions.bas");}while(r);
#line 3744 "subs_functions/subs_functions.bas"
do{
#line 3744 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3744 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3744,"subs_functions.bas");}while(r);
#line 3745 "subs_functions/subs_functions.bas"
do{
#line 3745 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::tanh",9));
#line 3745 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3745 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3745,"subs_functions.bas");}while(r);
#line 3746 "subs_functions/subs_functions.bas"
do{
#line 3746 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3746 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3746,"subs_functions.bas");}while(r);
#line 3747 "subs_functions/subs_functions.bas"
do{
#line 3747 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3747 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3747 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3747,"subs_functions.bas");}while(r);
#line 3748 "subs_functions/subs_functions.bas"
do{
#line 3748 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3748 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3748,"subs_functions.bas");}while(r);
#line 3749 "subs_functions/subs_functions.bas"
do{
#line 3749 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TANH(value)",12));
#line 3749 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3749 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3749,"subs_functions.bas");}while(r);
#line 3750 "subs_functions/subs_functions.bas"
do{
#line 3750 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3750 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3750,"subs_functions.bas");}while(r);
#line 3752 "subs_functions/subs_functions.bas"
do{
#line 3752 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3752 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3752,"subs_functions.bas");}while(r);
#line 3753 "subs_functions/subs_functions.bas"
do{
#line 3753 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Asinh",6));
#line 3753 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3753 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3753,"subs_functions.bas");}while(r);
#line 3754 "subs_functions/subs_functions.bas"
do{
#line 3754 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3754 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3754,"subs_functions.bas");}while(r);
#line 3755 "subs_functions/subs_functions.bas"
do{
#line 3755 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::asinh",10));
#line 3755 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3755 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3755,"subs_functions.bas");}while(r);
#line 3756 "subs_functions/subs_functions.bas"
do{
#line 3756 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3756 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3756,"subs_functions.bas");}while(r);
#line 3757 "subs_functions/subs_functions.bas"
do{
#line 3757 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3757 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3757 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3757,"subs_functions.bas");}while(r);
#line 3758 "subs_functions/subs_functions.bas"
do{
#line 3758 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3758 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3758,"subs_functions.bas");}while(r);
#line 3759 "subs_functions/subs_functions.bas"
do{
#line 3759 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ASINH(value)",13));
#line 3759 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3759 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3759,"subs_functions.bas");}while(r);
#line 3760 "subs_functions/subs_functions.bas"
do{
#line 3760 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3760 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3760,"subs_functions.bas");}while(r);
#line 3762 "subs_functions/subs_functions.bas"
do{
#line 3762 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3762 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3762,"subs_functions.bas");}while(r);
#line 3763 "subs_functions/subs_functions.bas"
do{
#line 3763 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Acosh",6));
#line 3763 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3763 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3763,"subs_functions.bas");}while(r);
#line 3764 "subs_functions/subs_functions.bas"
do{
#line 3764 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3764 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3764,"subs_functions.bas");}while(r);
#line 3765 "subs_functions/subs_functions.bas"
do{
#line 3765 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::acosh",10));
#line 3765 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3765 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3765,"subs_functions.bas");}while(r);
#line 3766 "subs_functions/subs_functions.bas"
do{
#line 3766 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3766 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3766,"subs_functions.bas");}while(r);
#line 3767 "subs_functions/subs_functions.bas"
do{
#line 3767 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3767 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3767 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3767,"subs_functions.bas");}while(r);
#line 3768 "subs_functions/subs_functions.bas"
do{
#line 3768 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3768 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3768,"subs_functions.bas");}while(r);
#line 3769 "subs_functions/subs_functions.bas"
do{
#line 3769 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ACOSH(value)",13));
#line 3769 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3769 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3769,"subs_functions.bas");}while(r);
#line 3770 "subs_functions/subs_functions.bas"
do{
#line 3770 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3770 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3770,"subs_functions.bas");}while(r);
#line 3772 "subs_functions/subs_functions.bas"
do{
#line 3772 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3772 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3772,"subs_functions.bas");}while(r);
#line 3773 "subs_functions/subs_functions.bas"
do{
#line 3773 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Atanh",6));
#line 3773 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3773 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3773,"subs_functions.bas");}while(r);
#line 3774 "subs_functions/subs_functions.bas"
do{
#line 3774 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3774 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3774,"subs_functions.bas");}while(r);
#line 3775 "subs_functions/subs_functions.bas"
do{
#line 3775 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::atanh",10));
#line 3775 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3775 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3775,"subs_functions.bas");}while(r);
#line 3776 "subs_functions/subs_functions.bas"
do{
#line 3776 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3776 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3776,"subs_functions.bas");}while(r);
#line 3777 "subs_functions/subs_functions.bas"
do{
#line 3777 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3777 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3777 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3777,"subs_functions.bas");}while(r);
#line 3778 "subs_functions/subs_functions.bas"
do{
#line 3778 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3778 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3778,"subs_functions.bas");}while(r);
#line 3779 "subs_functions/subs_functions.bas"
do{
#line 3779 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ATANH(value)",13));
#line 3779 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3779 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3779,"subs_functions.bas");}while(r);
#line 3780 "subs_functions/subs_functions.bas"
do{
#line 3780 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3780 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3780,"subs_functions.bas");}while(r);
#line 3782 "subs_functions/subs_functions.bas"
do{
#line 3782 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3782 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3782,"subs_functions.bas");}while(r);
#line 3783 "subs_functions/subs_functions.bas"
do{
#line 3783 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Ceil",5));
#line 3783 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3783 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3783,"subs_functions.bas");}while(r);
#line 3784 "subs_functions/subs_functions.bas"
do{
#line 3784 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3784 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3784,"subs_functions.bas");}while(r);
#line 3785 "subs_functions/subs_functions.bas"
do{
#line 3785 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("std::ceil",9));
#line 3785 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3785 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3785,"subs_functions.bas");}while(r);
#line 3786 "subs_functions/subs_functions.bas"
do{
#line 3786 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3786 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3786,"subs_functions.bas");}while(r);
#line 3787 "subs_functions/subs_functions.bas"
do{
#line 3787 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3787 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3787 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3787,"subs_functions.bas");}while(r);
#line 3788 "subs_functions/subs_functions.bas"
do{
#line 3788 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3788 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3788,"subs_functions.bas");}while(r);
#line 3789 "subs_functions/subs_functions.bas"
do{
#line 3789 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CEIL(expression)",17));
#line 3789 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3789 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3789,"subs_functions.bas");}while(r);
#line 3790 "subs_functions/subs_functions.bas"
do{
#line 3790 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3790 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3790,"subs_functions.bas");}while(r);
#line 3792 "subs_functions/subs_functions.bas"
do{
#line 3792 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3792 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3792,"subs_functions.bas");}while(r);
#line 3793 "subs_functions/subs_functions.bas"
do{
#line 3793 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Pi",3));
#line 3793 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3793 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3793,"subs_functions.bas");}while(r);
#line 3794 "subs_functions/subs_functions.bas"
do{
#line 3794 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3794 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3794,"subs_functions.bas");}while(r);
#line 3795 "subs_functions/subs_functions.bas"
do{
#line 3795 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_pi",7));
#line 3795 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3795 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3795,"subs_functions.bas");}while(r);
#line 3796 "subs_functions/subs_functions.bas"
do{
#line 3796 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3796 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3796,"subs_functions.bas");}while(r);
#line 3797 "subs_functions/subs_functions.bas"
do{
#line 3797 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
#line 3797 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3797 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3797,"subs_functions.bas");}while(r);
#line 3798 "subs_functions/subs_functions.bas"
do{
#line 3798 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
#line 3798 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3798,"subs_functions.bas");}while(r);
#line 3799 "subs_functions/subs_functions.bas"
do{
#line 3799 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 3799 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3799 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3799,"subs_functions.bas");}while(r);
#line 3800 "subs_functions/subs_functions.bas"
do{
#line 3800 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_PI[(multiplier)]",17));
#line 3800 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3800 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3800,"subs_functions.bas");}while(r);
#line 3801 "subs_functions/subs_functions.bas"
do{
#line 3801 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3801 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3801,"subs_functions.bas");}while(r);
#line 3803 "subs_functions/subs_functions.bas"
do{
#line 3803 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3803 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3803,"subs_functions.bas");}while(r);
#line 3804 "subs_functions/subs_functions.bas"
do{
#line 3804 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DesktopHeight",14));
#line 3804 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3804 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3804,"subs_functions.bas");}while(r);
#line 3805 "subs_functions/subs_functions.bas"
do{
#line 3805 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3805 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3805,"subs_functions.bas");}while(r);
#line 3806 "subs_functions/subs_functions.bas"
do{
#line 3806 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__desktopheight",19));
#line 3806 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3806 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3806,"subs_functions.bas");}while(r);
#line 3807 "subs_functions/subs_functions.bas"
do{
#line 3807 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3807 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3807,"subs_functions.bas");}while(r);
#line 3808 "subs_functions/subs_functions.bas"
do{
#line 3808 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3808 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3808,"subs_functions.bas");}while(r);
#line 3809 "subs_functions/subs_functions.bas"
do{
#line 3809 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DESKTOPHEIGHT",14));
#line 3809 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3809 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3809,"subs_functions.bas");}while(r);
#line 3810 "subs_functions/subs_functions.bas"
do{
#line 3810 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3810 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3810,"subs_functions.bas");}while(r);
#line 3812 "subs_functions/subs_functions.bas"
do{
#line 3812 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3812 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3812,"subs_functions.bas");}while(r);
#line 3813 "subs_functions/subs_functions.bas"
do{
#line 3813 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DesktopWidth",13));
#line 3813 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3813 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3813,"subs_functions.bas");}while(r);
#line 3814 "subs_functions/subs_functions.bas"
do{
#line 3814 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3814 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3814,"subs_functions.bas");}while(r);
#line 3815 "subs_functions/subs_functions.bas"
do{
#line 3815 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__desktopwidth",18));
#line 3815 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3815 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3815,"subs_functions.bas");}while(r);
#line 3816 "subs_functions/subs_functions.bas"
do{
#line 3816 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3816 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3816,"subs_functions.bas");}while(r);
#line 3817 "subs_functions/subs_functions.bas"
do{
#line 3817 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3817 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3817,"subs_functions.bas");}while(r);
#line 3818 "subs_functions/subs_functions.bas"
do{
#line 3818 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DESKTOPWIDTH",13));
#line 3818 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3818 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3818,"subs_functions.bas");}while(r);
#line 3819 "subs_functions/subs_functions.bas"
do{
#line 3819 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3819 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3819,"subs_functions.bas");}while(r);
#line 3821 "subs_functions/subs_functions.bas"
do{
#line 3821 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3821 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3821,"subs_functions.bas");}while(r);
#line 3822 "subs_functions/subs_functions.bas"
do{
#line 3822 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DesktopRefreshRate",19));
#line 3822 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3822 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3822,"subs_functions.bas");}while(r);
#line 3823 "subs_functions/subs_functions.bas"
do{
#line 3823 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3823 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3823,"subs_functions.bas");}while(r);
#line 3824 "subs_functions/subs_functions.bas"
do{
#line 3824 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__desktoprefreshrate",24));
#line 3824 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3824 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3824,"subs_functions.bas");}while(r);
#line 3825 "subs_functions/subs_functions.bas"
do{
#line 3825 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3825 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3825,"subs_functions.bas");}while(r);
#line 3826 "subs_functions/subs_functions.bas"
do{
#line 3826 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3826 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3826,"subs_functions.bas");}while(r);
#line 3827 "subs_functions/subs_functions.bas"
do{
#line 3827 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DESKTOPREFRESHRATE",19));
#line 3827 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3827 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3827,"subs_functions.bas");}while(r);
#line 3828 "subs_functions/subs_functions.bas"
do{
#line 3828 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3828 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3828,"subs_functions.bas");}while(r);
#line 3830 "subs_functions/subs_functions.bas"
do{
#line 3830 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3830 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3830,"subs_functions.bas");}while(r);
#line 3831 "subs_functions/subs_functions.bas"
do{
#line 3831 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenIcon",11));
#line 3831 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3831 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3831,"subs_functions.bas");}while(r);
#line 3832 "subs_functions/subs_functions.bas"
do{
#line 3832 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 3832 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3832,"subs_functions.bas");}while(r);
#line 3833 "subs_functions/subs_functions.bas"
do{
#line 3833 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub_screenicon",14));
#line 3833 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3833 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3833,"subs_functions.bas");}while(r);
#line 3834 "subs_functions/subs_functions.bas"
do{
#line 3834 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENICON",11));
#line 3834 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3834 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3834,"subs_functions.bas");}while(r);
#line 3835 "subs_functions/subs_functions.bas"
do{
#line 3835 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3835 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3835,"subs_functions.bas");}while(r);
#line 3837 "subs_functions/subs_functions.bas"
do{
#line 3837 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3837 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3837,"subs_functions.bas");}while(r);
#line 3838 "subs_functions/subs_functions.bas"
do{
#line 3838 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenExists",13));
#line 3838 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3838 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3838,"subs_functions.bas");}while(r);
#line 3839 "subs_functions/subs_functions.bas"
do{
#line 3839 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3839 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3839,"subs_functions.bas");}while(r);
#line 3840 "subs_functions/subs_functions.bas"
do{
#line 3840 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_windowexists",17));
#line 3840 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3840 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3840,"subs_functions.bas");}while(r);
#line 3841 "subs_functions/subs_functions.bas"
do{
#line 3841 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENEXISTS",13));
#line 3841 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3841 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3841,"subs_functions.bas");}while(r);
#line 3842 "subs_functions/subs_functions.bas"
do{
#line 3842 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3842 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3842,"subs_functions.bas");}while(r);
#line 3844 "subs_functions/subs_functions.bas"
do{
#line 3844 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3844 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3844,"subs_functions.bas");}while(r);
#line 3845 "subs_functions/subs_functions.bas"
do{
#line 3845 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ControlChr",11));
#line 3845 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3845 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3845,"subs_functions.bas");}while(r);
#line 3846 "subs_functions/subs_functions.bas"
do{
#line 3846 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3846 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3846,"subs_functions.bas");}while(r);
#line 3847 "subs_functions/subs_functions.bas"
do{
#line 3847 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__controlchr",16));
#line 3847 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3847 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3847,"subs_functions.bas");}while(r);
#line 3848 "subs_functions/subs_functions.bas"
do{
#line 3848 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3848 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3848,"subs_functions.bas");}while(r);
#line 3849 "subs_functions/subs_functions.bas"
do{
#line 3849 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3849 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3849,"subs_functions.bas");}while(r);
#line 3850 "subs_functions/subs_functions.bas"
do{
#line 3850 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONTROLCHR",11));
#line 3850 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3850 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3850,"subs_functions.bas");}while(r);
#line 3851 "subs_functions/subs_functions.bas"
do{
#line 3851 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3851 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3851,"subs_functions.bas");}while(r);
#line 3853 "subs_functions/subs_functions.bas"
do{
#line 3853 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3853 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3853,"subs_functions.bas");}while(r);
#line 3854 "subs_functions/subs_functions.bas"
do{
#line 3854 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StriCmp",8));
#line 3854 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3854 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3854,"subs_functions.bas");}while(r);
#line 3855 "subs_functions/subs_functions.bas"
do{
#line 3855 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3855 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3855,"subs_functions.bas");}while(r);
#line 3856 "subs_functions/subs_functions.bas"
do{
#line 3856 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__str_nc_compare",20));
#line 3856 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3856 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3856,"subs_functions.bas");}while(r);
#line 3857 "subs_functions/subs_functions.bas"
do{
#line 3857 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3857 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3857,"subs_functions.bas");}while(r);
#line 3858 "subs_functions/subs_functions.bas"
do{
#line 3858 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 3858 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3858 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3858,"subs_functions.bas");}while(r);
#line 3859 "subs_functions/subs_functions.bas"
do{
#line 3859 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3859 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3859,"subs_functions.bas");}while(r);
#line 3860 "subs_functions/subs_functions.bas"
do{
#line 3860 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_STRICMP(string1$, string2$)",28));
#line 3860 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3860 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3860,"subs_functions.bas");}while(r);
#line 3861 "subs_functions/subs_functions.bas"
do{
#line 3861 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3861 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3861,"subs_functions.bas");}while(r);
#line 3863 "subs_functions/subs_functions.bas"
do{
#line 3863 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3863 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3863,"subs_functions.bas");}while(r);
#line 3864 "subs_functions/subs_functions.bas"
do{
#line 3864 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StrCmp",7));
#line 3864 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3864 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3864,"subs_functions.bas");}while(r);
#line 3865 "subs_functions/subs_functions.bas"
do{
#line 3865 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3865 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3865,"subs_functions.bas");}while(r);
#line 3866 "subs_functions/subs_functions.bas"
do{
#line 3866 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__str_compare",17));
#line 3866 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3866 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3866,"subs_functions.bas");}while(r);
#line 3867 "subs_functions/subs_functions.bas"
do{
#line 3867 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3867 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3867,"subs_functions.bas");}while(r);
#line 3868 "subs_functions/subs_functions.bas"
do{
#line 3868 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 3868 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3868 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3868,"subs_functions.bas");}while(r);
#line 3869 "subs_functions/subs_functions.bas"
do{
#line 3869 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3869 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3869,"subs_functions.bas");}while(r);
#line 3870 "subs_functions/subs_functions.bas"
do{
#line 3870 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_STRCMP(string1$, string2$)",27));
#line 3870 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3870 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3870,"subs_functions.bas");}while(r);
#line 3871 "subs_functions/subs_functions.bas"
do{
#line 3871 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3871 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3871,"subs_functions.bas");}while(r);
#line 3873 "subs_functions/subs_functions.bas"
do{
#line 3873 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3873 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3873,"subs_functions.bas");}while(r);
#line 3874 "subs_functions/subs_functions.bas"
do{
#line 3874 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arcsec",7));
#line 3874 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3874 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3874,"subs_functions.bas");}while(r);
#line 3875 "subs_functions/subs_functions.bas"
do{
#line 3875 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3875 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3875,"subs_functions.bas");}while(r);
#line 3876 "subs_functions/subs_functions.bas"
do{
#line 3876 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_arcsec",11));
#line 3876 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3876 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3876,"subs_functions.bas");}while(r);
#line 3877 "subs_functions/subs_functions.bas"
do{
#line 3877 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3877 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3877,"subs_functions.bas");}while(r);
#line 3878 "subs_functions/subs_functions.bas"
do{
#line 3878 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3878 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3878 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3878,"subs_functions.bas");}while(r);
#line 3879 "subs_functions/subs_functions.bas"
do{
#line 3879 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3879 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3879,"subs_functions.bas");}while(r);
#line 3880 "subs_functions/subs_functions.bas"
do{
#line 3880 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ARCSEC(value)",14));
#line 3880 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3880 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3880,"subs_functions.bas");}while(r);
#line 3881 "subs_functions/subs_functions.bas"
do{
#line 3881 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3881 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3881,"subs_functions.bas");}while(r);
#line 3883 "subs_functions/subs_functions.bas"
do{
#line 3883 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3883 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3883,"subs_functions.bas");}while(r);
#line 3884 "subs_functions/subs_functions.bas"
do{
#line 3884 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arccsc",7));
#line 3884 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3884 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3884,"subs_functions.bas");}while(r);
#line 3885 "subs_functions/subs_functions.bas"
do{
#line 3885 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3885 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3885,"subs_functions.bas");}while(r);
#line 3886 "subs_functions/subs_functions.bas"
do{
#line 3886 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_arccsc",11));
#line 3886 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3886 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3886,"subs_functions.bas");}while(r);
#line 3887 "subs_functions/subs_functions.bas"
do{
#line 3887 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3887 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3887,"subs_functions.bas");}while(r);
#line 3888 "subs_functions/subs_functions.bas"
do{
#line 3888 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3888 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3888 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3888,"subs_functions.bas");}while(r);
#line 3889 "subs_functions/subs_functions.bas"
do{
#line 3889 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3889 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3889,"subs_functions.bas");}while(r);
#line 3890 "subs_functions/subs_functions.bas"
do{
#line 3890 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ARCCSC(value)",14));
#line 3890 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3890 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3890,"subs_functions.bas");}while(r);
#line 3891 "subs_functions/subs_functions.bas"
do{
#line 3891 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3891 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3891,"subs_functions.bas");}while(r);
#line 3893 "subs_functions/subs_functions.bas"
do{
#line 3893 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3893 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3893,"subs_functions.bas");}while(r);
#line 3894 "subs_functions/subs_functions.bas"
do{
#line 3894 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arccot",7));
#line 3894 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3894 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3894,"subs_functions.bas");}while(r);
#line 3895 "subs_functions/subs_functions.bas"
do{
#line 3895 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3895 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3895,"subs_functions.bas");}while(r);
#line 3896 "subs_functions/subs_functions.bas"
do{
#line 3896 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_arccot",11));
#line 3896 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3896 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3896,"subs_functions.bas");}while(r);
#line 3897 "subs_functions/subs_functions.bas"
do{
#line 3897 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3897 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3897,"subs_functions.bas");}while(r);
#line 3898 "subs_functions/subs_functions.bas"
do{
#line 3898 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3898 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3898 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3898,"subs_functions.bas");}while(r);
#line 3899 "subs_functions/subs_functions.bas"
do{
#line 3899 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3899 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3899,"subs_functions.bas");}while(r);
#line 3900 "subs_functions/subs_functions.bas"
do{
#line 3900 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ARCCOT(value)",14));
#line 3900 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3900 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3900,"subs_functions.bas");}while(r);
#line 3901 "subs_functions/subs_functions.bas"
do{
#line 3901 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3901 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3901,"subs_functions.bas");}while(r);
#line 3903 "subs_functions/subs_functions.bas"
do{
#line 3903 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3903 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3903,"subs_functions.bas");}while(r);
#line 3904 "subs_functions/subs_functions.bas"
do{
#line 3904 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sech",5));
#line 3904 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3904 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3904,"subs_functions.bas");}while(r);
#line 3905 "subs_functions/subs_functions.bas"
do{
#line 3905 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3905 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3905,"subs_functions.bas");}while(r);
#line 3906 "subs_functions/subs_functions.bas"
do{
#line 3906 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_sech",9));
#line 3906 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3906 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3906,"subs_functions.bas");}while(r);
#line 3907 "subs_functions/subs_functions.bas"
do{
#line 3907 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3907 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3907,"subs_functions.bas");}while(r);
#line 3908 "subs_functions/subs_functions.bas"
do{
#line 3908 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3908 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3908 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3908,"subs_functions.bas");}while(r);
#line 3909 "subs_functions/subs_functions.bas"
do{
#line 3909 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3909 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3909,"subs_functions.bas");}while(r);
#line 3910 "subs_functions/subs_functions.bas"
do{
#line 3910 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SECH(value)",12));
#line 3910 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3910 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3910,"subs_functions.bas");}while(r);
#line 3911 "subs_functions/subs_functions.bas"
do{
#line 3911 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3911 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3911,"subs_functions.bas");}while(r);
#line 3913 "subs_functions/subs_functions.bas"
do{
#line 3913 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3913 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3913,"subs_functions.bas");}while(r);
#line 3914 "subs_functions/subs_functions.bas"
do{
#line 3914 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Csch",5));
#line 3914 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3914 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3914,"subs_functions.bas");}while(r);
#line 3915 "subs_functions/subs_functions.bas"
do{
#line 3915 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3915 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3915,"subs_functions.bas");}while(r);
#line 3916 "subs_functions/subs_functions.bas"
do{
#line 3916 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_csch",9));
#line 3916 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3916 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3916,"subs_functions.bas");}while(r);
#line 3917 "subs_functions/subs_functions.bas"
do{
#line 3917 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3917 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3917,"subs_functions.bas");}while(r);
#line 3918 "subs_functions/subs_functions.bas"
do{
#line 3918 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3918 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3918 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3918,"subs_functions.bas");}while(r);
#line 3919 "subs_functions/subs_functions.bas"
do{
#line 3919 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3919 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3919,"subs_functions.bas");}while(r);
#line 3920 "subs_functions/subs_functions.bas"
do{
#line 3920 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CSCH(value)",12));
#line 3920 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3920 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3920,"subs_functions.bas");}while(r);
#line 3921 "subs_functions/subs_functions.bas"
do{
#line 3921 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3921 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3921,"subs_functions.bas");}while(r);
#line 3923 "subs_functions/subs_functions.bas"
do{
#line 3923 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3923 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3923,"subs_functions.bas");}while(r);
#line 3924 "subs_functions/subs_functions.bas"
do{
#line 3924 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Coth",5));
#line 3924 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3924 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3924,"subs_functions.bas");}while(r);
#line 3925 "subs_functions/subs_functions.bas"
do{
#line 3925 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3925 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3925,"subs_functions.bas");}while(r);
#line 3926 "subs_functions/subs_functions.bas"
do{
#line 3926 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_coth",9));
#line 3926 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3926 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3926,"subs_functions.bas");}while(r);
#line 3927 "subs_functions/subs_functions.bas"
do{
#line 3927 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3927 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3927,"subs_functions.bas");}while(r);
#line 3928 "subs_functions/subs_functions.bas"
do{
#line 3928 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3928 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3928 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3928,"subs_functions.bas");}while(r);
#line 3929 "subs_functions/subs_functions.bas"
do{
#line 3929 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3929 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3929,"subs_functions.bas");}while(r);
#line 3930 "subs_functions/subs_functions.bas"
do{
#line 3930 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COTH(value)",12));
#line 3930 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3930 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3930,"subs_functions.bas");}while(r);
#line 3931 "subs_functions/subs_functions.bas"
do{
#line 3931 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3931 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3931,"subs_functions.bas");}while(r);
#line 3933 "subs_functions/subs_functions.bas"
do{
#line 3933 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3933 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3933,"subs_functions.bas");}while(r);
#line 3934 "subs_functions/subs_functions.bas"
do{
#line 3934 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sec",4));
#line 3934 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3934 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3934,"subs_functions.bas");}while(r);
#line 3935 "subs_functions/subs_functions.bas"
do{
#line 3935 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3935 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3935,"subs_functions.bas");}while(r);
#line 3936 "subs_functions/subs_functions.bas"
do{
#line 3936 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_sec",8));
#line 3936 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3936 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3936,"subs_functions.bas");}while(r);
#line 3937 "subs_functions/subs_functions.bas"
do{
#line 3937 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3937 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3937,"subs_functions.bas");}while(r);
#line 3938 "subs_functions/subs_functions.bas"
do{
#line 3938 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3938 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3938 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3938,"subs_functions.bas");}while(r);
#line 3939 "subs_functions/subs_functions.bas"
do{
#line 3939 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3939 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3939,"subs_functions.bas");}while(r);
#line 3940 "subs_functions/subs_functions.bas"
do{
#line 3940 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SEC(value)",11));
#line 3940 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3940 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3940,"subs_functions.bas");}while(r);
#line 3941 "subs_functions/subs_functions.bas"
do{
#line 3941 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3941 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3941,"subs_functions.bas");}while(r);
#line 3943 "subs_functions/subs_functions.bas"
do{
#line 3943 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3943 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3943,"subs_functions.bas");}while(r);
#line 3944 "subs_functions/subs_functions.bas"
do{
#line 3944 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Csc",4));
#line 3944 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3944 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3944,"subs_functions.bas");}while(r);
#line 3945 "subs_functions/subs_functions.bas"
do{
#line 3945 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3945 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3945,"subs_functions.bas");}while(r);
#line 3946 "subs_functions/subs_functions.bas"
do{
#line 3946 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_csc",8));
#line 3946 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3946 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3946,"subs_functions.bas");}while(r);
#line 3947 "subs_functions/subs_functions.bas"
do{
#line 3947 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3947 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3947,"subs_functions.bas");}while(r);
#line 3948 "subs_functions/subs_functions.bas"
do{
#line 3948 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3948 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3948 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3948,"subs_functions.bas");}while(r);
#line 3949 "subs_functions/subs_functions.bas"
do{
#line 3949 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3949 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3949,"subs_functions.bas");}while(r);
#line 3950 "subs_functions/subs_functions.bas"
do{
#line 3950 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CSC(value)",11));
#line 3950 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3950 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3950,"subs_functions.bas");}while(r);
#line 3951 "subs_functions/subs_functions.bas"
do{
#line 3951 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3951 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3951,"subs_functions.bas");}while(r);
#line 3953 "subs_functions/subs_functions.bas"
do{
#line 3953 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3953 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3953,"subs_functions.bas");}while(r);
#line 3954 "subs_functions/subs_functions.bas"
do{
#line 3954 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cot",4));
#line 3954 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3954 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3954,"subs_functions.bas");}while(r);
#line 3955 "subs_functions/subs_functions.bas"
do{
#line 3955 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3955 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3955,"subs_functions.bas");}while(r);
#line 3956 "subs_functions/subs_functions.bas"
do{
#line 3956 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_cot",8));
#line 3956 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3956 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3956,"subs_functions.bas");}while(r);
#line 3957 "subs_functions/subs_functions.bas"
do{
#line 3957 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 3957 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3957,"subs_functions.bas");}while(r);
#line 3958 "subs_functions/subs_functions.bas"
do{
#line 3958 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
#line 3958 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3958 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3958,"subs_functions.bas");}while(r);
#line 3959 "subs_functions/subs_functions.bas"
do{
#line 3959 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
#line 3959 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3959,"subs_functions.bas");}while(r);
#line 3960 "subs_functions/subs_functions.bas"
do{
#line 3960 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COT(value)",11));
#line 3960 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3960 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3960,"subs_functions.bas");}while(r);
#line 3961 "subs_functions/subs_functions.bas"
do{
#line 3961 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3961 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3961,"subs_functions.bas");}while(r);
#line 3963 "subs_functions/subs_functions.bas"
do{
#line 3963 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3963 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3963,"subs_functions.bas");}while(r);
#line 3964 "subs_functions/subs_functions.bas"
do{
#line 3964 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenIcon",11));
#line 3964 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3964 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3964,"subs_functions.bas");}while(r);
#line 3965 "subs_functions/subs_functions.bas"
do{
#line 3965 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3965 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3965,"subs_functions.bas");}while(r);
#line 3966 "subs_functions/subs_functions.bas"
do{
#line 3966 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func_screenicon",15));
#line 3966 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3966 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3966,"subs_functions.bas");}while(r);
#line 3967 "subs_functions/subs_functions.bas"
do{
#line 3967 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3967 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3967,"subs_functions.bas");}while(r);
#line 3968 "subs_functions/subs_functions.bas"
do{
#line 3968 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3968 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3968,"subs_functions.bas");}while(r);
#line 3969 "subs_functions/subs_functions.bas"
do{
#line 3969 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCREENICON",11));
#line 3969 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3969 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3969,"subs_functions.bas");}while(r);
#line 3970 "subs_functions/subs_functions.bas"
do{
#line 3970 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3970 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3970,"subs_functions.bas");}while(r);
#line 3972 "subs_functions/subs_functions.bas"
do{
#line 3972 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3972 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3972,"subs_functions.bas");}while(r);
#line 3973 "subs_functions/subs_functions.bas"
do{
#line 3973 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AutoDisplay",12));
#line 3973 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3973 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3973,"subs_functions.bas");}while(r);
#line 3974 "subs_functions/subs_functions.bas"
do{
#line 3974 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3974 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3974,"subs_functions.bas");}while(r);
#line 3975 "subs_functions/subs_functions.bas"
do{
#line 3975 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__autodisplay",17));
#line 3975 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3975 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3975,"subs_functions.bas");}while(r);
#line 3976 "subs_functions/subs_functions.bas"
do{
#line 3976 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 3976 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3976,"subs_functions.bas");}while(r);
#line 3977 "subs_functions/subs_functions.bas"
do{
#line 3977 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 3977 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3977,"subs_functions.bas");}while(r);
#line 3978 "subs_functions/subs_functions.bas"
do{
#line 3978 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_AUTODISPLAY",12));
#line 3978 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3978 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3978,"subs_functions.bas");}while(r);
#line 3979 "subs_functions/subs_functions.bas"
do{
#line 3979 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3979 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3979,"subs_functions.bas");}while(r);
#line 3981 "subs_functions/subs_functions.bas"
do{
#line 3981 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3981 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3981,"subs_functions.bas");}while(r);
#line 3982 "subs_functions/subs_functions.bas"
do{
#line 3982 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShR",4));
#line 3982 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3982 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3982,"subs_functions.bas");}while(r);
#line 3983 "subs_functions/subs_functions.bas"
do{
#line 3983 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3983 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3983,"subs_functions.bas");}while(r);
#line 3984 "subs_functions/subs_functions.bas"
do{
#line 3984 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__shr",9));
#line 3984 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3984 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3984,"subs_functions.bas");}while(r);
#line 3985 "subs_functions/subs_functions.bas"
do{
#line 3985 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3985 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3985,"subs_functions.bas");}while(r);
#line 3986 "subs_functions/subs_functions.bas"
do{
#line 3986 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3986 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3986 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3986,"subs_functions.bas");}while(r);
#line 3987 "subs_functions/subs_functions.bas"
do{
#line 3987 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 3987 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3987,"subs_functions.bas");}while(r);
#line 3988 "subs_functions/subs_functions.bas"
do{
#line 3988 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SHR(numericalVariable, numericalValue)",39));
#line 3988 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3988 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3988,"subs_functions.bas");}while(r);
#line 3989 "subs_functions/subs_functions.bas"
do{
#line 3989 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3989 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3989,"subs_functions.bas");}while(r);
#line 3991 "subs_functions/subs_functions.bas"
do{
#line 3991 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 3991 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3991,"subs_functions.bas");}while(r);
#line 3992 "subs_functions/subs_functions.bas"
do{
#line 3992 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShL",4));
#line 3992 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3992 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3992,"subs_functions.bas");}while(r);
#line 3993 "subs_functions/subs_functions.bas"
do{
#line 3993 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 3993 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3993,"subs_functions.bas");}while(r);
#line 3994 "subs_functions/subs_functions.bas"
do{
#line 3994 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__shl",9));
#line 3994 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3994 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3994,"subs_functions.bas");}while(r);
#line 3995 "subs_functions/subs_functions.bas"
do{
#line 3995 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 3995 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3995,"subs_functions.bas");}while(r);
#line 3996 "subs_functions/subs_functions.bas"
do{
#line 3996 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 3996 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3996 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3996,"subs_functions.bas");}while(r);
#line 3997 "subs_functions/subs_functions.bas"
do{
#line 3997 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 3997 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3997,"subs_functions.bas");}while(r);
#line 3998 "subs_functions/subs_functions.bas"
do{
#line 3998 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SHL(numericalVariable, numericalValue)",39));
#line 3998 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 3998 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3998,"subs_functions.bas");}while(r);
#line 3999 "subs_functions/subs_functions.bas"
do{
#line 3999 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 3999 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,3999,"subs_functions.bas");}while(r);
#line 4001 "subs_functions/subs_functions.bas"
do{
#line 4001 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4001 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4001,"subs_functions.bas");}while(r);
#line 4002 "subs_functions/subs_functions.bas"
do{
#line 4002 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RoL",4));
#line 4002 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4002 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4002,"subs_functions.bas");}while(r);
#line 4003 "subs_functions/subs_functions.bas"
do{
#line 4003 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4003 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4003,"subs_functions.bas");}while(r);
#line 4004 "subs_functions/subs_functions.bas"
do{
#line 4004 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4004 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4004,"subs_functions.bas");}while(r);
#line 4005 "subs_functions/subs_functions.bas"
do{
#line 4005 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 4005 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4005 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4005,"subs_functions.bas");}while(r);
#line 4006 "subs_functions/subs_functions.bas"
do{
#line 4006 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 4006 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4006,"subs_functions.bas");}while(r);
#line 4007 "subs_functions/subs_functions.bas"
do{
#line 4007 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ROL(numericalVariable, numericalValue)",39));
#line 4007 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4007 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4007,"subs_functions.bas");}while(r);
#line 4008 "subs_functions/subs_functions.bas"
do{
#line 4008 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4008 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4008,"subs_functions.bas");}while(r);
#line 4010 "subs_functions/subs_functions.bas"
do{
#line 4010 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4010 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4010,"subs_functions.bas");}while(r);
#line 4011 "subs_functions/subs_functions.bas"
do{
#line 4011 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RoR",4));
#line 4011 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4011 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4011,"subs_functions.bas");}while(r);
#line 4012 "subs_functions/subs_functions.bas"
do{
#line 4012 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4012 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4012,"subs_functions.bas");}while(r);
#line 4013 "subs_functions/subs_functions.bas"
do{
#line 4013 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4013 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4013,"subs_functions.bas");}while(r);
#line 4014 "subs_functions/subs_functions.bas"
do{
#line 4014 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 4014 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4014 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4014,"subs_functions.bas");}while(r);
#line 4015 "subs_functions/subs_functions.bas"
do{
#line 4015 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 4015 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4015,"subs_functions.bas");}while(r);
#line 4016 "subs_functions/subs_functions.bas"
do{
#line 4016 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ROR(numericalVariable, numericalValue)",39));
#line 4016 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4016 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4016,"subs_functions.bas");}while(r);
#line 4017 "subs_functions/subs_functions.bas"
do{
#line 4017 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4017 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4017,"subs_functions.bas");}while(r);
#line 4019 "subs_functions/subs_functions.bas"
do{
#line 4019 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4019 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4019,"subs_functions.bas");}while(r);
#line 4020 "subs_functions/subs_functions.bas"
do{
#line 4020 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Adler32",8));
#line 4020 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4020 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4020,"subs_functions.bas");}while(r);
#line 4021 "subs_functions/subs_functions.bas"
do{
#line 4021 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4021 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4021,"subs_functions.bas");}while(r);
#line 4022 "subs_functions/subs_functions.bas"
do{
#line 4022 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4022 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4022,"subs_functions.bas");}while(r);
#line 4023 "subs_functions/subs_functions.bas"
do{
#line 4023 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__adler32",13));
#line 4023 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4023 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4023,"subs_functions.bas");}while(r);
#line 4024 "subs_functions/subs_functions.bas"
do{
#line 4024 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4024 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4024,"subs_functions.bas");}while(r);
#line 4025 "subs_functions/subs_functions.bas"
do{
#line 4025 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4025 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4025 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4025,"subs_functions.bas");}while(r);
#line 4026 "subs_functions/subs_functions.bas"
do{
#line 4026 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 4026 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4026,"subs_functions.bas");}while(r);
#line 4027 "subs_functions/subs_functions.bas"
do{
#line 4027 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_ADLER32(dataString$)",21));
#line 4027 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4027 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4027,"subs_functions.bas");}while(r);
#line 4028 "subs_functions/subs_functions.bas"
do{
#line 4028 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4028 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4028,"subs_functions.bas");}while(r);
#line 4030 "subs_functions/subs_functions.bas"
do{
#line 4030 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4030 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4030,"subs_functions.bas");}while(r);
#line 4031 "subs_functions/subs_functions.bas"
do{
#line 4031 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Crc32",6));
#line 4031 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4031 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4031,"subs_functions.bas");}while(r);
#line 4032 "subs_functions/subs_functions.bas"
do{
#line 4032 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4032 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4032,"subs_functions.bas");}while(r);
#line 4033 "subs_functions/subs_functions.bas"
do{
#line 4033 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4033 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4033,"subs_functions.bas");}while(r);
#line 4034 "subs_functions/subs_functions.bas"
do{
#line 4034 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__crc32",11));
#line 4034 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4034 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4034,"subs_functions.bas");}while(r);
#line 4035 "subs_functions/subs_functions.bas"
do{
#line 4035 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4035 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4035,"subs_functions.bas");}while(r);
#line 4036 "subs_functions/subs_functions.bas"
do{
#line 4036 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4036 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4036 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4036,"subs_functions.bas");}while(r);
#line 4037 "subs_functions/subs_functions.bas"
do{
#line 4037 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 4037 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4037,"subs_functions.bas");}while(r);
#line 4038 "subs_functions/subs_functions.bas"
do{
#line 4038 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CRC32(dataString$)",19));
#line 4038 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4038 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4038,"subs_functions.bas");}while(r);
#line 4039 "subs_functions/subs_functions.bas"
do{
#line 4039 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4039 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4039,"subs_functions.bas");}while(r);
#line 4041 "subs_functions/subs_functions.bas"
do{
#line 4041 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4041 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4041,"subs_functions.bas");}while(r);
#line 4042 "subs_functions/subs_functions.bas"
do{
#line 4042 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Deflate",8));
#line 4042 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4042 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4042,"subs_functions.bas");}while(r);
#line 4043 "subs_functions/subs_functions.bas"
do{
#line 4043 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4043 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4043,"subs_functions.bas");}while(r);
#line 4044 "subs_functions/subs_functions.bas"
do{
#line 4044 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4044 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4044 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4044,"subs_functions.bas");}while(r);
#line 4045 "subs_functions/subs_functions.bas"
do{
#line 4045 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4045 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4045,"subs_functions.bas");}while(r);
#line 4046 "subs_functions/subs_functions.bas"
do{
#line 4046 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__deflate",13));
#line 4046 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4046 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4046,"subs_functions.bas");}while(r);
#line 4047 "subs_functions/subs_functions.bas"
do{
#line 4047 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4047 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4047,"subs_functions.bas");}while(r);
#line 4048 "subs_functions/subs_functions.bas"
do{
#line 4048 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4048 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4048 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4048,"subs_functions.bas");}while(r);
#line 4049 "subs_functions/subs_functions.bas"
do{
#line 4049 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 4049 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4049 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4049,"subs_functions.bas");}while(r);
#line 4050 "subs_functions/subs_functions.bas"
do{
#line 4050 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4050 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4050,"subs_functions.bas");}while(r);
#line 4051 "subs_functions/subs_functions.bas"
do{
#line 4051 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_DEFLATE$(stringToCompress$[, compressionLevel&])",49));
#line 4051 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4051 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4051,"subs_functions.bas");}while(r);
#line 4052 "subs_functions/subs_functions.bas"
do{
#line 4052 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4052 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4052,"subs_functions.bas");}while(r);
#line 4054 "subs_functions/subs_functions.bas"
do{
#line 4054 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4054 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4054,"subs_functions.bas");}while(r);
#line 4055 "subs_functions/subs_functions.bas"
do{
#line 4055 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Inflate",8));
#line 4055 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4055 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4055,"subs_functions.bas");}while(r);
#line 4056 "subs_functions/subs_functions.bas"
do{
#line 4056 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4056 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4056,"subs_functions.bas");}while(r);
#line 4057 "subs_functions/subs_functions.bas"
do{
#line 4057 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4057 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4057 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4057,"subs_functions.bas");}while(r);
#line 4058 "subs_functions/subs_functions.bas"
do{
#line 4058 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4058 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4058,"subs_functions.bas");}while(r);
#line 4059 "subs_functions/subs_functions.bas"
do{
#line 4059 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__inflate",13));
#line 4059 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4059 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4059,"subs_functions.bas");}while(r);
#line 4060 "subs_functions/subs_functions.bas"
do{
#line 4060 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4060 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4060,"subs_functions.bas");}while(r);
#line 4061 "subs_functions/subs_functions.bas"
do{
#line 4061 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
#line 4061 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4061 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4061,"subs_functions.bas");}while(r);
#line 4062 "subs_functions/subs_functions.bas"
do{
#line 4062 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("?[,?]",5));
#line 4062 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4062 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4062,"subs_functions.bas");}while(r);
#line 4063 "subs_functions/subs_functions.bas"
do{
#line 4063 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4063 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4063,"subs_functions.bas");}while(r);
#line 4064 "subs_functions/subs_functions.bas"
do{
#line 4064 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_INFLATE$(stringToDecompress$[, originalSize&])",47));
#line 4064 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4064 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4064,"subs_functions.bas");}while(r);
#line 4065 "subs_functions/subs_functions.bas"
do{
#line 4065 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4065 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4065,"subs_functions.bas");}while(r);
#line 4067 "subs_functions/subs_functions.bas"
do{
#line 4067 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4067 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4067,"subs_functions.bas");}while(r);
#line 4068 "subs_functions/subs_functions.bas"
do{
#line 4068 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Md5",4));
#line 4068 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4068 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4068,"subs_functions.bas");}while(r);
#line 4069 "subs_functions/subs_functions.bas"
do{
#line 4069 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 1ll ;
#line 4069 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4069,"subs_functions.bas");}while(r);
#line 4070 "subs_functions/subs_functions.bas"
do{
#line 4070 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4070 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4070 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4070,"subs_functions.bas");}while(r);
#line 4071 "subs_functions/subs_functions.bas"
do{
#line 4071 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4071 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4071,"subs_functions.bas");}while(r);
#line 4072 "subs_functions/subs_functions.bas"
do{
#line 4072 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__md5",9));
#line 4072 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4072 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4072,"subs_functions.bas");}while(r);
#line 4073 "subs_functions/subs_functions.bas"
do{
#line 4073 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4073 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4073,"subs_functions.bas");}while(r);
#line 4074 "subs_functions/subs_functions.bas"
do{
#line 4074 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4074 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4074 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4074,"subs_functions.bas");}while(r);
#line 4075 "subs_functions/subs_functions.bas"
do{
#line 4075 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4075 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4075,"subs_functions.bas");}while(r);
#line 4076 "subs_functions/subs_functions.bas"
do{
#line 4076 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MD5$(dataString$)",18));
#line 4076 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4076 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4076,"subs_functions.bas");}while(r);
#line 4077 "subs_functions/subs_functions.bas"
do{
#line 4077 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4077 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4077,"subs_functions.bas");}while(r);
#line 4079 "subs_functions/subs_functions.bas"
do{
#line 4079 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4079 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4079,"subs_functions.bas");}while(r);
#line 4080 "subs_functions/subs_functions.bas"
do{
#line 4080 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Base64Decode",13));
#line 4080 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4080 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4080,"subs_functions.bas");}while(r);
#line 4081 "subs_functions/subs_functions.bas"
do{
#line 4081 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4081 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4081,"subs_functions.bas");}while(r);
#line 4082 "subs_functions/subs_functions.bas"
do{
#line 4082 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4082 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4082 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4082,"subs_functions.bas");}while(r);
#line 4083 "subs_functions/subs_functions.bas"
do{
#line 4083 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4083 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4083,"subs_functions.bas");}while(r);
#line 4084 "subs_functions/subs_functions.bas"
do{
#line 4084 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__base64decode",18));
#line 4084 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4084 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4084,"subs_functions.bas");}while(r);
#line 4085 "subs_functions/subs_functions.bas"
do{
#line 4085 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4085 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4085,"subs_functions.bas");}while(r);
#line 4086 "subs_functions/subs_functions.bas"
do{
#line 4086 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4086 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4086 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4086,"subs_functions.bas");}while(r);
#line 4087 "subs_functions/subs_functions.bas"
do{
#line 4087 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4087 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4087,"subs_functions.bas");}while(r);
#line 4088 "subs_functions/subs_functions.bas"
do{
#line 4088 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BASE64DECODE$(stringToDecode$)",31));
#line 4088 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4088 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4088,"subs_functions.bas");}while(r);
#line 4089 "subs_functions/subs_functions.bas"
do{
#line 4089 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4089 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4089,"subs_functions.bas");}while(r);
#line 4091 "subs_functions/subs_functions.bas"
do{
#line 4091 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4091 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4091,"subs_functions.bas");}while(r);
#line 4092 "subs_functions/subs_functions.bas"
do{
#line 4092 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Base64Encode",13));
#line 4092 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4092 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4092,"subs_functions.bas");}while(r);
#line 4093 "subs_functions/subs_functions.bas"
do{
#line 4093 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 11ll ;
#line 4093 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4093,"subs_functions.bas");}while(r);
#line 4094 "subs_functions/subs_functions.bas"
do{
#line 4094 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4094 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4094 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4094,"subs_functions.bas");}while(r);
#line 4095 "subs_functions/subs_functions.bas"
do{
#line 4095 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4095 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4095,"subs_functions.bas");}while(r);
#line 4096 "subs_functions/subs_functions.bas"
do{
#line 4096 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__base64encode",18));
#line 4096 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4096 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4096,"subs_functions.bas");}while(r);
#line 4097 "subs_functions/subs_functions.bas"
do{
#line 4097 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4097 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4097,"subs_functions.bas");}while(r);
#line 4098 "subs_functions/subs_functions.bas"
do{
#line 4098 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4098 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4098 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4098,"subs_functions.bas");}while(r);
#line 4099 "subs_functions/subs_functions.bas"
do{
#line 4099 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4099 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4099,"subs_functions.bas");}while(r);
#line 4100 "subs_functions/subs_functions.bas"
do{
#line 4100 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_BASE64ENCODE$(stringToEncode$)",31));
#line 4100 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4100 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4100,"subs_functions.bas");}while(r);
#line 4101 "subs_functions/subs_functions.bas"
do{
#line 4101 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4101 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4101,"subs_functions.bas");}while(r);
#line 4103 "subs_functions/subs_functions.bas"
do{
#line 4103 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4103 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4103,"subs_functions.bas");}while(r);
#line 4104 "subs_functions/subs_functions.bas"
do{
#line 4104 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Embedded",9));
#line 4104 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4104 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4104,"subs_functions.bas");}while(r);
#line 4105 "subs_functions/subs_functions.bas"
do{
#line 4105 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+550)))= 12ll ;
#line 4105 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4105,"subs_functions.bas");}while(r);
#line 4106 "subs_functions/subs_functions.bas"
do{
#line 4106 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4106 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4106 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4106,"subs_functions.bas");}while(r);
#line 4107 "subs_functions/subs_functions.bas"
do{
#line 4107 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4107 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4107,"subs_functions.bas");}while(r);
#line 4108 "subs_functions/subs_functions.bas"
do{
#line 4108 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__embedded",14));
#line 4108 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4108 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4108,"subs_functions.bas");}while(r);
#line 4109 "subs_functions/subs_functions.bas"
do{
#line 4109 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4109 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4109,"subs_functions.bas");}while(r);
#line 4110 "subs_functions/subs_functions.bas"
do{
#line 4110 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4110 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4110 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4110,"subs_functions.bas");}while(r);
#line 4111 "subs_functions/subs_functions.bas"
do{
#line 4111 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4111 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4111,"subs_functions.bas");}while(r);
#line 4112 "subs_functions/subs_functions.bas"
do{
#line 4112 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_add(qbs_add(qbs_new_txt_len("_EMBEDDED$(",11),FUNC_ADDQUOTES(qbs_new_txt_len("handle",6))),qbs_new_txt_len(")",1)));
#line 4112 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4112 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4112,"subs_functions.bas");}while(r);
#line 4113 "subs_functions/subs_functions.bas"
do{
#line 4113 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4113 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4113,"subs_functions.bas");}while(r);
#line 4115 "subs_functions/subs_functions.bas"
do{
#line 4115 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4115 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4115,"subs_functions.bas");}while(r);
#line 4116 "subs_functions/subs_functions.bas"
do{
#line 4116 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CInp",5));
#line 4116 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4116 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4116,"subs_functions.bas");}while(r);
#line 4117 "subs_functions/subs_functions.bas"
do{
#line 4117 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4117 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4117,"subs_functions.bas");}while(r);
#line 4118 "subs_functions/subs_functions.bas"
do{
#line 4118 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__cinp",10));
#line 4118 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4118 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4118,"subs_functions.bas");}while(r);
#line 4119 "subs_functions/subs_functions.bas"
do{
#line 4119 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4119 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4119,"subs_functions.bas");}while(r);
#line 4120 "subs_functions/subs_functions.bas"
do{
#line 4120 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 4120 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4120 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4120,"subs_functions.bas");}while(r);
#line 4121 "subs_functions/subs_functions.bas"
do{
#line 4121 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?]",3));
#line 4121 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4121 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4121,"subs_functions.bas");}while(r);
#line 4122 "subs_functions/subs_functions.bas"
do{
#line 4122 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4122 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4122,"subs_functions.bas");}while(r);
#line 4123 "subs_functions/subs_functions.bas"
do{
#line 4123 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CINP",5));
#line 4123 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4123 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4123,"subs_functions.bas");}while(r);
#line 4124 "subs_functions/subs_functions.bas"
do{
#line 4124 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4124 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4124,"subs_functions.bas");}while(r);
#line 4126 "subs_functions/subs_functions.bas"
do{
#line 4126 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4126 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4126,"subs_functions.bas");}while(r);
#line 4127 "subs_functions/subs_functions.bas"
do{
#line 4127 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CapsLock",9));
#line 4127 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4127 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4127,"subs_functions.bas");}while(r);
#line 4128 "subs_functions/subs_functions.bas"
do{
#line 4128 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4128 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4128,"subs_functions.bas");}while(r);
#line 4129 "subs_functions/subs_functions.bas"
do{
#line 4129 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__capslock",14));
#line 4129 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4129 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4129,"subs_functions.bas");}while(r);
#line 4130 "subs_functions/subs_functions.bas"
do{
#line 4130 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 4130 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4130,"subs_functions.bas");}while(r);
#line 4131 "subs_functions/subs_functions.bas"
do{
#line 4131 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4131 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4131,"subs_functions.bas");}while(r);
#line 4132 "subs_functions/subs_functions.bas"
do{
#line 4132 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CAPSLOCK",9));
#line 4132 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4132 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4132,"subs_functions.bas");}while(r);
#line 4133 "subs_functions/subs_functions.bas"
do{
#line 4133 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4133 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4133,"subs_functions.bas");}while(r);
#line 4135 "subs_functions/subs_functions.bas"
do{
#line 4135 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4135 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4135,"subs_functions.bas");}while(r);
#line 4136 "subs_functions/subs_functions.bas"
do{
#line 4136 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScrollLock",11));
#line 4136 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4136 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4136,"subs_functions.bas");}while(r);
#line 4137 "subs_functions/subs_functions.bas"
do{
#line 4137 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4137 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4137,"subs_functions.bas");}while(r);
#line 4138 "subs_functions/subs_functions.bas"
do{
#line 4138 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__scrolllock",16));
#line 4138 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4138 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4138,"subs_functions.bas");}while(r);
#line 4139 "subs_functions/subs_functions.bas"
do{
#line 4139 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 4139 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4139,"subs_functions.bas");}while(r);
#line 4140 "subs_functions/subs_functions.bas"
do{
#line 4140 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4140 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4140,"subs_functions.bas");}while(r);
#line 4141 "subs_functions/subs_functions.bas"
do{
#line 4141 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCROLLLOCK",11));
#line 4141 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4141 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4141,"subs_functions.bas");}while(r);
#line 4142 "subs_functions/subs_functions.bas"
do{
#line 4142 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4142 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4142,"subs_functions.bas");}while(r);
#line 4144 "subs_functions/subs_functions.bas"
do{
#line 4144 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4144 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4144,"subs_functions.bas");}while(r);
#line 4145 "subs_functions/subs_functions.bas"
do{
#line 4145 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NumLock",8));
#line 4145 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4145 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4145,"subs_functions.bas");}while(r);
#line 4146 "subs_functions/subs_functions.bas"
do{
#line 4146 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4146 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4146,"subs_functions.bas");}while(r);
#line 4147 "subs_functions/subs_functions.bas"
do{
#line 4147 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__numlock",13));
#line 4147 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4147 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4147,"subs_functions.bas");}while(r);
#line 4148 "subs_functions/subs_functions.bas"
do{
#line 4148 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 4148 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4148,"subs_functions.bas");}while(r);
#line 4149 "subs_functions/subs_functions.bas"
do{
#line 4149 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4149 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4149,"subs_functions.bas");}while(r);
#line 4150 "subs_functions/subs_functions.bas"
do{
#line 4150 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_NUMLOCK",8));
#line 4150 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4150 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4150,"subs_functions.bas");}while(r);
#line 4151 "subs_functions/subs_functions.bas"
do{
#line 4151 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4151 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4151,"subs_functions.bas");}while(r);
#line 4153 "subs_functions/subs_functions.bas"
do{
#line 4153 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4153 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4153,"subs_functions.bas");}while(r);
#line 4154 "subs_functions/subs_functions.bas"
do{
#line 4154 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CapsLock",9));
#line 4154 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4154 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4154,"subs_functions.bas");}while(r);
#line 4155 "subs_functions/subs_functions.bas"
do{
#line 4155 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4155 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4155,"subs_functions.bas");}while(r);
#line 4156 "subs_functions/subs_functions.bas"
do{
#line 4156 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__capslock",13));
#line 4156 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4156 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4156,"subs_functions.bas");}while(r);
#line 4157 "subs_functions/subs_functions.bas"
do{
#line 4157 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 4157 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4157 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4157,"subs_functions.bas");}while(r);
#line 4158 "subs_functions/subs_functions.bas"
do{
#line 4158 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4158 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4158,"subs_functions.bas");}while(r);
#line 4159 "subs_functions/subs_functions.bas"
do{
#line 4159 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
#line 4159 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4159 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4159,"subs_functions.bas");}while(r);
#line 4160 "subs_functions/subs_functions.bas"
do{
#line 4160 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CAPSLOCK {On|Off|_Toggle}",26));
#line 4160 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4160 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4160,"subs_functions.bas");}while(r);
#line 4161 "subs_functions/subs_functions.bas"
do{
#line 4161 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4161 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4161,"subs_functions.bas");}while(r);
#line 4163 "subs_functions/subs_functions.bas"
do{
#line 4163 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4163 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4163,"subs_functions.bas");}while(r);
#line 4164 "subs_functions/subs_functions.bas"
do{
#line 4164 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Scrolllock",11));
#line 4164 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4164 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4164,"subs_functions.bas");}while(r);
#line 4165 "subs_functions/subs_functions.bas"
do{
#line 4165 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4165 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4165,"subs_functions.bas");}while(r);
#line 4166 "subs_functions/subs_functions.bas"
do{
#line 4166 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__scrolllock",15));
#line 4166 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4166 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4166,"subs_functions.bas");}while(r);
#line 4167 "subs_functions/subs_functions.bas"
do{
#line 4167 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 4167 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4167 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4167,"subs_functions.bas");}while(r);
#line 4168 "subs_functions/subs_functions.bas"
do{
#line 4168 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4168 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4168,"subs_functions.bas");}while(r);
#line 4169 "subs_functions/subs_functions.bas"
do{
#line 4169 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
#line 4169 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4169 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4169,"subs_functions.bas");}while(r);
#line 4170 "subs_functions/subs_functions.bas"
do{
#line 4170 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SCROLLLOCK {On|Off|_Toggle}",28));
#line 4170 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4170 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4170,"subs_functions.bas");}while(r);
#line 4171 "subs_functions/subs_functions.bas"
do{
#line 4171 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4171 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4171,"subs_functions.bas");}while(r);
#line 4173 "subs_functions/subs_functions.bas"
do{
#line 4173 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4173 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4173,"subs_functions.bas");}while(r);
#line 4174 "subs_functions/subs_functions.bas"
do{
#line 4174 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Numlock",8));
#line 4174 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4174 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4174,"subs_functions.bas");}while(r);
#line 4175 "subs_functions/subs_functions.bas"
do{
#line 4175 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4175 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4175,"subs_functions.bas");}while(r);
#line 4176 "subs_functions/subs_functions.bas"
do{
#line 4176 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__numlock",12));
#line 4176 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4176 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4176,"subs_functions.bas");}while(r);
#line 4177 "subs_functions/subs_functions.bas"
do{
#line 4177 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
#line 4177 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4177 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4177,"subs_functions.bas");}while(r);
#line 4178 "subs_functions/subs_functions.bas"
do{
#line 4178 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4178 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4178,"subs_functions.bas");}while(r);
#line 4179 "subs_functions/subs_functions.bas"
do{
#line 4179 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
#line 4179 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4179 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4179,"subs_functions.bas");}while(r);
#line 4180 "subs_functions/subs_functions.bas"
do{
#line 4180 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_NUMLOCK {On|Off|_Toggle}",25));
#line 4180 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4180 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4180,"subs_functions.bas");}while(r);
#line 4181 "subs_functions/subs_functions.bas"
do{
#line 4181 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4181 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4181,"subs_functions.bas");}while(r);
#line 4183 "subs_functions/subs_functions.bas"
do{
#line 4183 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4183 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4183,"subs_functions.bas");}while(r);
#line 4184 "subs_functions/subs_functions.bas"
do{
#line 4184 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleFont",12));
#line 4184 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4184 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4184,"subs_functions.bas");}while(r);
#line 4185 "subs_functions/subs_functions.bas"
do{
#line 4185 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4185 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4185,"subs_functions.bas");}while(r);
#line 4186 "subs_functions/subs_functions.bas"
do{
#line 4186 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__consolefont",16));
#line 4186 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4186 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4186,"subs_functions.bas");}while(r);
#line 4187 "subs_functions/subs_functions.bas"
do{
#line 4187 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4187 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4187,"subs_functions.bas");}while(r);
#line 4188 "subs_functions/subs_functions.bas"
do{
#line 4188 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER)));
#line 4188 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4188 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4188,"subs_functions.bas");}while(r);
#line 4189 "subs_functions/subs_functions.bas"
do{
#line 4189 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLEFONT fontFile$",22));
#line 4189 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4189 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4189,"subs_functions.bas");}while(r);
#line 4190 "subs_functions/subs_functions.bas"
do{
#line 4190 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4190 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4190,"subs_functions.bas");}while(r);
#line 4192 "subs_functions/subs_functions.bas"
do{
#line 4192 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4192 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4192,"subs_functions.bas");}while(r);
#line 4193 "subs_functions/subs_functions.bas"
do{
#line 4193 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleCursor",14));
#line 4193 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4193 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4193,"subs_functions.bas");}while(r);
#line 4194 "subs_functions/subs_functions.bas"
do{
#line 4194 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4194 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4194,"subs_functions.bas");}while(r);
#line 4195 "subs_functions/subs_functions.bas"
do{
#line 4195 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__console_cursor",19));
#line 4195 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4195 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4195,"subs_functions.bas");}while(r);
#line 4196 "subs_functions/subs_functions.bas"
do{
#line 4196 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4196 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4196,"subs_functions.bas");}while(r);
#line 4197 "subs_functions/subs_functions.bas"
do{
#line 4197 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4197 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4197 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4197,"subs_functions.bas");}while(r);
#line 4198 "subs_functions/subs_functions.bas"
do{
#line 4198 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[{_Show|_Hide}][,?]",19));
#line 4198 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4198 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4198,"subs_functions.bas");}while(r);
#line 4199 "subs_functions/subs_functions.bas"
do{
#line 4199 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLECURSOR {_Show|_Hide}[, size%]",37));
#line 4199 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4199 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4199,"subs_functions.bas");}while(r);
#line 4200 "subs_functions/subs_functions.bas"
do{
#line 4200 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4200 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4200,"subs_functions.bas");}while(r);
#line 4202 "subs_functions/subs_functions.bas"
do{
#line 4202 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4202 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4202,"subs_functions.bas");}while(r);
#line 4203 "subs_functions/subs_functions.bas"
do{
#line 4203 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleInput",13));
#line 4203 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4203 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4203,"subs_functions.bas");}while(r);
#line 4204 "subs_functions/subs_functions.bas"
do{
#line 4204 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4204 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4204,"subs_functions.bas");}while(r);
#line 4205 "subs_functions/subs_functions.bas"
do{
#line 4205 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__getconsoleinput",21));
#line 4205 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4205 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4205,"subs_functions.bas");}while(r);
#line 4206 "subs_functions/subs_functions.bas"
do{
#line 4206 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 4206 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4206,"subs_functions.bas");}while(r);
#line 4207 "subs_functions/subs_functions.bas"
do{
#line 4207 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4207 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4207,"subs_functions.bas");}while(r);
#line 4208 "subs_functions/subs_functions.bas"
do{
#line 4208 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_CONSOLEINPUT",13));
#line 4208 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4208 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4208,"subs_functions.bas");}while(r);
#line 4209 "subs_functions/subs_functions.bas"
do{
#line 4209 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4209 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4209,"subs_functions.bas");}while(r);
#line 4211 "subs_functions/subs_functions.bas"
do{
#line 4211 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4211 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4211,"subs_functions.bas");}while(r);
#line 4212 "subs_functions/subs_functions.bas"
do{
#line 4212 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ReadBit",8));
#line 4212 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4212 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4212,"subs_functions.bas");}while(r);
#line 4213 "subs_functions/subs_functions.bas"
do{
#line 4213 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4213 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4213,"subs_functions.bas");}while(r);
#line 4214 "subs_functions/subs_functions.bas"
do{
#line 4214 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__readbit",13));
#line 4214 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4214 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4214,"subs_functions.bas");}while(r);
#line 4215 "subs_functions/subs_functions.bas"
do{
#line 4215 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4215 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4215,"subs_functions.bas");}while(r);
#line 4216 "subs_functions/subs_functions.bas"
do{
#line 4216 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4216 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4216 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4216,"subs_functions.bas");}while(r);
#line 4217 "subs_functions/subs_functions.bas"
do{
#line 4217 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
#line 4217 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4217,"subs_functions.bas");}while(r);
#line 4218 "subs_functions/subs_functions.bas"
do{
#line 4218 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_READBIT(numericalVariable, numericalValue)",43));
#line 4218 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4218 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4218,"subs_functions.bas");}while(r);
#line 4219 "subs_functions/subs_functions.bas"
do{
#line 4219 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4219 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4219,"subs_functions.bas");}while(r);
#line 4221 "subs_functions/subs_functions.bas"
do{
#line 4221 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4221 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4221,"subs_functions.bas");}while(r);
#line 4222 "subs_functions/subs_functions.bas"
do{
#line 4222 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SetBit",7));
#line 4222 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4222 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4222,"subs_functions.bas");}while(r);
#line 4223 "subs_functions/subs_functions.bas"
do{
#line 4223 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4223 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4223,"subs_functions.bas");}while(r);
#line 4224 "subs_functions/subs_functions.bas"
do{
#line 4224 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__setbit",12));
#line 4224 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4224 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4224,"subs_functions.bas");}while(r);
#line 4225 "subs_functions/subs_functions.bas"
do{
#line 4225 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4225 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4225,"subs_functions.bas");}while(r);
#line 4226 "subs_functions/subs_functions.bas"
do{
#line 4226 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4226 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4226 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4226,"subs_functions.bas");}while(r);
#line 4227 "subs_functions/subs_functions.bas"
do{
#line 4227 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 4227 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4227,"subs_functions.bas");}while(r);
#line 4228 "subs_functions/subs_functions.bas"
do{
#line 4228 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SETBIT(numericalVariable, numericalValue)",42));
#line 4228 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4228 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4228,"subs_functions.bas");}while(r);
#line 4229 "subs_functions/subs_functions.bas"
do{
#line 4229 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4229 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4229,"subs_functions.bas");}while(r);
#line 4231 "subs_functions/subs_functions.bas"
do{
#line 4231 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4231 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4231,"subs_functions.bas");}while(r);
#line 4232 "subs_functions/subs_functions.bas"
do{
#line 4232 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResetBit",9));
#line 4232 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4232 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4232,"subs_functions.bas");}while(r);
#line 4233 "subs_functions/subs_functions.bas"
do{
#line 4233 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4233 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4233,"subs_functions.bas");}while(r);
#line 4234 "subs_functions/subs_functions.bas"
do{
#line 4234 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__resetbit",14));
#line 4234 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4234 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4234,"subs_functions.bas");}while(r);
#line 4235 "subs_functions/subs_functions.bas"
do{
#line 4235 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4235 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4235,"subs_functions.bas");}while(r);
#line 4236 "subs_functions/subs_functions.bas"
do{
#line 4236 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4236 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4236 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4236,"subs_functions.bas");}while(r);
#line 4237 "subs_functions/subs_functions.bas"
do{
#line 4237 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 4237 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4237,"subs_functions.bas");}while(r);
#line 4238 "subs_functions/subs_functions.bas"
do{
#line 4238 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_RESETBIT(numericalVariable, numericalValue)",44));
#line 4238 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4238 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4238,"subs_functions.bas");}while(r);
#line 4239 "subs_functions/subs_functions.bas"
do{
#line 4239 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4239 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4239,"subs_functions.bas");}while(r);
#line 4241 "subs_functions/subs_functions.bas"
do{
#line 4241 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4241 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4241,"subs_functions.bas");}while(r);
#line 4242 "subs_functions/subs_functions.bas"
do{
#line 4242 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ToggleBit",10));
#line 4242 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4242 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4242,"subs_functions.bas");}while(r);
#line 4243 "subs_functions/subs_functions.bas"
do{
#line 4243 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4243 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4243,"subs_functions.bas");}while(r);
#line 4244 "subs_functions/subs_functions.bas"
do{
#line 4244 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__togglebit",15));
#line 4244 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4244 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4244,"subs_functions.bas");}while(r);
#line 4245 "subs_functions/subs_functions.bas"
do{
#line 4245 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4245 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4245,"subs_functions.bas");}while(r);
#line 4246 "subs_functions/subs_functions.bas"
do{
#line 4246 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4246 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4246 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4246,"subs_functions.bas");}while(r);
#line 4247 "subs_functions/subs_functions.bas"
do{
#line 4247 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
#line 4247 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4247,"subs_functions.bas");}while(r);
#line 4248 "subs_functions/subs_functions.bas"
do{
#line 4248 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_TOGGLEBIT(numericalVariable, numericalValue)",45));
#line 4248 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4248 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4248,"subs_functions.bas");}while(r);
#line 4249 "subs_functions/subs_functions.bas"
do{
#line 4249 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4249 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4249,"subs_functions.bas");}while(r);
#line 4251 "subs_functions/subs_functions.bas"
do{
#line 4251 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4251 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4251,"subs_functions.bas");}while(r);
#line 4252 "subs_functions/subs_functions.bas"
do{
#line 4252 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NotifyPopup",12));
#line 4252 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4252 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4252,"subs_functions.bas");}while(r);
#line 4253 "subs_functions/subs_functions.bas"
do{
#line 4253 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4253 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4253,"subs_functions.bas");}while(r);
#line 4254 "subs_functions/subs_functions.bas"
do{
#line 4254 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__guiNotifyPopup",19));
#line 4254 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4254 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4254,"subs_functions.bas");}while(r);
#line 4255 "subs_functions/subs_functions.bas"
do{
#line 4255 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 4255 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4255,"subs_functions.bas");}while(r);
#line 4256 "subs_functions/subs_functions.bas"
do{
#line 4256 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 4256 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4256 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4256,"subs_functions.bas");}while(r);
#line 4257 "subs_functions/subs_functions.bas"
do{
#line 4257 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
#line 4257 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4257 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4257,"subs_functions.bas");}while(r);
#line 4258 "subs_functions/subs_functions.bas"
do{
#line 4258 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_NOTIFYPOPUP [title$][, message$][, iconType$]",46));
#line 4258 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4258 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4258,"subs_functions.bas");}while(r);
#line 4259 "subs_functions/subs_functions.bas"
do{
#line 4259 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4259 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4259,"subs_functions.bas");}while(r);
#line 4261 "subs_functions/subs_functions.bas"
do{
#line 4261 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4261 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4261,"subs_functions.bas");}while(r);
#line 4262 "subs_functions/subs_functions.bas"
do{
#line 4262 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MessageBox",11));
#line 4262 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4262 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4262,"subs_functions.bas");}while(r);
#line 4263 "subs_functions/subs_functions.bas"
do{
#line 4263 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4263 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4263,"subs_functions.bas");}while(r);
#line 4264 "subs_functions/subs_functions.bas"
do{
#line 4264 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__guiMessageBox",18));
#line 4264 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4264 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4264,"subs_functions.bas");}while(r);
#line 4265 "subs_functions/subs_functions.bas"
do{
#line 4265 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 4265 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4265,"subs_functions.bas");}while(r);
#line 4266 "subs_functions/subs_functions.bas"
do{
#line 4266 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 4266 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4266 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4266,"subs_functions.bas");}while(r);
#line 4267 "subs_functions/subs_functions.bas"
do{
#line 4267 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
#line 4267 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4267 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4267,"subs_functions.bas");}while(r);
#line 4268 "subs_functions/subs_functions.bas"
do{
#line 4268 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MESSAGEBOX [title$][, message$][, iconType$]",45));
#line 4268 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4268 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4268,"subs_functions.bas");}while(r);
#line 4269 "subs_functions/subs_functions.bas"
do{
#line 4269 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4269 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4269,"subs_functions.bas");}while(r);
#line 4271 "subs_functions/subs_functions.bas"
do{
#line 4271 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4271 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4271,"subs_functions.bas");}while(r);
#line 4272 "subs_functions/subs_functions.bas"
do{
#line 4272 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SelectFolderDialog",19));
#line 4272 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4272 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4272,"subs_functions.bas");}while(r);
#line 4273 "subs_functions/subs_functions.bas"
do{
#line 4273 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4273 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4273 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4273,"subs_functions.bas");}while(r);
#line 4274 "subs_functions/subs_functions.bas"
do{
#line 4274 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4274 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4274,"subs_functions.bas");}while(r);
#line 4275 "subs_functions/subs_functions.bas"
do{
#line 4275 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiSelectFolderDialog",27));
#line 4275 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4275 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4275,"subs_functions.bas");}while(r);
#line 4276 "subs_functions/subs_functions.bas"
do{
#line 4276 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4276 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4276,"subs_functions.bas");}while(r);
#line 4277 "subs_functions/subs_functions.bas"
do{
#line 4277 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 4277 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4277 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4277,"subs_functions.bas");}while(r);
#line 4278 "subs_functions/subs_functions.bas"
do{
#line 4278 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,?]",7));
#line 4278 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4278 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4278,"subs_functions.bas");}while(r);
#line 4279 "subs_functions/subs_functions.bas"
do{
#line 4279 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4279 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4279,"subs_functions.bas");}while(r);
#line 4280 "subs_functions/subs_functions.bas"
do{
#line 4280 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SELECTFOLDERDIALOG$([title$][, defaultPath$])",46));
#line 4280 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4280 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4280,"subs_functions.bas");}while(r);
#line 4281 "subs_functions/subs_functions.bas"
do{
#line 4281 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4281 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4281,"subs_functions.bas");}while(r);
#line 4283 "subs_functions/subs_functions.bas"
do{
#line 4283 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4283 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4283,"subs_functions.bas");}while(r);
#line 4284 "subs_functions/subs_functions.bas"
do{
#line 4284 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ColorChooserDialog",19));
#line 4284 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4284 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4284,"subs_functions.bas");}while(r);
#line 4285 "subs_functions/subs_functions.bas"
do{
#line 4285 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4285 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4285,"subs_functions.bas");}while(r);
#line 4286 "subs_functions/subs_functions.bas"
do{
#line 4286 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiColorChooserDialog",27));
#line 4286 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4286 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4286,"subs_functions.bas");}while(r);
#line 4287 "subs_functions/subs_functions.bas"
do{
#line 4287 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 2 ;
#line 4287 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4287,"subs_functions.bas");}while(r);
#line 4288 "subs_functions/subs_functions.bas"
do{
#line 4288 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
#line 4288 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4288 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4288,"subs_functions.bas");}while(r);
#line 4289 "subs_functions/subs_functions.bas"
do{
#line 4289 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,?]",7));
#line 4289 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4289 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4289,"subs_functions.bas");}while(r);
#line 4290 "subs_functions/subs_functions.bas"
do{
#line 4290 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
#line 4290 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4290,"subs_functions.bas");}while(r);
#line 4291 "subs_functions/subs_functions.bas"
do{
#line 4291 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_COLORCHOOSERDIALOG&([title$][, defaultRGB&])",45));
#line 4291 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4291 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4291,"subs_functions.bas");}while(r);
#line 4292 "subs_functions/subs_functions.bas"
do{
#line 4292 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4292 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4292,"subs_functions.bas");}while(r);
#line 4294 "subs_functions/subs_functions.bas"
do{
#line 4294 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4294 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4294,"subs_functions.bas");}while(r);
#line 4295 "subs_functions/subs_functions.bas"
do{
#line 4295 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MessageBox",11));
#line 4295 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4295 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4295,"subs_functions.bas");}while(r);
#line 4296 "subs_functions/subs_functions.bas"
do{
#line 4296 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4296 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4296,"subs_functions.bas");}while(r);
#line 4297 "subs_functions/subs_functions.bas"
do{
#line 4297 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiMessageBox",19));
#line 4297 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4297 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4297,"subs_functions.bas");}while(r);
#line 4298 "subs_functions/subs_functions.bas"
do{
#line 4298 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 4298 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4298,"subs_functions.bas");}while(r);
#line 4299 "subs_functions/subs_functions.bas"
do{
#line 4299 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4299 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4299 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4299,"subs_functions.bas");}while(r);
#line 4300 "subs_functions/subs_functions.bas"
do{
#line 4300 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
#line 4300 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4300 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4300,"subs_functions.bas");}while(r);
#line 4301 "subs_functions/subs_functions.bas"
do{
#line 4301 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4301 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4301,"subs_functions.bas");}while(r);
#line 4302 "subs_functions/subs_functions.bas"
do{
#line 4302 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_MESSAGEBOX&([title$][, message$][, dialogType$][, iconType$][, defaultButton&])",80));
#line 4302 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4302 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4302,"subs_functions.bas");}while(r);
#line 4303 "subs_functions/subs_functions.bas"
do{
#line 4303 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4303 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4303,"subs_functions.bas");}while(r);
#line 4305 "subs_functions/subs_functions.bas"
do{
#line 4305 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4305 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4305,"subs_functions.bas");}while(r);
#line 4306 "subs_functions/subs_functions.bas"
do{
#line 4306 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InputBox",9));
#line 4306 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4306 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4306,"subs_functions.bas");}while(r);
#line 4307 "subs_functions/subs_functions.bas"
do{
#line 4307 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4307 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4307 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4307,"subs_functions.bas");}while(r);
#line 4308 "subs_functions/subs_functions.bas"
do{
#line 4308 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4308 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4308,"subs_functions.bas");}while(r);
#line 4309 "subs_functions/subs_functions.bas"
do{
#line 4309 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiInputBox",17));
#line 4309 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4309 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4309,"subs_functions.bas");}while(r);
#line 4310 "subs_functions/subs_functions.bas"
do{
#line 4310 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 3 ;
#line 4310 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4310,"subs_functions.bas");}while(r);
#line 4311 "subs_functions/subs_functions.bas"
do{
#line 4311 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 4311 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4311 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4311,"subs_functions.bas");}while(r);
#line 4312 "subs_functions/subs_functions.bas"
do{
#line 4312 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
#line 4312 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4312 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4312,"subs_functions.bas");}while(r);
#line 4313 "subs_functions/subs_functions.bas"
do{
#line 4313 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4313 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4313,"subs_functions.bas");}while(r);
#line 4314 "subs_functions/subs_functions.bas"
do{
#line 4314 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_INPUTBOX$([title$][, message$][, defaultInput$])",49));
#line 4314 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4314 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4314,"subs_functions.bas");}while(r);
#line 4315 "subs_functions/subs_functions.bas"
do{
#line 4315 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4315 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4315,"subs_functions.bas");}while(r);
#line 4317 "subs_functions/subs_functions.bas"
do{
#line 4317 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4317 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4317,"subs_functions.bas");}while(r);
#line 4318 "subs_functions/subs_functions.bas"
do{
#line 4318 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenFileDialog",15));
#line 4318 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4318 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4318,"subs_functions.bas");}while(r);
#line 4319 "subs_functions/subs_functions.bas"
do{
#line 4319 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4319 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4319 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4319,"subs_functions.bas");}while(r);
#line 4320 "subs_functions/subs_functions.bas"
do{
#line 4320 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4320 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4320,"subs_functions.bas");}while(r);
#line 4321 "subs_functions/subs_functions.bas"
do{
#line 4321 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiOpenFileDialog",23));
#line 4321 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4321 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4321,"subs_functions.bas");}while(r);
#line 4322 "subs_functions/subs_functions.bas"
do{
#line 4322 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 5 ;
#line 4322 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4322,"subs_functions.bas");}while(r);
#line 4323 "subs_functions/subs_functions.bas"
do{
#line 4323 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
#line 4323 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4323 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4323,"subs_functions.bas");}while(r);
#line 4324 "subs_functions/subs_functions.bas"
do{
#line 4324 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
#line 4324 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4324 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4324,"subs_functions.bas");}while(r);
#line 4325 "subs_functions/subs_functions.bas"
do{
#line 4325 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4325 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4325,"subs_functions.bas");}while(r);
#line 4326 "subs_functions/subs_functions.bas"
do{
#line 4326 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_OPENFILEDIALOG$([title$][, defaultPathAndFile$][, filterPatterns$][, singleFilterDescription$][, allowMultipleSelects&])",121));
#line 4326 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4326 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4326,"subs_functions.bas");}while(r);
#line 4327 "subs_functions/subs_functions.bas"
do{
#line 4327 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4327 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4327,"subs_functions.bas");}while(r);
#line 4329 "subs_functions/subs_functions.bas"
do{
#line 4329 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4329 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4329,"subs_functions.bas");}while(r);
#line 4330 "subs_functions/subs_functions.bas"
do{
#line 4330 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SaveFileDialog",15));
#line 4330 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4330 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4330,"subs_functions.bas");}while(r);
#line 4331 "subs_functions/subs_functions.bas"
do{
#line 4331 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1),qbs_new_txt_len("$",1));
#line 4331 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4331 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4331,"subs_functions.bas");}while(r);
#line 4332 "subs_functions/subs_functions.bas"
do{
#line 4332 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4332 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4332,"subs_functions.bas");}while(r);
#line 4333 "subs_functions/subs_functions.bas"
do{
#line 4333 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__guiSaveFileDialog",23));
#line 4333 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4333 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4333,"subs_functions.bas");}while(r);
#line 4334 "subs_functions/subs_functions.bas"
do{
#line 4334 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 4 ;
#line 4334 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4334,"subs_functions.bas");}while(r);
#line 4335 "subs_functions/subs_functions.bas"
do{
#line 4335 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_add(qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
#line 4335 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4335 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4335,"subs_functions.bas");}while(r);
#line 4336 "subs_functions/subs_functions.bas"
do{
#line 4336 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1617))),256,1),qbs_new_txt_len("[?][,[?][,[?][,?]]]",19));
#line 4336 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4336 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4336,"subs_functions.bas");}while(r);
#line 4337 "subs_functions/subs_functions.bas"
do{
#line 4337 "subs_functions/subs_functions.bas"
*(int32*)(((char*)__UDT_ID)+((0+2385)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
#line 4337 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4337,"subs_functions.bas");}while(r);
#line 4338 "subs_functions/subs_functions.bas"
do{
#line 4338 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_SAVEFILEDIALOG$([title$][, defaultPathAndFile$][, filterPatterns$][, singleFilterDescription$])",96));
#line 4338 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4338 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4338,"subs_functions.bas");}while(r);
#line 4339 "subs_functions/subs_functions.bas"
do{
#line 4339 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4339 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4339,"subs_functions.bas");}while(r);
#line 4341 "subs_functions/subs_functions.bas"
do{
#line 4341 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4341 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4341,"subs_functions.bas");}while(r);
#line 4342 "subs_functions/subs_functions.bas"
do{
#line 4342 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogTrace",9));
#line 4342 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4342 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4342,"subs_functions.bas");}while(r);
#line 4343 "subs_functions/subs_functions.bas"
do{
#line 4343 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4343 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4343,"subs_functions.bas");}while(r);
#line 4344 "subs_functions/subs_functions.bas"
do{
#line 4344 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__log_trace",14));
#line 4344 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4344 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4344,"subs_functions.bas");}while(r);
#line 4345 "subs_functions/subs_functions.bas"
do{
#line 4345 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4345 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4345,"subs_functions.bas");}while(r);
#line 4346 "subs_functions/subs_functions.bas"
do{
#line 4346 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4346 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4346 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4346,"subs_functions.bas");}while(r);
#line 4347 "subs_functions/subs_functions.bas"
do{
#line 4347 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOGTRACE msg$",14));
#line 4347 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4347 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4347,"subs_functions.bas");}while(r);
#line 4348 "subs_functions/subs_functions.bas"
do{
#line 4348 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4348 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4348,"subs_functions.bas");}while(r);
#line 4350 "subs_functions/subs_functions.bas"
do{
#line 4350 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4350 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4350,"subs_functions.bas");}while(r);
#line 4351 "subs_functions/subs_functions.bas"
do{
#line 4351 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogInfo",8));
#line 4351 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4351 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4351,"subs_functions.bas");}while(r);
#line 4352 "subs_functions/subs_functions.bas"
do{
#line 4352 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4352 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4352,"subs_functions.bas");}while(r);
#line 4353 "subs_functions/subs_functions.bas"
do{
#line 4353 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__log_info",13));
#line 4353 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4353 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4353,"subs_functions.bas");}while(r);
#line 4354 "subs_functions/subs_functions.bas"
do{
#line 4354 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4354 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4354,"subs_functions.bas");}while(r);
#line 4355 "subs_functions/subs_functions.bas"
do{
#line 4355 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4355 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4355 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4355,"subs_functions.bas");}while(r);
#line 4356 "subs_functions/subs_functions.bas"
do{
#line 4356 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOGINFO msg$",13));
#line 4356 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4356 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4356,"subs_functions.bas");}while(r);
#line 4357 "subs_functions/subs_functions.bas"
do{
#line 4357 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4357 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4357,"subs_functions.bas");}while(r);
#line 4359 "subs_functions/subs_functions.bas"
do{
#line 4359 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4359 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4359,"subs_functions.bas");}while(r);
#line 4360 "subs_functions/subs_functions.bas"
do{
#line 4360 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogWarn",8));
#line 4360 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4360 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4360,"subs_functions.bas");}while(r);
#line 4361 "subs_functions/subs_functions.bas"
do{
#line 4361 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4361 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4361,"subs_functions.bas");}while(r);
#line 4362 "subs_functions/subs_functions.bas"
do{
#line 4362 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__log_warn",13));
#line 4362 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4362 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4362,"subs_functions.bas");}while(r);
#line 4363 "subs_functions/subs_functions.bas"
do{
#line 4363 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4363 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4363,"subs_functions.bas");}while(r);
#line 4364 "subs_functions/subs_functions.bas"
do{
#line 4364 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4364 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4364 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4364,"subs_functions.bas");}while(r);
#line 4365 "subs_functions/subs_functions.bas"
do{
#line 4365 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOGWARN msg$",13));
#line 4365 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4365 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4365,"subs_functions.bas");}while(r);
#line 4366 "subs_functions/subs_functions.bas"
do{
#line 4366 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4366 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4366,"subs_functions.bas");}while(r);
#line 4368 "subs_functions/subs_functions.bas"
do{
#line 4368 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4368 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4368,"subs_functions.bas");}while(r);
#line 4369 "subs_functions/subs_functions.bas"
do{
#line 4369 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogError",9));
#line 4369 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4369 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4369,"subs_functions.bas");}while(r);
#line 4370 "subs_functions/subs_functions.bas"
do{
#line 4370 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 2 ;
#line 4370 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4370,"subs_functions.bas");}while(r);
#line 4371 "subs_functions/subs_functions.bas"
do{
#line 4371 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("sub__log_error",14));
#line 4371 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4371 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4371,"subs_functions.bas");}while(r);
#line 4372 "subs_functions/subs_functions.bas"
do{
#line 4372 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 1 ;
#line 4372 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4372,"subs_functions.bas");}while(r);
#line 4373 "subs_functions/subs_functions.bas"
do{
#line 4373 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
#line 4373 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4373 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4373,"subs_functions.bas");}while(r);
#line 4374 "subs_functions/subs_functions.bas"
do{
#line 4374 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOGERROR msg$",14));
#line 4374 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4374 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4374,"subs_functions.bas");}while(r);
#line 4375 "subs_functions/subs_functions.bas"
do{
#line 4375 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4375 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4375,"subs_functions.bas");}while(r);
#line 4377 "subs_functions/subs_functions.bas"
do{
#line 4377 "subs_functions/subs_functions.bas"
SUB_CLEARID();
#line 4377 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4377,"subs_functions.bas");}while(r);
#line 4378 "subs_functions/subs_functions.bas"
do{
#line 4378 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogMinLevel",12));
#line 4378 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4378 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4378,"subs_functions.bas");}while(r);
#line 4379 "subs_functions/subs_functions.bas"
do{
#line 4379 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+548)))= 1 ;
#line 4379 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4379,"subs_functions.bas");}while(r);
#line 4380 "subs_functions/subs_functions.bas"
do{
#line 4380 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+554))),256,1),qbs_new_txt_len("func__logminlevel",17));
#line 4380 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4380 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4380,"subs_functions.bas");}while(r);
#line 4381 "subs_functions/subs_functions.bas"
do{
#line 4381 "subs_functions/subs_functions.bas"
*(int16*)(((char*)__UDT_ID)+((0+813)))= 0 ;
#line 4381 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4381,"subs_functions.bas");}while(r);
#line 4382 "subs_functions/subs_functions.bas"
do{
#line 4382 "subs_functions/subs_functions.bas"
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+817))),400,1),qbs_new_txt_len("",0));
#line 4382 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4382 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4382,"subs_functions.bas");}while(r);
#line 4383 "subs_functions/subs_functions.bas"
do{
#line 4383 "subs_functions/subs_functions.bas"
*_SUB_REGINTERNAL_LONG_IDERET=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
#line 4383 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4383,"subs_functions.bas");}while(r);
#line 4384 "subs_functions/subs_functions.bas"
do{
#line 4384 "subs_functions/subs_functions.bas"
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2965)))),qbs_new_txt_len("_LOGMINLEVEL",12));
#line 4384 "subs_functions/subs_functions.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 4384 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4384,"subs_functions.bas");}while(r);
#line 4385 "subs_functions/subs_functions.bas"
do{
#line 4385 "subs_functions/subs_functions.bas"
SUB_REGID();
#line 4385 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4385,"subs_functions.bas");}while(r);
#line 4387 "subs_functions/subs_functions.bas"
do{
#line 4387 "subs_functions/subs_functions.bas"
*__LONG_REGINTERNALSUBFUNC= 0 ;
#line 4387 "subs_functions/subs_functions.bas"
if(!qbevent)break;evnt(26196,4387,"subs_functions.bas");}while(r);
#line 4388 "subs_functions/subs_functions.bas"
exit_subfunc:;
#line 4388 "subs_functions/subs_functions.bas"
free_mem_lock(sf_mem_lock);
#line 4388 "subs_functions/subs_functions.bas"
#include "free84.txt"
#line 4388 "subs_functions/subs_functions.bas"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
#line 4388 "subs_functions/subs_functions.bas"
cmem_sp=tmp_cmem_sp;
#line 4388 "subs_functions/subs_functions.bas"
}
