#line 12147 "ide/ide_methods.bas"
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){
#line 12147 "ide/ide_methods.bas"
qbs *tqbs;
#line 12147 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 12147 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 12147 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 12147 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 12147 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 12147 "ide/ide_methods.bas"
#include "data404.txt"
#line 12147 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 12147 "ide/ide_methods.bas"
new_mem_lock();
#line 12147 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 12147 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 12147 "ide/ide_methods.bas"
libqb_check_stack();
#line 12147 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 12148 "ide/ide_methods.bas"
do{
#line 12148 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_I2;
#line 12148 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12148,"ide_methods.bas");}while(r);
#line 12148 "ide/ide_methods.bas"
do{
#line 12148 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_N=*_FUNC_IDEHBAR_LONG_N2;
#line 12148 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12148,"ide_methods.bas");}while(r);
#line 12166 "ide/ide_methods.bas"
do{
#line 12166 "ide/ide_methods.bas"
qbg_sub_color( 0 , 7 ,NULL,NULL,3);
#line 12166 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12166,"ide_methods.bas");}while(r);
#line 12167 "ide/ide_methods.bas"
do{
#line 12167 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X,*_FUNC_IDEHBAR_LONG_Y,func_chr( 27 ),NULL,0);
#line 12167 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12167 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12167,"ide_methods.bas");}while(r);
#line 12168 "ide/ide_methods.bas"
do{
#line 12168 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 1 ,*_FUNC_IDEHBAR_LONG_Y,func_chr( 26 ),NULL,0);
#line 12168 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12168 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12168,"ide_methods.bas");}while(r);
#line 12169 "ide/ide_methods.bas"
S_58385:;
#line 12169 "ide/ide_methods.bas"
fornext_value6055=*_FUNC_IDEHBAR_LONG_X+ 1 ;
#line 12169 "ide/ide_methods.bas"
fornext_finalvalue6055=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ;
#line 12169 "ide/ide_methods.bas"
fornext_step6055= 1 ;
#line 12169 "ide/ide_methods.bas"
if (fornext_step6055<0) fornext_step_negative6055=1; else fornext_step_negative6055=0;
#line 12169 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6055;
#line 12169 "ide/ide_methods.bas"
goto fornext_entrylabel6055;
#line 12169 "ide/ide_methods.bas"
while(1){
#line 12169 "ide/ide_methods.bas"
fornext_value6055=fornext_step6055+(*_FUNC_IDEHBAR_LONG_X2);
#line 12169 "ide/ide_methods.bas"
fornext_entrylabel6055:
#line 12169 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=fornext_value6055;
#line 12169 "ide/ide_methods.bas"
if (fornext_step_negative6055){
#line 12169 "ide/ide_methods.bas"
if (fornext_value6055<fornext_finalvalue6055) break;
#line 12169 "ide/ide_methods.bas"
}else{
#line 12169 "ide/ide_methods.bas"
if (fornext_value6055>fornext_finalvalue6055) break;
#line 12169 "ide/ide_methods.bas"
}
#line 12169 "ide/ide_methods.bas"
fornext_error6055:;
#line 12169 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12169,"ide_methods.bas");if(r)goto S_58385;}
#line 12170 "ide/ide_methods.bas"
do{
#line 12170 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 176 ),NULL,0);
#line 12170 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12170 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12170,"ide_methods.bas");}while(r);
#line 12171 "ide/ide_methods.bas"
fornext_continue_6054:;
#line 12171 "ide/ide_methods.bas"
}
#line 12171 "ide/ide_methods.bas"
fornext_exit_6054:;
#line 12175 "ide/ide_methods.bas"
S_58388:;
#line 12175 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_N< 1 ))||is_error_pending()){
#line 12175 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12175,"ide_methods.bas");if(r)goto S_58388;}
#line 12175 "ide/ide_methods.bas"
do{
#line 12175 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_N= 1 ;
#line 12175 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12175,"ide_methods.bas");}while(r);
#line 12175 "ide/ide_methods.bas"
}
#line 12176 "ide/ide_methods.bas"
S_58391:;
#line 12176 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_I< 1 ))||is_error_pending()){
#line 12176 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12176,"ide_methods.bas");if(r)goto S_58391;}
#line 12176 "ide/ide_methods.bas"
do{
#line 12176 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_I= 1 ;
#line 12176 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12176,"ide_methods.bas");}while(r);
#line 12176 "ide/ide_methods.bas"
}
#line 12177 "ide/ide_methods.bas"
S_58394:;
#line 12177 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_I>*_FUNC_IDEHBAR_LONG_N))||is_error_pending()){
#line 12177 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12177,"ide_methods.bas");if(r)goto S_58394;}
#line 12177 "ide/ide_methods.bas"
do{
#line 12177 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_I=*_FUNC_IDEHBAR_LONG_N;
#line 12177 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12177,"ide_methods.bas");}while(r);
#line 12177 "ide/ide_methods.bas"
}
#line 12179 "ide/ide_methods.bas"
S_58397:;
#line 12179 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_H== 2 ))||is_error_pending()){
#line 12179 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12179,"ide_methods.bas");if(r)goto S_58397;}
#line 12180 "ide/ide_methods.bas"
do{
#line 12180 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X;
#line 12180 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12180,"ide_methods.bas");}while(r);
#line 12181 "ide/ide_methods.bas"
do{
#line 12181 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12181 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12181,"ide_methods.bas");}while(r);
#line 12182 "ide/ide_methods.bas"
}
#line 12184 "ide/ide_methods.bas"
S_58401:;
#line 12184 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_H== 3 ))||is_error_pending()){
#line 12184 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12184,"ide_methods.bas");if(r)goto S_58401;}
#line 12185 "ide/ide_methods.bas"
do{
#line 12185 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ;
#line 12185 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12185,"ide_methods.bas");}while(r);
#line 12187 "ide/ide_methods.bas"
do{
#line 12187 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12187 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12187,"ide_methods.bas");}while(r);
#line 12188 "ide/ide_methods.bas"
}
#line 12190 "ide/ide_methods.bas"
S_58405:;
#line 12190 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_H== 4 ))||is_error_pending()){
#line 12190 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12190,"ide_methods.bas");if(r)goto S_58405;}
#line 12191 "ide/ide_methods.bas"
S_58406:;
#line 12191 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||is_error_pending()){
#line 12191 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12191,"ide_methods.bas");if(r)goto S_58406;}
#line 12192 "ide/ide_methods.bas"
do{
#line 12192 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+ 1 ;
#line 12192 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12192,"ide_methods.bas");}while(r);
#line 12194 "ide/ide_methods.bas"
do{
#line 12194 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12194 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12194,"ide_methods.bas");}while(r);
#line 12195 "ide/ide_methods.bas"
}else{
#line 12197 "ide/ide_methods.bas"
do{
#line 12197 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 )));
#line 12197 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12197,"ide_methods.bas");}while(r);
#line 12198 "ide/ide_methods.bas"
S_58411:;
#line 12198 "ide/ide_methods.bas"
if ((-(((float)(*_FUNC_IDEHBAR_SINGLE_P))<((float)( 0.5E+0 ))))||is_error_pending()){
#line 12198 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12198,"ide_methods.bas");if(r)goto S_58411;}
#line 12198 "ide/ide_methods.bas"
do{
#line 12198 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ;
#line 12198 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12198,"ide_methods.bas");}while(r);
#line 12198 "ide/ide_methods.bas"
}else{
#line 12198 "ide/ide_methods.bas"
do{
#line 12198 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 2 ;
#line 12198 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12198,"ide_methods.bas");}while(r);
#line 12198 "ide/ide_methods.bas"
}
#line 12199 "ide/ide_methods.bas"
do{
#line 12199 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
#line 12199 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12199 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12199,"ide_methods.bas");}while(r);
#line 12200 "ide/ide_methods.bas"
do{
#line 12200 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
#line 12200 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12200,"ide_methods.bas");}while(r);
#line 12201 "ide/ide_methods.bas"
do{
#line 12201 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12201 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12201,"ide_methods.bas");}while(r);
#line 12202 "ide/ide_methods.bas"
}
#line 12203 "ide/ide_methods.bas"
}
#line 12205 "ide/ide_methods.bas"
S_58421:;
#line 12205 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_H> 4 ))||is_error_pending()){
#line 12205 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12205,"ide_methods.bas");if(r)goto S_58421;}
#line 12206 "ide/ide_methods.bas"
S_58422:;
#line 12206 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_N== 1 ))||is_error_pending()){
#line 12206 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12206,"ide_methods.bas");if(r)goto S_58422;}
#line 12207 "ide/ide_methods.bas"
do{
#line 12207 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X+(qb_safe_idiv(*_FUNC_IDEHBAR_LONG_H, 4 ));
#line 12207 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12207,"ide_methods.bas");}while(r);
#line 12209 "ide/ide_methods.bas"
do{
#line 12209 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12209 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12209,"ide_methods.bas");}while(r);
#line 12210 "ide/ide_methods.bas"
}
#line 12211 "ide/ide_methods.bas"
S_58426:;
#line 12211 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_I== 1 ))||is_error_pending()){
#line 12211 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12211,"ide_methods.bas");if(r)goto S_58426;}
#line 12212 "ide/ide_methods.bas"
do{
#line 12212 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+ 1 ;
#line 12212 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12212,"ide_methods.bas");}while(r);
#line 12213 "ide/ide_methods.bas"
do{
#line 12213 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
#line 12213 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12213 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12213,"ide_methods.bas");}while(r);
#line 12214 "ide/ide_methods.bas"
do{
#line 12214 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
#line 12214 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12214,"ide_methods.bas");}while(r);
#line 12215 "ide/ide_methods.bas"
do{
#line 12215 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12215 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12215,"ide_methods.bas");}while(r);
#line 12216 "ide/ide_methods.bas"
}
#line 12217 "ide/ide_methods.bas"
S_58432:;
#line 12217 "ide/ide_methods.bas"
if ((-(*_FUNC_IDEHBAR_LONG_I==*_FUNC_IDEHBAR_LONG_N))||is_error_pending()){
#line 12217 "ide/ide_methods.bas"
if(qbevent){evnt(28819,12217,"ide_methods.bas");if(r)goto S_58432;}
#line 12218 "ide/ide_methods.bas"
do{
#line 12218 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=*_FUNC_IDEHBAR_LONG_X+*_FUNC_IDEHBAR_LONG_H- 2 ;
#line 12218 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12218,"ide_methods.bas");}while(r);
#line 12219 "ide/ide_methods.bas"
do{
#line 12219 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
#line 12219 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12219 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12219,"ide_methods.bas");}while(r);
#line 12220 "ide/ide_methods.bas"
do{
#line 12220 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
#line 12220 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12220,"ide_methods.bas");}while(r);
#line 12221 "ide/ide_methods.bas"
do{
#line 12221 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12221 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12221,"ide_methods.bas");}while(r);
#line 12222 "ide/ide_methods.bas"
}
#line 12224 "ide/ide_methods.bas"
do{
#line 12224 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_SINGLE_P=(*_FUNC_IDEHBAR_LONG_I- 1 )/ ((long double)((*_FUNC_IDEHBAR_LONG_N- 1 )));
#line 12224 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12224,"ide_methods.bas");}while(r);
#line 12225 "ide/ide_methods.bas"
do{
#line 12225 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_SINGLE_P=*_FUNC_IDEHBAR_SINGLE_P*(*_FUNC_IDEHBAR_LONG_H- 4 );
#line 12225 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12225,"ide_methods.bas");}while(r);
#line 12226 "ide/ide_methods.bas"
do{
#line 12226 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_X2=qbr(*_FUNC_IDEHBAR_LONG_X+ 2 +std::floor(*_FUNC_IDEHBAR_SINGLE_P));
#line 12226 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12226,"ide_methods.bas");}while(r);
#line 12227 "ide/ide_methods.bas"
do{
#line 12227 "ide/ide_methods.bas"
sub__printstring(*_FUNC_IDEHBAR_LONG_X2,*_FUNC_IDEHBAR_LONG_Y,func_chr( 219 ),NULL,0);
#line 12227 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 12227 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12227,"ide_methods.bas");}while(r);
#line 12228 "ide/ide_methods.bas"
do{
#line 12228 "ide/ide_methods.bas"
*_FUNC_IDEHBAR_LONG_IDEHBAR=*_FUNC_IDEHBAR_LONG_X2;
#line 12228 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12228,"ide_methods.bas");}while(r);
#line 12229 "ide/ide_methods.bas"
do{
#line 12229 "ide/ide_methods.bas"
goto exit_subfunc;
#line 12229 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,12229,"ide_methods.bas");}while(r);
#line 12230 "ide/ide_methods.bas"
}
#line 12233 "ide/ide_methods.bas"
exit_subfunc:;
#line 12233 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 12233 "ide/ide_methods.bas"
#include "free404.txt"
#line 12233 "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 12233 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 12233 "ide/ide_methods.bas"
return *_FUNC_IDEHBAR_LONG_IDEHBAR;
#line 12233 "ide/ide_methods.bas"
}
