#line 16969 "ide/ide_methods.bas"
int32 FUNC_IDEMESSAGEBOX(qbs*_FUNC_IDEMESSAGEBOX_STRING_TITLESTR,qbs*_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,qbs*_FUNC_IDEMESSAGEBOX_STRING_BUTTONS){
#line 16969 "ide/ide_methods.bas"
qbs *tqbs;
#line 16969 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 16969 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 16969 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 16969 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 16969 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 16969 "ide/ide_methods.bas"
#include "data441.txt"
#line 16969 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 16969 "ide/ide_methods.bas"
new_mem_lock();
#line 16969 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 16969 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 16969 "ide/ide_methods.bas"
libqb_check_stack();
#line 16969 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 16972 "ide/ide_methods.bas"
do{
#line 16972 "ide/ide_methods.bas"
sub_pcopy( 0 , 2 );
#line 16972 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16972,"ide_methods.bas");}while(r);
#line 16973 "ide/ide_methods.bas"
do{
#line 16973 "ide/ide_methods.bas"
sub_pcopy( 0 , 1 );
#line 16973 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16973,"ide_methods.bas");}while(r);
#line 16974 "ide/ide_methods.bas"
do{
#line 16974 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 16974 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16974,"ide_methods.bas");}while(r);
#line 16975 "ide/ide_methods.bas"
do{
#line 16975 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUS= 1 ;
#line 16975 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16975,"ide_methods.bas");}while(r);
#line 16976 "ide/ide_methods.bas"
do{
#line 16976 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16976,"ide_methods.bas");}while(r);
#line 16977 "ide/ide_methods.bas"
do{
if (_FUNC_IDEMESSAGEBOX_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_IDEMESSAGEBOX_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_IDEMESSAGEBOX_ARRAY_UDT_O[2]&4){
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)cmem_dynamic_malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]) error(257);
memset((void*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]),0,(size_t)alloc_req_bytes);
}else{
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]=(ptrszint)calloc((size_t)alloc_req_bytes,1);
if (!_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0]) error(257);
}
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[2]|=1;
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4]=alloc_new_desc[4];
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]=alloc_new_desc[5];
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[6]=alloc_new_desc[6];
_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[7]=alloc_new_desc[7];
}
}
#line 16977 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16977,"ide_methods.bas");}while(r);
#line 16978 "ide/ide_methods.bas"
do{
#line 16978 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16978,"ide_methods.bas");}while(r);
#line 16979 "ide/ide_methods.bas"
do{
#line 16979 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING1_SEP,func_chr( 0 ));
#line 16979 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16979 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16979,"ide_methods.bas");}while(r);
#line 16983 "ide/ide_methods.bas"
do{
#line 16983 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,FUNC_STRREPLACE(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,qbs_new_txt_len("\\n",2),func_chr( 10 )));
#line 16983 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16983 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16983,"ide_methods.bas");}while(r);
#line 16984 "ide/ide_methods.bas"
do{
#line 16984 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES= 1 ;
#line 16984 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16984,"ide_methods.bas");}while(r);
#line 16985 "ide/ide_methods.bas"
do{
if (_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[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_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]&1){
if (!error_occurred) error(10);
}else{
alloc_new_desc[4]= 1 ;
alloc_new_desc[5]=( 9 )-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)(8);
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);
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]=(ptrszint)malloc((size_t)alloc_req_bytes);
if (!_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]) error(257);
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]|=1;
tmp_long=(ptrszint)alloc_req_elems;
if (_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[2]&4){
while(tmp_long--) ((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=qbs_new_cmem(0,0);
}else{
while(tmp_long--) ((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long]=qbs_new(0,0);
}
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4]=alloc_new_desc[4];
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]=alloc_new_desc[5];
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[6]=alloc_new_desc[6];
_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[7]=alloc_new_desc[7];
}
}
#line 16985 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16985,"ide_methods.bas");}while(r);
#line 16986 "ide/ide_methods.bas"
do{
#line 16986 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN= 1 ;
#line 16986 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16986,"ide_methods.bas");}while(r);
#line 16987 "ide/ide_methods.bas"
S_63694:;
#line 16987 "ide/ide_methods.bas"
do{
#line 16987 "ide/ide_methods.bas"
if(qbevent){evnt(28819,16987,"ide_methods.bas");if(r)goto S_63694;}
#line 16988 "ide/ide_methods.bas"
do{
#line 16988 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN=func_instr(*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN+ 1 ,_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,func_chr( 10 ),0|1);
#line 16988 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16988 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16988,"ide_methods.bas");}while(r);
#line 16989 "ide/ide_methods.bas"
S_63696:;
#line 16989 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN> 0 ))||is_error_pending()){
#line 16989 "ide/ide_methods.bas"
if(qbevent){evnt(28819,16989,"ide_methods.bas");if(r)goto S_63696;}
#line 16990 "ide/ide_methods.bas"
do{
#line 16990 "ide/ide_methods.bas"
tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]);
#line 16990 "ide/ide_methods.bas"
if (!is_error_pending()) qbs_set( ((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long],func_mid(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN-*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,0|1));
#line 16990 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16990 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16990,"ide_methods.bas");}while(r);
#line 16991 "ide/ide_methods.bas"
do{
#line 16991 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_TW=(((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])->len+ 2 ;
#line 16991 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16991 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16991,"ide_methods.bas");}while(r);
#line 16992 "ide/ide_methods.bas"
S_63699:;
#line 16992 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_TW>*_FUNC_IDEMESSAGEBOX_LONG_W))||is_error_pending()){
#line 16992 "ide/ide_methods.bas"
if(qbevent){evnt(28819,16992,"ide_methods.bas");if(r)goto S_63699;}
#line 16992 "ide/ide_methods.bas"
do{
#line 16992 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_TW;
#line 16992 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16992,"ide_methods.bas");}while(r);
#line 16992 "ide/ide_methods.bas"
}
#line 16993 "ide/ide_methods.bas"
do{
#line 16993 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN=*_FUNC_IDEMESSAGEBOX_LONG_NEXTSCAN+ 1 ;
#line 16993 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16993,"ide_methods.bas");}while(r);
#line 16994 "ide/ide_methods.bas"
S_63703:;
#line 16994 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES==func_ubound(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE,1,1))))||is_error_pending()){
#line 16994 "ide/ide_methods.bas"
if(qbevent){evnt(28819,16994,"ide_methods.bas");if(r)goto S_63703;}
#line 16994 "ide/ide_methods.bas"
do{
#line 16994 "ide/ide_methods.bas"
goto dl_exit_6590;
#line 16994 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16994,"ide_methods.bas");}while(r);
#line 16994 "ide/ide_methods.bas"
}
#line 16995 "ide/ide_methods.bas"
do{
#line 16995 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES=*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES+ 1 ;
#line 16995 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16995,"ide_methods.bas");}while(r);
#line 16996 "ide/ide_methods.bas"
}else{
#line 16997 "ide/ide_methods.bas"
do{
#line 16997 "ide/ide_methods.bas"
tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]);
#line 16997 "ide/ide_methods.bas"
if (!is_error_pending()) qbs_set( ((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long],func_mid(_FUNC_IDEMESSAGEBOX_STRING_MESSAGESTR,*_FUNC_IDEMESSAGEBOX_LONG_PREVSCAN,NULL,0));
#line 16997 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16997 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16997,"ide_methods.bas");}while(r);
#line 16998 "ide/ide_methods.bas"
do{
#line 16998 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_TW=(((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])->len+ 2 ;
#line 16998 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 16998 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16998,"ide_methods.bas");}while(r);
#line 16999 "ide/ide_methods.bas"
S_63710:;
#line 16999 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_TW>*_FUNC_IDEMESSAGEBOX_LONG_W))||is_error_pending()){
#line 16999 "ide/ide_methods.bas"
if(qbevent){evnt(28819,16999,"ide_methods.bas");if(r)goto S_63710;}
#line 16999 "ide/ide_methods.bas"
do{
#line 16999 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_TW;
#line 16999 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,16999,"ide_methods.bas");}while(r);
#line 16999 "ide/ide_methods.bas"
}
#line 17000 "ide/ide_methods.bas"
do{
#line 17000 "ide/ide_methods.bas"
goto dl_exit_6590;
#line 17000 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17000,"ide_methods.bas");}while(r);
#line 17001 "ide/ide_methods.bas"
}
#line 17002 "ide/ide_methods.bas"
dl_continue_6590:;
#line 17002 "ide/ide_methods.bas"
}while(1);
#line 17002 "ide/ide_methods.bas"
dl_exit_6590:;
#line 17004 "ide/ide_methods.bas"
S_63716:;
#line 17004 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len("",0))))||is_error_pending()){
#line 17004 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17004,"ide_methods.bas");if(r)goto S_63716;}
#line 17004 "ide/ide_methods.bas"
do{
#line 17004 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len("#OK",3));
#line 17004 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17004 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17004,"ide_methods.bas");}while(r);
#line 17004 "ide/ide_methods.bas"
}
#line 17005 "ide/ide_methods.bas"
do{
#line 17005 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS= 1 ;
#line 17005 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17005,"ide_methods.bas");}while(r);
#line 17006 "ide/ide_methods.bas"
S_63720:;
#line 17006 "ide/ide_methods.bas"
fornext_value6594= 1 ;
#line 17006 "ide/ide_methods.bas"
fornext_finalvalue6594=_FUNC_IDEMESSAGEBOX_STRING_BUTTONS->len;
#line 17006 "ide/ide_methods.bas"
fornext_step6594= 1 ;
#line 17006 "ide/ide_methods.bas"
if (fornext_step6594<0) fornext_step_negative6594=1; else fornext_step_negative6594=0;
#line 17006 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6594;
#line 17006 "ide/ide_methods.bas"
goto fornext_entrylabel6594;
#line 17006 "ide/ide_methods.bas"
while(1){
#line 17006 "ide/ide_methods.bas"
fornext_value6594=fornext_step6594+(*_FUNC_IDEMESSAGEBOX_LONG_I);
#line 17006 "ide/ide_methods.bas"
fornext_entrylabel6594:
#line 17006 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value6594;
#line 17006 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17006 "ide/ide_methods.bas"
if (fornext_step_negative6594){
#line 17006 "ide/ide_methods.bas"
if (fornext_value6594<fornext_finalvalue6594) break;
#line 17006 "ide/ide_methods.bas"
}else{
#line 17006 "ide/ide_methods.bas"
if (fornext_value6594>fornext_finalvalue6594) break;
#line 17006 "ide/ide_methods.bas"
}
#line 17006 "ide/ide_methods.bas"
fornext_error6594:;
#line 17006 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17006,"ide_methods.bas");if(r)goto S_63720;}
#line 17007 "ide/ide_methods.bas"
S_63721:;
#line 17007 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(qbs_asc(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,*_FUNC_IDEMESSAGEBOX_LONG_I)== 59 )))||is_error_pending()){
#line 17007 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17007,"ide_methods.bas");if(r)goto S_63721;}
#line 17007 "ide/ide_methods.bas"
do{
#line 17007 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS=*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS+ 1 ;
#line 17007 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17007,"ide_methods.bas");}while(r);
#line 17007 "ide/ide_methods.bas"
}
#line 17008 "ide/ide_methods.bas"
fornext_continue_6593:;
#line 17008 "ide/ide_methods.bas"
}
#line 17008 "ide/ide_methods.bas"
fornext_exit_6593:;
#line 17009 "ide/ide_methods.bas"
do{
#line 17009 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN=(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS->len)+(*_FUNC_IDEMESSAGEBOX_LONG_TOTALBUTTONS* 6 );
#line 17009 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17009 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17009,"ide_methods.bas");}while(r);
#line 17011 "ide/ide_methods.bas"
do{
#line 17011 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I= 0 ;
#line 17011 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17011,"ide_methods.bas");}while(r);
#line 17012 "ide/ide_methods.bas"
do{
#line 17012 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W2=_FUNC_IDEMESSAGEBOX_STRING_TITLESTR->len+ 4 ;
#line 17012 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17012 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17012,"ide_methods.bas");}while(r);
#line 17013 "ide/ide_methods.bas"
S_63728:;
#line 17013 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W<*_FUNC_IDEMESSAGEBOX_LONG_W2))||is_error_pending()){
#line 17013 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17013,"ide_methods.bas");if(r)goto S_63728;}
#line 17013 "ide/ide_methods.bas"
do{
#line 17013 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_W2;
#line 17013 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17013,"ide_methods.bas");}while(r);
#line 17013 "ide/ide_methods.bas"
}
#line 17014 "ide/ide_methods.bas"
S_63731:;
#line 17014 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W<*_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN))||is_error_pending()){
#line 17014 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17014,"ide_methods.bas");if(r)goto S_63731;}
#line 17014 "ide/ide_methods.bas"
do{
#line 17014 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W=*_FUNC_IDEMESSAGEBOX_LONG_BUTTONSLEN;
#line 17014 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17014,"ide_methods.bas");}while(r);
#line 17014 "ide/ide_methods.bas"
}
#line 17015 "ide/ide_methods.bas"
S_63734:;
#line 17015 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_W>(*__LONG_IDEWX- 4 )))||is_error_pending()){
#line 17015 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17015,"ide_methods.bas");if(r)goto S_63734;}
#line 17015 "ide/ide_methods.bas"
do{
#line 17015 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_W=*__LONG_IDEWX- 4 ;
#line 17015 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17015,"ide_methods.bas");}while(r);
#line 17015 "ide/ide_methods.bas"
}
#line 17016 "ide/ide_methods.bas"
do{
#line 17016 "ide/ide_methods.bas"
SUB_IDEPAR((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_UDT_P)) + ((0+0)) ),_FUNC_IDEMESSAGEBOX_LONG_W,&(pass6598= 3 +*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES),_FUNC_IDEMESSAGEBOX_STRING_TITLESTR);
#line 17016 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17016 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17016,"ide_methods.bas");}while(r);
#line 17018 "ide/ide_methods.bas"
do{
#line 17018 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=*_FUNC_IDEMESSAGEBOX_LONG_I+ 1 ;
#line 17018 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17018,"ide_methods.bas");}while(r);
#line 17019 "ide/ide_methods.bas"
do{
#line 17019 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+36)))= 3 ;
#line 17019 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17019,"ide_methods.bas");}while(r);
#line 17020 "ide/ide_methods.bas"
do{
#line 17020 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+24)))= 3 +*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES;
#line 17020 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17020,"ide_methods.bas");}while(r);
#line 17021 "ide/ide_methods.bas"
do{
#line 17021 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+44)))=FUNC_IDENEWTXT(FUNC_STRREPLACE(_FUNC_IDEMESSAGEBOX_STRING_BUTTONS,qbs_new_txt_len(";",1),_FUNC_IDEMESSAGEBOX_STRING1_SEP));
#line 17021 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17021,"ide_methods.bas");}while(r);
#line 17022 "ide/ide_methods.bas"
do{
#line 17022 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+60)))= 1 ;
#line 17022 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17022,"ide_methods.bas");}while(r);
#line 17026 "ide/ide_methods.bas"
S_63743:;
#line 17026 "ide/ide_methods.bas"
fornext_value6600= 1 ;
#line 17026 "ide/ide_methods.bas"
fornext_finalvalue6600= 100 ;
#line 17026 "ide/ide_methods.bas"
fornext_step6600= 1 ;
#line 17026 "ide/ide_methods.bas"
if (fornext_step6600<0) fornext_step_negative6600=1; else fornext_step_negative6600=0;
#line 17026 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6600;
#line 17026 "ide/ide_methods.bas"
goto fornext_entrylabel6600;
#line 17026 "ide/ide_methods.bas"
while(1){
#line 17026 "ide/ide_methods.bas"
fornext_value6600=fornext_step6600+(*_FUNC_IDEMESSAGEBOX_LONG_I);
#line 17026 "ide/ide_methods.bas"
fornext_entrylabel6600:
#line 17026 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value6600;
#line 17026 "ide/ide_methods.bas"
if (fornext_step_negative6600){
#line 17026 "ide/ide_methods.bas"
if (fornext_value6600<fornext_finalvalue6600) break;
#line 17026 "ide/ide_methods.bas"
}else{
#line 17026 "ide/ide_methods.bas"
if (fornext_value6600>fornext_finalvalue6600) break;
#line 17026 "ide/ide_methods.bas"
}
#line 17026 "ide/ide_methods.bas"
fornext_error6600:;
#line 17026 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17026,"ide_methods.bas");if(r)goto S_63743;}
#line 17026 "ide/ide_methods.bas"
do{
#line 17026 "ide/ide_methods.bas"
memcpy((((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+0))+(0)),(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+((0+0))+(0)),20);
#line 17026 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17026,"ide_methods.bas");}while(r);
#line 17026 "ide/ide_methods.bas"
fornext_continue_6599:;
#line 17026 "ide/ide_methods.bas"
}
#line 17026 "ide/ide_methods.bas"
fornext_exit_6599:;
#line 17029 "ide/ide_methods.bas"
S_63746:;
#line 17029 "ide/ide_methods.bas"
do{
#line 17029 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17029,"ide_methods.bas");if(r)goto S_63746;}
#line 17033 "ide/ide_methods.bas"
do{
#line 17033 "ide/ide_methods.bas"
SUB_IDEDRAWPAR((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_UDT_P)) + ((0+0)) ));
#line 17033 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17033,"ide_methods.bas");}while(r);
#line 17034 "ide/ide_methods.bas"
do{
#line 17034 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_F= 1 ;
#line 17034 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17034,"ide_methods.bas");}while(r);
#line 17034 "ide/ide_methods.bas"
do{
#line 17034 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CX= 0 ;
#line 17034 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17034,"ide_methods.bas");}while(r);
#line 17034 "ide/ide_methods.bas"
do{
#line 17034 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CY= 0 ;
#line 17034 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17034,"ide_methods.bas");}while(r);
#line 17035 "ide/ide_methods.bas"
S_63751:;
#line 17035 "ide/ide_methods.bas"
fornext_value6603= 1 ;
#line 17035 "ide/ide_methods.bas"
fornext_finalvalue6603= 100 ;
#line 17035 "ide/ide_methods.bas"
fornext_step6603= 1 ;
#line 17035 "ide/ide_methods.bas"
if (fornext_step6603<0) fornext_step_negative6603=1; else fornext_step_negative6603=0;
#line 17035 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6603;
#line 17035 "ide/ide_methods.bas"
goto fornext_entrylabel6603;
#line 17035 "ide/ide_methods.bas"
while(1){
#line 17035 "ide/ide_methods.bas"
fornext_value6603=fornext_step6603+(*_FUNC_IDEMESSAGEBOX_LONG_I);
#line 17035 "ide/ide_methods.bas"
fornext_entrylabel6603:
#line 17035 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value6603;
#line 17035 "ide/ide_methods.bas"
if (fornext_step_negative6603){
#line 17035 "ide/ide_methods.bas"
if (fornext_value6603<fornext_finalvalue6603) break;
#line 17035 "ide/ide_methods.bas"
}else{
#line 17035 "ide/ide_methods.bas"
if (fornext_value6603>fornext_finalvalue6603) break;
#line 17035 "ide/ide_methods.bas"
}
#line 17035 "ide/ide_methods.bas"
fornext_error6603:;
#line 17035 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17035,"ide_methods.bas");if(r)goto S_63751;}
#line 17036 "ide/ide_methods.bas"
S_63752:;
#line 17036 "ide/ide_methods.bas"
if ((*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+36))))||is_error_pending()){
#line 17036 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17036,"ide_methods.bas");if(r)goto S_63752;}
#line 17039 "ide/ide_methods.bas"
do{
#line 17039 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+72)))=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS-*_FUNC_IDEMESSAGEBOX_LONG_F;
#line 17039 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17039,"ide_methods.bas");}while(r);
#line 17040 "ide/ide_methods.bas"
do{
#line 17040 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+64)))= 0 ;
#line 17040 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17040,"ide_methods.bas");}while(r);
#line 17040 "ide/ide_methods.bas"
do{
#line 17040 "ide/ide_methods.bas"
*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+68)))= 0 ;
#line 17040 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17040,"ide_methods.bas");}while(r);
#line 17041 "ide/ide_methods.bas"
do{
#line 17041 "ide/ide_methods.bas"
SUB_IDEDRAWOBJ((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEMESSAGEBOX_LONG_F);
#line 17041 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17041,"ide_methods.bas");}while(r);
#line 17042 "ide/ide_methods.bas"
S_63757:;
#line 17042 "ide/ide_methods.bas"
if ((*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+64))))||is_error_pending()){
#line 17042 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17042,"ide_methods.bas");if(r)goto S_63757;}
#line 17042 "ide/ide_methods.bas"
do{
#line 17042 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CX=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+64)));
#line 17042 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17042,"ide_methods.bas");}while(r);
#line 17042 "ide/ide_methods.bas"
do{
#line 17042 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CY=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+68)));
#line 17042 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17042,"ide_methods.bas");}while(r);
#line 17042 "ide/ide_methods.bas"
}
#line 17043 "ide/ide_methods.bas"
}
#line 17044 "ide/ide_methods.bas"
fornext_continue_6602:;
#line 17044 "ide/ide_methods.bas"
}
#line 17044 "ide/ide_methods.bas"
fornext_exit_6602:;
#line 17045 "ide/ide_methods.bas"
do{
#line 17045 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS=*_FUNC_IDEMESSAGEBOX_LONG_F- 1 ;
#line 17045 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17045,"ide_methods.bas");}while(r);
#line 17049 "ide/ide_methods.bas"
do{
#line 17049 "ide/ide_methods.bas"
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
#line 17049 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17049,"ide_methods.bas");}while(r);
#line 17050 "ide/ide_methods.bas"
S_63765:;
#line 17050 "ide/ide_methods.bas"
fornext_value6605= 1 ;
#line 17050 "ide/ide_methods.bas"
fornext_finalvalue6605=*_FUNC_IDEMESSAGEBOX_LONG_MESSAGELINES;
#line 17050 "ide/ide_methods.bas"
fornext_step6605= 1 ;
#line 17050 "ide/ide_methods.bas"
if (fornext_step6605<0) fornext_step_negative6605=1; else fornext_step_negative6605=0;
#line 17050 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6605;
#line 17050 "ide/ide_methods.bas"
goto fornext_entrylabel6605;
#line 17050 "ide/ide_methods.bas"
while(1){
#line 17050 "ide/ide_methods.bas"
fornext_value6605=fornext_step6605+(*_FUNC_IDEMESSAGEBOX_LONG_I);
#line 17050 "ide/ide_methods.bas"
fornext_entrylabel6605:
#line 17050 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value6605;
#line 17050 "ide/ide_methods.bas"
if (fornext_step_negative6605){
#line 17050 "ide/ide_methods.bas"
if (fornext_value6605<fornext_finalvalue6605) break;
#line 17050 "ide/ide_methods.bas"
}else{
#line 17050 "ide/ide_methods.bas"
if (fornext_value6605>fornext_finalvalue6605) break;
#line 17050 "ide/ide_methods.bas"
}
#line 17050 "ide/ide_methods.bas"
fornext_error6605:;
#line 17050 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17050,"ide_methods.bas");if(r)goto S_63765;}
#line 17051 "ide/ide_methods.bas"
S_63766:;
#line 17051 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(((((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])->len)>(*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+((0+8)))- 2 ))))||is_error_pending()){
#line 17051 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17051,"ide_methods.bas");if(r)goto S_63766;}
#line 17052 "ide/ide_methods.bas"
do{
#line 17052 "ide/ide_methods.bas"
tmp_long=array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5]);
#line 17052 "ide/ide_methods.bas"
if (!is_error_pending()) qbs_set( ((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[tmp_long],qbs_add(qbs_left((((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]),*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+((0+8)))- 5 ),func_string( 3 , 250 )));
#line 17052 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17052 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17052,"ide_methods.bas");}while(r);
#line 17053 "ide/ide_methods.bas"
}
#line 17054 "ide/ide_methods.bas"
do{
#line 17054 "ide/ide_methods.bas"
sub__printstring(*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+((0+0)))+((qb_safe_idiv(*_FUNC_IDEMESSAGEBOX_LONG_W, 2 ))-(qb_safe_idiv((((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])])->len, 2 )))+ 1 ,*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_UDT_P)+((0+4)))+ 1 +*_FUNC_IDEMESSAGEBOX_LONG_I,(((qbs**)(_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[0]))[array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[4],_FUNC_IDEMESSAGEBOX_ARRAY_STRING_FULLMESSAGE[5])]),NULL,0);
#line 17054 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17054 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17054,"ide_methods.bas");}while(r);
#line 17055 "ide/ide_methods.bas"
fornext_continue_6604:;
#line 17055 "ide/ide_methods.bas"
}
#line 17055 "ide/ide_methods.bas"
fornext_exit_6604:;
#line 17059 "ide/ide_methods.bas"
do{
#line 17059 "ide/ide_methods.bas"
sub_pcopy( 1 , 0 );
#line 17059 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17059,"ide_methods.bas");}while(r);
#line 17060 "ide/ide_methods.bas"
S_63772:;
#line 17060 "ide/ide_methods.bas"
if ((*_FUNC_IDEMESSAGEBOX_LONG_CX)||is_error_pending()){
#line 17060 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17060,"ide_methods.bas");if(r)goto S_63772;}
#line 17060 "ide/ide_methods.bas"
do{
#line 17060 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
#line 17060 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17060,"ide_methods.bas");}while(r);
#line 17060 "ide/ide_methods.bas"
do{
#line 17060 "ide/ide_methods.bas"
qbg_sub_locate(*_FUNC_IDEMESSAGEBOX_LONG_CY,*_FUNC_IDEMESSAGEBOX_LONG_CX, 1 ,NULL,NULL,7);
#line 17060 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17060,"ide_methods.bas");}while(r);
#line 17060 "ide/ide_methods.bas"
do{
#line 17060 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 17060 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17060,"ide_methods.bas");}while(r);
#line 17060 "ide/ide_methods.bas"
}
#line 17063 "ide/ide_methods.bas"
do{
#line 17063 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 0 ;
#line 17063 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17063,"ide_methods.bas");}while(r);
#line 17064 "ide/ide_methods.bas"
S_63778:;
#line 17064 "ide/ide_methods.bas"
do{
#line 17064 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17064,"ide_methods.bas");if(r)goto S_63778;}
#line 17065 "ide/ide_methods.bas"
do{
#line 17065 "ide/ide_methods.bas"
SUB_GETINPUT();
#line 17065 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17065,"ide_methods.bas");}while(r);
#line 17066 "ide/ide_methods.bas"
S_63780:;
#line 17066 "ide/ide_methods.bas"
if ((*__LONG_MWHEEL)||is_error_pending()){
#line 17066 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17066,"ide_methods.bas");if(r)goto S_63780;}
#line 17066 "ide/ide_methods.bas"
do{
#line 17066 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17066 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17066,"ide_methods.bas");}while(r);
#line 17066 "ide/ide_methods.bas"
}
#line 17067 "ide/ide_methods.bas"
S_63783:;
#line 17067 "ide/ide_methods.bas"
if ((*__LONG_KB)||is_error_pending()){
#line 17067 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17067,"ide_methods.bas");if(r)goto S_63783;}
#line 17067 "ide/ide_methods.bas"
do{
#line 17067 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17067 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17067,"ide_methods.bas");}while(r);
#line 17067 "ide/ide_methods.bas"
}
#line 17068 "ide/ide_methods.bas"
S_63786:;
#line 17068 "ide/ide_methods.bas"
if ((*__LONG_MCLICK)||is_error_pending()){
#line 17068 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17068,"ide_methods.bas");if(r)goto S_63786;}
#line 17068 "ide/ide_methods.bas"
do{
#line 17068 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN= 1 ;
#line 17068 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17068,"ide_methods.bas");}while(r);
#line 17068 "ide/ide_methods.bas"
do{
#line 17068 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17068 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17068,"ide_methods.bas");}while(r);
#line 17068 "ide/ide_methods.bas"
}
#line 17069 "ide/ide_methods.bas"
S_63790:;
#line 17069 "ide/ide_methods.bas"
if ((*__LONG_MRELEASE)||is_error_pending()){
#line 17069 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17069,"ide_methods.bas");if(r)goto S_63790;}
#line 17069 "ide/ide_methods.bas"
do{
#line 17069 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP= 1 ;
#line 17069 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17069,"ide_methods.bas");}while(r);
#line 17069 "ide/ide_methods.bas"
do{
#line 17069 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17069 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17069,"ide_methods.bas");}while(r);
#line 17069 "ide/ide_methods.bas"
}
#line 17070 "ide/ide_methods.bas"
S_63794:;
#line 17070 "ide/ide_methods.bas"
if ((*__LONG_MB)||is_error_pending()){
#line 17070 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17070,"ide_methods.bas");if(r)goto S_63794;}
#line 17070 "ide/ide_methods.bas"
do{
#line 17070 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17070 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17070,"ide_methods.bas");}while(r);
#line 17070 "ide/ide_methods.bas"
}
#line 17071 "ide/ide_methods.bas"
do{
#line 17071 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_ALT=*__LONG_KALT;
#line 17071 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17071,"ide_methods.bas");}while(r);
#line 17071 "ide/ide_methods.bas"
S_63798:;
#line 17071 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_ALT!=*_FUNC_IDEMESSAGEBOX_LONG_OLDALT))||is_error_pending()){
#line 17071 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17071,"ide_methods.bas");if(r)goto S_63798;}
#line 17071 "ide/ide_methods.bas"
do{
#line 17071 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_CHANGE= 1 ;
#line 17071 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17071,"ide_methods.bas");}while(r);
#line 17071 "ide/ide_methods.bas"
}
#line 17072 "ide/ide_methods.bas"
do{
#line 17072 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_OLDALT=*_FUNC_IDEMESSAGEBOX_LONG_ALT;
#line 17072 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17072,"ide_methods.bas");}while(r);
#line 17073 "ide/ide_methods.bas"
do{
#line 17073 "ide/ide_methods.bas"
sub__limit( 100 );
#line 17073 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17073,"ide_methods.bas");}while(r);
#line 17074 "ide/ide_methods.bas"
S_63803:;
#line 17074 "ide/ide_methods.bas"
dl_continue_6608:;
#line 17074 "ide/ide_methods.bas"
}while((!(*_FUNC_IDEMESSAGEBOX_LONG_CHANGE))&&(!is_error_pending()));
#line 17074 "ide/ide_methods.bas"
dl_exit_6608:;
#line 17074 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17074,"ide_methods.bas");if(r)goto S_63803;}
#line 17075 "ide/ide_methods.bas"
S_63804:;
#line 17075 "ide/ide_methods.bas"
if ((*_FUNC_IDEMESSAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
#line 17075 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17075,"ide_methods.bas");if(r)goto S_63804;}
#line 17075 "ide/ide_methods.bas"
do{
#line 17075 "ide/ide_methods.bas"
*__LONG_IDEHL= 1 ;
#line 17075 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17075,"ide_methods.bas");}while(r);
#line 17075 "ide/ide_methods.bas"
}else{
#line 17075 "ide/ide_methods.bas"
do{
#line 17075 "ide/ide_methods.bas"
*__LONG_IDEHL= 0 ;
#line 17075 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17075,"ide_methods.bas");}while(r);
#line 17075 "ide/ide_methods.bas"
}
#line 17077 "ide/ide_methods.bas"
do{
#line 17077 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,qbs_new_txt_len("",0));
#line 17077 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17077 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17077,"ide_methods.bas");}while(r);
#line 17078 "ide/ide_methods.bas"
S_63810:;
#line 17078 "ide/ide_methods.bas"
if ((*_FUNC_IDEMESSAGEBOX_LONG_ALT&(~(*__LONG_KCTRL)))||is_error_pending()){
#line 17078 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17078,"ide_methods.bas");if(r)goto S_63810;}
#line 17079 "ide/ide_methods.bas"
S_63811:;
#line 17079 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(__STRING_K->len== 1 )))||is_error_pending()){
#line 17079 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17079,"ide_methods.bas");if(r)goto S_63811;}
#line 17080 "ide/ide_methods.bas"
do{
#line 17080 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_K=qbs_asc(qbs_ucase(__STRING_K));
#line 17080 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17080 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17080,"ide_methods.bas");}while(r);
#line 17081 "ide/ide_methods.bas"
S_63813:;
#line 17081 "ide/ide_methods.bas"
if (((-(*_FUNC_IDEMESSAGEBOX_LONG_K>= 65 ))&(-(*_FUNC_IDEMESSAGEBOX_LONG_K<= 90 )))||is_error_pending()){
#line 17081 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17081,"ide_methods.bas");if(r)goto S_63813;}
#line 17081 "ide/ide_methods.bas"
do{
#line 17081 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,func_chr(*_FUNC_IDEMESSAGEBOX_LONG_K));
#line 17081 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17081 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17081,"ide_methods.bas");}while(r);
#line 17081 "ide/ide_methods.bas"
}
#line 17082 "ide/ide_methods.bas"
}
#line 17083 "ide/ide_methods.bas"
}
#line 17084 "ide/ide_methods.bas"
do{
#line 17084 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 0 , 0 ,NULL,12);
#line 17084 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17084,"ide_methods.bas");}while(r);
#line 17084 "ide/ide_methods.bas"
do{
#line 17084 "ide/ide_methods.bas"
qbg_sub_locate(NULL,NULL, 0 ,NULL,NULL,4);
#line 17084 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17084,"ide_methods.bas");}while(r);
#line 17084 "ide/ide_methods.bas"
do{
#line 17084 "ide/ide_methods.bas"
qbg_screen(NULL,NULL, 1 , 0 ,NULL,12);
#line 17084 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17084,"ide_methods.bas");}while(r);
#line 17088 "ide/ide_methods.bas"
do{
#line 17088 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_INFO= 0 ;
#line 17088 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17088,"ide_methods.bas");}while(r);
#line 17090 "ide/ide_methods.bas"
S_63822:;
#line 17090 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_greaterorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("A",1)))&(qbs_lessorequal(qbs_ucase(__STRING_K),qbs_new_txt_len("Z",1)))))||is_error_pending()){
#line 17090 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17090,"ide_methods.bas");if(r)goto S_63822;}
#line 17090 "ide/ide_methods.bas"
do{
#line 17090 "ide/ide_methods.bas"
qbs_set(_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,qbs_ucase(__STRING_K));
#line 17090 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17090 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17090,"ide_methods.bas");}while(r);
#line 17090 "ide/ide_methods.bas"
}
#line 17092 "ide/ide_methods.bas"
S_63825:;
#line 17092 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,qbs_new_txt_len("",0))))||is_error_pending()){
#line 17092 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17092,"ide_methods.bas");if(r)goto S_63825;}
#line 17092 "ide/ide_methods.bas"
do{
#line 17092 "ide/ide_methods.bas"
qbs_set(__STRING_K,func_chr( 255 ));
#line 17092 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17092 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17092,"ide_methods.bas");}while(r);
#line 17092 "ide/ide_methods.bas"
}
#line 17093 "ide/ide_methods.bas"
S_63828:;
#line 17093 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_KSHIFT== 0 ))&(qbs_equal(__STRING_K,func_chr( 9 )))))||is_error_pending()){
#line 17093 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17093,"ide_methods.bas");if(r)goto S_63828;}
#line 17093 "ide/ide_methods.bas"
do{
#line 17093 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS+ 1 ;
#line 17093 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17093,"ide_methods.bas");}while(r);
#line 17093 "ide/ide_methods.bas"
}
#line 17094 "ide/ide_methods.bas"
S_63831:;
#line 17094 "ide/ide_methods.bas"
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()){
#line 17094 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17094,"ide_methods.bas");if(r)goto S_63831;}
#line 17094 "ide/ide_methods.bas"
do{
#line 17094 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS- 1 ;
#line 17094 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17094,"ide_methods.bas");}while(r);
#line 17094 "ide/ide_methods.bas"
do{
#line 17094 "ide/ide_methods.bas"
qbs_set(__STRING_K,qbs_new_txt_len("",0));
#line 17094 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17094 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17094,"ide_methods.bas");}while(r);
#line 17094 "ide/ide_methods.bas"
}
#line 17095 "ide/ide_methods.bas"
S_63835:;
#line 17095 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_FOCUS< 1 ))||is_error_pending()){
#line 17095 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17095,"ide_methods.bas");if(r)goto S_63835;}
#line 17095 "ide/ide_methods.bas"
do{
#line 17095 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUS=*_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS;
#line 17095 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17095,"ide_methods.bas");}while(r);
#line 17095 "ide/ide_methods.bas"
}
#line 17096 "ide/ide_methods.bas"
S_63838:;
#line 17096 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEMESSAGEBOX_LONG_FOCUS>*_FUNC_IDEMESSAGEBOX_LONG_LASTFOCUS))||is_error_pending()){
#line 17096 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17096,"ide_methods.bas");if(r)goto S_63838;}
#line 17096 "ide/ide_methods.bas"
do{
#line 17096 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUS= 1 ;
#line 17096 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17096,"ide_methods.bas");}while(r);
#line 17096 "ide/ide_methods.bas"
}
#line 17097 "ide/ide_methods.bas"
do{
#line 17097 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_F= 1 ;
#line 17097 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17097,"ide_methods.bas");}while(r);
#line 17098 "ide/ide_methods.bas"
S_63842:;
#line 17098 "ide/ide_methods.bas"
fornext_value6611= 1 ;
#line 17098 "ide/ide_methods.bas"
fornext_finalvalue6611= 100 ;
#line 17098 "ide/ide_methods.bas"
fornext_step6611= 1 ;
#line 17098 "ide/ide_methods.bas"
if (fornext_step6611<0) fornext_step_negative6611=1; else fornext_step_negative6611=0;
#line 17098 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6611;
#line 17098 "ide/ide_methods.bas"
goto fornext_entrylabel6611;
#line 17098 "ide/ide_methods.bas"
while(1){
#line 17098 "ide/ide_methods.bas"
fornext_value6611=fornext_step6611+(*_FUNC_IDEMESSAGEBOX_LONG_I);
#line 17098 "ide/ide_methods.bas"
fornext_entrylabel6611:
#line 17098 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_I=fornext_value6611;
#line 17098 "ide/ide_methods.bas"
if (fornext_step_negative6611){
#line 17098 "ide/ide_methods.bas"
if (fornext_value6611<fornext_finalvalue6611) break;
#line 17098 "ide/ide_methods.bas"
}else{
#line 17098 "ide/ide_methods.bas"
if (fornext_value6611>fornext_finalvalue6611) break;
#line 17098 "ide/ide_methods.bas"
}
#line 17098 "ide/ide_methods.bas"
fornext_error6611:;
#line 17098 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17098,"ide_methods.bas");if(r)goto S_63842;}
#line 17099 "ide/ide_methods.bas"
do{
#line 17099 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_T=*(int32*)(((char*)_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])+(((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+36)));
#line 17099 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17099,"ide_methods.bas");}while(r);
#line 17100 "ide/ide_methods.bas"
S_63844:;
#line 17100 "ide/ide_methods.bas"
if ((*_FUNC_IDEMESSAGEBOX_LONG_T)||is_error_pending()){
#line 17100 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17100,"ide_methods.bas");if(r)goto S_63844;}
#line 17101 "ide/ide_methods.bas"
do{
#line 17101 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_FOCUSOFFSET=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS-*_FUNC_IDEMESSAGEBOX_LONG_F;
#line 17101 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17101,"ide_methods.bas");}while(r);
#line 17102 "ide/ide_methods.bas"
do{
#line 17102 "ide/ide_methods.bas"
SUB_IDEOBJUPDATE((void*)( ((char*)(_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[0])) + (((array_check((*_FUNC_IDEMESSAGEBOX_LONG_I)-_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[4],_FUNC_IDEMESSAGEBOX_ARRAY_UDT_O[5]))*101+0)) ),_FUNC_IDEMESSAGEBOX_LONG_FOCUS,_FUNC_IDEMESSAGEBOX_LONG_F,_FUNC_IDEMESSAGEBOX_LONG_FOCUSOFFSET,__STRING_K,_FUNC_IDEMESSAGEBOX_STRING_ALTLETTER,__LONG_MB,_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN,_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP,__LONG_MX,__LONG_MY,_FUNC_IDEMESSAGEBOX_LONG_INFO,__LONG_MWHEEL);
#line 17102 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 17102 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17102,"ide_methods.bas");}while(r);
#line 17103 "ide/ide_methods.bas"
}
#line 17104 "ide/ide_methods.bas"
fornext_continue_6610:;
#line 17104 "ide/ide_methods.bas"
}
#line 17104 "ide/ide_methods.bas"
fornext_exit_6610:;
#line 17108 "ide/ide_methods.bas"
S_63849:;
#line 17108 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,qbs_equal(__STRING_K,func_chr( 27 ))))||is_error_pending()){
#line 17108 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17108,"ide_methods.bas");if(r)goto S_63849;}
#line 17108 "ide/ide_methods.bas"
do{
#line 17108 "ide/ide_methods.bas"
goto exit_subfunc;
#line 17108 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17108,"ide_methods.bas");}while(r);
#line 17108 "ide/ide_methods.bas"
}
#line 17110 "ide/ide_methods.bas"
S_63852:;
#line 17110 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,(qbs_equal(__STRING_K,func_chr( 13 )))|((-(*_FUNC_IDEMESSAGEBOX_LONG_INFO!= 0 )))))||is_error_pending()){
#line 17110 "ide/ide_methods.bas"
if(qbevent){evnt(28819,17110,"ide_methods.bas");if(r)goto S_63852;}
#line 17111 "ide/ide_methods.bas"
do{
#line 17111 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_IDEMESSAGEBOX=*_FUNC_IDEMESSAGEBOX_LONG_FOCUS;
#line 17111 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17111,"ide_methods.bas");}while(r);
#line 17112 "ide/ide_methods.bas"
do{
#line 17112 "ide/ide_methods.bas"
SUB_CLEARMOUSE();
#line 17112 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17112,"ide_methods.bas");}while(r);
#line 17113 "ide/ide_methods.bas"
do{
#line 17113 "ide/ide_methods.bas"
goto exit_subfunc;
#line 17113 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17113,"ide_methods.bas");}while(r);
#line 17114 "ide/ide_methods.bas"
}
#line 17117 "ide/ide_methods.bas"
do{
#line 17117 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MOUSEDOWN= 0 ;
#line 17117 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17117,"ide_methods.bas");}while(r);
#line 17118 "ide/ide_methods.bas"
do{
#line 17118 "ide/ide_methods.bas"
*_FUNC_IDEMESSAGEBOX_LONG_MOUSEUP= 0 ;
#line 17118 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,17118,"ide_methods.bas");}while(r);
#line 17119 "ide/ide_methods.bas"
dl_continue_6601:;
#line 17119 "ide/ide_methods.bas"
}while(1);
#line 17119 "ide/ide_methods.bas"
dl_exit_6601:;
#line 17120 "ide/ide_methods.bas"
exit_subfunc:;
#line 17120 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 17120 "ide/ide_methods.bas"
#include "free441.txt"
#line 17120 "ide/ide_methods.bas"
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;
#line 17120 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 17120 "ide/ide_methods.bas"
return *_FUNC_IDEMESSAGEBOX_LONG_IDEMESSAGEBOX;
#line 17120 "ide/ide_methods.bas"
}
