int32 FUNC_IDE(int32*_FUNC_IDE_LONG_IGNORE){
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 "data271.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{
*_FUNC_IDE_LONG_IGNORE=*_FUNC_IDE_LONG_IGNORE;
if(!qbevent)break;evnt(25769,38,"ide_methods.bas");}while(r);
S_40036:;
if ((qbs_cleanup(qbs_tmp_base,qbs_notequal(__STRING_IDECOMMAND,qbs_new_txt_len("",0))))||is_error_pending()){
if(qbevent){evnt(25769,39,"ide_methods.bas");if(r)goto S_40036;}
do{
*_FUNC_IDE_LONG_CMD=qbs_asc(__STRING_IDECOMMAND);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,39,"ide_methods.bas");}while(r);
}
S_40039:;
if ((-(*_FUNC_IDE_LONG_CMD== 3 ))||is_error_pending()){
if(qbevent){evnt(25769,40,"ide_methods.bas");if(r)goto S_40039;}
S_40040:;
if ((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(25769,41,"ide_methods.bas");if(r)goto S_40040;}
S_40041:;
if (((-(*__LONG_IDECOMPILEDLINE<*__LONG_IDESY))|(-(*__LONG_IDECOMPILEDLINE>(*__LONG_IDESY+(*__LONG_IDEWY- 9 )))))||is_error_pending()){
if(qbevent){evnt(25769,42,"ide_methods.bas");if(r)goto S_40041;}
S_40042:;
if ((func__exit()& 1 )||is_error_pending()){
if(qbevent){evnt(25769,43,"ide_methods.bas");if(r)goto S_40042;}
do{
*__LONG_IDEEXIT= 1 ;
if(!qbevent)break;evnt(25769,43,"ide_methods.bas");}while(r);
}
S_40045:;
if ((-(*__LONG_IDEEXIT== 0 ))||is_error_pending()){
if(qbevent){evnt(25769,44,"ide_methods.bas");if(r)goto S_40045;}
do{
SUB_GETINPUT();
if(!qbevent)break;evnt(25769,45,"ide_methods.bas");}while(r);
S_40047:;
if (((-(*__LONG_ICHANGED== 0 ))&(-(*__LONG_MB== 0 )))||is_error_pending()){
if(qbevent){evnt(25769,46,"ide_methods.bas");if(r)goto S_40047;}
do{
qbs_set(_FUNC_IDE_STRING_INDENTED,FUNC_APPLY_LAYOUT_INDENT(__STRING_IDECOMPILEDLINE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,47,"ide_methods.bas");}while(r);
S_40049:;
if ((qbs_cleanup(qbs_tmp_base,-((_FUNC_IDE_STRING_INDENTED->len)&&(qbs_notequal(__STRING_IDECOMPILEDLINE,_FUNC_IDE_STRING_INDENTED)))))||is_error_pending()){
if(qbevent){evnt(25769,48,"ide_methods.bas");if(r)goto S_40049;}
do{
SUB_IDESETLINE(__LONG_IDECOMPILEDLINE,_FUNC_IDE_STRING_INDENTED);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,48,"ide_methods.bas");}while(r);
}
do{
*__LONG_IDECOMPILEDLINE=*__LONG_IDECOMPILEDLINE+ 1 ;
if(!qbevent)break;evnt(25769,50,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_IDECOMPILEDLINE,FUNC_IDEGETLINE(__LONG_IDECOMPILEDLINE));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,51,"ide_methods.bas");}while(r);
do{
*_FUNC_IDE_LONG_IDE= 4 ;
if(!qbevent)break;evnt(25769,52,"ide_methods.bas");}while(r);
do{
qbs_set(__STRING_IDERETURN,__STRING_IDECOMPILEDLINE);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,53,"ide_methods.bas");}while(r);
S_40056:;
if ((-((-(*__LONG_IDEAUTORUN!= 0 ))||(-(*__LONG_IDEMANUALCHECK!= 0 ))))||is_error_pending()){
if(qbevent){evnt(25769,56,"ide_methods.bas");if(r)goto S_40056;}
S_40057:;
if ((*__LONG_PREPASS)||is_error_pending()){
if(qbevent){evnt(25769,57,"ide_methods.bas");if(r)goto S_40057;}
do{
qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs__tostr((long double)(std::floor((*__LONG_IDECOMPILEDLINE* 100 )/ ((long double)((*__LONG_IDEN* 2 ))))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,58,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs_add(qbs_add(func_string( 3 -_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS->len, 32 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS),qbs_new_txt_len("%",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,59,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs__tostr((long double)(std::floor(((*__LONG_IDEN+*__LONG_IDECOMPILEDLINE)* 100 )/ ((long double)((*__LONG_IDEN* 2 ))))),NULL,0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,61,"ide_methods.bas");}while(r);
do{
qbs_set(_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS,qbs_add(qbs_add(func_string( 3 -_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS->len, 32 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS),qbs_new_txt_len("%",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,62,"ide_methods.bas");}while(r);
}
do{
qbs_set(__STRING_IDEINFO,qbs_add(func_chr( 0 ),_FUNC_IDE_STRING_STATUS__ASCII_CHR_046__PROGRESS));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,64,"ide_methods.bas");}while(r);
}
do{
SUB_UPDATEIDEINFO();
if(!qbevent)break;evnt(25769,66,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,68,"ide_methods.bas");}while(r);
}
S_40069:;
if ((*__LONG_ICHANGED)||is_error_pending()){
if(qbevent){evnt(25769,70,"ide_methods.bas");if(r)goto S_40069;}
do{
*__LONG_ICHECKLATER= 1 ;
if(!qbevent)break;evnt(25769,70,"ide_methods.bas");}while(r);
}
}
}
}else{
S_40075:;
if ((qbs_cleanup(qbs_tmp_base,(-(*__LONG_IDESYSTEM!= 3 ))|(qbs_notequal(qbs_left(__STRING_IDEINFO, 19 ),qbs_new_txt_len("Selection length = ",19)))))||is_error_pending()){
if(qbevent){evnt(25769,74,"ide_methods.bas");if(r)goto S_40075;}
do{
qbs_set(__STRING_IDEINFO,qbs_new_txt_len("",0));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,74,"ide_methods.bas");}while(r);
}
do{
SUB_UPDATEIDEINFO();
if(!qbevent)break;evnt(25769,75,"ide_methods.bas");}while(r);
}
}
do{
*_FUNC_IDE_LONG_IDE=FUNC_IDE2(&(pass4675= 0 ));
if(!qbevent)break;evnt(25769,79,"ide_methods.bas");}while(r);
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free271.txt"
if ((tmp_mem_static_pointer>=mem_static)&&(tmp_mem_static_pointer<=mem_static_limit)) mem_static_pointer=tmp_mem_static_pointer; else mem_static_pointer=mem_static;
cmem_sp=tmp_cmem_sp;
return *_FUNC_IDE_LONG_IDE;
}
