int32 FUNC_IDETERMINALBOX(){
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 "data324.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,16297,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(24235,16298,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,16299,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,16300,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,16301,"ide_methods.bas");}while(r);
do{

if (_FUNC_IDETERMINALBOX_ARRAY_UDT_O[2]&2){
error(10);
}else{
if (_FUNC_IDETERMINALBOX_ARRAY_UDT_O[2]&1){
if (!error_occurred) error(10);
}else{
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4]= 1 ;
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4]+1;
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[6]=1;
if (_FUNC_IDETERMINALBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]*101);
memset((void*)(_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0]),0,_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]*101);
}else{
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]*101,1);
if (!_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDETERMINALBOX_ARRAY_UDT_O[2]|=1;
}
}
if(!qbevent)break;evnt(24235,16302,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,16303,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDETERMINALBOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16304,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(24235,16308,"ide_methods.bas");}while(r);
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDETERMINALBOX_UDT_P)) + (0) ),&(pass6342= 60 ),&(pass6343= 7 ),qbs_new_txt_len("Default Terminal",16));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16309,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_I=*_FUNC_IDETERMINALBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,16311,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_DTTBOX=*_FUNC_IDETERMINALBOX_LONG_I;
if(!qbevent)break;evnt(24235,16311,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+36))= 1 ;
if(!qbevent)break;evnt(24235,16312,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+24))= 2 ;
if(!qbevent)break;evnt(24235,16313,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+40))=FUNC_IDENEWTXT(qbs_new_txt_len("Terminal Command",16));
if(!qbevent)break;evnt(24235,16314,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDETERMINALBOX_STRING_A2,__STRING_DEFAULTTERMINAL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16314,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+44))=FUNC_IDENEWTXT(_FUNC_IDETERMINALBOX_STRING_A2);
if(!qbevent)break;evnt(24235,16315,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+93))=_FUNC_IDETERMINALBOX_STRING_A2->len;
if(!qbevent)break;evnt(24235,16315,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_I=*_FUNC_IDETERMINALBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,16317,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_OKBUT=*_FUNC_IDETERMINALBOX_LONG_I;
if(!qbevent)break;evnt(24235,16317,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CABUT=*_FUNC_IDETERMINALBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,16317,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+36))= 3 ;
if(!qbevent)break;evnt(24235,16318,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+24))= 7 ;
if(!qbevent)break;evnt(24235,16319,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+44))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDETERMINALBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7)));
if(!qbevent)break;evnt(24235,16320,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+60))= 1 ;
if(!qbevent)break;evnt(24235,16320,"ide_methods.bas");}while(r);
S_56067:;
fornext_value6346= 1 ;
fornext_finalvalue6346= 100 ;
fornext_step6346= 1 ;
if (fornext_step6346<0) fornext_step_negative6346=1; else fornext_step_negative6346=0;
if (is_error_pending()) goto fornext_error6346;
goto fornext_entrylabel6346;
while(1){
fornext_value6346=fornext_step6346+(*_FUNC_IDETERMINALBOX_LONG_I);
fornext_entrylabel6346:
*_FUNC_IDETERMINALBOX_LONG_I=fornext_value6346;
if (fornext_step_negative6346){
if (fornext_value6346<fornext_finalvalue6346) break;
}else{
if (fornext_value6346>fornext_finalvalue6346) break;
}
fornext_error6346:;
if(qbevent){evnt(24235,16324,"ide_methods.bas");if(r)goto S_56067;}
do{
memcpy(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101)+ 0,((char*)_FUNC_IDETERMINALBOX_UDT_P)+(0)+ 0, 20);
if(!qbevent)break;evnt(24235,16324,"ide_methods.bas");}while(r);
fornext_continue_6345:;
}
fornext_exit_6345:;
S_56070:;
do{
if(qbevent){evnt(24235,16330,"ide_methods.bas");if(r)goto S_56070;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDETERMINALBOX_UDT_P)) + (0) ));
if(!qbevent)break;evnt(24235,16333,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,16334,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(24235,16334,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(24235,16334,"ide_methods.bas");}while(r);
S_56075:;
fornext_value6349= 1 ;
fornext_finalvalue6349= 100 ;
fornext_step6349= 1 ;
if (fornext_step6349<0) fornext_step_negative6349=1; else fornext_step_negative6349=0;
if (is_error_pending()) goto fornext_error6349;
goto fornext_entrylabel6349;
while(1){
fornext_value6349=fornext_step6349+(*_FUNC_IDETERMINALBOX_LONG_I);
fornext_entrylabel6349:
*_FUNC_IDETERMINALBOX_LONG_I=fornext_value6349;
if (fornext_step_negative6349){
if (fornext_value6349<fornext_finalvalue6349) break;
}else{
if (fornext_value6349>fornext_finalvalue6349) break;
}
fornext_error6349:;
if(qbevent){evnt(24235,16335,"ide_methods.bas");if(r)goto S_56075;}
S_56076:;
if ((*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+36)))||is_error_pending()){
if(qbevent){evnt(24235,16336,"ide_methods.bas");if(r)goto S_56076;}
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+72))=*_FUNC_IDETERMINALBOX_LONG_FOCUS-*_FUNC_IDETERMINALBOX_LONG_F;
if(!qbevent)break;evnt(24235,16338,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+64))= 0 ;
if(!qbevent)break;evnt(24235,16339,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+68))= 0 ;
if(!qbevent)break;evnt(24235,16339,"ide_methods.bas");}while(r);
S_56080:;
if ((-((-(*_FUNC_IDETERMINALBOX_LONG_I==*_FUNC_IDETERMINALBOX_LONG_FOCUS))&&(-(*_FUNC_IDETERMINALBOX_LONG_FOCUS!=*_FUNC_IDETERMINALBOX_LONG_OLDFOCUS))))||is_error_pending()){
if(qbevent){evnt(24235,16340,"ide_methods.bas");if(r)goto S_56080;}
do{
*_FUNC_IDETERMINALBOX_LONG_OLDFOCUS=*_FUNC_IDETERMINALBOX_LONG_FOCUS;
if(!qbevent)break;evnt(24235,16341,"ide_methods.bas");}while(r);
S_56082:;
if ((-(*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+36))== 1 ))||is_error_pending()){
if(qbevent){evnt(24235,16342,"ide_methods.bas");if(r)goto S_56082;}
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+93))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len;
if(!qbevent)break;evnt(24235,16344,"ide_methods.bas");}while(r);
S_56084:;
if ((-(*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+93))> 0 ))||is_error_pending()){
if(qbevent){evnt(24235,16345,"ide_methods.bas");if(r)goto S_56084;}
do{
*(int8*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+88))= -1 ;
if(!qbevent)break;evnt(24235,16345,"ide_methods.bas");}while(r);
}else{
do{
*(int8*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+88))= 0 ;
if(!qbevent)break;evnt(24235,16345,"ide_methods.bas");}while(r);
}
do{
*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_FOCUS)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+89))= 0 ;
if(!qbevent)break;evnt(24235,16346,"ide_methods.bas");}while(r);
}
}
do{
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101) ),_FUNC_IDETERMINALBOX_LONG_F);
if(!qbevent)break;evnt(24235,16349,"ide_methods.bas");}while(r);
S_56093:;
if ((*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+64)))||is_error_pending()){
if(qbevent){evnt(24235,16350,"ide_methods.bas");if(r)goto S_56093;}
do{
*_FUNC_IDETERMINALBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+64));
if(!qbevent)break;evnt(24235,16350,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+68));
if(!qbevent)break;evnt(24235,16350,"ide_methods.bas");}while(r);
}
}
fornext_continue_6348:;
}
fornext_exit_6348:;
do{
*_FUNC_IDETERMINALBOX_LONG_LASTFOCUS=*_FUNC_IDETERMINALBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(24235,16353,"ide_methods.bas");}while(r);
do{
sub__printstring(*(int32*)(((char*)_FUNC_IDETERMINALBOX_UDT_P)+(0))+ 3 ,*(int32*)(((char*)_FUNC_IDETERMINALBOX_UDT_P)+(4))+ 4 ,qbs_new_txt_len("Placeholder $$ will be replaced with the executable name.",57),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16357,"ide_methods.bas");}while(r);
do{
sub__printstring(*(int32*)(((char*)_FUNC_IDETERMINALBOX_UDT_P)+(0))+ 3 ,*(int32*)(((char*)_FUNC_IDETERMINALBOX_UDT_P)+(4))+ 5 ,qbs_new_txt_len("Placeholder $@ will be replaced with the COMMAND$ string.",57),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16358,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(24235,16362,"ide_methods.bas");}while(r);
S_56103:;
if ((*_FUNC_IDETERMINALBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(24235,16363,"ide_methods.bas");if(r)goto S_56103;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,16363,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_FUNC_IDETERMINALBOX_LONG_CY,*_FUNC_IDETERMINALBOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(24235,16363,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,16363,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(24235,16366,"ide_methods.bas");}while(r);
S_56109:;
do{
if(qbevent){evnt(24235,16367,"ide_methods.bas");if(r)goto S_56109;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(24235,16368,"ide_methods.bas");}while(r);
S_56111:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(24235,16369,"ide_methods.bas");if(r)goto S_56111;}
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16369,"ide_methods.bas");}while(r);
}
S_56114:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(24235,16370,"ide_methods.bas");if(r)goto S_56114;}
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16370,"ide_methods.bas");}while(r);
}
S_56117:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(24235,16371,"ide_methods.bas");if(r)goto S_56117;}
do{
*_FUNC_IDETERMINALBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(24235,16371,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16371,"ide_methods.bas");}while(r);
}
S_56121:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(24235,16372,"ide_methods.bas");if(r)goto S_56121;}
do{
*_FUNC_IDETERMINALBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(24235,16372,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16372,"ide_methods.bas");}while(r);
}
S_56125:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(24235,16373,"ide_methods.bas");if(r)goto S_56125;}
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16373,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(24235,16374,"ide_methods.bas");}while(r);
S_56129:;
if ((-(*_FUNC_IDETERMINALBOX_LONG_ALT!=*_FUNC_IDETERMINALBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(24235,16374,"ide_methods.bas");if(r)goto S_56129;}
do{
*_FUNC_IDETERMINALBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,16374,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_LONG_OLDALT=*_FUNC_IDETERMINALBOX_LONG_ALT;
if(!qbevent)break;evnt(24235,16375,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(24235,16376,"ide_methods.bas");}while(r);
S_56134:;
dl_continue_6351:;
}while((!(*_FUNC_IDETERMINALBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_6351:;
if(qbevent){evnt(24235,16377,"ide_methods.bas");if(r)goto S_56134;}
S_56135:;
if ((*_FUNC_IDETERMINALBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,16378,"ide_methods.bas");if(r)goto S_56135;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(24235,16378,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(24235,16378,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDETERMINALBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16380,"ide_methods.bas");}while(r);
S_56141:;
if ((*_FUNC_IDETERMINALBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,16381,"ide_methods.bas");if(r)goto S_56141;}
S_56142:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(24235,16382,"ide_methods.bas");if(r)goto S_56142;}
do{
*_FUNC_IDETERMINALBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16383,"ide_methods.bas");}while(r);
S_56144:;
if (((-(*_FUNC_IDETERMINALBOX_LONG_K>= 65 ))&(-(*_FUNC_IDETERMINALBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(24235,16384,"ide_methods.bas");if(r)goto S_56144;}
do{
qbs_set(_FUNC_IDETERMINALBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDETERMINALBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16384,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,16387,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(24235,16387,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,16387,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(24235,16391,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_INVDATA= 0 ;
if(!qbevent)break;evnt(24235,16391,"ide_methods.bas");}while(r);
S_56154:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24235,16392,"ide_methods.bas");if(r)goto S_56154;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16392,"ide_methods.bas");}while(r);
}
S_56157:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(24235,16393,"ide_methods.bas");if(r)goto S_56157;}
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUS=*_FUNC_IDETERMINALBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(24235,16393,"ide_methods.bas");}while(r);
}
S_56160:;
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,16394,"ide_methods.bas");if(r)goto S_56160;}
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUS=*_FUNC_IDETERMINALBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(24235,16394,"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,16394,"ide_methods.bas");}while(r);
}
S_56164:;
if ((-(*_FUNC_IDETERMINALBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(24235,16395,"ide_methods.bas");if(r)goto S_56164;}
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUS=*_FUNC_IDETERMINALBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(24235,16395,"ide_methods.bas");}while(r);
}
S_56167:;
if ((-(*_FUNC_IDETERMINALBOX_LONG_FOCUS>*_FUNC_IDETERMINALBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(24235,16396,"ide_methods.bas");if(r)goto S_56167;}
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,16396,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,16397,"ide_methods.bas");}while(r);
S_56171:;
fornext_value6354= 1 ;
fornext_finalvalue6354= 100 ;
fornext_step6354= 1 ;
if (fornext_step6354<0) fornext_step_negative6354=1; else fornext_step_negative6354=0;
if (is_error_pending()) goto fornext_error6354;
goto fornext_entrylabel6354;
while(1){
fornext_value6354=fornext_step6354+(*_FUNC_IDETERMINALBOX_LONG_I);
fornext_entrylabel6354:
*_FUNC_IDETERMINALBOX_LONG_I=fornext_value6354;
if (fornext_step_negative6354){
if (fornext_value6354<fornext_finalvalue6354) break;
}else{
if (fornext_value6354>fornext_finalvalue6354) break;
}
fornext_error6354:;
if(qbevent){evnt(24235,16398,"ide_methods.bas");if(r)goto S_56171;}
S_56172:;
if ((*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+36)))||is_error_pending()){
if(qbevent){evnt(24235,16399,"ide_methods.bas");if(r)goto S_56172;}
do{
*_FUNC_IDETERMINALBOX_LONG_FOCUSOFFSET=*_FUNC_IDETERMINALBOX_LONG_FOCUS-*_FUNC_IDETERMINALBOX_LONG_F;
if(!qbevent)break;evnt(24235,16400,"ide_methods.bas");}while(r);
do{
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])) + ((array_check((*_FUNC_IDETERMINALBOX_LONG_I)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101) ),_FUNC_IDETERMINALBOX_LONG_FOCUS,_FUNC_IDETERMINALBOX_LONG_F,_FUNC_IDETERMINALBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDETERMINALBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDETERMINALBOX_LONG_MOUSEDOWN,_FUNC_IDETERMINALBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDETERMINALBOX_LONG_INFO,__LONG_MWHEEL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16401,"ide_methods.bas");}while(r);
}
fornext_continue_6353:;
}
fornext_exit_6353:;
S_56177:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDETERMINALBOX_LONG_FOCUS==*_FUNC_IDETERMINALBOX_LONG_CABUT))&(-(*_FUNC_IDETERMINALBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(24235,16408,"ide_methods.bas");if(r)goto S_56177;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,16408,"ide_methods.bas");}while(r);
}
S_56180:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDETERMINALBOX_LONG_FOCUS==*_FUNC_IDETERMINALBOX_LONG_OKBUT))&(-(*_FUNC_IDETERMINALBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(24235,16409,"ide_methods.bas");if(r)goto S_56180;}
S_56181:;
if ((*_FUNC_IDETERMINALBOX_LONG_INVDATA)||is_error_pending()){
if(qbevent){evnt(24235,16411,"ide_methods.bas");if(r)goto S_56181;}
do{
*_FUNC_IDETERMINALBOX_LONG_RETVAL=FUNC_IDEMESSAGEBOX(qbs_new_txt_len("Warning",7),qbs_new_txt_len("Confirmation has been blocked due to invalid settings.\\nPlease check your inputs, look for highlighted boxes.",109),qbs_new_txt_len("#OK",3));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16412,"ide_methods.bas");}while(r);
do{
sub_pcopy( 2 , 1 );
if(!qbevent)break;evnt(24235,16413,"ide_methods.bas");}while(r);
do{
goto dl_continue_6347;
if(!qbevent)break;evnt(24235,16413,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_INTEGER_OPTCHG= 0ll ;
if(!qbevent)break;evnt(24235,16416,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDETERMINALBOX_STRING_V,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDETERMINALBOX_ARRAY_UDT_O[0])+((array_check((*_FUNC_IDETERMINALBOX_LONG_DTTBOX)-_FUNC_IDETERMINALBOX_ARRAY_UDT_O[4],_FUNC_IDETERMINALBOX_ARRAY_UDT_O[5]))*101+44)))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16419,"ide_methods.bas");}while(r);
S_56188:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_DEFAULTTERMINAL,_FUNC_IDETERMINALBOX_STRING_V)))||is_error_pending()){
if(qbevent){evnt(24235,16420,"ide_methods.bas");if(r)goto S_56188;}
do{
qbs_set(__STRING_DEFAULTTERMINAL,_FUNC_IDETERMINALBOX_STRING_V);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16420,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_INTEGER_OPTCHG= -1ll ;
if(!qbevent)break;evnt(24235,16420,"ide_methods.bas");}while(r);
}
S_56192:;
if ((*_FUNC_IDETERMINALBOX_INTEGER_OPTCHG)||is_error_pending()){
if(qbevent){evnt(24235,16422,"ide_methods.bas");if(r)goto S_56192;}
do{
SUB_WRITECONFIGSETTING(__STRING_GENERALSETTINGSSECTION,qbs_new_txt_len("DefaultTerminal",15),__STRING_DEFAULTTERMINAL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,16424,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_IDETERMINALBOX= 1 ;
if(!qbevent)break;evnt(24235,16426,"ide_methods.bas");}while(r);
}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,16428,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDETERMINALBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(24235,16432,"ide_methods.bas");}while(r);
do{
*_FUNC_IDETERMINALBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(24235,16433,"ide_methods.bas");}while(r);
dl_continue_6347:;
}while(1);
dl_exit_6347:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free324.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_IDETERMINALBOX_LONG_IDETERMINALBOX;
}
