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 "data293.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,12099,"ide_methods.bas");}while(r);
do{
sub_pcopy( 0 , 1 );
if(!qbevent)break;evnt(24235,12100,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,12101,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,12102,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,12103,"ide_methods.bas");}while(r);
do{

if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&2){
error(10);
}else{
if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&1){
if (!error_occurred) error(10);
}else{
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4]= 1 ;
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]=( 100 )-_FUNC_IDEINPUTBOX_ARRAY_UDT_O[4]+1;
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[6]=1;
if (_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*101);
memset((void*)(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]),0,_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*101);
}else{
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]=(ptrszint)calloc(_FUNC_IDEINPUTBOX_ARRAY_UDT_O[5]*101,1);
if (!_FUNC_IDEINPUTBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEINPUTBOX_ARRAY_UDT_O[2]|=1;
}
}
if(!qbevent)break;evnt(24235,12104,"ide_methods.bas");}while(r);
do{
if(!qbevent)break;evnt(24235,12105,"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(24235,12106,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I= 0 ;
if(!qbevent)break;evnt(24235,12111,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_OK= 0 ;
if(!qbevent)break;evnt(24235,12112,"ide_methods.bas");}while(r);
do{
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + (0) ),_FUNC_IDEINPUTBOX_LONG_BOXWIDTH,&(pass5867= 5 ),_FUNC_IDEINPUTBOX_STRING_TITLE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,12114,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,12116,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS= 1 ;
if(!qbevent)break;evnt(24235,12117,"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(24235,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+24))= 2 ;
if(!qbevent)break;evnt(24235,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+40))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_CAPTION);
if(!qbevent)break;evnt(24235,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+44))=FUNC_IDENEWTXT(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE);
if(!qbevent)break;evnt(24235,12121,"ide_methods.bas");}while(r);
S_51411:;
if ((qbs_cleanup(qbs_tmp_base,-(_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len> 0 )))||is_error_pending()){
if(qbevent){evnt(24235,12122,"ide_methods.bas");if(r)goto S_51411;}
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(24235,12122,"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(24235,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+93))=_FUNC_IDEINPUTBOX_STRING_INITIALVALUE->len;
if(!qbevent)break;evnt(24235,12124,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_I=*_FUNC_IDEINPUTBOX_LONG_I+ 1 ;
if(!qbevent)break;evnt(24235,12126,"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(24235,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+24))= 5 ;
if(!qbevent)break;evnt(24235,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+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(24235,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+60))= 1 ;
if(!qbevent)break;evnt(24235,12130,"ide_methods.bas");}while(r);
S_51421:;
fornext_value5871= 1 ;
fornext_finalvalue5871= 100 ;
fornext_step5871= 1 ;
if (fornext_step5871<0) fornext_step_negative5871=1; else fornext_step_negative5871=0;
if (is_error_pending()) goto fornext_error5871;
goto fornext_entrylabel5871;
while(1){
fornext_value5871=fornext_step5871+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel5871:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value5871;
if (fornext_step_negative5871){
if (fornext_value5871<fornext_finalvalue5871) break;
}else{
if (fornext_value5871>fornext_finalvalue5871) break;
}
fornext_error5871:;
if(qbevent){evnt(24235,12134,"ide_methods.bas");if(r)goto S_51421;}
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,((char*)_FUNC_IDEINPUTBOX_UDT_P)+(0)+ 0, 20);
if(!qbevent)break;evnt(24235,12134,"ide_methods.bas");}while(r);
fornext_continue_5870:;
}
fornext_exit_5870:;
S_51424:;
do{
if(qbevent){evnt(24235,12137,"ide_methods.bas");if(r)goto S_51424;}
do{
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEINPUTBOX_UDT_P)) + (0) ));
if(!qbevent)break;evnt(24235,12141,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,12142,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CX= 0 ;
if(!qbevent)break;evnt(24235,12142,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CY= 0 ;
if(!qbevent)break;evnt(24235,12142,"ide_methods.bas");}while(r);
S_51429:;
fornext_value5874= 1 ;
fornext_finalvalue5874= 100 ;
fornext_step5874= 1 ;
if (fornext_step5874<0) fornext_step_negative5874=1; else fornext_step_negative5874=0;
if (is_error_pending()) goto fornext_error5874;
goto fornext_entrylabel5874;
while(1){
fornext_value5874=fornext_step5874+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel5874:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value5874;
if (fornext_step_negative5874){
if (fornext_value5874<fornext_finalvalue5874) break;
}else{
if (fornext_value5874>fornext_finalvalue5874) break;
}
fornext_error5874:;
if(qbevent){evnt(24235,12143,"ide_methods.bas");if(r)goto S_51429;}
S_51430:;
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(24235,12144,"ide_methods.bas");if(r)goto S_51430;}
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(24235,12147,"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(24235,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+68))= 0 ;
if(!qbevent)break;evnt(24235,12148,"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) ),_FUNC_IDEINPUTBOX_LONG_F);
if(!qbevent)break;evnt(24235,12149,"ide_methods.bas");}while(r);
S_51435:;
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(24235,12150,"ide_methods.bas");if(r)goto S_51435;}
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(24235,12150,"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(24235,12150,"ide_methods.bas");}while(r);
}
}
fornext_continue_5873:;
}
fornext_exit_5873:;
do{
*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS=*_FUNC_IDEINPUTBOX_LONG_F- 1 ;
if(!qbevent)break;evnt(24235,12153,"ide_methods.bas");}while(r);
do{
sub_pcopy( 1 , 0 );
if(!qbevent)break;evnt(24235,12160,"ide_methods.bas");}while(r);
S_51443:;
if ((*_FUNC_IDEINPUTBOX_LONG_CX)||is_error_pending()){
if(qbevent){evnt(24235,12161,"ide_methods.bas");if(r)goto S_51443;}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,12161,"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(24235,12161,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,12161,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 0 ;
if(!qbevent)break;evnt(24235,12164,"ide_methods.bas");}while(r);
S_51449:;
do{
if(qbevent){evnt(24235,12165,"ide_methods.bas");if(r)goto S_51449;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(24235,12166,"ide_methods.bas");}while(r);
S_51451:;
if ((*__LONG_MWHEEL)||is_error_pending()){
if(qbevent){evnt(24235,12167,"ide_methods.bas");if(r)goto S_51451;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12167,"ide_methods.bas");}while(r);
}
S_51454:;
if ((*__LONG_KB)||is_error_pending()){
if(qbevent){evnt(24235,12168,"ide_methods.bas");if(r)goto S_51454;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12168,"ide_methods.bas");}while(r);
}
S_51457:;
if ((*__LONG_MCLICK)||is_error_pending()){
if(qbevent){evnt(24235,12169,"ide_methods.bas");if(r)goto S_51457;}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 1 ;
if(!qbevent)break;evnt(24235,12169,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12169,"ide_methods.bas");}while(r);
}
S_51461:;
if ((*__LONG_MRELEASE)||is_error_pending()){
if(qbevent){evnt(24235,12170,"ide_methods.bas");if(r)goto S_51461;}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 1 ;
if(!qbevent)break;evnt(24235,12170,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12170,"ide_methods.bas");}while(r);
}
S_51465:;
if ((*__LONG_MB)||is_error_pending()){
if(qbevent){evnt(24235,12171,"ide_methods.bas");if(r)goto S_51465;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12171,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_ALT=*__LONG_KALT;
if(!qbevent)break;evnt(24235,12172,"ide_methods.bas");}while(r);
S_51469:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_ALT!=*_FUNC_IDEINPUTBOX_LONG_OLDALT))||is_error_pending()){
if(qbevent){evnt(24235,12172,"ide_methods.bas");if(r)goto S_51469;}
do{
*_FUNC_IDEINPUTBOX_LONG_CHANGE= 1 ;
if(!qbevent)break;evnt(24235,12172,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_OLDALT=*_FUNC_IDEINPUTBOX_LONG_ALT;
if(!qbevent)break;evnt(24235,12173,"ide_methods.bas");}while(r);
do{
sub__limit( 100 );
if(!qbevent)break;evnt(24235,12174,"ide_methods.bas");}while(r);
S_51474:;
dl_continue_5875:;
}while((!(*_FUNC_IDEINPUTBOX_LONG_CHANGE))&&(!is_error_pending()));
dl_exit_5875:;
if(qbevent){evnt(24235,12175,"ide_methods.bas");if(r)goto S_51474;}
S_51475:;
if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,12176,"ide_methods.bas");if(r)goto S_51475;}
do{
*__LONG_IDEHL= 1 ;
if(!qbevent)break;evnt(24235,12176,"ide_methods.bas");}while(r);
}else{
do{
*__LONG_IDEHL= 0 ;
if(!qbevent)break;evnt(24235,12176,"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(24235,12178,"ide_methods.bas");}while(r);
S_51481:;
if ((*_FUNC_IDEINPUTBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
if(qbevent){evnt(24235,12179,"ide_methods.bas");if(r)goto S_51481;}
S_51482:;
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
if(qbevent){evnt(24235,12180,"ide_methods.bas");if(r)goto S_51482;}
do{
*_FUNC_IDEINPUTBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,12181,"ide_methods.bas");}while(r);
S_51484:;
if (((-(*_FUNC_IDEINPUTBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEINPUTBOX_LONG_K<= 90 )))||is_error_pending()){
if(qbevent){evnt(24235,12182,"ide_methods.bas");if(r)goto S_51484;}
do{
qbs_set(_FUNC_IDEINPUTBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEINPUTBOX_LONG_K));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,12182,"ide_methods.bas");}while(r);
}
}
}
do{
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,12185,"ide_methods.bas");}while(r);
do{
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
if(!qbevent)break;evnt(24235,12185,"ide_methods.bas");}while(r);
do{
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
if(!qbevent)break;evnt(24235,12185,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_INFO= 0 ;
if(!qbevent)break;evnt(24235,12189,"ide_methods.bas");}while(r);
S_51493:;
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(24235,12190,"ide_methods.bas");if(r)goto S_51493;}
do{
qbs_set(__STRING_K,func_chr( 255 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,12190,"ide_methods.bas");}while(r);
}
S_51496:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
if(qbevent){evnt(24235,12191,"ide_methods.bas");if(r)goto S_51496;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS+ 1 ;
if(!qbevent)break;evnt(24235,12191,"ide_methods.bas");}while(r);
}
S_51499:;
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,12192,"ide_methods.bas");if(r)goto S_51499;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS- 1 ;
if(!qbevent)break;evnt(24235,12192,"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,12192,"ide_methods.bas");}while(r);
}
S_51503:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS< 1 ))||is_error_pending()){
if(qbevent){evnt(24235,12193,"ide_methods.bas");if(r)goto S_51503;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS=*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS;
if(!qbevent)break;evnt(24235,12193,"ide_methods.bas");}while(r);
}
S_51506:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS>*_FUNC_IDEINPUTBOX_LONG_LASTFOCUS))||is_error_pending()){
if(qbevent){evnt(24235,12194,"ide_methods.bas");if(r)goto S_51506;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUS= 1 ;
if(!qbevent)break;evnt(24235,12194,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_F= 1 ;
if(!qbevent)break;evnt(24235,12195,"ide_methods.bas");}while(r);
S_51510:;
fornext_value5878= 1 ;
fornext_finalvalue5878= 100 ;
fornext_step5878= 1 ;
if (fornext_step5878<0) fornext_step_negative5878=1; else fornext_step_negative5878=0;
if (is_error_pending()) goto fornext_error5878;
goto fornext_entrylabel5878;
while(1){
fornext_value5878=fornext_step5878+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel5878:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value5878;
if (fornext_step_negative5878){
if (fornext_value5878<fornext_finalvalue5878) break;
}else{
if (fornext_value5878>fornext_finalvalue5878) break;
}
fornext_error5878:;
if(qbevent){evnt(24235,12196,"ide_methods.bas");if(r)goto S_51510;}
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(24235,12197,"ide_methods.bas");}while(r);
S_51512:;
if ((*_FUNC_IDEINPUTBOX_LONG_T)||is_error_pending()){
if(qbevent){evnt(24235,12198,"ide_methods.bas");if(r)goto S_51512;}
do{
*_FUNC_IDEINPUTBOX_LONG_FOCUSOFFSET=*_FUNC_IDEINPUTBOX_LONG_FOCUS-*_FUNC_IDEINPUTBOX_LONG_F;
if(!qbevent)break;evnt(24235,12199,"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) ),_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(24235,12200,"ide_methods.bas");}while(r);
}
fornext_continue_5877:;
}
fornext_exit_5877:;
S_51517:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS!=*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS))||is_error_pending()){
if(qbevent){evnt(24235,12206,"ide_methods.bas");if(r)goto S_51517;}
do{
*_FUNC_IDEINPUTBOX_LONG_PREVFOCUS=*_FUNC_IDEINPUTBOX_LONG_FOCUS;
if(!qbevent)break;evnt(24235,12208,"ide_methods.bas");}while(r);
S_51519:;
if ((-(*_FUNC_IDEINPUTBOX_LONG_FOCUS== 1 ))||is_error_pending()){
if(qbevent){evnt(24235,12209,"ide_methods.bas");if(r)goto S_51519;}
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(24235,12210,"ide_methods.bas");}while(r);
S_51521:;
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(24235,12211,"ide_methods.bas");if(r)goto S_51521;}
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(24235,12211,"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(24235,12212,"ide_methods.bas");}while(r);
}
}
S_51527:;
if ((qbs_cleanup(qbs_tmp_base,_FUNC_IDEINPUTBOX_STRING_VALIDINPUT->len))||is_error_pending()){
if(qbevent){evnt(24235,12216,"ide_methods.bas");if(r)goto S_51527;}
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(24235,12217,"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(24235,12218,"ide_methods.bas");}while(r);
S_51530:;
fornext_value5882= 1 ;
fornext_finalvalue5882=_FUNC_IDEINPUTBOX_STRING_A->len;
fornext_step5882= 1 ;
if (fornext_step5882<0) fornext_step_negative5882=1; else fornext_step_negative5882=0;
if (is_error_pending()) goto fornext_error5882;
goto fornext_entrylabel5882;
while(1){
fornext_value5882=fornext_step5882+(*_FUNC_IDEINPUTBOX_LONG_I);
fornext_entrylabel5882:
*_FUNC_IDEINPUTBOX_LONG_I=fornext_value5882;
qbs_cleanup(qbs_tmp_base,0);
if (fornext_step_negative5882){
if (fornext_value5882<fornext_finalvalue5882) break;
}else{
if (fornext_value5882>fornext_finalvalue5882) break;
}
fornext_error5882:;
if(qbevent){evnt(24235,12219,"ide_methods.bas");if(r)goto S_51530;}
S_51531:;
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(24235,12220,"ide_methods.bas");if(r)goto S_51531;}
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(24235,12221,"ide_methods.bas");}while(r);
}
fornext_continue_5881:;
}
fornext_exit_5881:;
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(24235,12224,"ide_methods.bas");}while(r);
}
S_51537:;
if ((*_FUNC_IDEINPUTBOX_LONG_MAXLENGTH)||is_error_pending()){
if(qbevent){evnt(24235,12227,"ide_methods.bas");if(r)goto S_51537;}
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(24235,12228,"ide_methods.bas");}while(r);
}
S_51540:;
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(24235,12231,"ide_methods.bas");if(r)goto S_51540;}
do{
SUB_CLEARMOUSE();
if(!qbevent)break;evnt(24235,12232,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,12233,"ide_methods.bas");}while(r);
}
S_51544:;
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(24235,12236,"ide_methods.bas");if(r)goto S_51544;}
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(24235,12237,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_OK= -1 ;
if(!qbevent)break;evnt(24235,12238,"ide_methods.bas");}while(r);
do{
SUB_CLEARMOUSE();
if(!qbevent)break;evnt(24235,12239,"ide_methods.bas");}while(r);
do{
sub__keyclear(NULL,0);
if(!qbevent)break;evnt(24235,12240,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,12241,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEDOWN= 0 ;
if(!qbevent)break;evnt(24235,12245,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEINPUTBOX_LONG_MOUSEUP= 0 ;
if(!qbevent)break;evnt(24235,12246,"ide_methods.bas");}while(r);
dl_continue_5872:;
}while(1);
dl_exit_5872:;
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free293.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;
}
