int32 FUNC_IDEVBAR(int32*_FUNC_IDEVBAR_LONG_X,int32*_FUNC_IDEVBAR_LONG_Y,int32*_FUNC_IDEVBAR_LONG_H,int32*_FUNC_IDEVBAR_LONG_I2,int32*_FUNC_IDEVBAR_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 "data321.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_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_I2;
if(!qbevent)break;evnt(25769,14924,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_N=*_FUNC_IDEVBAR_LONG_N2;
if(!qbevent)break;evnt(25769,14924,"ide_methods.bas");}while(r);
do{
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
if(!qbevent)break;evnt(25769,14929,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y,func_chr( 24 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14930,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 1 ,func_chr( 25 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14931,"ide_methods.bas");}while(r);
S_56123:;
fornext_value6471=*_FUNC_IDEVBAR_LONG_Y+ 1 ;
fornext_finalvalue6471=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ;
fornext_step6471= 1 ;
if (fornext_step6471<0) fornext_step_negative6471=1; else fornext_step_negative6471=0;
if (is_error_pending()) goto fornext_error6471;
goto fornext_entrylabel6471;
while(1){
fornext_value6471=fornext_step6471+(*_FUNC_IDEVBAR_LONG_Y2);
fornext_entrylabel6471:
*_FUNC_IDEVBAR_LONG_Y2=fornext_value6471;
if (fornext_step_negative6471){
if (fornext_value6471<fornext_finalvalue6471) break;
}else{
if (fornext_value6471>fornext_finalvalue6471) break;
}
fornext_error6471:;
if(qbevent){evnt(25769,14932,"ide_methods.bas");if(r)goto S_56123;}
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 176 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14933,"ide_methods.bas");}while(r);
fornext_continue_6470:;
}
fornext_exit_6470:;
S_56126:;
if ((-(*_FUNC_IDEVBAR_LONG_N< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14938,"ide_methods.bas");if(r)goto S_56126;}
do{
*_FUNC_IDEVBAR_LONG_N= 1 ;
if(!qbevent)break;evnt(25769,14938,"ide_methods.bas");}while(r);
}
S_56129:;
if ((-(*_FUNC_IDEVBAR_LONG_I< 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14939,"ide_methods.bas");if(r)goto S_56129;}
do{
*_FUNC_IDEVBAR_LONG_I= 1 ;
if(!qbevent)break;evnt(25769,14939,"ide_methods.bas");}while(r);
}
S_56132:;
if ((-(*_FUNC_IDEVBAR_LONG_I>*_FUNC_IDEVBAR_LONG_N))||is_error_pending()){
if(qbevent){evnt(25769,14940,"ide_methods.bas");if(r)goto S_56132;}
do{
*_FUNC_IDEVBAR_LONG_I=*_FUNC_IDEVBAR_LONG_N;
if(!qbevent)break;evnt(25769,14940,"ide_methods.bas");}while(r);
}
S_56135:;
if ((-(*_FUNC_IDEVBAR_LONG_H== 2 ))||is_error_pending()){
if(qbevent){evnt(25769,14942,"ide_methods.bas");if(r)goto S_56135;}
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y;
if(!qbevent)break;evnt(25769,14943,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14944,"ide_methods.bas");}while(r);
}
S_56139:;
if ((-(*_FUNC_IDEVBAR_LONG_H== 3 ))||is_error_pending()){
if(qbevent){evnt(25769,14947,"ide_methods.bas");if(r)goto S_56139;}
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ;
if(!qbevent)break;evnt(25769,14948,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14950,"ide_methods.bas");}while(r);
}
S_56143:;
if ((-(*_FUNC_IDEVBAR_LONG_H== 4 ))||is_error_pending()){
if(qbevent){evnt(25769,14953,"ide_methods.bas");if(r)goto S_56143;}
S_56144:;
if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14954,"ide_methods.bas");if(r)goto S_56144;}
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+ 1 ;
if(!qbevent)break;evnt(25769,14955,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14957,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 )));
if(!qbevent)break;evnt(25769,14960,"ide_methods.bas");}while(r);
S_56149:;
if ((-(((float)(*_FUNC_IDEVBAR_SINGLE_P))<((float)( 0.5E+0 ))))||is_error_pending()){
if(qbevent){evnt(25769,14961,"ide_methods.bas");if(r)goto S_56149;}
do{
*_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ;
if(!qbevent)break;evnt(25769,14961,"ide_methods.bas");}while(r);
}else{
do{
*_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 2 ;
if(!qbevent)break;evnt(25769,14961,"ide_methods.bas");}while(r);
}
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14962,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2;
if(!qbevent)break;evnt(25769,14963,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14964,"ide_methods.bas");}while(r);
}
}
S_56159:;
if ((-(*_FUNC_IDEVBAR_LONG_H> 4 ))||is_error_pending()){
if(qbevent){evnt(25769,14968,"ide_methods.bas");if(r)goto S_56159;}
S_56160:;
if ((-(*_FUNC_IDEVBAR_LONG_N== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14969,"ide_methods.bas");if(r)goto S_56160;}
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y+(*_FUNC_IDEVBAR_LONG_H/  4 );
if(!qbevent)break;evnt(25769,14970,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14972,"ide_methods.bas");}while(r);
}
S_56164:;
if ((-(*_FUNC_IDEVBAR_LONG_I== 1 ))||is_error_pending()){
if(qbevent){evnt(25769,14974,"ide_methods.bas");if(r)goto S_56164;}
do{
*_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+ 1 ;
if(!qbevent)break;evnt(25769,14975,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14976,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2;
if(!qbevent)break;evnt(25769,14977,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14978,"ide_methods.bas");}while(r);
}
S_56170:;
if ((-(*_FUNC_IDEVBAR_LONG_I==*_FUNC_IDEVBAR_LONG_N))||is_error_pending()){
if(qbevent){evnt(25769,14980,"ide_methods.bas");if(r)goto S_56170;}
do{
*_FUNC_IDEVBAR_LONG_Y2=*_FUNC_IDEVBAR_LONG_Y+*_FUNC_IDEVBAR_LONG_H- 2 ;
if(!qbevent)break;evnt(25769,14981,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14982,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2;
if(!qbevent)break;evnt(25769,14983,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14984,"ide_methods.bas");}while(r);
}
do{
*_FUNC_IDEVBAR_SINGLE_P=(*_FUNC_IDEVBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEVBAR_LONG_N- 1 )));
if(!qbevent)break;evnt(25769,14987,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_SINGLE_P=*_FUNC_IDEVBAR_SINGLE_P*(*_FUNC_IDEVBAR_LONG_H- 4 );
if(!qbevent)break;evnt(25769,14988,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_Y2=qbr(*_FUNC_IDEVBAR_LONG_Y+ 2 +std::floor(*_FUNC_IDEVBAR_SINGLE_P));
if(!qbevent)break;evnt(25769,14989,"ide_methods.bas");}while(r);
do{
sub__printstring(*_FUNC_IDEVBAR_LONG_X,*_FUNC_IDEVBAR_LONG_Y2,func_chr( 219 ),NULL,0);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(25769,14990,"ide_methods.bas");}while(r);
do{
*_FUNC_IDEVBAR_LONG_IDEVBAR=*_FUNC_IDEVBAR_LONG_Y2;
if(!qbevent)break;evnt(25769,14991,"ide_methods.bas");}while(r);
do{
goto exit_subfunc;
if(!qbevent)break;evnt(25769,14992,"ide_methods.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free321.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_IDEVBAR_LONG_IDEVBAR;
}
