qbs* FUNC_GETSELECTEDTEXT(int8*_FUNC_GETSELECTEDTEXT_BYTE_MULTILINE){
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 "data364.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;
S_60856:;
if ((*__LONG_IDESELECT)||is_error_pending()){
if(qbevent){evnt(24235,20493,"ide_methods.bas");if(r)goto S_60856;}
do{
*_FUNC_GETSELECTEDTEXT_LONG_SY1=*__LONG_IDESELECTY1;
if(!qbevent)break;evnt(24235,20494,"ide_methods.bas");}while(r);
do{
*_FUNC_GETSELECTEDTEXT_LONG_SY2=*__LONG_IDECY;
if(!qbevent)break;evnt(24235,20495,"ide_methods.bas");}while(r);
S_60859:;
if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SY1>*_FUNC_GETSELECTEDTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(24235,20496,"ide_methods.bas");if(r)goto S_60859;}
do{
swap_32(&*_FUNC_GETSELECTEDTEXT_LONG_SY1,&*_FUNC_GETSELECTEDTEXT_LONG_SY2);
if(!qbevent)break;evnt(24235,20496,"ide_methods.bas");}while(r);
}
do{
*_FUNC_GETSELECTEDTEXT_LONG_SX1=*__LONG_IDESELECTX1;
if(!qbevent)break;evnt(24235,20497,"ide_methods.bas");}while(r);
do{
*_FUNC_GETSELECTEDTEXT_LONG_SX2=*__LONG_IDECX;
if(!qbevent)break;evnt(24235,20498,"ide_methods.bas");}while(r);
S_60864:;
if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SX1>*_FUNC_GETSELECTEDTEXT_LONG_SX2))||is_error_pending()){
if(qbevent){evnt(24235,20499,"ide_methods.bas");if(r)goto S_60864;}
do{
swap_32(&*_FUNC_GETSELECTEDTEXT_LONG_SX1,&*_FUNC_GETSELECTEDTEXT_LONG_SX2);
if(!qbevent)break;evnt(24235,20499,"ide_methods.bas");}while(r);
}
S_60867:;
fornext_value6776=*_FUNC_GETSELECTEDTEXT_LONG_SY1;
fornext_finalvalue6776=*_FUNC_GETSELECTEDTEXT_LONG_SY2;
fornext_step6776= 1 ;
if (fornext_step6776<0) fornext_step_negative6776=1; else fornext_step_negative6776=0;
if (is_error_pending()) goto fornext_error6776;
goto fornext_entrylabel6776;
while(1){
fornext_value6776=fornext_step6776+(*_FUNC_GETSELECTEDTEXT_LONG_Y);
fornext_entrylabel6776:
*_FUNC_GETSELECTEDTEXT_LONG_Y=fornext_value6776;
if (fornext_step_negative6776){
if (fornext_value6776<fornext_finalvalue6776) break;
}else{
if (fornext_value6776>fornext_finalvalue6776) break;
}
fornext_error6776:;
if(qbevent){evnt(24235,20500,"ide_methods.bas");if(r)goto S_60867;}
S_60868:;
if ((-(*_FUNC_GETSELECTEDTEXT_LONG_Y<=*__LONG_IDEN))||is_error_pending()){
if(qbevent){evnt(24235,20501,"ide_methods.bas");if(r)goto S_60868;}
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_A,FUNC_IDEGETLINE(_FUNC_GETSELECTEDTEXT_LONG_Y));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20502,"ide_methods.bas");}while(r);
S_60870:;
if ((-(*_FUNC_GETSELECTEDTEXT_LONG_SY1==*_FUNC_GETSELECTEDTEXT_LONG_SY2))||is_error_pending()){
if(qbevent){evnt(24235,20503,"ide_methods.bas");if(r)goto S_60870;}
S_60871:;
fornext_value6778=*_FUNC_GETSELECTEDTEXT_LONG_SX1;
fornext_finalvalue6778=*_FUNC_GETSELECTEDTEXT_LONG_SX2- 1 ;
fornext_step6778= 1 ;
if (fornext_step6778<0) fornext_step_negative6778=1; else fornext_step_negative6778=0;
if (is_error_pending()) goto fornext_error6778;
goto fornext_entrylabel6778;
while(1){
fornext_value6778=fornext_step6778+(*_FUNC_GETSELECTEDTEXT_LONG_X);
fornext_entrylabel6778:
*_FUNC_GETSELECTEDTEXT_LONG_X=fornext_value6778;
if (fornext_step_negative6778){
if (fornext_value6778<fornext_finalvalue6778) break;
}else{
if (fornext_value6778>fornext_finalvalue6778) break;
}
fornext_error6778:;
if(qbevent){evnt(24235,20504,"ide_methods.bas");if(r)goto S_60871;}
S_60872:;
if ((qbs_cleanup(qbs_tmp_base,-(*_FUNC_GETSELECTEDTEXT_LONG_X<=_FUNC_GETSELECTEDTEXT_STRING_A->len)))||is_error_pending()){
if(qbevent){evnt(24235,20505,"ide_methods.bas");if(r)goto S_60872;}
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,func_mid(_FUNC_GETSELECTEDTEXT_STRING_A,*_FUNC_GETSELECTEDTEXT_LONG_X, 1 ,0|1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20505,"ide_methods.bas");}while(r);
}else{
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_new_txt_len(" ",1)));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20505,"ide_methods.bas");}while(r);
}
fornext_continue_6777:;
}
fornext_exit_6777:;
}else{
S_60879:;
if ((~(*_FUNC_GETSELECTEDTEXT_BYTE_MULTILINE))||is_error_pending()){
if(qbevent){evnt(24235,20508,"ide_methods.bas");if(r)goto S_60879;}
do{
goto exit_subfunc;
if(!qbevent)break;evnt(24235,20508,"ide_methods.bas");}while(r);
}
S_60882:;
if (((-(*__LONG_IDECX== 1 ))&(-(*_FUNC_GETSELECTEDTEXT_LONG_Y==*_FUNC_GETSELECTEDTEXT_LONG_SY2))&(-(*__LONG_IDECY>*_FUNC_GETSELECTEDTEXT_LONG_SY1)))||is_error_pending()){
if(qbevent){evnt(24235,20509,"ide_methods.bas");if(r)goto S_60882;}
do{
goto LABEL_NOFINALCOPY;
if(!qbevent)break;evnt(24235,20509,"ide_methods.bas");}while(r);
}
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_add(qbs_add(qbs_add(_FUNC_GETSELECTEDTEXT_STRING_CLIP,_FUNC_GETSELECTEDTEXT_STRING_A),func_chr( 13 )),func_chr( 10 )));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20510,"ide_methods.bas");}while(r);
LABEL_NOFINALCOPY:;
if(qbevent){evnt(24235,20511,"ide_methods.bas");r=0;}
S_60886:;
if ((qbs_cleanup(qbs_tmp_base,(-(*_FUNC_GETSELECTEDTEXT_LONG_Y==*_FUNC_GETSELECTEDTEXT_LONG_SY2))&(-(*__LONG_IDECX> 1 ))&(-(_FUNC_GETSELECTEDTEXT_STRING_A->len> 0 ))))||is_error_pending()){
if(qbevent){evnt(24235,20512,"ide_methods.bas");if(r)goto S_60886;}
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_CLIP,qbs_left(_FUNC_GETSELECTEDTEXT_STRING_CLIP,_FUNC_GETSELECTEDTEXT_STRING_CLIP->len- 2 ));
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20512,"ide_methods.bas");}while(r);
}
}
}
fornext_continue_6775:;
}
fornext_exit_6775:;
do{
qbs_set(_FUNC_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT,_FUNC_GETSELECTEDTEXT_STRING_CLIP);
qbs_cleanup(qbs_tmp_base,0);
if(!qbevent)break;evnt(24235,20516,"ide_methods.bas");}while(r);
}
exit_subfunc:;
free_mem_lock(sf_mem_lock);
#include "free364.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;
qbs_maketmp(_FUNC_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT);return _FUNC_GETSELECTEDTEXT_STRING_GETSELECTEDTEXT;
}
