#line 20655 "ide/ide_methods.bas"
qbs* FUNC_FINDPROPOSEDTITLE(){
#line 20655 "ide/ide_methods.bas"
qbs *tqbs;
#line 20655 "ide/ide_methods.bas"
ptrszint tmp_long;
#line 20655 "ide/ide_methods.bas"
int32 tmp_fileno;
#line 20655 "ide/ide_methods.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 20655 "ide/ide_methods.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 20655 "ide/ide_methods.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 20655 "ide/ide_methods.bas"
#include "data467.txt"
#line 20655 "ide/ide_methods.bas"
mem_lock *sf_mem_lock;
#line 20655 "ide/ide_methods.bas"
new_mem_lock();
#line 20655 "ide/ide_methods.bas"
sf_mem_lock=mem_lock_tmp;
#line 20655 "ide/ide_methods.bas"
sf_mem_lock->type=3;
#line 20655 "ide/ide_methods.bas"
libqb_check_stack();
#line 20655 "ide/ide_methods.bas"
if (is_error_pending()) goto exit_subfunc;
#line 20659 "ide/ide_methods.bas"
do{
#line 20659 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20659,"ide_methods.bas");}while(r);
#line 20660 "ide/ide_methods.bas"
S_67929:;
#line 20660 "ide/ide_methods.bas"
fornext_value6972= 1 ;
#line 20660 "ide/ide_methods.bas"
fornext_finalvalue6972=*__LONG_IDEN;
#line 20660 "ide/ide_methods.bas"
fornext_step6972= 1 ;
#line 20660 "ide/ide_methods.bas"
if (fornext_step6972<0) fornext_step_negative6972=1; else fornext_step_negative6972=0;
#line 20660 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6972;
#line 20660 "ide/ide_methods.bas"
goto fornext_entrylabel6972;
#line 20660 "ide/ide_methods.bas"
while(1){
#line 20660 "ide/ide_methods.bas"
fornext_value6972=fornext_step6972+(*_FUNC_FINDPROPOSEDTITLE_LONG_I);
#line 20660 "ide/ide_methods.bas"
fornext_entrylabel6972:
#line 20660 "ide/ide_methods.bas"
*_FUNC_FINDPROPOSEDTITLE_LONG_I=fornext_value6972;
#line 20660 "ide/ide_methods.bas"
if (fornext_step_negative6972){
#line 20660 "ide/ide_methods.bas"
if (fornext_value6972<fornext_finalvalue6972) break;
#line 20660 "ide/ide_methods.bas"
}else{
#line 20660 "ide/ide_methods.bas"
if (fornext_value6972>fornext_finalvalue6972) break;
#line 20660 "ide/ide_methods.bas"
}
#line 20660 "ide/ide_methods.bas"
fornext_error6972:;
#line 20660 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20660,"ide_methods.bas");if(r)goto S_67929;}
#line 20661 "ide/ide_methods.bas"
do{
#line 20661 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,FUNC_IDEGETLINE(_FUNC_FINDPROPOSEDTITLE_LONG_I));
#line 20661 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20661 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20661,"ide_methods.bas");}while(r);
#line 20662 "ide/ide_methods.bas"
do{
#line 20662 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,qbs_ltrim(qbs_rtrim(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE)));
#line 20662 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20662 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20662,"ide_methods.bas");}while(r);
#line 20663 "ide/ide_methods.bas"
do{
#line 20663 "ide/ide_methods.bas"
*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE=func_instr(NULL,qbs_ucase(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE),qbs_add(qbs_new_txt_len("_TITLE ",7),func_chr( 34 )),0);
#line 20663 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20663 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20663,"ide_methods.bas");}while(r);
#line 20664 "ide/ide_methods.bas"
S_67933:;
#line 20664 "ide/ide_methods.bas"
if ((-(*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE> 0 ))||is_error_pending()){
#line 20664 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20664,"ide_methods.bas");if(r)goto S_67933;}
#line 20665 "ide/ide_methods.bas"
do{
#line 20665 "ide/ide_methods.bas"
SUB_FINDQUOTECOMMENT(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE,_FUNC_FINDPROPOSEDTITLE_BYTE_C,_FUNC_FINDPROPOSEDTITLE_BYTE_Q);
#line 20665 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20665 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20665,"ide_methods.bas");}while(r);
#line 20666 "ide/ide_methods.bas"
S_67935:;
#line 20666 "ide/ide_methods.bas"
if ((~(*_FUNC_FINDPROPOSEDTITLE_BYTE_Q))||is_error_pending()){
#line 20666 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20666,"ide_methods.bas");if(r)goto S_67935;}
#line 20667 "ide/ide_methods.bas"
do{
#line 20667 "ide/ide_methods.bas"
*_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE=func_instr(*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE+ 8 ,_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,func_chr( 34 ),0|1);
#line 20667 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20667 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20667,"ide_methods.bas");}while(r);
#line 20668 "ide/ide_methods.bas"
S_67937:;
#line 20668 "ide/ide_methods.bas"
if ((-(*_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE> 0 ))||is_error_pending()){
#line 20668 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20668,"ide_methods.bas");if(r)goto S_67937;}
#line 20669 "ide/ide_methods.bas"
do{
#line 20669 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE,func_mid(_FUNC_FINDPROPOSEDTITLE_STRING_THISLINE,*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE+ 8 ,(*_FUNC_FINDPROPOSEDTITLE_LONG_FIND_CLOSINGQUOTE-*_FUNC_FINDPROPOSEDTITLE_LONG_FOUND_TITLE)- 8 ,0|1));
#line 20669 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20669 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20669,"ide_methods.bas");}while(r);
#line 20670 "ide/ide_methods.bas"
}
#line 20671 "ide/ide_methods.bas"
do{
#line 20671 "ide/ide_methods.bas"
goto fornext_exit_6971;
#line 20671 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20671,"ide_methods.bas");}while(r);
#line 20672 "ide/ide_methods.bas"
}
#line 20673 "ide/ide_methods.bas"
}
#line 20674 "ide/ide_methods.bas"
fornext_continue_6971:;
#line 20674 "ide/ide_methods.bas"
}
#line 20674 "ide/ide_methods.bas"
fornext_exit_6971:;
#line 20676 "ide/ide_methods.bas"
do{
#line 20676 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_INVALIDCHARS,qbs_add(qbs_new_txt_len(":/\\?*><|",8),func_chr( 34 )));
#line 20676 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20676 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20676,"ide_methods.bas");}while(r);
#line 20677 "ide/ide_methods.bas"
S_67945:;
#line 20677 "ide/ide_methods.bas"
fornext_value6974= 1 ;
#line 20677 "ide/ide_methods.bas"
fornext_finalvalue6974=_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE->len;
#line 20677 "ide/ide_methods.bas"
fornext_step6974= 1 ;
#line 20677 "ide/ide_methods.bas"
if (fornext_step6974<0) fornext_step_negative6974=1; else fornext_step_negative6974=0;
#line 20677 "ide/ide_methods.bas"
if (is_error_pending()) goto fornext_error6974;
#line 20677 "ide/ide_methods.bas"
goto fornext_entrylabel6974;
#line 20677 "ide/ide_methods.bas"
while(1){
#line 20677 "ide/ide_methods.bas"
fornext_value6974=fornext_step6974+(*_FUNC_FINDPROPOSEDTITLE_LONG_I);
#line 20677 "ide/ide_methods.bas"
fornext_entrylabel6974:
#line 20677 "ide/ide_methods.bas"
*_FUNC_FINDPROPOSEDTITLE_LONG_I=fornext_value6974;
#line 20677 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20677 "ide/ide_methods.bas"
if (fornext_step_negative6974){
#line 20677 "ide/ide_methods.bas"
if (fornext_value6974<fornext_finalvalue6974) break;
#line 20677 "ide/ide_methods.bas"
}else{
#line 20677 "ide/ide_methods.bas"
if (fornext_value6974>fornext_finalvalue6974) break;
#line 20677 "ide/ide_methods.bas"
}
#line 20677 "ide/ide_methods.bas"
fornext_error6974:;
#line 20677 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20677,"ide_methods.bas");if(r)goto S_67945;}
#line 20678 "ide/ide_methods.bas"
do{
#line 20678 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR,func_mid(_FUNC_FINDPROPOSEDTITLE_STRING_TEMPFOUND_TITLE,*_FUNC_FINDPROPOSEDTITLE_LONG_I, 1 ,0|1));
#line 20678 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20678 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20678,"ide_methods.bas");}while(r);
#line 20679 "ide/ide_methods.bas"
S_67947:;
#line 20679 "ide/ide_methods.bas"
if ((qbs_cleanup(qbs_tmp_base,-(func_instr(NULL,_FUNC_FINDPROPOSEDTITLE_STRING_INVALIDCHARS,_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR,0)== 0 )))||is_error_pending()){
#line 20679 "ide/ide_methods.bas"
if(qbevent){evnt(28819,20679,"ide_methods.bas");if(r)goto S_67947;}
#line 20680 "ide/ide_methods.bas"
do{
#line 20680 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE,qbs_add(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE,_FUNC_FINDPROPOSEDTITLE_STRING_THISCHAR));
#line 20680 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20680 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20680,"ide_methods.bas");}while(r);
#line 20681 "ide/ide_methods.bas"
}
#line 20682 "ide/ide_methods.bas"
fornext_continue_6973:;
#line 20682 "ide/ide_methods.bas"
}
#line 20682 "ide/ide_methods.bas"
fornext_exit_6973:;
#line 20684 "ide/ide_methods.bas"
do{
#line 20684 "ide/ide_methods.bas"
qbs_set(_FUNC_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE,qbs_ltrim(qbs_rtrim(_FUNC_FINDPROPOSEDTITLE_STRING_FOUND_TITLE)));
#line 20684 "ide/ide_methods.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 20684 "ide/ide_methods.bas"
if(!qbevent)break;evnt(28819,20684,"ide_methods.bas");}while(r);
#line 20685 "ide/ide_methods.bas"
exit_subfunc:;
#line 20685 "ide/ide_methods.bas"
free_mem_lock(sf_mem_lock);
#line 20685 "ide/ide_methods.bas"
#include "free467.txt"
#line 20685 "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 20685 "ide/ide_methods.bas"
cmem_sp=tmp_cmem_sp;
#line 20685 "ide/ide_methods.bas"
qbs_maketmp(_FUNC_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE);return _FUNC_FINDPROPOSEDTITLE_STRING_FINDPROPOSEDTITLE;
#line 20685 "ide/ide_methods.bas"
}
