int32 FUNC_IDEHBAR(int32*_FUNC_IDEHBAR_LONG_X,int32*_FUNC_IDEHBAR_LONG_Y,int32*_FUNC_IDEHBAR_LONG_H,int32*_FUNC_IDEHBAR_LONG_I2,int32*_FUNC_IDEHBAR_LONG_N2){
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 "data363.txt"
mem_lock *sf_mem_lock;
new_mem_lock();
sf_mem_lock=mem_lock_tmp;
sf_mem_lock->type=3;
libqb_check_stack();
if (is_error_pending()) goto exit_subfunc;
do{
*_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_I2;
if(!qbevent)break;evnt(28182,12148,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_N=*_FUNC_IDEHBAR_LONG_N2;
if(!qbevent)break;evnt(28182,12148,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(28182,12166,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X,*_FUNC_IDEHBAR_LONG_Y,func_chr( 27 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12167,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 1 ,*_FUNC_IDEHBAR_LONG_Y,func_chr( 26 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12168,"ide_methods.bas");}while(r);
S_57273:;
fornext_value6765=*_FUNC_IDEHBAR_LONG_X+ 1 ;
fornext_finalvalue6765=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ;
fornext_step6765= 1 ;
if (fornext_step6765<0) fornext_step_negative6765=1; else fornext_step_negative6765=0;
if (is_error_pending()) goto fornext_error6765;
goto fornext_entrylabel6765;
while(1){
fornext_value6765=fornext_step6765+(*_FUNC_IDEHBAR_LONG_X2);
fornext_entrylabel6765:
*_FUNC_IDEHBAR_LONG_X2=fornext_value6765;
if (fornext_step_negative6765){
if (fornext_value6765<fornext_finalvalue6765) break;
}else{
if (fornext_value6765>fornext_finalvalue6765) break;
}
fornext_error6765:;
if(qbevent){evnt(28182,12169,"ide_methods.bas");if(r)goto S_57273;}
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 176 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12170,"ide_methods.bas");}while(r);
fornext_continue_6764:;
}
fornext_exit_6764:;
S_57276:;
if ((-(*_FUNC_IDEHBAR_LONG_N< 1 ))||is_error_pending()){
if(qbevent){evnt(28182,12175,"ide_methods.bas");if(r)goto S_57276;}
do{
*_FUNC_IDEHBAR_LONG_N= 1 ;
if(!qbevent)break;evnt(28182,12175,"ide_methods.bas");}while(r);
}
S_57279:;
if ((-(*_FUNC_IDEHBAR_LONG_I< 1 ))||is_error_pending()){
if(qbevent){evnt(28182,12176,"ide_methods.bas");if(r)goto S_57279;}
do{
*_FUNC_IDEHBAR_LONG_I= 1 ;
if(!qbevent)break;evnt(28182,12176,"ide_methods.bas");}while(r);
}
S_57282:;
if ((-(*_FUNC_IDEHBAR_LONG_I>*_FUNC_IDEHBAR_LONG_N))||is_error_pending()){
if(qbevent){evnt(28182,12177,"ide_methods.bas");if(r)goto S_57282;}
do{
*_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_N;
if(!qbevent)break;evnt(28182,12177,"ide_methods.bas");}while(r);
}
S_57285:;
if ((-(*_FUNC_IDEHBAR_LONG_H== 2 ))||is_error_pending()){
if(qbevent){evnt(28182,12179,"ide_methods.bas");if(r)goto S_57285;}
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X;
if(!qbevent)break;evnt(28182,12180,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12181,"ide_methods.bas");}while(r);
}
S_57289:;
if ((-(*_FUNC_IDEHBAR_LONG_H== 3 ))||is_error_pending()){
if(qbevent){evnt(28182,12184,"ide_methods.bas");if(r)goto S_57289;}
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ;
if(!qbevent)break;evnt(28182,12185,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12187,"ide_methods.bas");}while(r);
}
S_57293:;
if ((-(*_FUNC_IDEHBAR_LONG_H== 4 ))||is_error_pending()){
if(qbevent){evnt(28182,12190,"ide_methods.bas");if(r)goto S_57293;}
S_57294:;
if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||is_error_pending()){
if(qbevent){evnt(28182,12191,"ide_methods.bas");if(r)goto S_57294;}
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ;
if(!qbevent)break;evnt(28182,12192,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12194,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 )));
if(!qbevent)break;evnt(28182,12197,"ide_methods.bas");}while(r);
S_57299:;
if ((-(((float)(*_FUNC_IDEHBAR_SINGLE_P))<((float)( 0.5E+0 ))))||is_error_pending()){
if(qbevent){evnt(28182,12198,"ide_methods.bas");if(r)goto S_57299;}
do{
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ;
if(!qbevent)break;evnt(28182,12198,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 2 ;
if(!qbevent)break;evnt(28182,12198,"ide_methods.bas");}while(r);
}
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12199,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
if(!qbevent)break;evnt(28182,12200,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12201,"ide_methods.bas");}while(r);
}
}
S_57309:;
if ((-(*_FUNC_IDEHBAR_LONG_H> 4 ))||is_error_pending()){
if(qbevent){evnt(28182,12205,"ide_methods.bas");if(r)goto S_57309;}
S_57310:;
if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||is_error_pending()){
if(qbevent){evnt(28182,12206,"ide_methods.bas");if(r)goto S_57310;}
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+(qb_safe_idiv(*_FUNC_IDEHBAR_LONG_H, 4 ));
if(!qbevent)break;evnt(28182,12207,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12209,"ide_methods.bas");}while(r);
}
S_57314:;
if ((-(*_FUNC_IDEHBAR_LONG_I== 1 ))||is_error_pending()){
if(qbevent){evnt(28182,12211,"ide_methods.bas");if(r)goto S_57314;}
do{
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ;
if(!qbevent)break;evnt(28182,12212,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12213,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
if(!qbevent)break;evnt(28182,12214,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12215,"ide_methods.bas");}while(r);
}
S_57320:;
if ((-(*_FUNC_IDEHBAR_LONG_I==*_FUNC_IDEHBAR_LONG_N))||is_error_pending()){
if(qbevent){evnt(28182,12217,"ide_methods.bas");if(r)goto S_57320;}
do{
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ;
if(!qbevent)break;evnt(28182,12218,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12219,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
if(!qbevent)break;evnt(28182,12220,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12221,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 )));
if(!qbevent)break;evnt(28182,12224,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_SINGLE_P=*_FUNC_IDEHBAR_SINGLE_P*(*_FUNC_IDEHBAR_LONG_H- 4 );
if(!qbevent)break;evnt(28182,12225,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_X2=qbr(*_FUNC_IDEHBAR_LONG_X+ 2 +std::floor(*_FUNC_IDEHBAR_SINGLE_P));
if(!qbevent)break;evnt(28182,12226,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(28182,12227,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
if(!qbevent)break;evnt(28182,12228,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(28182,12229,"ide_methods.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free363.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_IDEHBAR_LONG_IDEHBAR;
}
