qbs* FUNC_IDEINPUTBOX(qbs*_FUNC_IDEINPUTBOX_STRING_TITLE,qbs*_FUNC_IDEINPUTBOX_STRING_CAPTION,qbs*_FUNC_IDEINPUTBOX_STRING_INITIALVALUE,qbs*_FUNC_IDEINPUTBOX_STRING_VALIDINPUT,int32*_FUNC_IDEINPUTBOX_LONG_BOXWIDTH,int32*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH,int32*_FUNC_IDEINPUTBOX_LONG_OK){
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 "data304.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,12100,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(25769,12101,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,12102,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,12103,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,12104,"ide_methods.bas");}while(r);
do{
if (_FUNC_IDEINPUTBOX_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_IDEINPUTBOX_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_IDEINPUTBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
if(!qbevent)break;evnt(25769,12105,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(25769,12106,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING1_SEP,func_chr( 0 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12107,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(25769,12112,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_OK= 0 ;
if(!qbevent)break;evnt(25769,12113,"ide_methods.bas");}while(r);
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + ((0+0)) ),_FUNC_IDEINPUTBOX_LONG_BOXWIDTH,&(pass6135= 5 ),_FUNC_IDEINPUTBOX_STRING_TITLE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12115,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,12117,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS= 1 ;
if(!qbevent)break;evnt(25769,12118,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+36)))= 1 ;
if(!qbevent)break;evnt(25769,12119,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+24)))= 2 ;
if(!qbevent)break;evnt(25769,12120,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+40)))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_CAPTION);
if(!qbevent)break;evnt(25769,12121,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE);
if(!qbevent)break;evnt(25769,12122,"ide_methods.bas");}while(r);
S_53076:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,12123,"ide_methods.bas");if(r)goto S_53076;}
do{
*(int8*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+88)))= -1 ;
if(!qbevent)break;evnt(25769,12123,"ide_methods.bas");}while(r);
}
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+89)))= 0 ;
if(!qbevent)break;evnt(25769,12124,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+93)))=_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len;
if(!qbevent)break;evnt(25769,12125,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(25769,12127,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
if(!qbevent)break;evnt(25769,12128,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+24)))= 5 ;
if(!qbevent)break;evnt(25769,12129,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(qbs_add(qbs_add(qbs_new_txt_len("#OK",3),_FUNC_IDEINPUTBOX_STRING1_SEP),qbs_new_txt_len("#Cancel",7)));
if(!qbevent)break;evnt(25769,12130,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
if(!qbevent)break;evnt(25769,12131,"ide_methods.bas");}while(r);
S_53086:;
fornext_value6139= 1 ;
fornext_finalvalue6139= 100 ;
fornext_step6139= 1 ;
if (fornext_step6139<0) fornext_step_negative6139=1; else fornext_step_negative6139=0;
if (is_error_pending()) goto fornext_error6139;
goto fornext_entrylabel6139;
while(1){
fornext_value6139=fornext_step6139+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel6139:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value6139;
if (fornext_step_negative6139){
if (fornext_value6139<fornext_finalvalue6139) break;
}else{
if (fornext_value6139>fornext_finalvalue6139) break;
}
fornext_error6139:;
if(qbevent){evnt(25769,12135,"ide_methods.bas");if(r)goto S_53086;}
do{
memcpy(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+0))+ 0,((char*)_FUNC_IDEINPUTBOX_UDT_P)+((0+0))+ 0, 20);
if(!qbevent)break;evnt(25769,12135,"ide_methods.bas");}while(r);
fornext_continue_6138:;
}
fornext_exit_6138:;
S_53089:;
do{
if(qbevent){evnt(25769,12138,"ide_methods.bas");if(r)goto S_53089;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + ((0+0)) ));
if(!qbevent)break;evnt(25769,12142,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,12143,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(25769,12143,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(25769,12143,"ide_methods.bas");}while(r);
S_53094:;
fornext_value6142= 1 ;
fornext_finalvalue6142= 100 ;
fornext_step6142= 1 ;
if (fornext_step6142<0) fornext_step_negative6142=1; else fornext_step_negative6142=0;
if (is_error_pending()) goto fornext_error6142;
goto fornext_entrylabel6142;
while(1){
fornext_value6142=fornext_step6142+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel6142:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value6142;
if (fornext_step_negative6142){
if (fornext_value6142<fornext_finalvalue6142) break;
}else{
if (fornext_value6142>fornext_finalvalue6142) break;
}
fornext_error6142:;
if(qbevent){evnt(25769,12144,"ide_methods.bas");if(r)goto S_53094;}
S_53095:;
if ((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
if(qbevent){evnt(25769,12145,"ide_methods.bas");if(r)goto S_53095;}
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDEINPUTBOX_LONG_FOCUS-*_FUNC_IDEINPUTBOX_LONG_F;
if(!qbevent)break;evnt(25769,12148,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
if(!qbevent)break;evnt(25769,12149,"ide_methods.bas");}while(r);
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
if(!qbevent)break;evnt(25769,12149,"ide_methods.bas");}while(r);
do{
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEINPUTBOX_LONG_F);
if(!qbevent)break;evnt(25769,12150,"ide_methods.bas");}while(r);
S_53100:;
if ((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
if(qbevent){evnt(25769,12151,"ide_methods.bas");if(r)goto S_53100;}
do{
*_FUNC_IDEINPUTBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+64)));
if(!qbevent)break;evnt(25769,12151,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+68)));
if(!qbevent)break;evnt(25769,12151,"ide_methods.bas");}while(r);
}
}
fornext_continue_6141:;
}
fornext_exit_6141:;
do{
*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS=*_FUNC_IDEINPUTBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(25769,12154,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(25769,12161,"ide_methods.bas");}while(r);
S_53108:;
if ((*_FUNC_IDEINPUTBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(25769,12162,"ide_methods.bas");if(r)goto S_53108;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,12162,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(*_FUNC_IDEINPUTBOX_LONG_CY,*_FUNC_IDEINPUTBOX_LONG_CX, 1 ,NULL,NULL,7);
if(!qbevent)break;evnt(25769,12162,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,12162,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(25769,12165,"ide_methods.bas");}while(r);
S_53114:;
do{
if(qbevent){evnt(25769,12166,"ide_methods.bas");if(r)goto S_53114;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(25769,12167,"ide_methods.bas");}while(r);
S_53116:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(25769,12168,"ide_methods.bas");if(r)goto S_53116;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12168,"ide_methods.bas");}while(r);
}
S_53119:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(25769,12169,"ide_methods.bas");if(r)goto S_53119;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12169,"ide_methods.bas");}while(r);
}
S_53122:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(25769,12170,"ide_methods.bas");if(r)goto S_53122;}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(25769,12170,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12170,"ide_methods.bas");}while(r);
}
S_53126:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(25769,12171,"ide_methods.bas");if(r)goto S_53126;}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(25769,12171,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12171,"ide_methods.bas");}while(r);
}
S_53130:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(25769,12172,"ide_methods.bas");if(r)goto S_53130;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12172,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(25769,12173,"ide_methods.bas");}while(r);
S_53134:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_ALT!=*_FUNC_IDEINPUTBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(25769,12173,"ide_methods.bas");if(r)goto S_53134;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(25769,12173,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_OLDALT=*_FUNC_IDEINPUTBOX_LONG_ALT;
if(!qbevent)break;evnt(25769,12174,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(25769,12175,"ide_methods.bas");}while(r);
S_53139:;
dl_continue_6143:;
}while((!(*_FUNC_IDEINPUTBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_6143:;
if(qbevent){evnt(25769,12176,"ide_methods.bas");if(r)goto S_53139;}
S_53140:;
if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,12177,"ide_methods.bas");if(r)goto S_53140;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(25769,12177,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(25769,12177,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12179,"ide_methods.bas");}while(r);
S_53146:;
if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(25769,12180,"ide_methods.bas");if(r)goto S_53146;}
S_53147:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(25769,12181,"ide_methods.bas");if(r)goto S_53147;}
do{
*_FUNC_IDEINPUTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12182,"ide_methods.bas");}while(r);
S_53149:;
if (((-(*_FUNC_IDEINPUTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEINPUTBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(25769,12183,"ide_methods.bas");if(r)goto S_53149;}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEINPUTBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12183,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,12186,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(25769,12186,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(25769,12186,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(25769,12190,"ide_methods.bas");}while(r);
S_53158:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,12191,"ide_methods.bas");if(r)goto S_53158;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12191,"ide_methods.bas");}while(r);
}
S_53161:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,12192,"ide_methods.bas");if(r)goto S_53161;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(25769,12192,"ide_methods.bas");}while(r);
}
S_53164:;
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,12193,"ide_methods.bas");if(r)goto S_53164;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(25769,12193,"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,12193,"ide_methods.bas");}while(r);
}
S_53168:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,12194,"ide_methods.bas");if(r)goto S_53168;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(25769,12194,"ide_methods.bas");}while(r);
}
S_53171:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS>*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(25769,12195,"ide_methods.bas");if(r)goto S_53171;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(25769,12195,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(25769,12196,"ide_methods.bas");}while(r);
S_53175:;
fornext_value6146= 1 ;
fornext_finalvalue6146= 100 ;
fornext_step6146= 1 ;
if (fornext_step6146<0) fornext_step_negative6146=1; else fornext_step_negative6146=0;
if (is_error_pending()) goto fornext_error6146;
goto fornext_entrylabel6146;
while(1){
fornext_value6146=fornext_step6146+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel6146:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value6146;
if (fornext_step_negative6146){
if (fornext_value6146<fornext_finalvalue6146) break;
}else{
if (fornext_value6146>fornext_finalvalue6146) break;
}
fornext_error6146:;
if(qbevent){evnt(25769,12197,"ide_methods.bas");if(r)goto S_53175;}
do{
*_FUNC_IDEINPUTBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+36)));
if(!qbevent)break;evnt(25769,12198,"ide_methods.bas");}while(r);
S_53177:;
if ((*_FUNC_IDEINPUTBOX_LONG_T)||is_error_pending()){
if(qbevent){evnt(25769,12199,"ide_methods.bas");if(r)goto S_53177;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUSOFFSET=*_FUNC_IDEINPUTBOX_LONG_FOCUS-*_FUNC_IDEINPUTBOX_LONG_F;
if(!qbevent)break;evnt(25769,12200,"ide_methods.bas");}while(r);
do{
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEINPUTBOX_LONG_I)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEINPUTBOX_LONG_FOCUS,_FUNC_IDEINPUTBOX_LONG_F,_FUNC_IDEINPUTBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEINPUTBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN,_FUNC_IDEINPUTBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEINPUTBOX_LONG_INFO,__LONG_MWHEEL);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12201,"ide_methods.bas");}while(r);
}
fornext_continue_6145:;
}
fornext_exit_6145:;
S_53182:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS!=*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS))||is_error_pending()){
if(qbevent){evnt(25769,12207,"ide_methods.bas");if(r)goto S_53182;}
do{
*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS;
if(!qbevent)break;evnt(25769,12209,"ide_methods.bas");}while(r);
S_53184:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,12210,"ide_methods.bas");if(r)goto S_53184;}
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+93)))=((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])]))->len;
if(!qbevent)break;evnt(25769,12211,"ide_methods.bas");}while(r);
S_53186:;
if ((-(*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+93)))> 0 ))||is_error_pending()){
if(qbevent){evnt(25769,12212,"ide_methods.bas");if(r)goto S_53186;}
do{
*(int8*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+88)))= -1 ;
if(!qbevent)break;evnt(25769,12212,"ide_methods.bas");}while(r);
}
do{
*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEINPUTBOX_LONG_FOCUS)-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+89)))= 0 ;
if(!qbevent)break;evnt(25769,12213,"ide_methods.bas");}while(r);
}
}
S_53192:;
if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEINPUTBOX_STRING_VALIDINPUT->len))||is_error_pending()){
if(qbevent){evnt(25769,12217,"ide_methods.bas");if(r)goto S_53192;}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_A,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12218,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_TEMPA,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12219,"ide_methods.bas");}while(r);
S_53195:;
fornext_value6150= 1 ;
fornext_finalvalue6150=_FUNC_IDEINPUTBOX_STRING_A->len;
fornext_step6150= 1 ;
if (fornext_step6150<0) fornext_step_negative6150=1; else fornext_step_negative6150=0;
if (is_error_pending()) goto fornext_error6150;
goto fornext_entrylabel6150;
while(1){
fornext_value6150=fornext_step6150+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel6150:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value6150;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative6150){
if (fornext_value6150<fornext_finalvalue6150) break;
}else{
if (fornext_value6150>fornext_finalvalue6150) break;
}
fornext_error6150:;
if(qbevent){evnt(25769,12220,"ide_methods.bas");if(r)goto S_53195;}
S_53196:;
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_IDEINPUTBOX_STRING_VALIDINPUT,func_mid(_FUNC_IDEINPUTBOX_STRING_A,*_FUNC_IDEINPUTBOX_LONG_I, 1 ,0|1),0)> 0 )))||is_error_pending()){
if(qbevent){evnt(25769,12221,"ide_methods.bas");if(r)goto S_53196;}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_TEMPA,qbs_add(_FUNC_IDEINPUTBOX_STRING_TEMPA,func_mid(_FUNC_IDEINPUTBOX_STRING_A,*_FUNC_IDEINPUTBOX_LONG_I, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12222,"ide_methods.bas");}while(r);
}
fornext_continue_6149:;
}
fornext_exit_6149:;
do{
tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),_FUNC_IDEINPUTBOX_STRING_TEMPA);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12225,"ide_methods.bas");}while(r);
}
S_53202:;
if ((*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH)||is_error_pending()){
if(qbevent){evnt(25769,12228,"ide_methods.bas");if(r)goto S_53202;}
do{
tmp_long=array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5]);
if (!is_error_pending()) qbs_set( ((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[tmp_long])),qbs_left(((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])),*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12229,"ide_methods.bas");}while(r);
}
S_53205:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 27 )))|(((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 3 ))&(-(*_FUNC_IDEINPUTBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,12232,"ide_methods.bas");if(r)goto S_53205;}
do{
SUB_CLEARMOUSE();
if(!qbevent)break;evnt(25769,12233,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,12234,"ide_methods.bas");}while(r);
}
S_53209:;
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|(((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 2 ))&(-(*_FUNC_IDEINPUTBOX_LONG_INFO!= 0 ))))))||is_error_pending()){
if(qbevent){evnt(25769,12237,"ide_methods.bas");if(r)goto S_53209;}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_IDEINPUTBOX,((qbs*)(((uint64*)(__ARRAY_STRING_IDETXT[0]))[array_check((*(int32*)(((char*)_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0])+(((array_check(( 1 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4],_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]))*101+44))))-__ARRAY_STRING_IDETXT[4],__ARRAY_STRING_IDETXT[5])])));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,12238,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_OK= -1 ;
if(!qbevent)break;evnt(25769,12239,"ide_methods.bas");}while(r);
do{
SUB_CLEARMOUSE();
if(!qbevent)break;evnt(25769,12240,"ide_methods.bas");}while(r);
do{
sub__keyclear(NULL,0);
if(!qbevent)break;evnt(25769,12241,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,12242,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(25769,12246,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(25769,12247,"ide_methods.bas");}while(r);
dl_continue_6140:;
}while(1);
dl_exit_6140:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free304.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_IDEINPUTBOX_STRING_IDEINPUTBOX);return _FUNC_IDEINPUTBOX_STRING_IDEINPUTBOX;
}
