#line 28550 "qb64pe.bas"
void SUB_MANAGEVARIABLELIST(qbs*_SUB_MANAGEVARIABLELIST_STRING___NAME,qbs*_SUB_MANAGEVARIABLELIST_STRING___CNAME,int32*_SUB_MANAGEVARIABLELIST_LONG_LOCALINDEX,int8*_SUB_MANAGEVARIABLELIST_BYTE_ACTION){
#line 28550 "qb64pe.bas"
qbs *tqbs;
#line 28550 "qb64pe.bas"
ptrszint tmp_long;
#line 28550 "qb64pe.bas"
int32 tmp_fileno;
#line 28550 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 28550 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 28550 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 28550 "qb64pe.bas"
#include "data114.txt"
#line 28550 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 28550 "qb64pe.bas"
new_mem_lock();
#line 28550 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 28550 "qb64pe.bas"
sf_mem_lock->type=3;
#line 28550 "qb64pe.bas"
libqb_check_stack();
#line 28550 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 28551 "qb64pe.bas"
do{
#line 28551 "qb64pe.bas"
if(!qbevent)break;evnt(28551);}while(r);
#line 28552 "qb64pe.bas"
do{
#line 28552 "qb64pe.bas"
if(!qbevent)break;evnt(28552);}while(r);
#line 28553 "qb64pe.bas"
do{
#line 28553 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_rtrim(_SUB_MANAGEVARIABLELIST_STRING___CNAME));
#line 28553 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28553 "qb64pe.bas"
if(!qbevent)break;evnt(28553);}while(r);
#line 28555 "qb64pe.bas"
S_36994:;
#line 28555 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,-(_SUB_MANAGEVARIABLELIST_STRING_CNAME->len== 0 )))||is_error_pending()){
#line 28555 "qb64pe.bas"
if(qbevent){evnt(28555);if(r)goto S_36994;}
#line 28555 "qb64pe.bas"
do{
#line 28555 "qb64pe.bas"
goto exit_subfunc;
#line 28555 "qb64pe.bas"
if(!qbevent)break;evnt(28555);}while(r);
#line 28555 "qb64pe.bas"
}
#line 28557 "qb64pe.bas"
do{
#line 28557 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_FINDITEM=func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_new_txt_len("[",1),0);
#line 28557 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28557 "qb64pe.bas"
if(!qbevent)break;evnt(28557);}while(r);
#line 28558 "qb64pe.bas"
S_36998:;
#line 28558 "qb64pe.bas"
if ((*_SUB_MANAGEVARIABLELIST_LONG_FINDITEM)||is_error_pending()){
#line 28558 "qb64pe.bas"
if(qbevent){evnt(28558);if(r)goto S_36998;}
#line 28559 "qb64pe.bas"
do{
#line 28559 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_CNAME,qbs_left(_SUB_MANAGEVARIABLELIST_STRING_CNAME,*_SUB_MANAGEVARIABLELIST_LONG_FINDITEM- 1 ));
#line 28559 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28559 "qb64pe.bas"
if(!qbevent)break;evnt(28559);}while(r);
#line 28560 "qb64pe.bas"
}
#line 28562 "qb64pe.bas"
do{
#line 28562 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_HASHINDEX=FUNC_VARLISTHASHVALUE(_SUB_MANAGEVARIABLELIST_STRING_CNAME);
#line 28562 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28562 "qb64pe.bas"
if(!qbevent)break;evnt(28562);}while(r);
#line 28563 "qb64pe.bas"
do{
#line 28563 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_FOUND= 0 ;
#line 28563 "qb64pe.bas"
if(!qbevent)break;evnt(28563);}while(r);
#line 28564 "qb64pe.bas"
do{
#line 28564 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_I=((int32*)(__ARRAY_LONG_VARLISTHASHTABLE[0]))[array_check((*_SUB_MANAGEVARIABLELIST_LONG_HASHINDEX)-__ARRAY_LONG_VARLISTHASHTABLE[4],__ARRAY_LONG_VARLISTHASHTABLE[5])];
#line 28564 "qb64pe.bas"
if(!qbevent)break;evnt(28564);}while(r);
#line 28565 "qb64pe.bas"
S_37004:;
#line 28565 "qb64pe.bas"
while((*_SUB_MANAGEVARIABLELIST_LONG_I)||is_error_pending()){
#line 28565 "qb64pe.bas"
if(qbevent){evnt(28565);if(r)goto S_37004;}
#line 28566 "qb64pe.bas"
S_37005:;
#line 28566 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+44)))),_SUB_MANAGEVARIABLELIST_STRING_CNAME)))||is_error_pending()){
#line 28566 "qb64pe.bas"
if(qbevent){evnt(28566);if(r)goto S_37005;}
#line 28566 "qb64pe.bas"
do{
#line 28566 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_FOUND= -1 ;
#line 28566 "qb64pe.bas"
if(!qbevent)break;evnt(28566);}while(r);
#line 28566 "qb64pe.bas"
do{
#line 28566 "qb64pe.bas"
goto dl_exit_3510;
#line 28566 "qb64pe.bas"
if(!qbevent)break;evnt(28566);}while(r);
#line 28566 "qb64pe.bas"
}
#line 28567 "qb64pe.bas"
do{
#line 28567 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_I=*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+28)));
#line 28567 "qb64pe.bas"
if(!qbevent)break;evnt(28567);}while(r);
#line 28568 "qb64pe.bas"
dl_continue_3510:;
#line 28568 "qb64pe.bas"
}
#line 28568 "qb64pe.bas"
dl_exit_3510:;
#line 28569 "qb64pe.bas"
S_37011:;
#line 28569 "qb64pe.bas"
if ((-(*_SUB_MANAGEVARIABLELIST_LONG_FOUND== 0 ))||is_error_pending()){
#line 28569 "qb64pe.bas"
if(qbevent){evnt(28569);if(r)goto S_37011;}
#line 28569 "qb64pe.bas"
do{
#line 28569 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_I=*__LONG_TOTALVARIABLESCREATED+ 1 ;
#line 28569 "qb64pe.bas"
if(!qbevent)break;evnt(28569);}while(r);
#line 28569 "qb64pe.bas"
}
#line 28571 "qb64pe.bas"
S_37014:;
#line 28571 "qb64pe.bas"
if(qbevent){evnt(28571);if(r)goto S_37014;}
#line 28572 "qb64pe.bas"
S_37015:;
#line 28572 "qb64pe.bas"
if (((*_SUB_MANAGEVARIABLELIST_BYTE_ACTION==( 0 )))||is_error_pending()){
#line 28572 "qb64pe.bas"
if(qbevent){evnt(28572);if(r)goto S_37015;}
#line 28573 "qb64pe.bas"
S_37016:;
#line 28573 "qb64pe.bas"
if ((-(*_SUB_MANAGEVARIABLELIST_LONG_FOUND== 0 ))||is_error_pending()){
#line 28573 "qb64pe.bas"
if(qbevent){evnt(28573);if(r)goto S_37016;}
#line 28574 "qb64pe.bas"
do{
#line 28574 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(_SUB_MANAGEVARIABLELIST_STRING___NAME));
#line 28574 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28574 "qb64pe.bas"
if(!qbevent)break;evnt(28574);}while(r);
#line 28576 "qb64pe.bas"
S_37018:;
#line 28576 "qb64pe.bas"
if ((-(*_SUB_MANAGEVARIABLELIST_LONG_I>func_ubound(__ARRAY_UDT_USEDVARIABLELIST,1,1)))||is_error_pending()){
#line 28576 "qb64pe.bas"
if(qbevent){evnt(28576);if(r)goto S_37018;}
#line 28577 "qb64pe.bas"
do{
if (__ARRAY_UDT_USEDVARIABLELIST[2]&2){
error(10);
}else{
static int64 alloc_new_desc[8];
static uint64 alloc_req_elems;
static uint64 alloc_req_bytes;
static uint64 alloc_dim_value;
static uint64 alloc_bytes_per_element;
((mem_lock*)((ptrszint*)__ARRAY_UDT_USEDVARIABLELIST)[8])->id=(++mem_lock_id);
static ptrszint preserve_old_ptr;
static ptrszint preserve_old_flags;
static uint64 preserve_old_total;
static uint64 preserve_new_total;
static uint64 preserve_copy_count;
static ptrszint preserve_new_ptr;
if (__ARRAY_UDT_USEDVARIABLELIST[2]&1){
preserve_old_ptr=__ARRAY_UDT_USEDVARIABLELIST[0];
preserve_old_flags=__ARRAY_UDT_USEDVARIABLELIST[2];
preserve_old_total=__ARRAY_UDT_USEDVARIABLELIST[5];
}else{
preserve_old_total=0; preserve_old_ptr=0; preserve_old_flags=0; preserve_new_total=0; preserve_copy_count=0;
}
alloc_new_desc[4]= 0 ;
alloc_new_desc[5]=(func_ubound(__ARRAY_UDT_USEDVARIABLELIST,1,1)+ 999 )-alloc_new_desc[4]+1;
if (alloc_new_desc[5]<=0) error(5);
alloc_new_desc[6]=1;
alloc_req_elems=1;
alloc_bytes_per_element=(uint64)(124);
if (!alloc_bytes_per_element) error(257);
if (((int64)((ptrszint)alloc_new_desc[4]))!=alloc_new_desc[4]) error(257);
if (alloc_new_desc[5]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[5]))!=alloc_new_desc[5]) error(257);
if (alloc_new_desc[6]<0) error(257);
if (((int64)((ptrszint)alloc_new_desc[6]))!=alloc_new_desc[6]) error(257);
alloc_dim_value=(uint64)alloc_new_desc[5];
if (alloc_dim_value){
if (alloc_req_elems>(18446744073709551615ull/alloc_dim_value)) error(257);
alloc_req_elems*=alloc_dim_value;
}
if (alloc_req_elems>(18446744073709551615ull/alloc_bytes_per_element)) error(257);
alloc_req_bytes=alloc_req_elems*alloc_bytes_per_element;
if (((uint64)((ptrszint)alloc_req_elems))!=alloc_req_elems) error(257);
if (((uint64)((size_t)alloc_req_bytes))!=alloc_req_bytes) error(257);
preserve_new_total=alloc_req_elems;
preserve_copy_count=preserve_old_total;
if (preserve_new_total<preserve_copy_count) preserve_copy_count=preserve_new_total;
if (preserve_old_total){
preserve_new_ptr=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!preserve_new_ptr) error(257);
__ARRAY_UDT_USEDVARIABLELIST[0]=preserve_new_ptr;
__ARRAY_UDT_USEDVARIABLELIST[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
ZeroMemory((uint8*)(__ARRAY_UDT_USEDVARIABLELIST[0]),tmp_long*124);
while(tmp_long--){

*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+36)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+44)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+52)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+60)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+68)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+76)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+84)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+92)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+100)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+108)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+116)))=qbs_new(0,0);}
tmp_long=preserve_copy_count;
while(tmp_long--){

memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+0))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+0))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+4))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+4))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+8))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+8))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+12))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+12))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+16))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+16))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+20))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+20))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+24))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+24))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+28))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+28))),4);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+32))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+32))),1);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+33))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+33))),1);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+34))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+34))),1);
memcpy((void*)(((char*)(preserve_new_ptr)+(((tmp_long*124))+35))),(void*)(((char*)(preserve_old_ptr)+(((tmp_long*124))+35))),1);
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+36)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+36)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+44)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+44)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+52)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+52)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+60)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+60)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+68)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+68)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+76)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+76)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+84)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+84)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+92)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+92)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+100)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+100)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+108)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+108)))));
qbs_set((*(qbs**)(((char*)(preserve_new_ptr)+(((tmp_long*124))+116)))),(*(qbs**)(((char*)(preserve_old_ptr)+(((tmp_long*124))+116)))));
}
__ARRAY_UDT_USEDVARIABLELIST[0]=preserve_old_ptr;
tmp_long=preserve_old_total;
while(tmp_long--){

qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+36))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+44))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+52))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+60))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+68))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+76))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+84))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+92))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+100))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+108))));
qbs_free(*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+116))));}
free((void*)(preserve_old_ptr));
__ARRAY_UDT_USEDVARIABLELIST[0]=preserve_new_ptr;
}else{
__ARRAY_UDT_USEDVARIABLELIST[0]=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!__ARRAY_UDT_USEDVARIABLELIST[0]) error(257);
__ARRAY_UDT_USEDVARIABLELIST[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
ZeroMemory((uint8*)(__ARRAY_UDT_USEDVARIABLELIST[0]),tmp_long*124);
while(tmp_long--){

*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+36)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+44)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+52)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+60)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+68)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+76)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+84)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+92)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+100)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+108)))=qbs_new(0,0);
*(qbs**)(((uint8*)((__ARRAY_UDT_USEDVARIABLELIST[0]+124*tmp_long)))+((0+116)))=qbs_new(0,0);}
}
__ARRAY_UDT_USEDVARIABLELIST[4]=alloc_new_desc[4];
__ARRAY_UDT_USEDVARIABLELIST[5]=alloc_new_desc[5];
__ARRAY_UDT_USEDVARIABLELIST[6]=alloc_new_desc[6];
__ARRAY_UDT_USEDVARIABLELIST[7]=alloc_new_desc[7];
}
#line 28577 "qb64pe.bas"
if(!qbevent)break;evnt(28577);}while(r);
#line 28578 "qb64pe.bas"
}
#line 28580 "qb64pe.bas"
do{
#line 28580 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+28)))=((int32*)(__ARRAY_LONG_VARLISTHASHTABLE[0]))[array_check((*_SUB_MANAGEVARIABLELIST_LONG_HASHINDEX)-__ARRAY_LONG_VARLISTHASHTABLE[4],__ARRAY_LONG_VARLISTHASHTABLE[5])];
#line 28580 "qb64pe.bas"
if(!qbevent)break;evnt(28580);}while(r);
#line 28581 "qb64pe.bas"
do{
#line 28581 "qb64pe.bas"
tmp_long=array_check((*_SUB_MANAGEVARIABLELIST_LONG_HASHINDEX)-__ARRAY_LONG_VARLISTHASHTABLE[4],__ARRAY_LONG_VARLISTHASHTABLE[5]);
#line 28581 "qb64pe.bas"
if (!is_error_pending()) ((int32*)(__ARRAY_LONG_VARLISTHASHTABLE[0]))[tmp_long]=*_SUB_MANAGEVARIABLELIST_LONG_I;
#line 28581 "qb64pe.bas"
if(!qbevent)break;evnt(28581);}while(r);
#line 28583 "qb64pe.bas"
do{
#line 28583 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+0)))=*__LONG_CURRENTID;
#line 28583 "qb64pe.bas"
if(!qbevent)break;evnt(28583);}while(r);
#line 28584 "qb64pe.bas"
do{
#line 28584 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+32)))= 0 ;
#line 28584 "qb64pe.bas"
if(!qbevent)break;evnt(28584);}while(r);
#line 28585 "qb64pe.bas"
do{
#line 28585 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+33)))= 0 ;
#line 28585 "qb64pe.bas"
if(!qbevent)break;evnt(28585);}while(r);
#line 28586 "qb64pe.bas"
do{
#line 28586 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+35)))= 0 ;
#line 28586 "qb64pe.bas"
if(!qbevent)break;evnt(28586);}while(r);
#line 28587 "qb64pe.bas"
do{
#line 28587 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+116)))),qbs_new_txt_len("",0));
#line 28587 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28587 "qb64pe.bas"
if(!qbevent)break;evnt(28587);}while(r);
#line 28588 "qb64pe.bas"
do{
#line 28588 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+4)))=*__LONG_LINENUMBER;
#line 28588 "qb64pe.bas"
if(!qbevent)break;evnt(28588);}while(r);
#line 28589 "qb64pe.bas"
do{
#line 28589 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+8)))=*__LONG_INCLEVEL;
#line 28589 "qb64pe.bas"
if(!qbevent)break;evnt(28589);}while(r);
#line 28590 "qb64pe.bas"
S_37030:;
#line 28590 "qb64pe.bas"
if ((-(*__LONG_INCLEVEL> 0 ))||is_error_pending()){
#line 28590 "qb64pe.bas"
if(qbevent){evnt(28590);if(r)goto S_37030;}
#line 28591 "qb64pe.bas"
do{
#line 28591 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+12)))=((int32*)(__ARRAY_LONG_INCLINENUMBER[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_LONG_INCLINENUMBER[4],__ARRAY_LONG_INCLINENUMBER[5])];
#line 28591 "qb64pe.bas"
if(!qbevent)break;evnt(28591);}while(r);
#line 28592 "qb64pe.bas"
do{
#line 28592 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME,FUNC_GETFILEPATH((((qbs**)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])])));
#line 28592 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28592 "qb64pe.bas"
if(!qbevent)break;evnt(28592);}while(r);
#line 28593 "qb64pe.bas"
do{
#line 28593 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME,func_mid((((qbs**)(__ARRAY_STRING_INCNAME[0]))[array_check((*__LONG_INCLEVEL)-__ARRAY_STRING_INCNAME[4],__ARRAY_STRING_INCNAME[5])]),_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME->len+ 1 ,NULL,0));
#line 28593 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28593 "qb64pe.bas"
if(!qbevent)break;evnt(28593);}while(r);
#line 28594 "qb64pe.bas"
do{
#line 28594 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+60)))),_SUB_MANAGEVARIABLELIST_STRING_THISINCNAME);
#line 28594 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28594 "qb64pe.bas"
if(!qbevent)break;evnt(28594);}while(r);
#line 28595 "qb64pe.bas"
}else{
#line 28596 "qb64pe.bas"
do{
#line 28596 "qb64pe.bas"
*__LONG_TOTALMAINVARIABLESCREATED=*__LONG_TOTALMAINVARIABLESCREATED+ 1 ;
#line 28596 "qb64pe.bas"
if(!qbevent)break;evnt(28596);}while(r);
#line 28597 "qb64pe.bas"
do{
#line 28597 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+12)))= 0 ;
#line 28597 "qb64pe.bas"
if(!qbevent)break;evnt(28597);}while(r);
#line 28598 "qb64pe.bas"
do{
#line 28598 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+60)))),qbs_new_txt_len("",0));
#line 28598 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28598 "qb64pe.bas"
if(!qbevent)break;evnt(28598);}while(r);
#line 28599 "qb64pe.bas"
}
#line 28600 "qb64pe.bas"
do{
#line 28600 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+16)))=*__LONG_SUBFUNCN;
#line 28600 "qb64pe.bas"
if(!qbevent)break;evnt(28600);}while(r);
#line 28601 "qb64pe.bas"
do{
#line 28601 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+68)))),__STRING_SUBFUNC);
#line 28601 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28601 "qb64pe.bas"
if(!qbevent)break;evnt(28601);}while(r);
#line 28602 "qb64pe.bas"
do{
#line 28602 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+52)))),FUNC_ID2FULLTYPENAME());
#line 28602 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28602 "qb64pe.bas"
if(!qbevent)break;evnt(28602);}while(r);
#line 28603 "qb64pe.bas"
do{
#line 28603 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+44)))),_SUB_MANAGEVARIABLELIST_STRING_CNAME);
#line 28603 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28603 "qb64pe.bas"
if(!qbevent)break;evnt(28603);}while(r);
#line 28604 "qb64pe.bas"
do{
#line 28604 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+20)))=*_SUB_MANAGEVARIABLELIST_LONG_LOCALINDEX;
#line 28604 "qb64pe.bas"
if(!qbevent)break;evnt(28604);}while(r);
#line 28607 "qb64pe.bas"
S_37045:;
#line 28607 "qb64pe.bas"
while((qbs_cleanup(qbs_tmp_base,func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_NAME,__STRING_FIX046,0)))||is_error_pending()){
#line 28607 "qb64pe.bas"
if(qbevent){evnt(28607);if(r)goto S_37045;}
#line 28608 "qb64pe.bas"
do{
#line 28608 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_X=func_instr(NULL,_SUB_MANAGEVARIABLELIST_STRING_NAME,__STRING_FIX046,0);
#line 28608 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28608 "qb64pe.bas"
if(!qbevent)break;evnt(28608);}while(r);
#line 28608 "qb64pe.bas"
do{
#line 28608 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_add(qbs_add(qbs_left(_SUB_MANAGEVARIABLELIST_STRING_NAME,*_SUB_MANAGEVARIABLELIST_LONG_X- 1 ),qbs_new_txt_len(".",1)),qbs_right(_SUB_MANAGEVARIABLELIST_STRING_NAME,_SUB_MANAGEVARIABLELIST_STRING_NAME->len-*_SUB_MANAGEVARIABLELIST_LONG_X+ 1 -__STRING_FIX046->len)));
#line 28608 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28608 "qb64pe.bas"
if(!qbevent)break;evnt(28608);}while(r);
#line 28609 "qb64pe.bas"
dl_continue_3513:;
#line 28609 "qb64pe.bas"
}
#line 28609 "qb64pe.bas"
dl_exit_3513:;
#line 28611 "qb64pe.bas"
S_37049:;
#line 28611 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1)))->len)> 0 )))||is_error_pending()){
#line 28611 "qb64pe.bas"
if(qbevent){evnt(28611);if(r)goto S_37049;}
#line 28612 "qb64pe.bas"
do{
#line 28612 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+36)))),qbs_add(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+532))),8,1))));
#line 28612 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28612 "qb64pe.bas"
if(!qbevent)break;evnt(28612);}while(r);
#line 28613 "qb64pe.bas"
S_37051:;
#line 28613 "qb64pe.bas"
}else{
#line 28613 "qb64pe.bas"
if (qbs_cleanup(qbs_tmp_base,-(((int32)(qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+524))),8,1)))->len)> 0 ))){
#line 28613 "qb64pe.bas"
if(qbevent){evnt(28613);if(r)goto S_37051;}
#line 28614 "qb64pe.bas"
do{
#line 28614 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+36)))),qbs_add(_SUB_MANAGEVARIABLELIST_STRING_NAME,qbs_rtrim(qbs_new_fixed((((uint8*)__UDT_ID)+((0+524))),8,1))));
#line 28614 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28614 "qb64pe.bas"
if(!qbevent)break;evnt(28614);}while(r);
#line 28615 "qb64pe.bas"
}else{
#line 28616 "qb64pe.bas"
do{
#line 28616 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+36)))),_SUB_MANAGEVARIABLELIST_STRING_NAME);
#line 28616 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28616 "qb64pe.bas"
if(!qbevent)break;evnt(28616);}while(r);
#line 28617 "qb64pe.bas"
}
#line 28617 "qb64pe.bas"
}
#line 28619 "qb64pe.bas"
S_37056:;
#line 28619 "qb64pe.bas"
if (((-(*(int16*)(((char*)__UDT_ID)+((0+516)))> 0 )))||is_error_pending()){
#line 28619 "qb64pe.bas"
if(qbevent){evnt(28619);if(r)goto S_37056;}
#line 28620 "qb64pe.bas"
do{
#line 28620 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+34)))= -1 ;
#line 28620 "qb64pe.bas"
if(!qbevent)break;evnt(28620);}while(r);
#line 28621 "qb64pe.bas"
do{
#line 28621 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+36)))),qbs_add(*((qbs**)((char*)__ARRAY_UDT_USEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+36)))),qbs_new_txt_len("()",2)));
#line 28621 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28621 "qb64pe.bas"
if(!qbevent)break;evnt(28621);}while(r);
#line 28622 "qb64pe.bas"
}else{
#line 28623 "qb64pe.bas"
do{
#line 28623 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+34)))= 0 ;
#line 28623 "qb64pe.bas"
if(!qbevent)break;evnt(28623);}while(r);
#line 28624 "qb64pe.bas"
}
#line 28625 "qb64pe.bas"
do{
#line 28625 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+76)))),qbs_new_txt_len("",0));
#line 28625 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28625 "qb64pe.bas"
if(!qbevent)break;evnt(28625);}while(r);
#line 28626 "qb64pe.bas"
do{
#line 28626 "qb64pe.bas"
*(int32*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+24)))= 0 ;
#line 28626 "qb64pe.bas"
if(!qbevent)break;evnt(28626);}while(r);
#line 28627 "qb64pe.bas"
do{
#line 28627 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+84)))),qbs_new_txt_len("",0));
#line 28627 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28627 "qb64pe.bas"
if(!qbevent)break;evnt(28627);}while(r);
#line 28628 "qb64pe.bas"
do{
#line 28628 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+92)))),qbs_new_txt_len("",0));
#line 28628 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28628 "qb64pe.bas"
if(!qbevent)break;evnt(28628);}while(r);
#line 28629 "qb64pe.bas"
do{
#line 28629 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+100)))),qbs_new_txt_len("",0));
#line 28629 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28629 "qb64pe.bas"
if(!qbevent)break;evnt(28629);}while(r);
#line 28630 "qb64pe.bas"
do{
#line 28630 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+108)))),qbs_new_txt_len("",0));
#line 28630 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28630 "qb64pe.bas"
if(!qbevent)break;evnt(28630);}while(r);
#line 28631 "qb64pe.bas"
do{
#line 28631 "qb64pe.bas"
*__LONG_TOTALVARIABLESCREATED=*__LONG_TOTALVARIABLESCREATED+ 1 ;
#line 28631 "qb64pe.bas"
if(!qbevent)break;evnt(28631);}while(r);
#line 28633 "qb64pe.bas"
do{
#line 28633 "qb64pe.bas"
qbs_set(_SUB_MANAGEVARIABLELIST_STRING_TEMP,qbs_add(qbs_add(l2string( -1 ),l2string(_SUB_MANAGEVARIABLELIST_STRING_CNAME->len)),_SUB_MANAGEVARIABLELIST_STRING_CNAME));
#line 28633 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28633 "qb64pe.bas"
if(!qbevent)break;evnt(28633);}while(r);
#line 28634 "qb64pe.bas"
do{
#line 28634 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_FOUND=func_instr(NULL,__STRING_BACKUPVARIABLEWATCHLIST,_SUB_MANAGEVARIABLELIST_STRING_TEMP,0);
#line 28634 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28634 "qb64pe.bas"
if(!qbevent)break;evnt(28634);}while(r);
#line 28635 "qb64pe.bas"
S_37071:;
#line 28635 "qb64pe.bas"
if ((*_SUB_MANAGEVARIABLELIST_LONG_FOUND)||is_error_pending()){
#line 28635 "qb64pe.bas"
if(qbevent){evnt(28635);if(r)goto S_37071;}
#line 28638 "qb64pe.bas"
do{
#line 28638 "qb64pe.bas"
*_SUB_MANAGEVARIABLELIST_LONG_J=string2l(func_mid(__STRING_BACKUPVARIABLEWATCHLIST,*_SUB_MANAGEVARIABLELIST_LONG_FOUND+_SUB_MANAGEVARIABLELIST_STRING_TEMP->len, 4 ,0|1));
#line 28638 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28638 "qb64pe.bas"
if(!qbevent)break;evnt(28638);}while(r);
#line 28642 "qb64pe.bas"
S_37073:;
#line 28642 "qb64pe.bas"
if ((qbs_cleanup(qbs_tmp_base,((-((*(qbs**)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+92))))->len> 0 ))&(qbs_equal(__STRING_BACKUPTYPEDEFINITIONS,__STRING_TYPEDEFINITIONS)))|(-((*(qbs**)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+92))))->len== 0 ))))||is_error_pending()){
#line 28642 "qb64pe.bas"
if(qbevent){evnt(28642);if(r)goto S_37073;}
#line 28643 "qb64pe.bas"
do{
#line 28643 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+33)))=*(int8*)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+33)));
#line 28643 "qb64pe.bas"
if(!qbevent)break;evnt(28643);}while(r);
#line 28644 "qb64pe.bas"
do{
#line 28644 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+76)))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+76)))));
#line 28644 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28644 "qb64pe.bas"
if(!qbevent)break;evnt(28644);}while(r);
#line 28645 "qb64pe.bas"
do{
#line 28645 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+84)))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+84)))));
#line 28645 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28645 "qb64pe.bas"
if(!qbevent)break;evnt(28645);}while(r);
#line 28646 "qb64pe.bas"
do{
#line 28646 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+35)))=*(int8*)(((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+35)));
#line 28646 "qb64pe.bas"
if(!qbevent)break;evnt(28646);}while(r);
#line 28647 "qb64pe.bas"
do{
#line 28647 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+92)))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+92)))));
#line 28647 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28647 "qb64pe.bas"
if(!qbevent)break;evnt(28647);}while(r);
#line 28648 "qb64pe.bas"
do{
#line 28648 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+100)))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+100)))));
#line 28648 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28648 "qb64pe.bas"
if(!qbevent)break;evnt(28648);}while(r);
#line 28649 "qb64pe.bas"
do{
#line 28649 "qb64pe.bas"
qbs_set(*((qbs**)((char*)(__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+108)))),*((qbs**)((char*)__ARRAY_UDT_BACKUPUSEDVARIABLELIST[0]+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_J)-__ARRAY_UDT_BACKUPUSEDVARIABLELIST[4],__ARRAY_UDT_BACKUPUSEDVARIABLELIST[5]))*124+108)))));
#line 28649 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 28649 "qb64pe.bas"
if(!qbevent)break;evnt(28649);}while(r);
#line 28650 "qb64pe.bas"
}
#line 28651 "qb64pe.bas"
}
#line 28652 "qb64pe.bas"
}
#line 28653 "qb64pe.bas"
sc_ec_110_end:;
#line 28653 "qb64pe.bas"
goto sc_3511_end;
#line 28653 "qb64pe.bas"
}
#line 28654 "qb64pe.bas"
S_37085:;
#line 28654 "qb64pe.bas"
if ((*_SUB_MANAGEVARIABLELIST_LONG_FOUND)||is_error_pending()){
#line 28654 "qb64pe.bas"
if(qbevent){evnt(28654);if(r)goto S_37085;}
#line 28655 "qb64pe.bas"
do{
#line 28655 "qb64pe.bas"
*(int8*)(((char*)__ARRAY_UDT_USEDVARIABLELIST[0])+(((array_check((*_SUB_MANAGEVARIABLELIST_LONG_I)-__ARRAY_UDT_USEDVARIABLELIST[4],__ARRAY_UDT_USEDVARIABLELIST[5]))*124+32)))= -1 ;
#line 28655 "qb64pe.bas"
if(!qbevent)break;evnt(28655);}while(r);
#line 28656 "qb64pe.bas"
}
#line 28657 "qb64pe.bas"
sc_3511_end:;
#line 28658 "qb64pe.bas"
exit_subfunc:;
#line 28658 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 28658 "qb64pe.bas"
#include "free114.txt"
#line 28658 "qb64pe.bas"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
#line 28658 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 28658 "qb64pe.bas"
}
