qbs* FUNC_IDEF1BOX(qbs*_FUNC_IDEF1BOX_STRING_LNKS,int32*_FUNC_IDEF1BOX_LONG_LNKS){
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 "data349.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(24235,19986,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(24235,19987,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,19988,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,19989,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,19990,"ide_methods.bas");}while(r);
do{

if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&2){
error(10);
}else{
if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&1){
if (!error_occurred) error(10);
}else{
_FUNC_IDEF1BOX_ARRAY_UDT_O[4]= 1 ;
_FUNC_IDEF1BOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEF1BOX_ARRAY_UDT_O[4]+1;
_FUNC_IDEF1BOX_ARRAY_UDT_O[6]=1;
if (_FUNC_IDEF1BOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*101);
memset((void*)(_FUNC_IDEF1BOX_ARRAY_UDT_O[0]),0,_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*101);
}else{
_FUNC_IDEF1BOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEF1BOX_ARRAY_UDT_O[5]*101,1);
if (!_FUNC_IDEF1BOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEF1BOX_ARRAY_UDT_O[2]|=1;
}
}
if(!qbevent)break;evnt(24235,19991,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,19992,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEF1BOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,19993,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_I= 0 ;
if(!qbevent)break;evnt(24235,20000,"ide_methods.bas");}while(r);
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) ),&(pass6725= 40 ),&(pass6726=*_FUNC_IDEF1BOX_LONG_LNKS+ 3 ),qbs_new_txt_len("Contextual help",15));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20001,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,20003,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20004,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20005,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20007,"ide_methods.bas");}while(r);
do{
*(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;
if(!qbevent)break;evnt(24235,20007,"ide_methods.bas");}while(r);
do{
*(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);
if(!qbevent)break;evnt(24235,20008,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20009,"ide_methods.bas");}while(r);
do{
*(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));
if(!qbevent)break;evnt(24235,20010,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_I=*_FUNC_IDEF1BOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,20012,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20013,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20014,"ide_methods.bas");}while(r);
do{
*(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));
if(!qbevent)break;evnt(24235,20015,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20016,"ide_methods.bas");}while(r);
S_60328:;
fornext_value6728= 1 ;
fornext_finalvalue6728= 100 ;
fornext_step6728= 1 ;
if (fornext_step6728<0) fornext_step_negative6728=1; else fornext_step_negative6728=0;
if (is_error_pending()) goto fornext_error6728;
goto fornext_entrylabel6728;
while(1){
fornext_value6728=fornext_step6728+(*_FUNC_IDEF1BOX_LONG_I);
fornext_entrylabel6728:
*_FUNC_IDEF1BOX_LONG_I=fornext_value6728;
if (fornext_step_negative6728){
if (fornext_value6728<fornext_finalvalue6728) break;
}else{
if (fornext_value6728>fornext_finalvalue6728) break;
}
fornext_error6728:;
if(qbevent){evnt(24235,20021,"ide_methods.bas");if(r)goto S_60328;}
do{
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,((char*)_FUNC_IDEF1BOX_UDT_P)+(0)+ 0, 20);
if(!qbevent)break;evnt(24235,20021,"ide_methods.bas");}while(r);
fornext_continue_6727:;
}
fornext_exit_6727:;
S_60331:;
do{
if(qbevent){evnt(24235,20024,"ide_methods.bas");if(r)goto S_60331;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEF1BOX_UDT_P)) + (0) ));
if(!qbevent)break;evnt(24235,20027,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,20028,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(24235,20028,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(24235,20028,"ide_methods.bas");}while(r);
S_60336:;
fornext_value6731= 1 ;
fornext_finalvalue6731= 100 ;
fornext_step6731= 1 ;
if (fornext_step6731<0) fornext_step_negative6731=1; else fornext_step_negative6731=0;
if (is_error_pending()) goto fornext_error6731;
goto fornext_entrylabel6731;
while(1){
fornext_value6731=fornext_step6731+(*_FUNC_IDEF1BOX_LONG_I);
fornext_entrylabel6731:
*_FUNC_IDEF1BOX_LONG_I=fornext_value6731;
if (fornext_step_negative6731){
if (fornext_value6731<fornext_finalvalue6731) break;
}else{
if (fornext_value6731>fornext_finalvalue6731) break;
}
fornext_error6731:;
if(qbevent){evnt(24235,20029,"ide_methods.bas");if(r)goto S_60336;}
S_60337:;
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()){
if(qbevent){evnt(24235,20030,"ide_methods.bas");if(r)goto S_60337;}
do{
*(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;
if(!qbevent)break;evnt(24235,20033,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20034,"ide_methods.bas");}while(r);
do{
*(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 ;
if(!qbevent)break;evnt(24235,20034,"ide_methods.bas");}while(r);
do{
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) ),_FUNC_IDEF1BOX_LONG_F);
if(!qbevent)break;evnt(24235,20035,"ide_methods.bas");}while(r);
S_60342:;
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()){
if(qbevent){evnt(24235,20036,"ide_methods.bas");if(r)goto S_60342;}
do{
*_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));
if(!qbevent)break;evnt(24235,20036,"ide_methods.bas");}while(r);
do{
*_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));
if(!qbevent)break;evnt(24235,20036,"ide_methods.bas");}while(r);
}
}
fornext_continue_6730:;
}
fornext_exit_6730:;
do{
*_FUNC_IDEF1BOX_LONG_LASTFOCUS=*_FUNC_IDEF1BOX_LONG_F- 1 ;
if(!qbevent)break;evnt(24235,20039,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(24235,20046,"ide_methods.bas");}while(r);
S_60350:;
if ((*_FUNC_IDEF1BOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(24235,20047,"ide_methods.bas");if(r)goto S_60350;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,20047,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_FUNC_IDEF1BOX_LONG_CY,*_FUNC_IDEF1BOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(24235,20047,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,20047,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(24235,20050,"ide_methods.bas");}while(r);
S_60356:;
do{
if(qbevent){evnt(24235,20051,"ide_methods.bas");if(r)goto S_60356;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(24235,20052,"ide_methods.bas");}while(r);
S_60358:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(24235,20053,"ide_methods.bas");if(r)goto S_60358;}
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20053,"ide_methods.bas");}while(r);
}
S_60361:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(24235,20054,"ide_methods.bas");if(r)goto S_60361;}
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20054,"ide_methods.bas");}while(r);
}
S_60364:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(24235,20055,"ide_methods.bas");if(r)goto S_60364;}
do{
*_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(24235,20055,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20055,"ide_methods.bas");}while(r);
}
S_60368:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(24235,20056,"ide_methods.bas");if(r)goto S_60368;}
do{
*_FUNC_IDEF1BOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(24235,20056,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20056,"ide_methods.bas");}while(r);
}
S_60372:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(24235,20057,"ide_methods.bas");if(r)goto S_60372;}
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20057,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEF1BOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(24235,20058,"ide_methods.bas");}while(r);
S_60376:;
if ((-(*_FUNC_IDEF1BOX_LONG_ALT!=*_FUNC_IDEF1BOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(24235,20058,"ide_methods.bas");if(r)goto S_60376;}
do{
*_FUNC_IDEF1BOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,20058,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEF1BOX_LONG_OLDALT=*_FUNC_IDEF1BOX_LONG_ALT;
if(!qbevent)break;evnt(24235,20059,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(24235,20060,"ide_methods.bas");}while(r);
S_60381:;
dl_continue_6732:;
}while((!(*_FUNC_IDEF1BOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_6732:;
if(qbevent){evnt(24235,20061,"ide_methods.bas");if(r)goto S_60381;}
S_60382:;
if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,20062,"ide_methods.bas");if(r)goto S_60382;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(24235,20062,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(24235,20062,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20064,"ide_methods.bas");}while(r);
S_60388:;
if ((*_FUNC_IDEF1BOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,20065,"ide_methods.bas");if(r)goto S_60388;}
S_60389:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(24235,20066,"ide_methods.bas");if(r)goto S_60389;}
do{
*_FUNC_IDEF1BOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20067,"ide_methods.bas");}while(r);
S_60391:;
if (((-(*_FUNC_IDEF1BOX_LONG_K>= 65 ))&(-(*_FUNC_IDEF1BOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(24235,20068,"ide_methods.bas");if(r)goto S_60391;}
do{
qbs_set(_FUNC_IDEF1BOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEF1BOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20068,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,20071,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(24235,20071,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,20071,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(24235,20075,"ide_methods.bas");}while(r);
S_60400:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24235,20076,"ide_methods.bas");if(r)goto S_60400;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20076,"ide_methods.bas");}while(r);
}
S_60403:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(24235,20077,"ide_methods.bas");if(r)goto S_60403;}
do{
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(24235,20077,"ide_methods.bas");}while(r);
}
S_60406:;
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(24235,20078,"ide_methods.bas");if(r)goto S_60406;}
do{
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(24235,20078,"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(24235,20078,"ide_methods.bas");}while(r);
}
S_60410:;
if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(24235,20079,"ide_methods.bas");if(r)goto S_60410;}
do{
*_FUNC_IDEF1BOX_LONG_FOCUS=*_FUNC_IDEF1BOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(24235,20079,"ide_methods.bas");}while(r);
}
S_60413:;
if ((-(*_FUNC_IDEF1BOX_LONG_FOCUS>*_FUNC_IDEF1BOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(24235,20080,"ide_methods.bas");if(r)goto S_60413;}
do{
*_FUNC_IDEF1BOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,20080,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEF1BOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,20081,"ide_methods.bas");}while(r);
S_60417:;
fornext_value6735= 1 ;
fornext_finalvalue6735= 100 ;
fornext_step6735= 1 ;
if (fornext_step6735<0) fornext_step_negative6735=1; else fornext_step_negative6735=0;
if (is_error_pending()) goto fornext_error6735;
goto fornext_entrylabel6735;
while(1){
fornext_value6735=fornext_step6735+(*_FUNC_IDEF1BOX_LONG_I);
fornext_entrylabel6735:
*_FUNC_IDEF1BOX_LONG_I=fornext_value6735;
if (fornext_step_negative6735){
if (fornext_value6735<fornext_finalvalue6735) break;
}else{
if (fornext_value6735>fornext_finalvalue6735) break;
}
fornext_error6735:;
if(qbevent){evnt(24235,20082,"ide_methods.bas");if(r)goto S_60417;}
do{
*_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));
if(!qbevent)break;evnt(24235,20083,"ide_methods.bas");}while(r);
S_60419:;
if ((*_FUNC_IDEF1BOX_LONG_T)||is_error_pending()){
if(qbevent){evnt(24235,20084,"ide_methods.bas");if(r)goto S_60419;}
do{
*_FUNC_IDEF1BOX_LONG_FOCUSOFFSET=*_FUNC_IDEF1BOX_LONG_FOCUS-*_FUNC_IDEF1BOX_LONG_F;
if(!qbevent)break;evnt(24235,20085,"ide_methods.bas");}while(r);
do{
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) ),_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);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20086,"ide_methods.bas");}while(r);
}
fornext_continue_6734:;
}
fornext_exit_6734:;
S_60424:;
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()){
if(qbevent){evnt(24235,20091,"ide_methods.bas");if(r)goto S_60424;}
do{
qbs_set(_FUNC_IDEF1BOX_STRING_F,((qbs*)(((uint64*)(__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])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20092,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,_FUNC_IDEF1BOX_STRING_F);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20093,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,20094,"ide_methods.bas");}while(r);
S_60428:;
}else{
if (qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 )))){
if(qbevent){evnt(24235,20095,"ide_methods.bas");if(r)goto S_60428;}
do{
qbs_set(_FUNC_IDEF1BOX_STRING_IDEF1BOX,qbs_new_txt_len("C",1));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20096,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,20097,"ide_methods.bas");}while(r);
}
}
do{
*_FUNC_IDEF1BOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(24235,20101,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEF1BOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(24235,20102,"ide_methods.bas");}while(r);
dl_continue_6729:;
}while(1);
dl_exit_6729:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free349.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;
qbs_maketmp(_FUNC_IDEF1BOX_STRING_IDEF1BOX);return _FUNC_IDEF1BOX_STRING_IDEF1BOX;
}
