#line 20515 "ide/ide_methods.bas"
qbs* FUNC_IDEF1BOX(qbs*_FUNC_IDEF1BOX_STRING_LNKS,int32*_FUNC_IDEF1BOX_LONG_LNKS){
#line 20515 "ide/ide_methods.bas"
qbs *tqbs;
#line 20515 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 20515 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 20515 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 20515 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 20515 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 20515 "ide/ide_methods.bas"
#include "data465.txt"
#line 20515 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 20515 "ide/ide_methods.bas"
new_mem_lock();
#line 20515 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 20515 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 20515 "ide/ide_methods.bas"
libqb_check_stack();
#line 20515 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 20518 "ide/ide_methods.bas"
do{
#line 20518 "ide/ide_methods.bas"
sub_pcopy( 0 , 2 );
#line 20518 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20518,"ide_methods.bas");}while(r);
#line 20519 "ide/ide_methods.bas"
do{
#line 20519 "ide/ide_methods.bas"
sub_pcopy( 0 , 1 );
#line 20519 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20519,"ide_methods.bas");}while(r);
#line 20520 "ide/ide_methods.bas"
do{
#line 20520 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 20520 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20520,"ide_methods.bas");}while(r);
#line 20521 "ide/ide_methods.bas"
do{
#line 20521 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUS= 1 ;
#line 20521 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20521,"ide_methods.bas");}while(r);
#line 20522 "ide/ide_methods.bas"
do{
#line 20522 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20522,"ide_methods.bas");}while(r);
#line 20523 "ide/ide_methods.bas"
do{
if (_FUNC_IDEF1BOX_ARRAY_UDT_O[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;
if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&1){
if (!error_occurred) error(10);
}else{
alloc_new_desc[4]= 1 ;
alloc_new_desc[5]=( 100 )-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)(101);
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);
if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEF1BOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDEF1BOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEF1BOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDEF1BOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDEF1BOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDEF1BOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDEF1BOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
#line 20523 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20523,"ide_methods.bas");}while(r);
#line 20524 "ide/ide_methods.bas"
do{
#line 20524 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20524,"ide_methods.bas");}while(r);
#line 20525 "ide/ide_methods.bas"
do{
#line 20525 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING1_SEP,func_chr( 0 ));
#line 20525 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20525 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20525,"ide_methods.bas");}while(r);
#line 20532 "ide/ide_methods.bas"
do{
#line 20532 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I= 0 ;
#line 20532 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20532,"ide_methods.bas");}while(r);
#line 20533 "ide/ide_methods.bas"
do{
#line 20533 "ide/ide_methods.bas"
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + ((0+0)) ),&(pass6957= 40 ),&(pass6958=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ),qbs_new_txt_len("Contextual help",15));
#line 20533 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20533 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20533,"ide_methods.bas");}while(r);
#line 20535 "ide/ide_methods.bas"
do{
#line 20535 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ;
#line 20535 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20535,"ide_methods.bas");}while(r);
#line 20536 "ide/ide_methods.bas"
do{
#line 20536 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+36)))= 2 ;
#line 20536 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20536,"ide_methods.bas");}while(r);
#line 20537 "ide/ide_methods.bas"
do{
#line 20537 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+24)))= 1 ;
#line 20537 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20537,"ide_methods.bas");}while(r);
#line 20539 "ide/ide_methods.bas"
do{
#line 20539 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+28)))= 36 ;
#line 20539 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20539,"ide_methods.bas");}while(r);
#line 20539 "ide/ide_methods.bas"
do{
#line 20539 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+32)))=*_FUNC_IDEF1BOX_LONG_LNKS;
#line 20539 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20539,"ide_methods.bas");}while(r);
#line 20540 "ide/ide_methods.bas"
do{
#line 20540 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(_FUNC_IDEF1BOX_STRING_LNKS);
#line 20540 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20540,"ide_methods.bas");}while(r);
#line 20541 "ide/ide_methods.bas"
do{
#line 20541 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+76)))= 1 ;
#line 20541 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20541,"ide_methods.bas");}while(r);
#line 20542 "ide/ide_methods.bas"
do{
#line 20542 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+40)))=FUNC_IDENEWTXT(qbs_new_txt_len("Which?",6));
#line 20542 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20542,"ide_methods.bas");}while(r);
#line 20544 "ide/ide_methods.bas"
do{
#line 20544 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ;
#line 20544 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20544,"ide_methods.bas");}while(r);
#line 20545 "ide/ide_methods.bas"
do{
#line 20545 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
#line 20545 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20545,"ide_methods.bas");}while(r);
#line 20546 "ide/ide_methods.bas"
do{
#line 20546 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+24)))=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ;
#line 20546 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20546,"ide_methods.bas");}while(r);
#line 20547 "ide/ide_methods.bas"
do{
#line 20547 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_new_txt_len("#OK",3));
#line 20547 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20547,"ide_methods.bas");}while(r);
#line 20548 "ide/ide_methods.bas"
do{
#line 20548 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
#line 20548 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20548,"ide_methods.bas");}while(r);
#line 20553 "ide/ide_methods.bas"
S_67809:;
#line 20553 "ide/ide_methods.bas"
fornext_value6960= 1 ;
#line 20553 "ide/ide_methods.bas"
fornext_finalvalue6960= 100 ;
#line 20553 "ide/ide_methods.bas"
fornext_step6960= 1 ;
#line 20553 "ide/ide_methods.bas"
if (fornext_step6960<0) fornext_step_negative6960=1; else fornext_step_negative6960=0;
#line 20553 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6960;
#line 20553 "ide/ide_methods.bas"
goto fornext_entrylabel6960;
#line 20553 "ide/ide_methods.bas"
while(1){
#line 20553 "ide/ide_methods.bas"
fornext_value6960=fornext_step6960+(*_FUNC_IDEF1BOX_LONG_I);
#line 20553 "ide/ide_methods.bas"
fornext_entrylabel6960:
#line 20553 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I=fornext_value6960;
#line 20553 "ide/ide_methods.bas"
if (fornext_step_negative6960){
#line 20553 "ide/ide_methods.bas"
if (fornext_value6960<fornext_finalvalue6960) break;
#line 20553 "ide/ide_methods.bas"
}else{
#line 20553 "ide/ide_methods.bas"
if (fornext_value6960>fornext_finalvalue6960) break;
#line 20553 "ide/ide_methods.bas"
}
#line 20553 "ide/ide_methods.bas"
fornext_error6960:;
#line 20553 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20553,"ide_methods.bas");if(r)goto S_67809;}
#line 20553 "ide/ide_methods.bas"
do{
#line 20553 "ide/ide_methods.bas"
memcpy((((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+0))+(0)),(((char*)_FUNC_IDEF1BOX_UDT_P)+((0+0))+(0)),20);
#line 20553 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20553,"ide_methods.bas");}while(r);
#line 20553 "ide/ide_methods.bas"
fornext_continue_6959:;
#line 20553 "ide/ide_methods.bas"
}
#line 20553 "ide/ide_methods.bas"
fornext_exit_6959:;
#line 20556 "ide/ide_methods.bas"
S_67812:;
#line 20556 "ide/ide_methods.bas"
do{
#line 20556 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20556,"ide_methods.bas");if(r)goto S_67812;}
#line 20559 "ide/ide_methods.bas"
do{
#line 20559 "ide/ide_methods.bas"
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + ((0+0)) ));
#line 20559 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20559,"ide_methods.bas");}while(r);
#line 20560 "ide/ide_methods.bas"
do{
#line 20560 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_F= 1 ;
#line 20560 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20560,"ide_methods.bas");}while(r);
#line 20560 "ide/ide_methods.bas"
do{
#line 20560 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CX= 0 ;
#line 20560 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20560,"ide_methods.bas");}while(r);
#line 20560 "ide/ide_methods.bas"
do{
#line 20560 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CY= 0 ;
#line 20560 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20560,"ide_methods.bas");}while(r);
#line 20561 "ide/ide_methods.bas"
S_67817:;
#line 20561 "ide/ide_methods.bas"
fornext_value6963= 1 ;
#line 20561 "ide/ide_methods.bas"
fornext_finalvalue6963= 100 ;
#line 20561 "ide/ide_methods.bas"
fornext_step6963= 1 ;
#line 20561 "ide/ide_methods.bas"
if (fornext_step6963<0) fornext_step_negative6963=1; else fornext_step_negative6963=0;
#line 20561 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6963;
#line 20561 "ide/ide_methods.bas"
goto fornext_entrylabel6963;
#line 20561 "ide/ide_methods.bas"
while(1){
#line 20561 "ide/ide_methods.bas"
fornext_value6963=fornext_step6963+(*_FUNC_IDEF1BOX_LONG_I);
#line 20561 "ide/ide_methods.bas"
fornext_entrylabel6963:
#line 20561 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I=fornext_value6963;
#line 20561 "ide/ide_methods.bas"
if (fornext_step_negative6963){
#line 20561 "ide/ide_methods.bas"
if (fornext_value6963<fornext_finalvalue6963) break;
#line 20561 "ide/ide_methods.bas"
}else{
#line 20561 "ide/ide_methods.bas"
if (fornext_value6963>fornext_finalvalue6963) break;
#line 20561 "ide/ide_methods.bas"
}
#line 20561 "ide/ide_methods.bas"
fornext_error6963:;
#line 20561 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20561,"ide_methods.bas");if(r)goto S_67817;}
#line 20562 "ide/ide_methods.bas"
S_67818:;
#line 20562 "ide/ide_methods.bas"
if ((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
#line 20562 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20562,"ide_methods.bas");if(r)goto S_67818;}
#line 20565 "ide/ide_methods.bas"
do{
#line 20565 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F;
#line 20565 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20565,"ide_methods.bas");}while(r);
#line 20566 "ide/ide_methods.bas"
do{
#line 20566 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
#line 20566 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20566,"ide_methods.bas");}while(r);
#line 20566 "ide/ide_methods.bas"
do{
#line 20566 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
#line 20566 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20566,"ide_methods.bas");}while(r);
#line 20567 "ide/ide_methods.bas"
do{
#line 20567 "ide/ide_methods.bas"
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEF1BOX_LONG_F);
#line 20567 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20567,"ide_methods.bas");}while(r);
#line 20568 "ide/ide_methods.bas"
S_67823:;
#line 20568 "ide/ide_methods.bas"
if ((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
#line 20568 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20568,"ide_methods.bas");if(r)goto S_67823;}
#line 20568 "ide/ide_methods.bas"
do{
#line 20568 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+64)));
#line 20568 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20568,"ide_methods.bas");}while(r);
#line 20568 "ide/ide_methods.bas"
do{
#line 20568 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+68)));
#line 20568 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20568,"ide_methods.bas");}while(r);
#line 20568 "ide/ide_methods.bas"
}
#line 20569 "ide/ide_methods.bas"
}
#line 20570 "ide/ide_methods.bas"
fornext_continue_6962:;
#line 20570 "ide/ide_methods.bas"
}
#line 20570 "ide/ide_methods.bas"
fornext_exit_6962:;
#line 20571 "ide/ide_methods.bas"
do{
#line 20571 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_LASTFOCUS=*_FUNC_IDEF1BOX_LONG_F- 1 ;
#line 20571 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20571,"ide_methods.bas");}while(r);
#line 20578 "ide/ide_methods.bas"
do{
#line 20578 "ide/ide_methods.bas"
sub_pcopy( 1 , 0 );
#line 20578 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20578,"ide_methods.bas");}while(r);
#line 20579 "ide/ide_methods.bas"
S_67831:;
#line 20579 "ide/ide_methods.bas"
if ((*_FUNC_IDEF1BOX_LONG_CX)||is_error_pending()){
#line 20579 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20579,"ide_methods.bas");if(r)goto S_67831;}
#line 20579 "ide/ide_methods.bas"
do{
#line 20579 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
#line 20579 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20579,"ide_methods.bas");}while(r);
#line 20579 "ide/ide_methods.bas"
do{
#line 20579 "ide/ide_methods.bas"
qbg_sub_locate(*_FUNC_IDEF1BOX_LONG_CY,*_FUNC_IDEF1BOX_LONG_CX, 1 ,NULL,NULL,7);
#line 20579 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20579,"ide_methods.bas");}while(r);
#line 20579 "ide/ide_methods.bas"
do{
#line 20579 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 20579 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20579,"ide_methods.bas");}while(r);
#line 20579 "ide/ide_methods.bas"
}
#line 20582 "ide/ide_methods.bas"
do{
#line 20582 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 0 ;
#line 20582 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20582,"ide_methods.bas");}while(r);
#line 20583 "ide/ide_methods.bas"
S_67837:;
#line 20583 "ide/ide_methods.bas"
do{
#line 20583 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20583,"ide_methods.bas");if(r)goto S_67837;}
#line 20584 "ide/ide_methods.bas"
do{
#line 20584 "ide/ide_methods.bas"
SUB_GETINPUT();
#line 20584 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20584,"ide_methods.bas");}while(r);
#line 20585 "ide/ide_methods.bas"
S_67839:;
#line 20585 "ide/ide_methods.bas"
if ((*__LONG_MWHEEL)||is_error_pending()){
#line 20585 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20585,"ide_methods.bas");if(r)goto S_67839;}
#line 20585 "ide/ide_methods.bas"
do{
#line 20585 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20585 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20585,"ide_methods.bas");}while(r);
#line 20585 "ide/ide_methods.bas"
}
#line 20586 "ide/ide_methods.bas"
S_67842:;
#line 20586 "ide/ide_methods.bas"
if ((*__LONG_KB)||is_error_pending()){
#line 20586 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20586,"ide_methods.bas");if(r)goto S_67842;}
#line 20586 "ide/ide_methods.bas"
do{
#line 20586 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20586 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20586,"ide_methods.bas");}while(r);
#line 20586 "ide/ide_methods.bas"
}
#line 20587 "ide/ide_methods.bas"
S_67845:;
#line 20587 "ide/ide_methods.bas"
if ((*__LONG_MCLICK)||is_error_pending()){
#line 20587 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20587,"ide_methods.bas");if(r)goto S_67845;}
#line 20587 "ide/ide_methods.bas"
do{
#line 20587 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 1 ;
#line 20587 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20587,"ide_methods.bas");}while(r);
#line 20587 "ide/ide_methods.bas"
do{
#line 20587 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20587 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20587,"ide_methods.bas");}while(r);
#line 20587 "ide/ide_methods.bas"
}
#line 20588 "ide/ide_methods.bas"
S_67849:;
#line 20588 "ide/ide_methods.bas"
if ((*__LONG_MRELEASE)||is_error_pending()){
#line 20588 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20588,"ide_methods.bas");if(r)goto S_67849;}
#line 20588 "ide/ide_methods.bas"
do{
#line 20588 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_MOUSEUP= 1 ;
#line 20588 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20588,"ide_methods.bas");}while(r);
#line 20588 "ide/ide_methods.bas"
do{
#line 20588 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20588 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20588,"ide_methods.bas");}while(r);
#line 20588 "ide/ide_methods.bas"
}
#line 20589 "ide/ide_methods.bas"
S_67853:;
#line 20589 "ide/ide_methods.bas"
if ((*__LONG_MB)||is_error_pending()){
#line 20589 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20589,"ide_methods.bas");if(r)goto S_67853;}
#line 20589 "ide/ide_methods.bas"
do{
#line 20589 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20589 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20589,"ide_methods.bas");}while(r);
#line 20589 "ide/ide_methods.bas"
}
#line 20590 "ide/ide_methods.bas"
do{
#line 20590 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_ALT=*__LONG_KALT;
#line 20590 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20590,"ide_methods.bas");}while(r);
#line 20590 "ide/ide_methods.bas"
S_67857:;
#line 20590 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEF1BOX_LONG_ALT!=*_FUNC_IDEF1BOX_LONG_OLDALT))||is_error_pending()){
#line 20590 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20590,"ide_methods.bas");if(r)goto S_67857;}
#line 20590 "ide/ide_methods.bas"
do{
#line 20590 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
#line 20590 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20590,"ide_methods.bas");}while(r);
#line 20590 "ide/ide_methods.bas"
}
#line 20591 "ide/ide_methods.bas"
do{
#line 20591 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_OLDALT=*_FUNC_IDEF1BOX_LONG_ALT;
#line 20591 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20591,"ide_methods.bas");}while(r);
#line 20592 "ide/ide_methods.bas"
do{
#line 20592 "ide/ide_methods.bas"
sub__limit( 100 );
#line 20592 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20592,"ide_methods.bas");}while(r);
#line 20593 "ide/ide_methods.bas"
S_67862:;
#line 20593 "ide/ide_methods.bas"
dl_continue_6964:;
#line 20593 "ide/ide_methods.bas"
}while((!(*_FUNC_IDEF1BOX_LONG_CHANGE))&&(!is_error_pending()));
#line 20593 "ide/ide_methods.bas"
dl_exit_6964:;
#line 20593 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20593,"ide_methods.bas");if(r)goto S_67862;}
#line 20594 "ide/ide_methods.bas"
S_67863:;
#line 20594 "ide/ide_methods.bas"
if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
#line 20594 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20594,"ide_methods.bas");if(r)goto S_67863;}
#line 20594 "ide/ide_methods.bas"
do{
#line 20594 "ide/ide_methods.bas"
*__LONG_IDEHL= 1 ;
#line 20594 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20594,"ide_methods.bas");}while(r);
#line 20594 "ide/ide_methods.bas"
}else{
#line 20594 "ide/ide_methods.bas"
do{
#line 20594 "ide/ide_methods.bas"
*__LONG_IDEHL= 0 ;
#line 20594 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20594,"ide_methods.bas");}while(r);
#line 20594 "ide/ide_methods.bas"
}
#line 20596 "ide/ide_methods.bas"
do{
#line 20596 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
#line 20596 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20596 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20596,"ide_methods.bas");}while(r);
#line 20597 "ide/ide_methods.bas"
S_67869:;
#line 20597 "ide/ide_methods.bas"
if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
#line 20597 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20597,"ide_methods.bas");if(r)goto S_67869;}
#line 20598 "ide/ide_methods.bas"
S_67870:;
#line 20598 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
#line 20598 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20598,"ide_methods.bas");if(r)goto S_67870;}
#line 20599 "ide/ide_methods.bas"
do{
#line 20599 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
#line 20599 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20599 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20599,"ide_methods.bas");}while(r);
#line 20600 "ide/ide_methods.bas"
S_67872:;
#line 20600 "ide/ide_methods.bas"
if (((-(*_FUNC_IDEF1BOX_LONG_K>= 65 ))&(-(*_FUNC_IDEF1BOX_LONG_K<= 90 )))||is_error_pending()){
#line 20600 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20600,"ide_methods.bas");if(r)goto S_67872;}
#line 20600 "ide/ide_methods.bas"
do{
#line 20600 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEF1BOX_LONG_K));
#line 20600 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20600 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20600,"ide_methods.bas");}while(r);
#line 20600 "ide/ide_methods.bas"
}
#line 20601 "ide/ide_methods.bas"
}
#line 20602 "ide/ide_methods.bas"
}
#line 20603 "ide/ide_methods.bas"
do{
#line 20603 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
#line 20603 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20603,"ide_methods.bas");}while(r);
#line 20603 "ide/ide_methods.bas"
do{
#line 20603 "ide/ide_methods.bas"
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
#line 20603 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20603,"ide_methods.bas");}while(r);
#line 20603 "ide/ide_methods.bas"
do{
#line 20603 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 20603 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20603,"ide_methods.bas");}while(r);
#line 20607 "ide/ide_methods.bas"
do{
#line 20607 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_INFO= 0 ;
#line 20607 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20607,"ide_methods.bas");}while(r);
#line 20608 "ide/ide_methods.bas"
S_67881:;
#line 20608 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
#line 20608 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20608,"ide_methods.bas");if(r)goto S_67881;}
#line 20608 "ide/ide_methods.bas"
do{
#line 20608 "ide/ide_methods.bas"
qbs_set(__STRING_K,func_chr( 255 ));
#line 20608 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20608 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20608,"ide_methods.bas");}while(r);
#line 20608 "ide/ide_methods.bas"
}
#line 20609 "ide/ide_methods.bas"
S_67884:;
#line 20609 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
#line 20609 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20609,"ide_methods.bas");if(r)goto S_67884;}
#line 20609 "ide/ide_methods.bas"
do{
#line 20609 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS+ 1 ;
#line 20609 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20609,"ide_methods.bas");}while(r);
#line 20609 "ide/ide_methods.bas"
}
#line 20610 "ide/ide_methods.bas"
S_67887:;
#line 20610 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(*__LONG_KSHIFT&(qbs_equal(__STRING_K,func_chr( 9 ))))|((func_instr(NULL,func__os(),qbs_new_txt_len("MAC",3),0))&(qbs_equal(__STRING_K,func_chr( 25 ))))))||is_error_pending()){
#line 20610 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20610,"ide_methods.bas");if(r)goto S_67887;}
#line 20610 "ide/ide_methods.bas"
do{
#line 20610 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS- 1 ;
#line 20610 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20610,"ide_methods.bas");}while(r);
#line 20610 "ide/ide_methods.bas"
do{
#line 20610 "ide/ide_methods.bas"
qbs_set(__STRING_K,qbs_new_txt_len("",0));
#line 20610 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20610 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20610,"ide_methods.bas");}while(r);
#line 20610 "ide/ide_methods.bas"
}
#line 20611 "ide/ide_methods.bas"
S_67891:;
#line 20611 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS< 1 ))||is_error_pending()){
#line 20611 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20611,"ide_methods.bas");if(r)goto S_67891;}
#line 20611 "ide/ide_methods.bas"
do{
#line 20611 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_LASTFOCUS;
#line 20611 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20611,"ide_methods.bas");}while(r);
#line 20611 "ide/ide_methods.bas"
}
#line 20612 "ide/ide_methods.bas"
S_67894:;
#line 20612 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS>*_FUNC_IDEF1BOX_LONG_LASTFOCUS))||is_error_pending()){
#line 20612 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20612,"ide_methods.bas");if(r)goto S_67894;}
#line 20612 "ide/ide_methods.bas"
do{
#line 20612 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUS= 1 ;
#line 20612 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20612,"ide_methods.bas");}while(r);
#line 20612 "ide/ide_methods.bas"
}
#line 20613 "ide/ide_methods.bas"
do{
#line 20613 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_F= 1 ;
#line 20613 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20613,"ide_methods.bas");}while(r);
#line 20614 "ide/ide_methods.bas"
S_67898:;
#line 20614 "ide/ide_methods.bas"
fornext_value6967= 1 ;
#line 20614 "ide/ide_methods.bas"
fornext_finalvalue6967= 100 ;
#line 20614 "ide/ide_methods.bas"
fornext_step6967= 1 ;
#line 20614 "ide/ide_methods.bas"
if (fornext_step6967<0) fornext_step_negative6967=1; else fornext_step_negative6967=0;
#line 20614 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6967;
#line 20614 "ide/ide_methods.bas"
goto fornext_entrylabel6967;
#line 20614 "ide/ide_methods.bas"
while(1){
#line 20614 "ide/ide_methods.bas"
fornext_value6967=fornext_step6967+(*_FUNC_IDEF1BOX_LONG_I);
#line 20614 "ide/ide_methods.bas"
fornext_entrylabel6967:
#line 20614 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_I=fornext_value6967;
#line 20614 "ide/ide_methods.bas"
if (fornext_step_negative6967){
#line 20614 "ide/ide_methods.bas"
if (fornext_value6967<fornext_finalvalue6967) break;
#line 20614 "ide/ide_methods.bas"
}else{
#line 20614 "ide/ide_methods.bas"
if (fornext_value6967>fornext_finalvalue6967) break;
#line 20614 "ide/ide_methods.bas"
}
#line 20614 "ide/ide_methods.bas"
fornext_error6967:;
#line 20614 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20614,"ide_methods.bas");if(r)goto S_67898;}
#line 20615 "ide/ide_methods.bas"
do{
#line 20615 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_T=*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+36)));
#line 20615 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20615,"ide_methods.bas");}while(r);
#line 20616 "ide/ide_methods.bas"
S_67900:;
#line 20616 "ide/ide_methods.bas"
if ((*_FUNC_IDEF1BOX_LONG_T)||is_error_pending()){
#line 20616 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20616,"ide_methods.bas");if(r)goto S_67900;}
#line 20617 "ide/ide_methods.bas"
do{
#line 20617 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_FOCUSOFFSET=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F;
#line 20617 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20617,"ide_methods.bas");}while(r);
#line 20618 "ide/ide_methods.bas"
do{
#line 20618 "ide/ide_methods.bas"
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEF1BOX_LONG_I)-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEF1BOX_LONG_FOCUS,_FUNC_IDEF1BOX_LONG_F,_FUNC_IDEF1BOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEF1BOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEF1BOX_LONG_MOUSEDOWN,_FUNC_IDEF1BOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEF1BOX_LONG_INFO,__LONG_MWHEEL);
#line 20618 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20618 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20618,"ide_methods.bas");}while(r);
#line 20619 "ide/ide_methods.bas"
}
#line 20620 "ide/ide_methods.bas"
fornext_continue_6966:;
#line 20620 "ide/ide_methods.bas"
}
#line 20620 "ide/ide_methods.bas"
fornext_exit_6966:;
#line 20623 "ide/ide_methods.bas"
S_67905:;
#line 20623 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEF1BOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEF1BOX_LONG_INFO!= 0 ))))|(((-(*_FUNC_IDEF1BOX_LONG_INFO== 1 ))&(-(*_FUNC_IDEF1BOX_LONG_FOCUS== 1 ))))))||is_error_pending()){
#line 20623 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20623,"ide_methods.bas");if(r)goto S_67905;}
#line 20624 "ide/ide_methods.bas"
do{
#line 20624 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING_F,(((qbs**)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEF1BOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEF1BOX_ARRAY_UDT_O[4],_FUNC_IDEF1BOX_ARRAY_UDT_O[5]))*101+84))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]));
#line 20624 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20624 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20624,"ide_methods.bas");}while(r);
#line 20625 "ide/ide_methods.bas"
do{
#line 20625 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,_FUNC_IDEF1BOX_STRING_F);
#line 20625 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20625 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20625,"ide_methods.bas");}while(r);
#line 20626 "ide/ide_methods.bas"
do{
#line 20626 "ide/ide_methods.bas"
goto exit_subfunc;
#line 20626 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20626,"ide_methods.bas");}while(r);
#line 20627 "ide/ide_methods.bas"
S_67909:;
#line 20627 "ide/ide_methods.bas"
}else{
#line 20627 "ide/ide_methods.bas"
if (qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 )))){
#line 20627 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20627,"ide_methods.bas");if(r)goto S_67909;}
#line 20628 "ide/ide_methods.bas"
do{
#line 20628 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,qbs_new_txt_len("C",1));
#line 20628 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20628 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20628,"ide_methods.bas");}while(r);
#line 20629 "ide/ide_methods.bas"
do{
#line 20629 "ide/ide_methods.bas"
goto exit_subfunc;
#line 20629 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20629,"ide_methods.bas");}while(r);
#line 20630 "ide/ide_methods.bas"
}
#line 20630 "ide/ide_methods.bas"
}
#line 20633 "ide/ide_methods.bas"
do{
#line 20633 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 0 ;
#line 20633 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20633,"ide_methods.bas");}while(r);
#line 20634 "ide/ide_methods.bas"
do{
#line 20634 "ide/ide_methods.bas"
*_FUNC_IDEF1BOX_LONG_MOUSEUP= 0 ;
#line 20634 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20634,"ide_methods.bas");}while(r);
#line 20635 "ide/ide_methods.bas"
dl_continue_6961:;
#line 20635 "ide/ide_methods.bas"
}while(1);
#line 20635 "ide/ide_methods.bas"
dl_exit_6961:;
#line 20639 "ide/ide_methods.bas"
exit_subfunc:;
#line 20639 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 20639 "ide/ide_methods.bas"
#include "free465.txt"
#line 20639 "ide/ide_methods.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 20639 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 20639 "ide/ide_methods.bas"
qbs_maketmp(_FUNC_IDEF1BOX_STRING_IDEF1BOX);return _FUNC_IDEF1BOX_STRING_IDEF1BOX;
#line 20639 "ide/ide_methods.bas"
}
