'============================================================================================================================
' TRANSITIONS BETEEN HTML AND VB MODES
'----------------------------------------------------------------------------------------------------------------------------
wait_for_= = < +"echo".idf +" " 'raise an event response.write; space added for call-function-syntax;
. < + 'no char "="; drop state wait_for_=;
'----------------------------------------------------------------------------------------------------------------------------
' REMARK HANDLER .R
' remarks as <% x=4 'remark %> <table><tr> <% x=4 'remark2 end of line
'----------------------------------------------------------------------------------------------------------------------------
- .R >remark ..tz_separator_case."n" : '.R is intercepted here; if it happened,
..each_char_is_separator.t '<-----fix15--- then Compi is in VB mode;
'collect remark in remark_state; if % is met,
'investigate it for html %> switch;
'this allows to close asp %> inside of VB remark.
remark %..l >%
remark,% >..l <2 "\r\n" +.html '!+ IN THE MIDDLE OF COMMENT, EXIT TO HTML GENERATES
. < % + ' LINE BREAK; YOU MAY CHANGE THIS RULE HERE;
remark .10 < ..percept."VBSCRIPT" :
+.r10 'line terminated as usual inside VBscript
"\013"..l 'ignore cr;
. .& 'in remark state all tokens are passed to output;
- "'" +.t // +.R '"'" and rem.k lead to "remark handler" .R
rem.k +"'"
.r // .& .i 'if programmer would like to immediately write a remark
'and nicely go to differnte line,
'usage: +"Message in remark".r
'----------------------------------------------------------------------------------------------------------------------------
- %> +: +.html
.html >html ..percept."HTML" "?>" 'complete switching to html
'============================================================================================================================