void SUB_REGINTERNAL(){
qbs *tqbs;
ptrszint tmp_long;
int32 tmp_fileno;
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
uint8 *tmp_mem_static_pointer=mem_static_pointer;
uint32 tmp_cmem_sp=cmem_sp;
#include "data45.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
if (is_error_pending()) goto exit_subfunc;
do{
*__LONG_REGINTERNALSUBFUNC= 1 ;
if(!qbevent)break;evnt(23206,2,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,32,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,33,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,33,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,33,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,33,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,34,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,35,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,35,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,35,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,35,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,36,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("End",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,37,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,37,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,37,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,37,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,38,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LSet",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,39,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,39,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,39,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,39,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,40,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RSet",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,41,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,41,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,41,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,41,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,42,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Mid",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,43,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,43,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,43,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,43,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,43,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,44,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Print",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,45,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,45,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,45,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,45,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,46,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Option",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,47,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,47,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,47,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,47,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,48,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Swap",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,49,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,49,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,49,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,49,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,50,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("System",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,51,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,51,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,51,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,51,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,52,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Write",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,53,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,53,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,53,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,53,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,54,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Read",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,55,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,55,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,55,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,55,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,56,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Close",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,57,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,57,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,57,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,57,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,58,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Reset",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,59,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,59,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,59,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,59,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,60,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Input",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,61,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,61,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,61,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,61,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,63,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("TrOn",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,64,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,64,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,64,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,64,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,65,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("TrOff",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,66,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,66,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,66,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,66,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,67,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("List",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,68,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,68,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,68,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,68,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,69,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Def",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,70,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,70,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,70,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+2125))),256,1),qbs_new_txt_len("SEG",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,70,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,70,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,71,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("IoCtl",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,72,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,72,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,72,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,72,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,73,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("IoCtl",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_stub",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,74,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,75,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Fre",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_stub",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,76,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,77,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("SetMem",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_stub",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,78,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,79,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("FileAttr",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_stub",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,80,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,81,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemGet",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,82,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,82,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,82,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,82,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,83,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemPut",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,84,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,84,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,84,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,84,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,85,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemFill",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,86,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,86,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,86,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,86,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,87,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Continue",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,88,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,88,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_stub",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,88,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,88,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,90,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cast",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,91,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,92,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,93,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string( -1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,94,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,95,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CAST(numericalType, numericalValue)",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,96,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,97,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,99,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_IIf",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,100,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,101,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,102,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,103,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,104,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_IIF(expression, truePart, falsePart)",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,105,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,106,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,108,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Min",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,109,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,110,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,111,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,112,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,113,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_Min(value1, value2)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,114,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,115,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,117,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Max",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,118,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,119,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,120,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,121,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,122,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_Max(value1, value2)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,123,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,124,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,126,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clamp",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,127,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,128,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,129,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,130,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,131,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_Clamp(value, minimum, maximum)",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,132,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,133,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,135,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Resize",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,136,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,137,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__resize",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,138,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,139,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,140,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{On|Off}][,{_Stretch|_Smooth}]",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,141,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RESIZE [{ON|OFF}][, {_STRETCH|_SMOOTH}]",40));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,142,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,143,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,145,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Resize",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,146,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,147,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__resize",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,148,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,149,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RESIZE",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,150,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,151,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,153,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResizeWidth",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,154,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,155,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__resizewidth",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,156,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,157,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RESIZEWIDTH",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,158,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,159,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,161,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResizeHeight",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,162,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,163,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__resizeheight",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,164,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,165,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RESIZEHEIGHT",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,166,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,167,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,169,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScaledWidth",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,170,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,171,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__scaledwidth",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,172,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,173,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCALEDWIDTH",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,174,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,175,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,177,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScaledHeight",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,178,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,179,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__scaledheight",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,180,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,181,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCALEDHEIGHT",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,182,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,183,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,186,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_GLRender",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,187,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,188,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__glrender",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,189,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,190,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,191,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{_Behind|_OnTop|_Only}",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,192,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_GLRENDER {_Behind|_OnTop|_Only}",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,193,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,194,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,196,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DisplayOrder",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,197,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,198,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__displayorder",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,199,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,200,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,201,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}[,{_Software|_Hardware|_Hardware1|_GLRender}]]]]",179));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,202,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DISPLAYORDER {_Software|_Hardware|_Hardware1|_GLRender} (any combination/order)",80));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,203,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,204,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,206,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemGet",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,207,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,208,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__memget",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,209,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,210,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_UDTTYPE+( 1 )),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)),l2string( -1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,211,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,212,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMGET(block, offset, type)",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,213,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,214,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,216,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Mem",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,217,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,218,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mem",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,219,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,222,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,223,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,224,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ISUDT+( 1 );
if(!qbevent)break;evnt(23206,225,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEM(referenceVariable) or _MEM(offset, byteSize)",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,226,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,227,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,230,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemElement",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,231,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,232,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mem",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,233,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,234,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -8 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,235,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ISUDT+( 1 );
if(!qbevent)break;evnt(23206,236,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMELEMENT(referenceVariable)",30));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,237,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,238,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,241,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemFree",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,242,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,243,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__memfree",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,244,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,245,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_UDTTYPE+( 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,246,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMFREE memoryVariable",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,247,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,248,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,250,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemExists",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,251,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,252,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__memexists",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,253,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,254,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_UDTTYPE+( 1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,255,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,256,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMEXISTS(memBlock)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,257,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,258,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,260,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemNew",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,261,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,262,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__memnew",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,263,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,264,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_OFFSETTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,265,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ISUDT+( 1 );
if(!qbevent)break;evnt(23206,266,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMNEW(byteSize)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,267,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,268,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,270,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemImage",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,271,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,272,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__memimage",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,273,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,274,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,275,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,276,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ISUDT+( 1 );
if(!qbevent)break;evnt(23206,277,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMIMAGE or _MEMIMAGE(imageHandle)",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,278,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,279,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,281,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemSound",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,282,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,282,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,283,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__memsound",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,284,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,285,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,286,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,287,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ISUDT+( 1 );
if(!qbevent)break;evnt(23206,288,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMSOUND(soundHandle)",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,289,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,290,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,292,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MemCopy",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,293,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,294,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__memcopy",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,295,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,296,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,297,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?,?{To}?,?",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,298,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MEMCOPY sourceBlock, sourceBlock.OFFSET, sourceBlock.SIZE TO destBlock, destBlock.OFFSET",89));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,299,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,300,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,302,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleTitle",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,303,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,304,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__consoletitle",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,305,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,306,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,307,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLETITLE title$",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,308,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,309,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,311,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenShow",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,312,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,313,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__screenshow",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,314,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENSHOW",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,315,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,316,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,318,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenHide",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,319,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,320,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__screenhide",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,321,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENHIDE",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,322,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,323,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,325,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenHide",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,326,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,327,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__screenhide",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,328,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,329,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENHIDE",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,330,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,331,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,333,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Console",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,334,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,335,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__console",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,336,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,337,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLE",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,338,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,339,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,341,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Console",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,342,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,343,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__console",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,344,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,345,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,346,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off}",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,347,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLE {On|Off}",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,348,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,349,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,351,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ControlChr",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,352,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,353,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__controlchr",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,354,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,355,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,356,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off}",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,357,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONTROLCHR {On|Off}",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,358,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,359,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,361,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blink",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,362,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,363,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__blink",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,364,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,365,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,366,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off}",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,367,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLINK {On|Off}",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,368,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,369,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,371,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blink",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,372,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,373,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__blink",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,374,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,375,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLINK",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,376,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,377,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,379,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FileExists",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,380,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,381,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fileexists",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,382,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,383,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,384,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,385,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FILEEXISTS(fileName$)",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,386,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,387,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,389,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DirExists",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,390,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,391,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__direxists",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,392,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,393,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,394,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,395,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DIREXISTS(path$)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,396,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,397,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,401,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Stick",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,402,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,402,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,403,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_stick",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,404,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,405,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,406,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,407,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,408,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("STICK(direction%) or STICK(direction%, axis_number%)",52));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,409,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,410,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,412,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Strig",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,413,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,413,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,414,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_strig",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,415,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,416,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,417,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,418,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,419,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("STRIG(button_function%) or STRIG(button_function%, device_number%)",66));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,420,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,421,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,423,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Strig",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,424,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,424,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,425,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_strig",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,426,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,427,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,428,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[(?[,?])]{On|Off|Stop}",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,429,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("STRIG(button%) {On|Off|Stop}",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,431,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,432,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,434,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Devices",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,435,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,435,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,436,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__devices",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,437,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,438,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEVICES",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,439,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,440,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,442,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Device",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,443,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,443,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,444,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,445,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__device",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,446,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,447,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,448,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,449,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,450,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEVICE$(device_number)",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,451,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,452,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,454,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DeviceInput",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,455,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,455,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,456,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__deviceinput",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,457,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,458,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,459,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,460,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,461,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEVICEINPUT or _DEVICEINPUT(device_number%)",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,462,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,463,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,465,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastButton",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,466,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,466,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,467,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__lastbutton",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,468,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,469,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,470,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,471,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,472,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LASTBUTTON(deviceNumber)",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,473,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,474,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,476,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastAxis",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,477,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,477,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,478,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__lastaxis",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,479,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,480,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,481,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,482,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,483,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LASTAXIS(deviceNumber)",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,484,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,485,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,487,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LastWheel",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,488,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,488,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,489,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__lastwheel",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,490,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,491,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,492,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,493,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,494,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LASTWHEEL(deviceNumber)",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,495,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,496,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,498,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Button",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,499,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,499,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,500,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__button",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,501,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,502,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,503,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,504,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,505,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BUTTON(button_number%)",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,506,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,507,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,509,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ButtonChange",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,510,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,510,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,511,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__buttonchange",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,512,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,513,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,514,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,515,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,516,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BUTTONCHANGE(button_number%)",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,517,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,518,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,520,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Axis",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,521,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,521,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,522,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__axis",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,523,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,524,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,525,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,526,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,527,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_AXIS(axis_number%)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,528,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,529,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,531,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Wheel",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,532,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 10ll ;
if(!qbevent)break;evnt(23206,532,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,533,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__wheel",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,534,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,535,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,536,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,537,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,538,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WHEEL(wheelNumber%)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,539,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,540,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,542,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Key",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,543,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,544,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_key",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,545,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,546,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,547,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("(?){On|Off|Stop}",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,548,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("KEY(number) {On|Off|Stop}",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,549,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,550,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,552,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenX",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,553,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,554,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__screenx",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,555,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,556,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENX",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,557,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,558,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,560,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenY",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,561,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,562,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__screeny",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,563,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,564,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENY",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,565,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,566,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,568,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenMove",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,569,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,570,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__screenmove",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,571,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,572,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,573,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Middle}][?,?]",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,574,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENMOVE x, y or _SCREENMOVE _Middle",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,575,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,576,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,578,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMove",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,579,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,580,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__mousemove",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,581,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,582,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,583,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEMOVE x, y",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,584,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,585,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,587,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OS",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,588,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,589,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,590,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__os",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,591,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,592,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_OS$",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,593,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,594,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,596,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompileDate",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,597,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,598,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,599,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__compdate",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,600,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,601,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COMPILEDATE$",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,602,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,603,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,605,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompileTime",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,606,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,607,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,608,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__comptime",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,609,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,610,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COMPILETIME$",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,611,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,612,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,614,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CompilerVersion",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,615,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,616,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,617,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__compvers",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,618,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,619,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COMPILERVERSION$",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,620,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,621,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,623,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Title",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,624,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,625,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,626,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__title",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,627,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,628,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TITLE$",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,629,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,630,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,632,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapUnicode",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,633,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,634,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__mapunicode",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,635,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,636,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,637,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?{To}?",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,638,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MAPUNICODE unicode& TO asciiCode%",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,639,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,640,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,642,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapUnicode",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,643,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,644,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mapunicode",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,645,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,646,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,647,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,648,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MAPUNICODE(asciiCode%)",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,649,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,650,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,652,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyDown",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,653,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,654,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__keydown",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,655,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,656,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,657,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,658,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_KEYDOWN(code&)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,659,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,660,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,662,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyHit",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,663,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,664,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__keyhit",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,665,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,666,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_KEYHIT",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,667,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,668,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,670,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WindowHandle",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,671,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,672,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__windowhandle",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,673,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,674,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WINDOWHANDLE",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,675,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,676,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,678,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Files",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,679,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,680,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_files",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,681,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,682,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,683,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,684,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("FILES fileSpec$",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,685,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,686,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,688,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Files",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,689,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,690,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,691,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__files",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,692,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,693,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,694,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,695,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,696,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FILES$([fileSpec$])",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,697,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,698,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,700,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullPath",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,701,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,702,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,703,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fullpath",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,704,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,705,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,706,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,707,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FULLPATH$(pathName$)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,708,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,709,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,711,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintImage",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,712,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 7ll ;
if(!qbevent)break;evnt(23206,712,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,713,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__printimage",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,714,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,715,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,716,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PRINTIMAGE imageHandle&",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,719,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,720,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,724,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenClick",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,725,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,726,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__screenclick",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,727,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,728,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,729,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,730,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENCLICK x, y[, button%]",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,731,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,732,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,734,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenPrint",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,735,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,736,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__screenprint",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,737,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,738,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,739,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENPRINT text$",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,740,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,741,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,743,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenImage",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,744,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 9ll ;
if(!qbevent)break;evnt(23206,744,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,745,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__screenimage",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,746,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,747,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,748,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?,?,?,?]",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,749,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,750,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENIMAGE(column1, row1, column2, row2)",42));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,751,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,752,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,754,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Lock",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,755,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,756,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_lock",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,757,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,758,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,759,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,760,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LOCK #fileNumber%, record& or LOCK #fileNumber% firstRecord& TO lastRecord&",75));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,761,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,762,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,764,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Unlock",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,765,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,766,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_unlock",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,767,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,768,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,769,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[#]?[,[?][{To}?]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,770,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("UNLOCK #fileNumber%, record& or UNLOCK #fileNumber% firstRecord& TO lastRecord&",79));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,771,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,772,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,774,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeTimer",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,775,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,776,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__freetimer",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,777,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,778,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FREETIMER",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,779,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,780,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,782,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Timer",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,783,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,784,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_timer",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,785,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,786,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,787,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[(?)]{On|Off|Stop|Free}",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,788,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TIMER[(number%)] {On|Off|Stop|Free}",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,789,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,790,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,792,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullScreen",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,793,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,794,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__fullscreen",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,795,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,796,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,797,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,798,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FULLSCREEN [{_Off|_Stretch|_SquarePixels|Off}][,{_Smooth}]",59));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,799,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,800,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,802,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AllowFullScreen",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,803,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,804,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__allowfullscreen",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,805,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,806,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,807,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",66));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,808,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ALLOWFULLSCREEN [{_Stretch|_SquarePixels|_Off|_All|Off}][,{_Smooth|_Off|_All|Off}]",83));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,809,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,810,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,812,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FullScreen",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,813,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,814,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fullscreen",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,815,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,816,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FULLSCREEN",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,817,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,818,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,820,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Smooth",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,821,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,822,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fullscreensmooth",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,823,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,824,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SMOOTH",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,825,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,826,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,828,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WindowHasFocus",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,829,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,830,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__hasfocus",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,831,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,832,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WINDOWHASFOCUS",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,833,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,834,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,836,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clipboard",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,837,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,838,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,839,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__clipboard",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,840,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,841,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,842,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("=?",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,843,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLIPBOARD$ = text$",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,844,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,845,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,847,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Clipboard",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,848,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,849,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,850,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__clipboard",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,851,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,852,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLIPBOARD$",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,853,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,854,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,856,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClipboardImage",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,857,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 9ll ;
if(!qbevent)break;evnt(23206,857,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,858,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__clipboardimage",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,859,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,860,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLIPBOARDIMAGE",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,861,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,862,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,864,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClipboardImage",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,865,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 9ll ;
if(!qbevent)break;evnt(23206,865,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,866,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__clipboardimage",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,867,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,868,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,869,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("=?",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,870,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLIPBOARDIMAGE = existingImageHandle&",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,871,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,872,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,874,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Exit",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,875,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,876,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__exit",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,877,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,878,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_EXIT",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,879,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,880,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,882,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenHost",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,883,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 6ll ;
if(!qbevent)break;evnt(23206,883,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,884,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__openhost",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,885,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,886,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,887,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,888,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,889,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,890,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,892,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Connected",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,893,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,894,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__connected",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,895,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,896,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,897,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,898,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONNECTED(connectionHandle&)",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,899,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,900,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,902,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConnectionAddress",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,903,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+520))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,904,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,905,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__connectionaddress",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,906,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,907,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,908,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,909,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONNECTIONADDRESS(connectionHandle&)",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,910,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,911,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,913,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenConnection",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,914,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,915,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__openconnection",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,916,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,917,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,918,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,919,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_OPENCONNECTION(hostHandle)",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,920,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,921,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,923,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenClient",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,924,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 6ll ;
if(!qbevent)break;evnt(23206,924,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,925,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__openclient",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,926,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,927,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,928,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,929,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,930,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,931,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,933,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StatusCode",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,934,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,935,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__statusCode",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,936,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,937,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,938,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,939,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_STATUSCODE(httpHandle&)",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,940,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,941,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,943,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_EnvironCount",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,944,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,945,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__environcount",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,946,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,947,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ENVIRONCOUNT",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,948,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,949,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,951,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Environ",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,952,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,953,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,954,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_environ",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,955,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,956,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,957,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,958,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ENVIRON$(listIndex%) or ENVIRON$(systemID$)",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,959,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,960,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,962,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Environ",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,963,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,964,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_environ",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,965,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,966,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,967,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ENVIRON stringExpression$",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,968,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,969,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,971,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ErrorLine",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,972,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,973,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__errorline",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,974,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,975,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ERRORLINE",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,976,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,977,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,979,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InclErrorLine",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,980,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,981,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__inclerrorline",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,982,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,983,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_INCLERRORLINE",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,984,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,985,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,987,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ErrorMessage",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,988,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,989,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,990,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__errormessage",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,991,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,992,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,993,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,994,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,995,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ERRORMESSAGE$ or _ERRORMESSAGE$(errorCode%)",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,996,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,997,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,999,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Assert",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1000,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1001,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__assert",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1002,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1003,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1004,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1005,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ASSERT condition[, errorMessage$]",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1006,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1007,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1009,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Display",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1010,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1011,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__display",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1012,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DISPLAY",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1013,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1014,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1016,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AutoDisplay",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1017,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1018,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__autodisplay",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1019,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_AUTODISPLAY",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1020,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1021,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1023,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Limit",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1024,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1025,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__limit",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1026,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1027,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1028,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LIMIT framesPerSecond!",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1029,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1030,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1032,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FPS",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1033,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1034,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__fps",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1035,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1036,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1037,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Auto}][?]",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1038,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FPS fps! or _FPS _Auto",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1039,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1040,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1042,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Delay",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1043,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1044,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__delay",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1045,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1046,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1047,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DELAY seconds!",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1048,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1049,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1051,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Icon",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1052,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 8ll ;
if(!qbevent)break;evnt(23206,1052,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1053,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__icon",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1054,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1055,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1056,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?[,?]]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1057,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ICON [mainImageHandle&[, smallImageHandle&]]",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1058,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1059,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1061,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Title",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1062,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1063,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__title",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1064,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1065,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1066,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TITLE text$",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1067,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1068,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1070,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Echo",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1071,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1072,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__echo",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1073,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1074,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1075,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ECHO text$",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1076,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1077,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1079,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ReadFile",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1080,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1081,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1082,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__readfile",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1083,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1084,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1085,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1086,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_READFILE$(fileSpec$)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1087,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1088,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1090,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_WriteFile",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1091,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1092,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__writefile",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1093,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1094,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1095,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WRITEFILE fileSpec$, contents$",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1096,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1097,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1099,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AcceptFileDrop",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1100,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1101,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__filedrop",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1102,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1103,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1104,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{On|Off}]",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1105,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ACCEPTFILEDROP [{On|Off}]",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1106,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1107,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1109,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AcceptFileDrop",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1110,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1111,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__filedrop",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1112,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1113,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ACCEPTFILEDROP",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1114,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1115,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1117,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FinishDrop",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1118,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1119,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__finishdrop",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1120,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FINISHDROP",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1121,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1122,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1124,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_TotalDroppedFiles",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1125,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1126,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__totaldroppedfiles",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1127,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1128,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TOTALDROPPEDFILES",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1129,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1130,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1132,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DroppedFile",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1133,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+520))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1134,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1135,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__droppedfile",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1136,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1137,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1138,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1139,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1140,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DROPPEDFILE$ or _DROPPEDFILE$(index&)",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1141,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1142,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1144,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Clear",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1145,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1146,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_clear",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1147,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1148,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1149,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1150,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CLEAR",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1151,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1152,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1156,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NewImage",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1157,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1158,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__newimage",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1159,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1160,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1161,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1162,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1163,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_NEWIMAGE(width&, height&, mode)",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1164,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1165,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1167,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LoadImage",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1168,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 4ll ;
if(!qbevent)break;evnt(23206,1169,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1170,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__loadimage",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1171,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1172,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1173,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1174,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1175,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOADIMAGE(fileName$[, [mode&][, requirements$]])",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1176,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1177,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1179,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeImage",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1180,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1181,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__freeimage",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1182,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1183,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1184,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1185,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FREEIMAGE handle&",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1186,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1187,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1189,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CopyImage",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1190,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1191,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__copyimage",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1192,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1193,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1194,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1195,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1196,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COPYIMAGE(imageHandle&[, mode])",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1197,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1198,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1200,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SaveImage",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1201,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 4ll ;
if(!qbevent)break;evnt(23206,1202,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1203,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__saveimage",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1204,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1205,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1206,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1207,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SAVEIMAGE fileName$[, imageHandle&][, requirements$])",54));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1208,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1209,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1213,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Source",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1214,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1215,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__source",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1216,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1217,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1218,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1219,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SOURCE handle&",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1220,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1221,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1223,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dest",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1224,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1225,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__dest",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1226,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1227,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1228,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1229,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEST imageHandle&",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1230,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1231,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1233,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Source",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1234,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1235,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__source",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1236,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1237,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SOURCE",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1238,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1239,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1241,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dest",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1242,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1243,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__dest",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1244,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1245,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEST",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1246,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1247,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1249,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Display",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1250,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1251,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__display",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1252,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1253,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DISPLAY",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1254,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1255,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1259,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blend",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1260,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1261,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__blend",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1262,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1263,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1264,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1265,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLEND [imageHandle&]",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1266,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1267,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1269,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DontBlend",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1270,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1271,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__dontblend",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1272,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1273,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1274,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1275,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DONTBLEND [imageHandle&]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1276,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1277,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1279,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClearColor",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1280,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1281,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__clearcolor",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1282,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1283,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1284,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_None}][?][,?]",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1285,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLEARCOLOR {color&|_None}[,dest_handle&]",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1286,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1287,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1291,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PutImage",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1292,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1293,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__putimage",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1294,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 10 ;
if(!qbevent)break;evnt(23206,1295,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1296,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[[{Step}](?,?)[-[{Step}](?,?)]][,[?][,[?][,[[{Step}](?,?)[-[{Step}](?,?)]][,{_Smooth}]]]]",89));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1297,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PUTIMAGE [STEP] [(dx1, dy1)-[STEP][(dx2, dy2)]][, sourceHandle&][, destHandle&][, ][STEP][(sx1, sy1)[-STEP][(sx2, sy2)]][_SMOOTH]",130));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1298,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1299,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1301,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MapTriangle",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1302,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1303,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__maptriangle",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1304,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 19 ;
if(!qbevent)break;evnt(23206,1305,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1306,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Clockwise|_AntiClockwise}][{_Seamless}](?,?)-(?,?)-(?,?)[,?]{To}(?,?[,?])-(?,?[,?])-(?,?[,?])[,[?][,{_Smooth|_SmoothShrunk|_SmoothStretched}]]",145));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1307,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),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));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1308,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1309,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1311,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DepthBuffer",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1312,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1313,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__depthbuffer",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1314,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1315,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1316,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off|Lock|_Clear}[,?]",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1317,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEPTHBUFFER {On|Off|Lock|_Clear}[,handle&]",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1318,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1319,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1321,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SetAlpha",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1322,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1323,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__setalpha",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1324,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1325,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1326,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?[{To}?]][,?]]",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1327,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SETALPHA alpha& or _SETALPHA color1& TO color2&[, imageHandle&]",64));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1328,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1329,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1333,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Width",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1334,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1335,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__width",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1336,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1337,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1338,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1339,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1340,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WIDTH(imageHandle&)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1341,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1342,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1344,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Height",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1345,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1346,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__height",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1347,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1348,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1349,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1350,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1351,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_HEIGHT(imageHandle&)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1352,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1353,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1355,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PixelSize",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1356,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1357,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__pixelsize",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1358,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1359,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1360,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1361,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1362,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PIXELSIZE[(imageHandle&)]",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1363,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1364,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1366,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ClearColor",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1367,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1368,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__clearcolor",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1369,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1370,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1371,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1372,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1373,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CLEARCOLOR[(sourceHandle&)]",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1374,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1375,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1377,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blend",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1378,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1379,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__blend",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1380,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1381,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1382,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1383,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1384,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLEND[(imageHandle&)]",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1385,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1386,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1388,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DefaultColor",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1389,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1390,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__defaultcolor",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1391,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1392,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1393,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1394,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1395,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEFAULTCOLOR[(imageHandle&)]",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1396,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1397,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1399,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_BackgroundColor",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1400,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1401,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__backgroundcolor",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1402,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1403,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1404,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1405,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1406,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BACKGROUNDCOLOR(imageHandle&)]",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1407,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1408,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1412,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PaletteColor",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1413,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1414,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__palettecolor",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1415,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1416,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1417,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1418,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1419,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PALETTECOLOR(attributeNumber%, imgHandle&)",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1420,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1421,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1423,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PaletteColor",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1424,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1425,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__palettecolor",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1426,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1427,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1428,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1429,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PALETTECOLOR attribute%, newColor&[, imgHandle&]",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1430,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1431,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1433,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CopyPalette",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1434,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1435,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__copypalette",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1436,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1437,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1438,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1439,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COPYPALETTE [sourceImageHandle&[, destinationImageHandle&]]",60));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1440,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1441,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1445,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LoadFont",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1446,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1446,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1447,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__loadfont",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1448,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1449,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1450,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,[?][,[?]]]",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1451,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1452,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1453,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1454,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1456,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Font",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1457,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1458,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__font",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1459,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1460,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1461,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1462,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FONT fontHandle&[, imageHandle&]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1463,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1464,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1466,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FontWidth",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1467,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1468,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fontwidth",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1469,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1470,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1471,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1472,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1473,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FONTWIDTH or _FONTWIDTH(fontHandle&)",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1474,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1475,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1477,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FontHeight",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1478,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1479,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__fontheight",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1480,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1481,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1482,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1483,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1484,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FONTHEIGHT or _FONTHEIGHT(fontHandle&)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1485,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1486,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1488,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Font",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1489,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1490,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__font",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1491,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1492,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1493,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1494,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1495,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FONT[(imageHandle&)]",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1496,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1497,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1499,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintString",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1500,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1501,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__printstring",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1502,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1503,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1504,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,?]",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1505,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PRINTSTRING(x, y), text$[, imageHandle&]",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1506,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1507,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1509,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintWidth",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1510,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1511,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__printwidth",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1512,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1513,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1514,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1515,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1516,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PRINTWIDTH(textToPrint$[, destinationHandle&])",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1517,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1518,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1520,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_FreeFont",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1521,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1522,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__freefont",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1523,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1524,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1525,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1526,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FREEFONT fontHandle&",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1527,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1528,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1530,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintMode",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1531,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1532,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__printmode",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1533,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1534,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1535,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{_FillBackground|_KeepBackground|_OnlyBackground}[,?]",53));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1536,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PRINTMODE {_FillBackground|_KeepBackground|_OnlyBackground}[, imageHandle&]",76));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1537,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1538,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1540,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_PrintMode",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1541,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1542,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__printmode",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1543,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1544,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1545,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1546,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1547,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PRINTMODE[(imageHandle&)]",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1548,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1549,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1551,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UFontHeight",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1552,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1553,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1554,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__UFontHeight",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1555,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1556,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1557,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1558,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1559,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_UFONTHEIGHT&[(fontHandle&)]",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1560,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1561,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1563,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UPrintWidth",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1564,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1565,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1566,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__UPrintWidth",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1567,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1568,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1569,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1570,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1571,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_UPRINTWIDTH&(text$[, utfEncoding&][, fontHandle&])",51));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1572,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1573,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1575,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ULineSpacing",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1576,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1577,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1578,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__ULineSpacing",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1579,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1580,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1581,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1582,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1583,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ULINESPACING&[(fontHandle&)]",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1584,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1585,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1587,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UPrintString",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1588,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1589,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1590,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__UPrintString",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1591,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 7 ;
if(!qbevent)break;evnt(23206,1592,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1593,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("(?,?),?[,[?][,[?][,[?][,?]]]]",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1594,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_UPRINTSTRING (x&, y&), text$[, maxWidth&][, utfEncoding&][, fontHandle&][, imageHandle&]",89));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1595,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1596,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1598,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_UCharPos",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1599,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,1600,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1601,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__UCharPos",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1602,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1603,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1604,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1605,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1606,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_UCHARPOS&(text$[, posArray&([index&])][, utfEncoding&][, fontHandle&])",71));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1607,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1608,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1612,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGBA",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1613,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1614,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__rgba",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1615,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,1616,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1617,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?,?,?[,?]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1618,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1619,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RGBA(red&, green&, blue&, alpha&[, imageHandle&])",50));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1620,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1621,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1623,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGB",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1624,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1625,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__rgb",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1626,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1627,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1628,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?,?[,?]",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1629,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1630,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RGB(red&, green&, blue&[, imageHandle&])",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1631,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1632,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1634,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Red",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1635,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1636,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__red",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1637,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1638,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1639,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1640,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1641,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RED(rgbaColorIndex&[, imageHandle&])",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1642,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1643,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1645,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Green",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1646,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1647,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__green",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1648,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1649,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1650,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1651,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1652,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_GREEN(rgbaColorIndex&[, imageHandle&])",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1653,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1654,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1656,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blue",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1657,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1658,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__blue",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1659,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1660,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1661,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1662,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1663,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLUE(rgbaColorIndex&[, imageHandle&])",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1664,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1665,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1667,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Alpha",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1668,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1669,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__alpha",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1670,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1671,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1672,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1673,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1674,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ALPHA(color~&[, imageHandle&])",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1675,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1676,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1678,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGBA32",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1679,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1680,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__rgba32",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1681,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1682,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1683,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1684,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RGBA32(red&, green&, blue&, alpha&)",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1685,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1686,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1688,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RGB32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1689,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1690,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__rgb32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1691,"subs_functions.bas");}while(r);
do{
*(int8*)(((char*)__UDT_ID)+((0+808)))= -1 ;
if(!qbevent)break;evnt(23206,1692,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+811)))= 1 ;
if(!qbevent)break;evnt(23206,1693,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1694,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1695,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1696,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RGB32(red&, green&, blue&[, alpha&]) or _RGB32(intensity&[, alpha&])",69));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1697,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1698,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1700,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Red32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1701,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1702,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__red32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1703,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1704,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1705,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1706,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RED32(rgbaColor&)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1707,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1708,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1710,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Green32",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1711,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1712,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__green32",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1713,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1714,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1715,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1716,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_GREEN32(rgbaColor&)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1717,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1718,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1720,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Blue32",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1721,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1722,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__blue32",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1723,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1724,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1725,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1726,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BLUE32(rgbaColor&)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1727,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1728,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1730,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Alpha32",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1731,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1732,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__alpha32",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1733,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1734,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1735,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1736,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ALPHA32(rgbaColor&)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1737,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1738,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1740,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_HSB32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1741,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1742,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__hsb32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1743,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,1744,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1745,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1746,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_HSB32(hue#, saturation#, brightness#)",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1747,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1748,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1750,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_HSBA32",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1751,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1752,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__hsba32",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1753,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,1754,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1755,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1756,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_HSBA32(hue#, saturation#, brightness#, alpha#)",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1757,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1758,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1760,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Hue32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1761,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1762,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__hue32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1763,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1764,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1765,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1766,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_HUE32(rgbaColor&)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1767,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1768,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1770,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Saturation32",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1771,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1772,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sat32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1773,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1774,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1775,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1776,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SATURATION32(rgbaColor&)",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1777,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1778,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1780,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Brightness32",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1781,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1782,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__bri32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1783,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1784,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1785,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1786,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BRIGHTNESS32(rgbaColor&)",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1787,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1788,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1790,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Draw",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1791,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1792,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_draw",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1793,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1794,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1795,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("DRAW drawString$",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1796,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1797,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1801,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseShow",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1802,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1803,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__mouseshow",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1804,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1805,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1806,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1807,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSESHOW [cursorShape$]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1808,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1809,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1811,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseHide",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1812,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1813,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__mousehide",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1814,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEHIDE",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1815,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1816,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1818,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseHidden",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1819,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1820,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousehidden",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1821,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1822,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1823,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEHIDDEN",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1824,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1825,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1827,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseInput",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1828,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1829,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mouseinput",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1830,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1831,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1832,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEINPUT",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1833,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1834,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1836,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseX",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1837,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1838,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousex",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1839,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1840,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1841,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEX",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1842,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1843,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1845,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseY",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1846,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1847,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousey",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1848,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1849,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1850,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEY",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1851,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1852,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1854,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMovementX",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1855,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1856,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousemovementx",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1857,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1858,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1859,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEMOVEMENTX",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1860,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1861,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1863,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseMovementY",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1864,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1865,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousemovementy",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1866,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1867,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1868,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEMOVEMENTY",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1869,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1870,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1872,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseButton",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1873,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1874,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousebutton",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1875,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1876,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1877,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1878,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEBUTTON(buttonNumber)",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1879,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1880,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1882,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MouseWheel",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1883,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1884,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__mousewheel",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1885,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1886,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,1887,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MOUSEWHEEL",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1888,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1889,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1891,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("FreeFile",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1892,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1893,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_freefile",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1894,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1895,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_FREEFILE",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1896,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1897,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1899,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Name",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1900,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1901,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_name",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1902,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,1903,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1904,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?{As}?",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1905,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("NAME oldFileOrFolderName$ AS newFileOrFolderName$",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1906,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1907,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1909,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Kill",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1910,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1911,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_kill",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1912,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1913,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1914,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("KILL fileSpec$",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1915,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1916,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1918,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("ChDir",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1919,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1920,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_chdir",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1921,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1922,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1923,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CHDIR path$",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1924,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1925,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1927,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MkDir",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1928,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1929,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_mkdir",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1930,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1931,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1932,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKDIR pathSpec$",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1933,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1934,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1936,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RmDir",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1937,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1938,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_rmdir",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1939,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1940,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1941,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("RMDIR path$",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1942,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1943,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1945,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Chain",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1946,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1947,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_chain",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1948,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1949,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1950,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CHAIN moduleName$",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1951,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1952,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1954,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1955,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1956,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_shell2",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1957,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1958,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1959,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{_Hide}[{_DontWait}][?]",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1960,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("_Hide",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1961,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1962,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1963,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1965,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1966,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1967,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_shell3",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1968,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1969,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1970,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{_DontWait}[{_Hide}][?]",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1971,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("_DontWait",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1972,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1973,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1974,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1976,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1977,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,1978,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_shell",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1979,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1980,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1981,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1982,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SHELL [_DONTWAIT] [_HIDE] commandToRun$",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1984,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1985,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1987,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Shell",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1988,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1989,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_shell",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1990,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,1991,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1992,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,1993,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SHELL(commandToRun$)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1994,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,1995,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,1997,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShellHide",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,1998,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,1999,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__shellhide",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2000,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2001,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2002,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2003,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SHELLHIDE(commandToRun$)",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2004,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2005,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2007,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Command",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2008,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2009,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2010,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_command",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2011,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2012,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2013,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2014,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2015,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("COMMAND$[(index%)]",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2016,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2017,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2019,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CommandCount",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2020,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2021,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__commandcount",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2022,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2023,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COMMANDCOUNT",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2024,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2025,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2029,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Beep",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2030,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2031,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_beep",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2032,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,2033,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("BEEP",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2034,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2035,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2037,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Play",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2038,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2038,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2039,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_play",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2040,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,2041,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2042,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2043,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PLAY voiceCommands1$[, voiceCommands2$][, voiceCommands3$][, voiceCommands4$]",77));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2044,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2045,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2047,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Play",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2048,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2048,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2049,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_play",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2050,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2051,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2052,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2053,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2054,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PLAY [voice&]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2055,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2056,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2058,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sound",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2059,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2059,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2060,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_sound",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2061,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 8 ;
if(!qbevent)break;evnt(23206,2062,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2063,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?,?[,[?][,[?][,[?][,[?][,?]]]]]][{Wait|Resume}]",48));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2064,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SOUND [frequency!, duration![, volume!][, panPosition!][, waveform&][, waveformParameters!][, voice&]] [{Wait|Resume}]",118));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2065,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2066,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2068,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Wave",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2069,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2069,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2070,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__wave",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2071,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2072,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER),l2string( -3 )),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2073,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2074,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_WAVE voice&, waveDefinition%%([index&])[, frameCount&]",55));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2075,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2076,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2078,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRate",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2079,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2079,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2080,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndrate",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2081,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2082,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDRATE",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2083,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2084,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2086,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRaw",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2087,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2087,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2088,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndraw",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2089,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2090,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2091,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2092,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDRAW leftSample[, rightSample][, pipeHandle&]",48));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2093,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2094,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2096,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawBatch",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2097,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2097,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2098,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndrawbatch",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2099,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,2100,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2101,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2102,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDRAWBATCH sampleFrameArray!([index&])[, channels&][, pipeHandle&][, frameCount&]",83));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2103,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2104,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2106,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawDone",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2107,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2107,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2108,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndrawdone",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2109,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2110,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2111,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2112,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDRAWDONE [pipeHandle&]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2113,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2114,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2116,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndOpenRaw",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2117,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2117,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2118,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndopenraw",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2119,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2120,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDOPENRAW",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2121,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2122,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2124,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndRawLen",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2125,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2125,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2126,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndrawlen",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2127,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2128,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2129,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2130,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2131,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDRAWLEN [pipeHandle&]",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2132,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2133,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2135,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLen",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2136,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2136,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2137,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndlen",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2138,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2139,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2140,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2141,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDLEN(handle&)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2142,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2143,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2145,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPaused",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2146,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2146,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2147,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndpaused",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2148,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2149,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2150,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2151,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPAUSED(handle&)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2152,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2153,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2155,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlayFile",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2156,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2156,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2157,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndplayfile",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2158,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2159,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2160,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,?]]",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2161,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPLAYFILE fileName$[, , volume!]",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2162,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2163,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2165,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlayCopy",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2166,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2166,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2167,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndplaycopy",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2168,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,2169,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2170,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,[?][,[?][,[?]]]]]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2171,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPLAYCOPY handle&[, volume!][, x!][, y!][, z!]",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2172,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2173,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2175,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndStop",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2176,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2176,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2177,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndstop",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2178,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2179,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2180,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDSTOP handle&",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2181,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2182,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2184,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLoop",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2185,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2185,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2186,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndloop",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2187,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2188,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2189,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDLOOP handle&",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2190,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2191,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2193,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndLimit",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2194,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2194,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2195,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndlimit",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2196,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2197,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2198,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDLIMIT handle&, numberOfSeconds#",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2199,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2200,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2202,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndOpen",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2203,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2203,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2204,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndopen",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2205,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2206,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2207,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2208,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2209,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDOPEN(fileName$[, capabilities$])",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2210,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2211,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2213,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndSetPos",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2214,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2214,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2215,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndsetpos",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2216,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2217,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2218,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDSETPOS handle&, position#",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2219,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2220,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2222,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndGetPos",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2223,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2223,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2224,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndgetpos",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2225,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2226,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2227,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2228,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDGETPOS(handle&)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2229,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2230,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2232,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlaying",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2233,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2233,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2234,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndplaying",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2235,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2236,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2237,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2238,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPLAYING(handle&)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2239,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2240,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2242,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPause",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2243,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2243,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2244,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndpause",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2245,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2246,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2247,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPAUSE handle&",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2248,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2249,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2251,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndBal",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2252,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2252,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2253,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndbal",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2254,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,2255,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2256,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,[?][,[?][,[?][,[?]]]]",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2257,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDBAL handle&[, x!][, y!][, z!]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2258,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2259,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2261,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndVol",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2262,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2262,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2263,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndvol",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2264,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2265,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2266,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDVOL handle&, volume!",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2267,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2268,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2270,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndPlay",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2271,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2271,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2272,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndplay",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2273,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2274,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2275,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDPLAY handle&",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2276,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2277,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2279,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndCopy",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2280,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2280,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2281,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndcopy",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2282,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2283,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2284,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2285,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDCOPY(handle&)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2286,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2287,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2289,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndClose",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2290,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2290,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2291,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__sndclose",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2292,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2293,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2294,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDCLOSE handle&",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2295,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2296,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2298,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SndNew",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2299,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2300,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2301,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__sndnew",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2302,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,2303,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2304,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,[?][,[?][,?]]]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2305,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2306,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SNDNEW(frames&[, channels&][, bits&][, sampleRate&])",53));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2307,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2308,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2310,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MIDISoundBank",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2311,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 2ll ;
if(!qbevent)break;evnt(23206,2312,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2313,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__midisoundbank",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2314,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2315,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2316,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2317,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MIDISOUNDBANK fileName$[, capabilities$]",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2318,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2319,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2321,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Input",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2322,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2323,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2324,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_input",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2325,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2326,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2327,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2328,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2329,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("INPUT$(numberOfBytes%[, fileOrPortNumber])",42));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2330,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2331,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2333,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Seek",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2334,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2335,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_seek",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2336,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2337,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2338,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[#]?,?",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2339,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SEEK filenumber&, position",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2340,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2341,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2343,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Seek",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2344,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2345,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_seek",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2346,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2347,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2348,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2349,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SEEK(filenumber&)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2350,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2351,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2353,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Loc",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2354,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2355,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_loc",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2356,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2357,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2358,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2359,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LOC(fileOrPortNumber%)",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2360,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2361,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2363,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("EOF",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2364,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2365,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_eof",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2366,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2367,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2368,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2369,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("EOF(fileNumber&)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2370,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2371,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2373,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LOF",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2374,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2375,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_lof",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2376,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2377,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2378,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2379,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LOF(fileNumber&)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2380,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2381,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2383,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Screen",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2384,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2385,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_screen",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2386,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2387,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2388,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2389,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2390,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SCREEN(x, y[, colorflag%])",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2391,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2392,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2394,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PMap",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2395,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2396,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_pmap",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2397,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2398,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2399,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2400,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PMAP(coordinate, function_number%)",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2401,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2402,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2404,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Point",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2405,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2406,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_point",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2407,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2408,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2409,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2410,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2411,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("POINT(x, y) or POINT({0|1|2|3})",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2412,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2413,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2415,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Tab",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2416,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2417,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_tab",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2418,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2419,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2420,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2421,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TAB(column%)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2422,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2423,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2425,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Spc",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2426,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2427,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_spc",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2428,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2429,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2430,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2431,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SPC(count%)",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2432,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2433,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2435,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Wait",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2436,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2437,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_wait",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2438,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2439,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2440,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?[,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2441,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("WAIT port%, andMask%[, xorMask%]",32));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2442,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2443,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2445,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Inp",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2446,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2447,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_inp",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2448,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2449,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2450,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2451,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("INP(address)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2452,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2453,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2455,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Pos",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2456,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2457,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_pos",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2458,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2459,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2460,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2461,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("POS(0)",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2462,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2463,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2465,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sgn",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2466,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2467,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_sgn",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2468,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2469,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2470,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2471,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SGN(value)",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2472,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2473,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2475,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LBound",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2476,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2477,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2478,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2479,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,[?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2480,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2481,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LBOUND(arrayName[, dimension%])",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2482,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2483,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2485,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("UBound",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2486,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2487,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2488,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2489,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,[?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2490,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2491,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("UBOUND(arrayName[, dimension%])",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2492,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2493,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2495,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Bin",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2496,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2497,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2498,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2499,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2500,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2501,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BIN$(number)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2502,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2503,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2505,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Oct",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2506,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2507,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2508,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2509,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2510,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2511,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("OCT$(number)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2512,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2513,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2515,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Hex",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2516,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2517,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2518,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2519,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2520,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2521,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("HEX$(decimalNumber)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2522,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2523,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2525,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sleep",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2526,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2527,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_sleep",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2528,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2529,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2530,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2531,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SLEEP seconds%",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2532,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2533,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2535,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Exp",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2536,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2537,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2538,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2539,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,2540,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("EXP(numericExpression)",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2541,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2542,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2544,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Fix",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2545,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2546,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2547,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2548,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,2549,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("FIX(expression)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2550,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2551,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2553,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Int",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2554,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2555,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2556,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2557,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,2558,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("INT(expression)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2559,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2560,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2562,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CDbl",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2563,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2564,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2565,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2566,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2567,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CDBL(expression)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2568,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2569,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2571,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CSng",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2572,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2573,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2574,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2575,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2576,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CSNG(expression)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2577,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2578,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2580,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Round",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2581,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2582,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2583,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2584,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2585,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ROUND(number)",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2586,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2587,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2589,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CInt",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2590,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2591,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2592,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2593,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2594,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CINT(expression)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2595,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2596,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2598,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CLng",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2599,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2600,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2601,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2602,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2603,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CLNG(expression)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2604,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2605,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2607,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Time",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2608,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2609,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2610,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_time",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2611,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2612,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2613,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("=?",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2614,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TIME$ = timeToSet$",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2615,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2616,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2618,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Time",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2619,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2620,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2621,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_time",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2622,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2623,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TIME$",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2624,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2625,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2627,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Date",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2628,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2629,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2630,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_date",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2631,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2632,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2633,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("=?",2));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2634,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("DATE$ = dateToSet$",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2635,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2636,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2638,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Date",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2639,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2640,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2641,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_date",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2642,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2643,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("DATE$",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2644,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2645,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2647,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CsrLin",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2648,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2649,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_csrlin",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2650,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2651,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CSRLIN",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2652,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2653,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2656,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Paint",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2657,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2658,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_paint",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2659,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,2660,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2661,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?)[,[?][,[?][,?]]]",29));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2662,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PAINT [STEP] (x!, y!)[,[fillColor&] [,[bordercolor&] [,pattern$]]]",66));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2664,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2665,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2667,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Circle",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2668,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2669,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_circle",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2670,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 7 ;
if(!qbevent)break;evnt(23206,2671,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2672,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[?][,[?][,[?][,?]]]]",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2673,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CIRCLE [STEP] (x!, y!), radius![, [color&] [, [start!] [, [end!] [, aspect!]]]]",79));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2675,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2676,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2678,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("BLoad",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2679,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2680,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_bload",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2681,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2682,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2683,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2684,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("BLOAD fileName$, VARPTR(imageArray%(index))",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2685,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2686,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2688,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("BSave",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2689,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2690,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_bsave",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2691,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2692,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2693,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("BSAVE saveFile$, VARPTR(array(index)), fileSize&",48));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2694,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2695,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2698,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2699,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2700,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_graphics_get",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2701,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 6 ;
if(!qbevent)break;evnt(23206,2702,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2703,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2704,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("Step",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2705,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2706,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2707,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2709,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2710,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2711,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_graphics_get",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2712,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 6 ;
if(!qbevent)break;evnt(23206,2713,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2714,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?)-[{Step}](?,?),?[,?]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2715,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("(",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2716,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("GET [STEP] (column1, row1)-[STEP](column2, row2), array([index])[, offscreenColor]",82));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2717,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2718,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2721,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2722,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2723,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_graphics_put",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2724,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,2725,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2726,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2727,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("Step",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2730,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP]  [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2731,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2732,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2734,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2735,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2736,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_graphics_put",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2737,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,2738,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2739,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?),?[,[{_Clip}][{PSet|PReset|And|Or|Xor}][,?]]",57));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2740,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("(",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2743,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PUT [STEP](column, row), Array([index])[,] [_CLIP]  [{PSET|PRESET|AND|OR|XOR}]][, omitcolor]",92));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2744,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2745,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2747,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Get",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2748,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2749,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_get",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2750,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2751,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2752,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2754,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("GET #fileNumber&, [position][, targetVariable|targetArray()}]",61));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2755,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2756,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2758,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Put",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2759,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2760,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_put",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2761,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2762,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string( -4 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2763,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[#]?[,[?][,?]]",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2765,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PUT #filenumber&, [position][, {holdingvariable|holdingarray()}]",64));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2766,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2767,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2769,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Open",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2770,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2771,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_open",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2772,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 6 ;
if(!qbevent)break;evnt(23206,2773,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2774,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),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));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2775,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("OPEN fileName$ [FOR mode] [ACCESS|LOCK|SHARED [{READ|WRITE}] AS [#]fileNumber& [LEN = recordLength]",99));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2776,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2777,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2779,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Open",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2780,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,2781,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_open_gwbasic",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2782,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,2783,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2784,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,[#]?,?[,?]",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2785,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("OPEN modeLetter$, [#]fileNumber&, fileName$[, recordLength]",59));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2786,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2787,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2789,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Val",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2790,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2791,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2793,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2794,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2795,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2796,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VAL(stringValue$[, numericalType])",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2797,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2798,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2800,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKSMBF",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2801,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2802,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2803,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_mksmbf",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2804,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2805,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2806,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2807,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKSMBF$(value!)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2808,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2809,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2811,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKDMBF",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2812,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2813,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2814,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_mkdmbf",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2815,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2816,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2817,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2818,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKDMBF$(value#)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2819,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2820,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2822,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKI",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2823,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2824,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2825,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2826,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2827,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2828,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2829,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKI$(integerVariableOrLiteral%)",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2830,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2831,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2833,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKL",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2834,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2835,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2836,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2837,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2838,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2839,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2840,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKL$(longVariableOrLiteral&)",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2841,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2842,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2844,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKS",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2845,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2846,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2847,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2848,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2849,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_SINGLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2850,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2851,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKS$(singlePrecisionVariableOrLiteral!)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2852,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2853,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2855,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("MKD",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2856,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2857,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2858,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2859,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2860,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2861,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2862,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MKD$(doublePrecisionVariableOrLiteral#)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2863,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2864,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2866,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MK",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2867,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2868,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2869,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2870,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2871,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string( -1 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2872,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2873,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MK$(numericalType, numericalValue)",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2874,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2875,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2877,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVSMBF",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2878,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2879,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_cvsmbf",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2880,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2881,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2882,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2883,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVSMBF(stringData$)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2884,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2885,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2887,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVDMBF",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2888,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2889,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_cvdmbf",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2890,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2891,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2892,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2893,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVDMBF(stringData$)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2894,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2895,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2897,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVI",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2898,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2899,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2900,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2901,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2902,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGERTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2903,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVI(stringData$)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2904,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2905,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2907,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVL",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2908,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2909,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2910,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2911,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2912,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2913,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVL(stringData$)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2914,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2915,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2917,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVS",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2918,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2919,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2920,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2921,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2922,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2923,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVS(stringData$)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2924,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2925,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2927,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("CVD",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2928,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2929,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2930,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2931,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2932,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2933,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CVD(stringData$)",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2934,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2935,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2937,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CV",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2938,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2939,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2940,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2941,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2942,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))= -1 ;
if(!qbevent)break;evnt(23206,2943,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CV(numericalType, MKstringValue$)",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2944,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2945,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2947,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("String",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2948,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2949,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2950,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_string",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2951,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,2952,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2953,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2954,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("STRING$(count&, {character$ | ASCIIcode%})",42));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2955,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2956,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2958,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Space",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2959,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2960,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2961,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_space",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2962,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,2963,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2964,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2965,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SPACE$(count&)",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2966,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2967,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2969,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("InStr",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2970,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2971,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_instr",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2972,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2973,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2974,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2975,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?],?,?",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2976,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("INSTR([start%,] baseString$, searchString$)",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2977,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2978,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2980,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InStrRev",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2981,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2982,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__instrrev",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2983,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2984,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2985,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2986,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?],?,?",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2987,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_INSTRREV([start%,] baseString$, searchString$)",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2988,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,2989,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,2991,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Mid",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2992,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2993,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,2994,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_mid",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2995,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,2996,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2997,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,2998,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?,?,[?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,2999,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("MID$(stringValue$, startPosition%[, bytes%])",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3000,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3001,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3003,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("SAdd",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3004,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3005,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3006,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3007,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3008,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3009,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SADD(stringVariable$)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3010,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3011,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3013,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Cls",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3014,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3015,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_clsDest",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3016,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,3017,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3018,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3019,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CLS [method%][, bgColor&][, dest&]",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3020,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3021,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3023,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sqr",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3024,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3025,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_sqr",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3026,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3027,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3028,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3029,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SQR(value)",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3030,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3031,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3033,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Chr",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3034,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3035,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3036,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_chr",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3037,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3038,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3039,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3040,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("CHR$(code%)",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3041,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3042,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3044,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarPtr",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3045,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3046,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3047,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3048,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3049,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3050,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3051,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3052,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3053,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3055,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarPtr",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3056,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3057,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3058,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3059,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3060,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3061,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VARPTR(variable_name[(reference_index%)])",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3062,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3063,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3065,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Offset",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3066,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3067,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3068,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3069,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3070,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UOFFSETTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3071,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_OFFSET(variable)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3072,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3073,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3075,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("VarSeg",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3076,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3077,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3078,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3079,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3080,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3081,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VARSEG(variable_name[(start_index)])",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3082,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3083,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3085,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Poke",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3086,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3087,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_poke",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3088,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3089,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3090,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("POKE segment_offset, offset_value",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3091,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3092,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3094,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Peek",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3095,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3096,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_peek",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3097,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3098,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3099,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3100,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PEEK(segment_offset)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3101,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3102,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3104,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Def",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3105,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3106,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_defseg",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3107,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3108,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3109,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{Seg}[=?]",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3110,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("Seg",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3111,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("DEF SEG [=][{segment|VARSEG(variable}]",38));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3112,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3113,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3115,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Sin",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3116,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3117,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::sin",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3118,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3119,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3120,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3121,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SIN(radian_angle!)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3122,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3123,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3125,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Cos",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3126,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3127,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::cos",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3128,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3129,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3130,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3131,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("COS(radian_angle!)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3132,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3133,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3135,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Tan",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3136,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3137,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::tan",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3138,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3139,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3140,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3141,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TAN(radian_angle!)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3142,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3143,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3145,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Atn",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3146,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3147,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::atan",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3148,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3149,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3150,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3151,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ATN(tangent!)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3152,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3153,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3155,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Log",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3156,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3157,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_log",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3158,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3159,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3160,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3161,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LOG(value)",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3162,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3163,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3165,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Abs",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3166,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3167,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_abs",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3168,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3169,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3170,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3171,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ABS(numericalValue)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3172,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3173,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3175,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Erl",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3176,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3177,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("get_error_erl",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3178,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3179,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3180,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ERL",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3181,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3182,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3184,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Err",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3185,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3186,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("get_error_err",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3187,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3188,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3189,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ERR",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3190,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3191,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3193,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Error",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3194,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3195,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("error",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3196,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3197,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3198,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ERROR codeNumber%",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3199,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3200,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3202,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Line",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3203,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3204,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_line",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3205,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 7 ;
if(!qbevent)break;evnt(23206,3206,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3207,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[[{Step}](?,?)]-[{Step}](?,?)[,[?][,[{B|BF}][,?]]]",50));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3208,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LINE [STEP] [(column1, row1)]-[STEP] (column2, row2), color[, [{B|BF}], style%]",79));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3209,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3210,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3212,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Timer",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3213,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3214,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_timer",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3215,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3216,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3217,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3218,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3219,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("TIMER[(accuracy!)]",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3220,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3221,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3223,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Rnd",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3224,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3225,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_rnd",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3226,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3227,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3228,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_SINGLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3229,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3230,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("RND[(behavior)]",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3231,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3232,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3234,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Randomize",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3235,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3236,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_randomize",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3237,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3238,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3239,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[[{Using}]?]",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3240,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("RANDOMIZE [USING] {seednumber|TIMER}",36));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3241,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3242,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3244,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Out",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3245,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3246,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_out",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3247,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3248,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3249,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("OUT registerAddress%, value%",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3250,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3251,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3253,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PCopy",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3254,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3255,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_pcopy",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3256,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3257,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3258,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PCOPY sourcePage%, destinationPage%",35));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3259,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3260,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3262,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("View",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3263,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3264,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_sub_view",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3265,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 6 ;
if(!qbevent)break;evnt(23206,3266,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3267,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)[,[?][,?]]]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3268,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+2125))),256,1),qbs_new_txt_len("Print",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3269,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VIEW [SCREEN] (column1, row1)-(column2, row2)[, color][, border]",64));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3270,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3271,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3273,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("View",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3274,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3275,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_sub_view_print",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3276,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3277,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3278,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{Print}[?{To}?]",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3279,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1869))),256,1),qbs_new_txt_len("Print",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3280,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("VIEW PRINT [topRow% TO bottomRow%]",34));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3281,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3282,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3284,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Window",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3285,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3286,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_sub_window",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3287,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,3288,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3289,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[[{Screen}](?,?)-(?,?)]",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3290,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("WINDOW [[SCREEN] (x1!, y1!) - (x2!, y2!)]",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3291,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3292,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3294,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Locate",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3295,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3296,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_sub_locate",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3297,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,3298,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3299,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3300,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LOCATE [row%][, column%] [, cursor%][, cursorStart%, cursorStop%]",65));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3301,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3302,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3304,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Color",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3305,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3306,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_sub_color",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3307,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,3308,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3309,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,?]]]",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3310,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("COLOR [foreground&][, background&][, , destHandle&]",51));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3311,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3312,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3314,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Palette",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3315,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3316,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_palette",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3317,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3318,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3319,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3320,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PALETTE [attribute%, red% + (green% * 256) + (blue% * 65536)] or PALETTE [existingAttribute%, newAttribute%]",108));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3321,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3322,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3324,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Width",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3325,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3326,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbsub_width",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3327,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,3328,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3329,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{#|LPrint}][?][,[?][,[?][,[?]]]]",33));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3330,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("WIDTH [columns%][, rows%] or WIDTH {file_number|device}, columnwidth%",69));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3332,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3333,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3336,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Screen",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3337,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3338,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbg_screen",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3339,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,3340,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3341,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,[{_ManualDisplay}?]]]]]",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3345,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("SCREEN {mode%|imagehandle&} [, , active_page, visual_page]",58));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3346,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3347,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3349,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PSet",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3350,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3351,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_pset",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3352,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,3353,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3354,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3355,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PSET [STEP](column%, row%)[, colorAttribute]",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3356,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3357,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3359,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("PReset",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3360,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3361,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_preset",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3362,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,3363,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3364,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{Step}](?,?)[,?]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3365,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PRESET [STEP](column%, row%)[, colorAttribute]",46));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3366,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3367,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3369,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Asc",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3370,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3371,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_asc",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3372,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3373,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3374,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3375,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("ASC(text$[, position%])",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3376,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3377,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3379,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Len",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3380,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3381,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3382,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3383,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3384,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3385,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LEN(literalTextOrVariable$)",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3386,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3387,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3389,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("InKey",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3390,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3391,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3392,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_inkey",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3393,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3394,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("INKEY$",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3395,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3396,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3398,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Str",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3399,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3400,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3401,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_str",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3402,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3403,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string( -1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3404,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3405,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("STR$(number)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3406,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3407,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3409,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ToStr",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3410,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3411,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3412,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs__tostr",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3413,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3414,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3415,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string( -1 ),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3416,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3417,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TOSTR$(number[,digits])",24));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3418,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3419,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3421,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("UCase",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3422,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3423,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3424,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_ucase",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3425,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3426,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3427,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3428,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("UCASE$(text$)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3429,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3430,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3432,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LCase",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3433,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3434,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3435,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_lcase",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3436,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3437,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3438,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3439,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LCASE$(text$)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3440,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3441,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3443,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Left",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3444,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3445,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3446,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_left",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3447,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3448,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3449,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3450,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LEFT$(stringValue$, numberOfCharacters%)",40));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3451,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3452,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3454,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Right",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3455,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3456,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3457,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_right",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3458,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3459,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3460,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3461,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("RIGHT$(stringValue$, numberOfCharacters%)",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3462,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3463,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3465,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LTrim",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3466,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3467,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3468,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_ltrim",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3469,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3470,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3471,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3472,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LTRIM$(text$)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3473,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3474,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3476,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("RTrim",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3477,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3478,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3479,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_rtrim",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3480,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3481,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3482,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3483,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("RTRIM$(text$)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3484,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3485,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3487,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Trim",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3488,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3489,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3490,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs__trim",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3491,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3492,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3493,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3494,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TRIM$(text$)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3495,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3496,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3498,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("Print",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3499,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3500,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_print",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3501,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3502,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3503,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("PRINT [expression] [{;|,] [expression...]",41));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3504,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3505,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3507,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LPrint",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3508,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 7ll ;
if(!qbevent)break;evnt(23206,3508,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3509,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("qbs_lprint",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3510,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3511,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3512,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LPRINT [expression] [{;|,}]",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3513,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3514,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3516,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("LPos",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3517,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 7ll ;
if(!qbevent)break;evnt(23206,3517,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3518,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_lpos",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3519,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3520,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3521,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3522,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("LPOS(index%)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3523,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3524,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3527,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CWD",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3528,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3529,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3530,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__cwd",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3531,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3532,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CWD$",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3533,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3534,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3537,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StartDir",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3538,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3539,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3540,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__startdir",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3541,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3542,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_STARTDIR$",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3543,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3544,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3547,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Dir",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3548,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3549,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3550,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__dir",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3551,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3552,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3553,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3554,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3555,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3556,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3559,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InclErrorFile",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3560,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3561,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3562,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__inclerrorfile",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3563,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3564,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_INCLERRORFILE$",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3565,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3566,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3568,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_KeyClear",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3569,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3570,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3571,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3572,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3573,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__keyclear",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3574,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_KEYCLEAR buffer&",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3575,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3576,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3578,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_D2R",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3579,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3580,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_deg2rad",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3581,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3582,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3583,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3584,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_D2R(angleInDegrees!)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3585,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3586,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3588,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_D2G",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3589,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3590,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_deg2grad",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3591,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3592,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3593,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3594,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_D2G(angleInDegrees!)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3595,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3596,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3598,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_R2D",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3599,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3600,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_rad2deg",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3601,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3602,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3603,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3604,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_R2D(angleInRadians!)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3605,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3606,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3608,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_R2G",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3609,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3610,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_rad2grad",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3611,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3612,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3613,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3614,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_R2G(angleInRadians!)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3615,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3616,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3618,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_G2D",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3619,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3620,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_grad2deg",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3621,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3622,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3623,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3624,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_G2D(gradient!)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3625,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3626,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3628,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_G2R",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3629,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3630,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_grad2rad",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3631,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3632,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3633,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3634,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_G2R(gradient!)",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3635,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3636,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3638,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Atan2",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3639,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3640,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::atan2",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3641,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3642,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3643,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3644,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ATAN2(y, x)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3645,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3646,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3648,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Hypot",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3649,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3650,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::hypot",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3651,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3652,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3653,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3654,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_HYPOT(x, y)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3655,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3656,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3658,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Asin",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3659,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3660,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::asin",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3661,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3662,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3663,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3664,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ASIN(sine_value!)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3665,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3666,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3668,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Acos",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3669,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3670,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::acos",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3671,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3672,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3673,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3674,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ACOS(cosine_value!)",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3675,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3676,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3678,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sinh",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3679,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3680,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::sinh",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3681,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3682,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3683,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3684,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SINH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3685,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3686,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3688,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cosh",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3689,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3690,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::cosh",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3691,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3692,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3693,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3694,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COSH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3695,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3696,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3698,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Tanh",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3699,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3700,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::tanh",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3701,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3702,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3703,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3704,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TANH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3705,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3706,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3708,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Asinh",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3709,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3710,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::asinh",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3711,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3712,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3713,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3714,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ASINH(value)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3715,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3716,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3718,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Acosh",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3719,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3720,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::acosh",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3721,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3722,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3723,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3724,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ACOSH(value)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3725,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3726,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3728,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Atanh",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3729,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3730,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::atanh",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3731,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3732,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3733,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3734,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ATANH(value)",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3735,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3736,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3738,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Ceil",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3739,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3740,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("std::ceil",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3741,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3742,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3743,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3744,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CEIL(expression)",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3745,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3746,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3748,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Pi",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3749,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3750,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_pi",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3751,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3752,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_DOUBLETYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3753,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_DOUBLETYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3754,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3755,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_PI[(multiplier)]",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3756,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3757,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3759,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DesktopHeight",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3760,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3761,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__desktopheight",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3762,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3763,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3764,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DESKTOPHEIGHT",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3765,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3766,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3768,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_DesktopWidth",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3769,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3770,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__desktopwidth",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3771,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3772,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3773,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DESKTOPWIDTH",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3774,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3775,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3777,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenIcon",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3778,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,3779,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub_screenicon",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3780,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENICON",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3781,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3782,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3784,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenExists",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3785,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3786,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_windowexists",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3787,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENEXISTS",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3788,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3789,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3791,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ControlChr",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3792,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3793,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__controlchr",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3794,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3795,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3796,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONTROLCHR",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3797,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3798,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3800,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StriCmp",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3801,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3802,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__str_nc_compare",20));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3803,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3804,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3805,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3806,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_STRICMP(string1$, string2$)",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3807,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3808,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3810,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_StrCmp",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3811,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3812,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__str_compare",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3813,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3814,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3815,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3816,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_STRCMP(string1$, string2$)",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3817,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3818,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3820,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arcsec",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3821,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3822,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_arcsec",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3823,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3824,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3825,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3826,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ARCSEC(value)",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3827,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3828,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3830,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arccsc",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3831,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3832,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_arccsc",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3833,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3834,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3835,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3836,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ARCCSC(value)",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3837,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3838,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3840,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Arccot",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3841,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3842,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_arccot",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3843,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3844,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3845,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3846,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ARCCOT(value)",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3847,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3848,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3850,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sech",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3851,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3852,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_sech",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3853,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3854,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3855,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3856,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SECH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3857,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3858,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3860,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Csch",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3861,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3862,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_csch",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3863,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3864,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3865,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3866,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CSCH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3867,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3868,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3870,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Coth",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3871,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3872,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_coth",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3873,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3874,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3875,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3876,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COTH(value)",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3877,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3878,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3880,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Sec",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3881,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3882,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_sec",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3883,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3884,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3885,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3886,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SEC(value)",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3887,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3888,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3890,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Csc",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3891,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3892,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_csc",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3893,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3894,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3895,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3896,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CSC(value)",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3897,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3898,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3900,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Cot",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3901,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3902,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_cot",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3903,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3904,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_FLOATTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3905,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_FLOATTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3906,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COT(value)",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3907,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3908,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3910,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScreenIcon",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3911,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3912,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func_screenicon",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3913,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3914,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3915,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCREENICON",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3916,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3917,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3919,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_AutoDisplay",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3920,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3921,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__autodisplay",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3922,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,3923,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3924,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_AUTODISPLAY",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3925,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3926,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3928,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShR",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3929,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3930,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__shr",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3931,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3932,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3933,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3934,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SHR(numericalVariable, numericalValue)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3935,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3936,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3938,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ShL",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3939,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3940,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__shl",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3941,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3942,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3943,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3944,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SHL(numericalVariable, numericalValue)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3945,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3946,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3948,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RoL",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3949,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3950,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3951,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3952,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3953,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ROL(numericalVariable, numericalValue)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3954,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3955,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3957,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_RoR",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3958,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3959,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3960,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3961,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3962,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ROR(numericalVariable, numericalValue)",39));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3963,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3964,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3966,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Adler32",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3967,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,3968,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3969,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__adler32",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3970,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3971,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3972,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3973,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_ADLER32(dataString$)",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3974,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3975,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3977,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Crc32",6));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3978,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,3979,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3980,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__crc32",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3981,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,3982,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3983,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3984,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CRC32(dataString$)",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3985,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3986,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,3988,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Deflate",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3989,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,3990,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3991,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,3992,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__deflate",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3993,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,3994,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3995,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3996,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,3997,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_DEFLATE$(stringToCompress$[, compressionLevel&])",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,3998,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,3999,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4001,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Inflate",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4002,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,4003,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4004,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4005,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__inflate",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4006,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4007,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4008,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("?[,?]",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4009,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4010,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_INFLATE$(stringToDecompress$[, originalSize&])",47));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4011,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4012,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4014,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Md5",4));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4015,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 1ll ;
if(!qbevent)break;evnt(23206,4016,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4017,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4018,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__md5",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4019,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4020,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4021,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4022,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MD5$(dataString$)",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4023,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4024,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4026,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Base64Decode",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4027,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,4028,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4029,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4030,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__base64decode",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4031,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4032,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4033,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4034,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BASE64DECODE$(stringToDecode$)",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4035,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4036,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4038,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Base64Encode",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4039,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 11ll ;
if(!qbevent)break;evnt(23206,4040,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4041,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4042,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__base64encode",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4043,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4044,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4045,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4046,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_BASE64ENCODE$(stringToEncode$)",31));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4047,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4048,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4050,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Embedded",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4051,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+546)))= 12ll ;
if(!qbevent)break;evnt(23206,4052,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4053,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4054,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__embedded",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4055,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4056,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4057,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4058,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_add(qbs_add(qbs_new_txt_len("_EMBEDDED$(",11),FUNC_ADDQUOTES(qbs_new_txt_len("handle",6))),qbs_new_txt_len(")",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4059,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4060,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4062,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CInp",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4063,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4064,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__cinp",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4065,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4066,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4067,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?]",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4068,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4069,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CINP",5));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4070,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4071,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4073,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CapsLock",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4074,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4075,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__capslock",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4076,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,4077,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4078,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CAPSLOCK",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4079,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4080,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4082,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ScrollLock",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4083,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4084,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__scrolllock",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4085,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,4086,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4087,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCROLLLOCK",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4088,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4089,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4091,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NumLock",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4092,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4093,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__numlock",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4094,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,4095,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4096,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_NUMLOCK",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4097,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4098,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4100,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_CapsLock",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4101,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4102,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__capslock",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4103,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4104,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4105,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4106,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CAPSLOCK {On|Off|_Toggle}",26));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4107,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4108,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4110,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Scrolllock",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4111,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4112,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__scrolllock",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4113,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4114,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4115,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4116,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SCROLLLOCK {On|Off|_Toggle}",28));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4117,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4118,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4120,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_Numlock",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4121,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4122,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__numlock",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4123,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4124,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4125,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("{On|Off|_Toggle}",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4126,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_NUMLOCK {On|Off|_Toggle}",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4127,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4128,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4130,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleFont",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4131,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4132,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__consolefont",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4133,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4134,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_INTEGERTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4135,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLEFONT fontFile$",22));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4136,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4137,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4139,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleCursor",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4140,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4141,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__console_cursor",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4142,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4143,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4144,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[{_Show|_Hide}][,?]",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4145,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLECURSOR {_Show|_Hide}[, size%]",37));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4146,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4147,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4149,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ConsoleInput",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4150,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4151,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__getconsoleinput",21));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4152,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,4153,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4154,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_CONSOLEINPUT",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4155,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4156,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4158,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ReadBit",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4159,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4160,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__readbit",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4161,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4162,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4163,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_INTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4164,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_READBIT(numericalVariable, numericalValue)",43));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4165,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4166,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4168,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SetBit",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4169,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4170,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__setbit",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4171,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4172,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4173,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4174,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SETBIT(numericalVariable, numericalValue)",42));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4175,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4176,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4178,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ResetBit",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4179,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4180,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__resetbit",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4181,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4182,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4183,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4184,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_RESETBIT(numericalVariable, numericalValue)",44));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4185,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4186,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4188,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ToggleBit",10));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4189,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4190,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__togglebit",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4191,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4192,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER),l2string(*__LONG_LONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4193,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_UINTEGER64TYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4194,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_TOGGLEBIT(numericalVariable, numericalValue)",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4195,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4196,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4198,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_NotifyPopup",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4199,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4200,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__guiNotifyPopup",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4201,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,4202,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4203,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4204,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_NOTIFYPOPUP [title$][, message$][, iconType$]",46));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4205,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4206,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4208,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MessageBox",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4209,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4210,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__guiMessageBox",18));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4211,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,4212,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4213,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4214,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MESSAGEBOX [title$][, message$][, iconType$]",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4215,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4216,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4218,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SelectFolderDialog",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4219,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4220,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4221,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiSelectFolderDialog",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4222,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4223,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4224,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4225,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4226,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SELECTFOLDERDIALOG$([title$][, defaultPath$])",46));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4227,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4228,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4230,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_ColorChooserDialog",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4231,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4232,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiColorChooserDialog",27));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4233,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 2 ;
if(!qbevent)break;evnt(23206,4234,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_ULONGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4235,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,?]",7));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4236,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_ULONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4237,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_COLORCHOOSERDIALOG&([title$][, defaultRGB&])",45));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4238,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4239,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4241,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_MessageBox",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4242,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4243,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiMessageBox",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4244,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,4245,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4246,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4247,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4248,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_MESSAGEBOX&([title$][, message$][, dialogType$][, iconType$][, defaultButton&])",80));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4249,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4250,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4252,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_InputBox",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4253,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4254,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4255,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiInputBox",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4256,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 3 ;
if(!qbevent)break;evnt(23206,4257,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_add(qbs_add(l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4258,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,?]]",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4259,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4260,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_INPUTBOX$([title$][, message$][, defaultInput$])",49));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4261,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4262,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4264,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_OpenFileDialog",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4265,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4266,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4267,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiOpenFileDialog",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4268,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 5 ;
if(!qbevent)break;evnt(23206,4269,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4270,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,[?][,?]]]]",25));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4271,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4272,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_OPENFILEDIALOG$([title$][, defaultPathAndFile$][, filterPatterns$][, singleFilterDescription$][, allowMultipleSelects&])",121));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4273,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4274,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4276,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_SaveFileDialog",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4277,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+528))),8,1),qbs_new_txt_len("$",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4278,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4279,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__guiSaveFileDialog",23));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4280,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 4 ;
if(!qbevent)break;evnt(23206,4281,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),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)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4282,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+1613))),256,1),qbs_new_txt_len("[?][,[?][,[?][,?]]]",19));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4283,"subs_functions.bas");}while(r);
do{
*(int32*)(((char*)__UDT_ID)+((0+2381)))=*__LONG_STRINGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4284,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_SAVEFILEDIALOG$([title$][, defaultPathAndFile$][, filterPatterns$][, singleFilterDescription$])",96));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4285,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4286,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4288,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogTrace",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4289,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4290,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__log_trace",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4291,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4292,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4293,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOGTRACE msg$",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4294,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4295,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4297,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogInfo",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4298,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4299,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__log_info",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4300,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4301,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4302,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOGINFO msg$",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4303,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4304,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4306,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogWarn",8));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4307,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4308,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__log_warn",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4309,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4310,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4311,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOGWARN msg$",13));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4312,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4313,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4315,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogError",9));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4316,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 2 ;
if(!qbevent)break;evnt(23206,4317,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("sub__log_error",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4318,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 1 ;
if(!qbevent)break;evnt(23206,4319,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),l2string(*__LONG_STRINGTYPE-*__LONG_ISPOINTER));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4320,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOGERROR msg$",14));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4321,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4322,"subs_functions.bas");}while(r);
do{
SUB_CLEARID();
if(!qbevent)break;evnt(23206,4324,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+0))),256,1),qbs_new_txt_len("_LogMinLevel",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4325,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+544)))= 1 ;
if(!qbevent)break;evnt(23206,4326,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+550))),256,1),qbs_new_txt_len("func__logminlevel",17));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4327,"subs_functions.bas");}while(r);
do{
*(int16*)(((char*)__UDT_ID)+((0+809)))= 0 ;
if(!qbevent)break;evnt(23206,4328,"subs_functions.bas");}while(r);
do{
qbs_set(qbs_new_fixed((((uint8*)__UDT_ID)+((0+813))),400,1),qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4329,"subs_functions.bas");}while(r);
do{
*_SUB_REGINTERNAL_LONG_IDERET=*__LONG_LONGTYPE-*__LONG_ISPOINTER;
if(!qbevent)break;evnt(23206,4330,"subs_functions.bas");}while(r);
do{
qbs_set(*((qbs**)((char*)(__UDT_ID)+((0+2861)))),qbs_new_txt_len("_LOGMINLEVEL",12));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(23206,4331,"subs_functions.bas");}while(r);
do{
SUB_REGID();
if(!qbevent)break;evnt(23206,4332,"subs_functions.bas");}while(r);
do{
*__LONG_REGINTERNALSUBFUNC= 0 ;
if(!qbevent)break;evnt(23206,4334,"subs_functions.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free45.txt"
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;
cmem_sp=tmp_cmem_sp;
}
