int32 FUNC_IDECALLSTACKBOX(){
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 "data283.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{
sub_pcopy( 0 , 2 );
if(!qbevent)break;evnt(25769,10485,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(25769,10486,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,10487,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,10488,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,10489,"ide_methods.bas");}while(r);
do{
if (_FUNC_IDECALLSTACKBOX_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_IDECALLSTACKBOX_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_IDECALLSTACKBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(25769,10490,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,10491,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10492,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT=*__LONG_CALLSTACKLENGTH+ 4 ;
if(!qbevent)break;evnt(25769,10497,"ide_methods.bas");}while(r);
S_51340:;
if ((-(*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT>(*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 )))||is_error_pending()){
if(qbevent){evnt(25769,10498,"ide_methods.bas");if(r)goto S_51340;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT=*__LONG_IDEWY+*__LONG_IDESUBWINDOW- 6 ;
if(!qbevent)break;evnt(25769,10499,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH= 52 ;
if(!qbevent)break;evnt(25769,10502,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,__STRING_CALLSTACKLIST);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10503,"ide_methods.bas");}while(r);
S_51345:;
do{
if(qbevent){evnt(25769,10504,"ide_methods.bas");if(r)goto S_51345;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_I=func_instr(NULL,_FUNC_IDECALLSTACKBOX_STRING_TEMP,_FUNC_IDECALLSTACKBOX_STRING1_SEP,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10505,"ide_methods.bas");}while(r);
S_51347:;
if ((*_FUNC_IDECALLSTACKBOX_LONG_I)||is_error_pending()){
if(qbevent){evnt(25769,10506,"ide_methods.bas");if(r)goto S_51347;}
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP2,qbs_left(_FUNC_IDECALLSTACKBOX_STRING_TEMP,*_FUNC_IDECALLSTACKBOX_LONG_I- 1 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10507,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,func_mid(_FUNC_IDECALLSTACKBOX_STRING_TEMP,*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ,NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10508,"ide_methods.bas");}while(r);
S_51350:;
if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDECALLSTACKBOX_STRING_TEMP2->len+ 6 )>*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH)))||is_error_pending()){
if(qbevent){evnt(25769,10509,"ide_methods.bas");if(r)goto S_51350;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=_FUNC_IDECALLSTACKBOX_STRING_TEMP2->len+ 6 ;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10509,"ide_methods.bas");}while(r);
}
}else{
S_51354:;
if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDECALLSTACKBOX_STRING_TEMP->len+ 6 )>*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH)))||is_error_pending()){
if(qbevent){evnt(25769,10511,"ide_methods.bas");if(r)goto S_51354;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=_FUNC_IDECALLSTACKBOX_STRING_TEMP->len+ 6 ;
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10511,"ide_methods.bas");}while(r);
}
do{
goto dl_exit_5941;
if(!qbevent)break;evnt(25769,10512,"ide_methods.bas");}while(r);
}
dl_continue_5941:;
}while(1);
dl_exit_5941:;
S_51360:;
if ((-(*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH>(*__LONG_IDEWX- 8 )))||is_error_pending()){
if(qbevent){evnt(25769,10516,"ide_methods.bas");if(r)goto S_51360;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH=*__LONG_IDEWX- 8 ;
if(!qbevent)break;evnt(25769,10516,"ide_methods.bas");}while(r);
}
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_UDT_P)) + ((0+0)) ),_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH,_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT,qbs_new_txt_len("$DEBUG MODE",11));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10518,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(25769,10520,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_I=*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,10521,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+36)))= 2 ;
if(!qbevent)break;evnt(25769,10522,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+24)))= 2 ;
if(!qbevent)break;evnt(25769,10523,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+28)))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGWIDTH- 4 ;
if(!qbevent)break;evnt(25769,10524,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+32)))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT- 4 ;
if(!qbevent)break;evnt(25769,10524,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(__STRING_CALLSTACKLIST);
if(!qbevent)break;evnt(25769,10525,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+76)))=*__LONG_CALLSTACKLENGTH;
if(!qbevent)break;evnt(25769,10526,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+40)))=FUNC_IDENEWTXT(qbs_new_txt_len("Call Stack",10));
if(!qbevent)break;evnt(25769,10527,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_I=*_FUNC_IDECALLSTACKBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,10529,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
if(!qbevent)break;evnt(25769,10530,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+24)))=*_FUNC_IDECALLSTACKBOX_LONG_DIALOGHEIGHT;
if(!qbevent)break;evnt(25769,10531,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("#Go To Line",11),_FUNC_IDECALLSTACKBOX_STRING1_SEP),qbs_new_txt_len("#Close",6)),_FUNC_IDECALLSTACKBOX_STRING1_SEP),qbs_new_txt_len("Co#py",5)));
if(!qbevent)break;evnt(25769,10532,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
if(!qbevent)break;evnt(25769,10533,"ide_methods.bas");}while(r);
S_51378:;
fornext_value5947= 1 ;
fornext_finalvalue5947= 100 ;
fornext_step5947= 1 ;
if (fornext_step5947<0) fornext_step_negative5947=1; else fornext_step_negative5947=0;
if (is_error_pending()) goto fornext_error5947;
goto fornext_entrylabel5947;
while(1){
fornext_value5947=fornext_step5947+(*_FUNC_IDECALLSTACKBOX_LONG_I);
fornext_entrylabel5947:
*_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5947;
if (fornext_step_negative5947){
if (fornext_value5947<fornext_finalvalue5947) break;
}else{
if (fornext_value5947>fornext_finalvalue5947) break;
}
fornext_error5947:;
if(qbevent){evnt(25769,10539,"ide_methods.bas");if(r)goto S_51378;}
do{
memcpy(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+0))+ 0,((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+((0+0))+ 0, 20);
if(!qbevent)break;evnt(25769,10539,"ide_methods.bas");}while(r);
fornext_continue_5946:;
}
fornext_exit_5946:;
S_51381:;
do{
if(qbevent){evnt(25769,10542,"ide_methods.bas");if(r)goto S_51381;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_UDT_P)) + ((0+0)) ));
if(!qbevent)break;evnt(25769,10545,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,10546,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(25769,10546,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(25769,10546,"ide_methods.bas");}while(r);
S_51386:;
fornext_value5950= 1 ;
fornext_finalvalue5950= 100 ;
fornext_step5950= 1 ;
if (fornext_step5950<0) fornext_step_negative5950=1; else fornext_step_negative5950=0;
if (is_error_pending()) goto fornext_error5950;
goto fornext_entrylabel5950;
while(1){
fornext_value5950=fornext_step5950+(*_FUNC_IDECALLSTACKBOX_LONG_I);
fornext_entrylabel5950:
*_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5950;
if (fornext_step_negative5950){
if (fornext_value5950<fornext_finalvalue5950) break;
}else{
if (fornext_value5950>fornext_finalvalue5950) break;
}
fornext_error5950:;
if(qbevent){evnt(25769,10547,"ide_methods.bas");if(r)goto S_51386;}
S_51387:;
if ((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
if(qbevent){evnt(25769,10548,"ide_methods.bas");if(r)goto S_51387;}
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS-*_FUNC_IDECALLSTACKBOX_LONG_F;
if(!qbevent)break;evnt(25769,10550,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
if(!qbevent)break;evnt(25769,10551,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
if(!qbevent)break;evnt(25769,10551,"ide_methods.bas");}while(r);
do{
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDECALLSTACKBOX_LONG_F);
if(!qbevent)break;evnt(25769,10552,"ide_methods.bas");}while(r);
S_51392:;
if ((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
if(qbevent){evnt(25769,10553,"ide_methods.bas");if(r)goto S_51392;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+64)));
if(!qbevent)break;evnt(25769,10553,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+68)));
if(!qbevent)break;evnt(25769,10553,"ide_methods.bas");}while(r);
}
}
fornext_continue_5949:;
}
fornext_exit_5949:;
do{
*_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS=*_FUNC_IDECALLSTACKBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(25769,10556,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,10560,"ide_methods.bas");}while(r);
do{
sub__printstring(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+((0+0)))+ 2 ,*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_UDT_P)+((0+4)))+ 1 ,qbs_new_txt_len("Most recent sub/function calls in your program:",47),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10560,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(25769,10565,"ide_methods.bas");}while(r);
S_51402:;
if ((*_FUNC_IDECALLSTACKBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(25769,10566,"ide_methods.bas");if(r)goto S_51402;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,10566,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_FUNC_IDECALLSTACKBOX_LONG_CY,*_FUNC_IDECALLSTACKBOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(25769,10566,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,10566,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(25769,10569,"ide_methods.bas");}while(r);
S_51408:;
do{
if(qbevent){evnt(25769,10570,"ide_methods.bas");if(r)goto S_51408;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(25769,10571,"ide_methods.bas");}while(r);
S_51410:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(25769,10572,"ide_methods.bas");if(r)goto S_51410;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10572,"ide_methods.bas");}while(r);
}
S_51413:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(25769,10573,"ide_methods.bas");if(r)goto S_51413;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10573,"ide_methods.bas");}while(r);
}
S_51416:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,10574,"ide_methods.bas");if(r)goto S_51416;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(25769,10574,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10574,"ide_methods.bas");}while(r);
}
S_51420:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(25769,10575,"ide_methods.bas");if(r)goto S_51420;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(25769,10575,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10575,"ide_methods.bas");}while(r);
}
S_51424:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(25769,10576,"ide_methods.bas");if(r)goto S_51424;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10576,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(25769,10577,"ide_methods.bas");}while(r);
S_51428:;
if ((-(*_FUNC_IDECALLSTACKBOX_LONG_ALT!=*_FUNC_IDECALLSTACKBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(25769,10577,"ide_methods.bas");if(r)goto S_51428;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,10577,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_OLDALT=*_FUNC_IDECALLSTACKBOX_LONG_ALT;
if(!qbevent)break;evnt(25769,10578,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(25769,10579,"ide_methods.bas");}while(r);
S_51433:;
dl_continue_5951:;
}while((!(*_FUNC_IDECALLSTACKBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_5951:;
if(qbevent){evnt(25769,10580,"ide_methods.bas");if(r)goto S_51433;}
S_51434:;
if ((*_FUNC_IDECALLSTACKBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,10581,"ide_methods.bas");if(r)goto S_51434;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(25769,10581,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(25769,10581,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10583,"ide_methods.bas");}while(r);
S_51440:;
if ((*_FUNC_IDECALLSTACKBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,10584,"ide_methods.bas");if(r)goto S_51440;}
S_51441:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,10585,"ide_methods.bas");if(r)goto S_51441;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10586,"ide_methods.bas");}while(r);
S_51443:;
if (((-(*_FUNC_IDECALLSTACKBOX_LONG_K>= 65 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(25769,10587,"ide_methods.bas");if(r)goto S_51443;}
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDECALLSTACKBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10587,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,10590,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(25769,10590,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,10590,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(25769,10594,"ide_methods.bas");}while(r);
S_51452:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,10595,"ide_methods.bas");if(r)goto S_51452;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10595,"ide_methods.bas");}while(r);
}
S_51455:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,10596,"ide_methods.bas");if(r)goto S_51455;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(25769,10596,"ide_methods.bas");}while(r);
}
S_51458:;
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()){
if(qbevent){evnt(25769,10597,"ide_methods.bas");if(r)goto S_51458;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(25769,10597,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_K,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10597,"ide_methods.bas");}while(r);
}
S_51462:;
if ((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,10598,"ide_methods.bas");if(r)goto S_51462;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUS=*_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(25769,10598,"ide_methods.bas");}while(r);
}
S_51465:;
if ((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS>*_FUNC_IDECALLSTACKBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(25769,10599,"ide_methods.bas");if(r)goto S_51465;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,10599,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,10600,"ide_methods.bas");}while(r);
S_51469:;
fornext_value5954= 1 ;
fornext_finalvalue5954= 100 ;
fornext_step5954= 1 ;
if (fornext_step5954<0) fornext_step_negative5954=1; else fornext_step_negative5954=0;
if (is_error_pending()) goto fornext_error5954;
goto fornext_entrylabel5954;
while(1){
fornext_value5954=fornext_step5954+(*_FUNC_IDECALLSTACKBOX_LONG_I);
fornext_entrylabel5954:
*_FUNC_IDECALLSTACKBOX_LONG_I=fornext_value5954;
if (fornext_step_negative5954){
if (fornext_value5954<fornext_finalvalue5954) break;
}else{
if (fornext_value5954>fornext_finalvalue5954) break;
}
fornext_error5954:;
if(qbevent){evnt(25769,10601,"ide_methods.bas");if(r)goto S_51469;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_T=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+36)));
if(!qbevent)break;evnt(25769,10602,"ide_methods.bas");}while(r);
S_51471:;
if ((*_FUNC_IDECALLSTACKBOX_LONG_T)||is_error_pending()){
if(qbevent){evnt(25769,10603,"ide_methods.bas");if(r)goto S_51471;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_FOCUSOFFSET=*_FUNC_IDECALLSTACKBOX_LONG_FOCUS-*_FUNC_IDECALLSTACKBOX_LONG_F;
if(!qbevent)break;evnt(25769,10604,"ide_methods.bas");}while(r);
do{
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDECALLSTACKBOX_LONG_I)-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDECALLSTACKBOX_LONG_FOCUS,_FUNC_IDECALLSTACKBOX_LONG_F,_FUNC_IDECALLSTACKBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDECALLSTACKBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN,_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDECALLSTACKBOX_LONG_INFO,__LONG_MWHEEL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10605,"ide_methods.bas");}while(r);
}
fornext_continue_5953:;
}
fornext_exit_5953:;
S_51476:;
if ((*__LONG_MCLICK&(-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,10610,"ide_methods.bas");if(r)goto S_51476;}
S_51477:;
if (((-(((double)(FUNC_TIMEELAPSEDSINCE(_FUNC_IDECALLSTACKBOX_DOUBLE_LASTCLICK)))<((double)( 0.3E+0 ))))&(-(*_FUNC_IDECALLSTACKBOX_LONG_CLICKEDITEM==*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+76))))))||is_error_pending()){
if(qbevent){evnt(25769,10611,"ide_methods.bas");if(r)goto S_51477;}
do{
goto LABEL_SETIDECY;
if(!qbevent)break;evnt(25769,10612,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_DOUBLE_LASTCLICK=func_timer( 0.001E+0 ,0|1);
if(!qbevent)break;evnt(25769,10614,"ide_methods.bas");}while(r);
S_51481:;
if ((-(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+76)))> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,10615,"ide_methods.bas");if(r)goto S_51481;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_CLICKEDITEM=*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+76)));
if(!qbevent)break;evnt(25769,10615,"ide_methods.bas");}while(r);
}
do{
goto dl_continue_5948;
if(!qbevent)break;evnt(25769,10616,"ide_methods.bas");}while(r);
}
S_51486:;
if ((qbs_cleanup(qbs_tmp_base,((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 1 ))&(qbs_equal(__STRING_K,func_chr( 13 ))))|((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 )))))||is_error_pending()){
if(qbevent){evnt(25769,10619,"ide_methods.bas");if(r)goto S_51486;}
LABEL_SETIDECY:;
if(qbevent){evnt(25769,10620,"ide_methods.bas");r=0;}
do{
*_FUNC_IDECALLSTACKBOX_LONG_Y=func_abs((int32)(*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+76)))));
if(!qbevent)break;evnt(25769,10621,"ide_methods.bas");}while(r);
S_51488:;
if (((-(*_FUNC_IDECALLSTACKBOX_LONG_Y>= 1 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_Y<=*__LONG_CALLSTACKLENGTH)))||is_error_pending()){
if(qbevent){evnt(25769,10622,"ide_methods.bas");if(r)goto S_51488;}
do{
qbs_set(_FUNC_IDECALLSTACKBOX_STRING_TEMP,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[4],_FUNC_IDECALLSTACKBOX_ARRAY_UDT_O[5]))*101+84))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10623,"ide_methods.bas");}while(r);
do{
*__LONG_IDEGOTOBOX_LASTLINENUM=qbr(qbs_val<long double>(func_mid(_FUNC_IDECALLSTACKBOX_STRING_TEMP,func__instrrev(NULL,_FUNC_IDECALLSTACKBOX_STRING_TEMP,qbs_new_txt_len(" ",1),0)+ 1 ,NULL,0)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10624,"ide_methods.bas");}while(r);
do{
*__LONG_IDECY=*__LONG_IDEGOTOBOX_LASTLINENUM;
if(!qbevent)break;evnt(25769,10625,"ide_methods.bas");}while(r);
do{
SUB_IDECENTERCURRENTLINE();
if(!qbevent)break;evnt(25769,10626,"ide_methods.bas");}while(r);
do{
*__LONG_IDESELECT= 0 ;
if(!qbevent)break;evnt(25769,10627,"ide_methods.bas");}while(r);
do{
SUB_CLEARMOUSE();
if(!qbevent)break;evnt(25769,10628,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,10629,"ide_methods.bas");}while(r);
}
}
S_51498:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,10633,"ide_methods.bas");if(r)goto S_51498;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,10634,"ide_methods.bas");}while(r);
}
S_51501:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,10637,"ide_methods.bas");if(r)goto S_51501;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,10638,"ide_methods.bas");}while(r);
}
S_51504:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDECALLSTACKBOX_LONG_FOCUS== 4 ))&(-(*_FUNC_IDECALLSTACKBOX_LONG_INFO!= 0 ))))|(((qbs_equal(qbs_ucase(__STRING_K),qbs_new_txt_len("C",1)))&(-(*__LONG_KCTRL!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,10641,"ide_methods.bas");if(r)goto S_51504;}
do{
sub__clipboard(FUNC_STRREPLACE(__STRING_CALLSTACKLIST,_FUNC_IDECALLSTACKBOX_STRING1_SEP,func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,10642,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDECALLSTACKBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(25769,10646,"ide_methods.bas");}while(r);
do{
*_FUNC_IDECALLSTACKBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(25769,10647,"ide_methods.bas");}while(r);
dl_continue_5948:;
}while(1);
dl_exit_5948:;
do{
*_FUNC_IDECALLSTACKBOX_LONG_IDECALLSTACKBOX= 0 ;
if(!qbevent)break;evnt(25769,10650,"ide_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free283.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;
return *_FUNC_IDECALLSTACKBOX_LONG_IDECALLSTACKBOX;
}
