#line 26116 "qb64pe.bas"
void SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX(qbs*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE,qbs*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE,int32*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_U,qbs*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF,qbs*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF,qbs*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,int32*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_LOOP_DEPTH){
#line 26116 "qb64pe.bas"
qbs *tqbs;
#line 26116 "qb64pe.bas"
ptrszint tmp_long;
#line 26116 "qb64pe.bas"
int32 tmp_fileno;
#line 26116 "qb64pe.bas"
uint32 qbs_tmp_base=qbs_tmp_list_nexti;
#line 26116 "qb64pe.bas"
uint8 *tmp_mem_static_pointer=mem_static_pointer;
#line 26116 "qb64pe.bas"
uint32 tmp_cmem_sp=cmem_sp;
#line 26116 "qb64pe.bas"
#include "data83.txt"
#line 26116 "qb64pe.bas"
mem_lock *sf_mem_lock;
#line 26116 "qb64pe.bas"
new_mem_lock();
#line 26116 "qb64pe.bas"
sf_mem_lock=mem_lock_tmp;
#line 26116 "qb64pe.bas"
sf_mem_lock->type=3;
#line 26116 "qb64pe.bas"
libqb_check_stack();
#line 26116 "qb64pe.bas"
if (is_error_pending()) goto exit_subfunc;
#line 26125 "qb64pe.bas"
do{
#line 26125 "qb64pe.bas"
if(!qbevent)break;evnt(26125);}while(r);
#line 26126 "qb64pe.bas"
do{
#line 26126 "qb64pe.bas"
if(!qbevent)break;evnt(26126);}while(r);
#line 26127 "qb64pe.bas"
do{
#line 26127 "qb64pe.bas"
if(!qbevent)break;evnt(26127);}while(r);
#line 26128 "qb64pe.bas"
do{
#line 26128 "qb64pe.bas"
if(!qbevent)break;evnt(26128);}while(r);
#line 26129 "qb64pe.bas"
do{
#line 26129 "qb64pe.bas"
if(!qbevent)break;evnt(26129);}while(r);
#line 26130 "qb64pe.bas"
do{
#line 26130 "qb64pe.bas"
if(!qbevent)break;evnt(26130);}while(r);
#line 26131 "qb64pe.bas"
do{
#line 26131 "qb64pe.bas"
if(!qbevent)break;evnt(26131);}while(r);
#line 26132 "qb64pe.bas"
do{
#line 26132 "qb64pe.bas"
if(!qbevent)break;evnt(26132);}while(r);
#line 26133 "qb64pe.bas"
do{
#line 26133 "qb64pe.bas"
if(!qbevent)break;evnt(26133);}while(r);
#line 26134 "qb64pe.bas"
do{
#line 26134 "qb64pe.bas"
if(!qbevent)break;evnt(26134);}while(r);
#line 26135 "qb64pe.bas"
do{
#line 26135 "qb64pe.bas"
if(!qbevent)break;evnt(26135);}while(r);
#line 26136 "qb64pe.bas"
do{
#line 26136 "qb64pe.bas"
if(!qbevent)break;evnt(26136);}while(r);
#line 26137 "qb64pe.bas"
do{
#line 26137 "qb64pe.bas"
if(!qbevent)break;evnt(26137);}while(r);
#line 26138 "qb64pe.bas"
do{
#line 26138 "qb64pe.bas"
if(!qbevent)break;evnt(26138);}while(r);
#line 26140 "qb64pe.bas"
do{
#line 26140 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES= 0 ;
#line 26140 "qb64pe.bas"
if(!qbevent)break;evnt(26140);}while(r);
#line 26141 "qb64pe.bas"
do{
#line 26141 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E=((int32*)(__ARRAY_LONG_UDTXNEXT[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_U)-__ARRAY_LONG_UDTXNEXT[4],__ARRAY_LONG_UDTXNEXT[5])];
#line 26141 "qb64pe.bas"
if(!qbevent)break;evnt(26141);}while(r);
#line 26143 "qb64pe.bas"
S_30166:;
#line 26143 "qb64pe.bas"
while((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)||is_error_pending()){
#line 26143 "qb64pe.bas"
if(qbevent){evnt(26143);if(r)goto S_30166;}
#line 26144 "qb64pe.bas"
do{
#line 26144 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_MEMBERBYTES=qb_safe_idiv(((int32*)(__ARRAY_LONG_UDTESIZE[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTESIZE[4],__ARRAY_LONG_UDTESIZE[5])], 8 );
#line 26144 "qb64pe.bas"
if(!qbevent)break;evnt(26144);}while(r);
#line 26145 "qb64pe.bas"
do{
#line 26145 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T=((int32*)(__ARRAY_LONG_UDTETYPE[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTETYPE[4],__ARRAY_LONG_UDTETYPE[5])];
#line 26145 "qb64pe.bas"
if(!qbevent)break;evnt(26145);}while(r);
#line 26147 "qb64pe.bas"
S_30169:;
#line 26147 "qb64pe.bas"
if ((((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])])||is_error_pending()){
#line 26147 "qb64pe.bas"
if(qbevent){evnt(26147);if(r)goto S_30169;}
#line 26148 "qb64pe.bas"
do{
#line 26148 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_ELEMBYTES=qb_safe_idiv(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_MEMBERBYTES,((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]);
#line 26148 "qb64pe.bas"
if(!qbevent)break;evnt(26148);}while(r);
#line 26149 "qb64pe.bas"
do{
#line 26149 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_COUNT_TEXT,qbs__tostr((int32)(((int32*)(__ARRAY_LONG_UDTEARRAYELEMENTS[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTEARRAYELEMENTS[4],__ARRAY_LONG_UDTEARRAYELEMENTS[5])]),NULL,0));
#line 26149 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26149 "qb64pe.bas"
if(!qbevent)break;evnt(26149);}while(r);
#line 26150 "qb64pe.bas"
do{
#line 26150 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_STRIDE_TEXT,qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_ELEMBYTES),NULL,0));
#line 26150 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26150 "qb64pe.bas"
if(!qbevent)break;evnt(26150);}while(r);
#line 26152 "qb64pe.bas"
S_30173:;
#line 26152 "qb64pe.bas"
if (((-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISSTRING)!= 0 ))&(-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISFIXEDLENGTH)== 0 )))||is_error_pending()){
#line 26152 "qb64pe.bas"
if(qbevent){evnt(26152);if(r)goto S_30173;}
#line 26153 "qb64pe.bas"
do{
#line 26153 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME,qbs_add(qbs_new_txt_len("preserve_udt_i",14),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_LOOP_DEPTH),NULL,0)));
#line 26153 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26153 "qb64pe.bas"
if(!qbevent)break;evnt(26153);}while(r);
#line 26154 "qb64pe.bas"
do{
#line 26154 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("for(ptrszint ",13)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("=0;",3)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("<",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_COUNT_TEXT),qbs_new_txt_len(";",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("++){",4)));
#line 26154 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26154 "qb64pe.bas"
if(!qbevent)break;evnt(26154);}while(r);
#line 26155 "qb64pe.bas"
do{
#line 26155 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("+",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_STRIDE_TEXT),qbs_new_txt_len("))",2)));
#line 26155 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26155 "qb64pe.bas"
if(!qbevent)break;evnt(26155);}while(r);
#line 26156 "qb64pe.bas"
do{
#line 26156 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("+",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_STRIDE_TEXT),qbs_new_txt_len("))",2)));
#line 26156 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26156 "qb64pe.bas"
if(!qbevent)break;evnt(26156);}while(r);
#line 26157 "qb64pe.bas"
do{
#line 26157 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTQ,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)(",10),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER),qbs_new_txt_len("))",2)));
#line 26157 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26157 "qb64pe.bas"
if(!qbevent)break;evnt(26157);}while(r);
#line 26158 "qb64pe.bas"
do{
#line 26158 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCQ,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)(",10),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER),qbs_new_txt_len("))",2)));
#line 26158 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26158 "qb64pe.bas"
if(!qbevent)break;evnt(26158);}while(r);
#line 26159 "qb64pe.bas"
do{
#line 26159 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("qbs_set(",8)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTQ),qbs_new_txt_len(",",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCQ),qbs_new_txt_len(");",2)));
#line 26159 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26159 "qb64pe.bas"
if(!qbevent)break;evnt(26159);}while(r);
#line 26160 "qb64pe.bas"
do{
#line 26160 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("}",1)));
#line 26160 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26160 "qb64pe.bas"
if(!qbevent)break;evnt(26160);}while(r);
#line 26161 "qb64pe.bas"
S_30182:;
#line 26161 "qb64pe.bas"
}else{
#line 26161 "qb64pe.bas"
if ((-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISUDT)!= 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T& 4095ll )-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]){
#line 26161 "qb64pe.bas"
if(qbevent){evnt(26161);if(r)goto S_30182;}
#line 26162 "qb64pe.bas"
do{
#line 26162 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME,qbs_add(qbs_new_txt_len("preserve_udt_i",14),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_LOOP_DEPTH),NULL,0)));
#line 26162 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26162 "qb64pe.bas"
if(!qbevent)break;evnt(26162);}while(r);
#line 26163 "qb64pe.bas"
do{
#line 26163 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("for(ptrszint ",13)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("=0;",3)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("<",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_COUNT_TEXT),qbs_new_txt_len(";",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("++){",4)));
#line 26163 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26163 "qb64pe.bas"
if(!qbevent)break;evnt(26163);}while(r);
#line 26164 "qb64pe.bas"
do{
#line 26164 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_NEXTDSTOFF,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("+",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_STRIDE_TEXT),qbs_new_txt_len(")",1)));
#line 26164 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26164 "qb64pe.bas"
if(!qbevent)break;evnt(26164);}while(r);
#line 26165 "qb64pe.bas"
do{
#line 26165 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_NEXTSRCOFF,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("+",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_LOOP_NAME),qbs_new_txt_len("*",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_STRIDE_TEXT),qbs_new_txt_len(")",1)));
#line 26165 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26165 "qb64pe.bas"
if(!qbevent)break;evnt(26165);}while(r);
#line 26166 "qb64pe.bas"
do{
#line 26166 "qb64pe.bas"
SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE,_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE,&(pass3184=*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T& 4095ll ),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_NEXTDSTOFF,_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_NEXTSRCOFF,_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,&(pass3185=*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_LOOP_DEPTH+ 1 ));
#line 26166 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26166 "qb64pe.bas"
if(!qbevent)break;evnt(26166);}while(r);
#line 26167 "qb64pe.bas"
do{
#line 26167 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("}",1)));
#line 26167 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26167 "qb64pe.bas"
if(!qbevent)break;evnt(26167);}while(r);
#line 26168 "qb64pe.bas"
}else{
#line 26169 "qb64pe.bas"
do{
#line 26169 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("))",2)));
#line 26169 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26169 "qb64pe.bas"
if(!qbevent)break;evnt(26169);}while(r);
#line 26170 "qb64pe.bas"
do{
#line 26170 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("))",2)));
#line 26170 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26170 "qb64pe.bas"
if(!qbevent)break;evnt(26170);}while(r);
#line 26171 "qb64pe.bas"
do{
#line 26171 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("memcpy((void*)(",15)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER),qbs_new_txt_len("),(void*)(",10)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER),qbs_new_txt_len("),",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_MEMBERBYTES),NULL,0)),qbs_new_txt_len(");",2)));
#line 26171 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26171 "qb64pe.bas"
if(!qbevent)break;evnt(26171);}while(r);
#line 26172 "qb64pe.bas"
}
#line 26172 "qb64pe.bas"
}
#line 26174 "qb64pe.bas"
}else{
#line 26175 "qb64pe.bas"
do{
#line 26175 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("))",2)));
#line 26175 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26175 "qb64pe.bas"
if(!qbevent)break;evnt(26175);}while(r);
#line 26176 "qb64pe.bas"
do{
#line 26176 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((char*)(",9),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE),qbs_new_txt_len(")+((",4)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len("))",2)));
#line 26176 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26176 "qb64pe.bas"
if(!qbevent)break;evnt(26176);}while(r);
#line 26178 "qb64pe.bas"
S_30197:;
#line 26178 "qb64pe.bas"
if (((-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISSTRING)!= 0 ))&(-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISFIXEDLENGTH)== 0 )))||is_error_pending()){
#line 26178 "qb64pe.bas"
if(qbevent){evnt(26178);if(r)goto S_30197;}
#line 26179 "qb64pe.bas"
do{
#line 26179 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTQ,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)(",10),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER),qbs_new_txt_len("))",2)));
#line 26179 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26179 "qb64pe.bas"
if(!qbevent)break;evnt(26179);}while(r);
#line 26180 "qb64pe.bas"
do{
#line 26180 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCQ,qbs_add(qbs_add(qbs_new_txt_len("(*(qbs**)(",10),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER),qbs_new_txt_len("))",2)));
#line 26180 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26180 "qb64pe.bas"
if(!qbevent)break;evnt(26180);}while(r);
#line 26181 "qb64pe.bas"
do{
#line 26181 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("qbs_set(",8)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTQ),qbs_new_txt_len(",",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCQ),qbs_new_txt_len(");",2)));
#line 26181 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26181 "qb64pe.bas"
if(!qbevent)break;evnt(26181);}while(r);
#line 26182 "qb64pe.bas"
S_30201:;
#line 26182 "qb64pe.bas"
}else{
#line 26182 "qb64pe.bas"
if ((-((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T&*__LONG_ISUDT)!= 0 ))&((int16*)(__ARRAY_INTEGER_UDTXVARIABLE[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T& 4095ll )-__ARRAY_INTEGER_UDTXVARIABLE[4],__ARRAY_INTEGER_UDTXVARIABLE[5])]){
#line 26182 "qb64pe.bas"
if(qbevent){evnt(26182);if(r)goto S_30201;}
#line 26183 "qb64pe.bas"
do{
#line 26183 "qb64pe.bas"
SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTBASE,_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCBASE,&(pass3186=*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_T& 4095ll ),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len(")",1)),qbs_add(qbs_add(qbs_add(qbs_add(qbs_new_txt_len("((",2),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCOFF),qbs_new_txt_len(")+",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES),NULL,0)),qbs_new_txt_len(")",1)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_LOOP_DEPTH);
#line 26183 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26183 "qb64pe.bas"
if(!qbevent)break;evnt(26183);}while(r);
#line 26184 "qb64pe.bas"
}else{
#line 26185 "qb64pe.bas"
do{
#line 26185 "qb64pe.bas"
qbs_set(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(qbs_add(_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_ACC,__STRING_CRLF),qbs_new_txt_len("memcpy((void*)(",15)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_DSTMEMBER),qbs_new_txt_len("),(void*)(",10)),_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_STRING_SRCMEMBER),qbs_new_txt_len("),",2)),qbs__tostr((int32)(*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_MEMBERBYTES),NULL,0)),qbs_new_txt_len(");",2)));
#line 26185 "qb64pe.bas"
qbs_cleanup(qbs_tmp_base,0);
#line 26185 "qb64pe.bas"
if(!qbevent)break;evnt(26185);}while(r);
#line 26186 "qb64pe.bas"
}
#line 26186 "qb64pe.bas"
}
#line 26187 "qb64pe.bas"
}
#line 26189 "qb64pe.bas"
do{
#line 26189 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES=*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_OFFBYTES+*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_MEMBERBYTES;
#line 26189 "qb64pe.bas"
if(!qbevent)break;evnt(26189);}while(r);
#line 26190 "qb64pe.bas"
do{
#line 26190 "qb64pe.bas"
*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E=((int32*)(__ARRAY_LONG_UDTENEXT[0]))[array_check((*_SUB_COPY_PRESERVE_UDT_VARSTRINGS_EX_LONG_E)-__ARRAY_LONG_UDTENEXT[4],__ARRAY_LONG_UDTENEXT[5])];
#line 26190 "qb64pe.bas"
if(!qbevent)break;evnt(26190);}while(r);
#line 26191 "qb64pe.bas"
dl_continue_3183:;
#line 26191 "qb64pe.bas"
}
#line 26191 "qb64pe.bas"
dl_exit_3183:;
#line 26192 "qb64pe.bas"
exit_subfunc:;
#line 26192 "qb64pe.bas"
free_mem_lock(sf_mem_lock);
#line 26192 "qb64pe.bas"
#include "free83.txt"
#line 26192 "qb64pe.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 26192 "qb64pe.bas"
cmem_sp=tmp_cmem_sp;
#line 26192 "qb64pe.bas"
}
