2021-07-03 05:07:57 +01:00
<!DOCTYPE HTML>
< html >
< head >
< meta http-equiv = "Content-Type" content = "text/html;charset=US-ASCII" >
2021-12-11 11:10:58 +00:00
< meta name = "generator" content = "ZealOS V1.07" >
2021-07-03 05:07:57 +01:00
< style type = "text/css" >
2021-10-08 07:06:11 +01:00
body {background-color:#1f1f1f;}
.cF0{color:#e3e3e3;background-color:#1f1f1f;}
.cF1{color:#4f84a6;background-color:#1f1f1f;}
.cF2{color:#73a255;background-color:#1f1f1f;}
.cF3{color:#297582;background-color:#1f1f1f;}
.cF4{color:#b34f4b;background-color:#1f1f1f;}
.cF5{color:#8a52c3;background-color:#1f1f1f;}
.cF6{color:#b7822f;background-color:#1f1f1f;}
.cF7{color:#444444;background-color:#1f1f1f;}
.cF8{color:#6d6d6d;background-color:#1f1f1f;}
.cF9{color:#94bfde;background-color:#1f1f1f;}
.cFA{color:#a1ce97;background-color:#1f1f1f;}
.cFB{color:#6db4be;background-color:#1f1f1f;}
.cFC{color:#e88e88;background-color:#1f1f1f;}
.cFD{color:#ca94e8;background-color:#1f1f1f;}
.cFE{color:#d4b475;background-color:#1f1f1f;}
.cFF{color:#1f1f1f;background-color:#1f1f1f;}
2021-07-03 05:07:57 +01:00
< / style >
< / head >
< body >
2021-07-05 01:12:38 +01:00
< pre style = "font-family:monospace;font-size:12pt" >
2021-07-03 05:07:57 +01:00
< a name = "l1" > < / a > < span class = cF2 > //Place this file in /Home and change< / span > < span class = cF0 >
< a name = "l2" > < / a > < / span > < span class = cF2 > //anything you want.< / span > < span class = cF0 >
< a name = "l3" > < / a >
< a name = "l4" > < / a > < / span > < span class = cF1 > U0< / span > < span class = cF0 > < / span > < span class = cF5 > TimeIns< / span > < span class = cF0 > ()
< a name = "l5" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l6" > < / a > < / span > < span class = cF9 > CDate< / span > < span class = cF0 > cdt;
< a name = "l7" > < / a > cdt = < / span > < span class = cF5 > Now< / span > < span class = cF0 > ;
< a name = "l8" > < / a > < / span > < span class = cF6 > " $IV,1$----%D %T----$IV,0$\n" < / span > < span class = cF0 > , cdt, cdt;
2021-07-03 05:07:57 +01:00
< a name = "l9" > < / a > }
< a name = "l10" > < / a >
< a name = "l11" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cF5 > MyPutKey< / span > < span class = cF0 > (< / span > < span class = cF9 > I64< / span > < span class = cF0 > ch, < / span > < span class = cF9 > I64< / span > < span class = cF0 > sc)
< a name = "l12" > < / a > {< / span > < span class = cF2 > //ch=ASCII; sc=scan_code< / span > < span class = cF0 >
< a name = "l13" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l14" > < / a > < / span > < span class = cF2 > //See < / span > < span class = cF4 > < u > Char< / u > < / span > < span class = cF2 > for definition of scan codes.< / span > < span class = cF0 >
2021-07-26 20:29:49 +01:00
< a name = "l15" > < / a > < / span > < span class = cF2 > //See < / span > < a href = "https://zeal-operating-system.github.io/ZealOS/Doc/KeyAlloc.DD.html#l1" > < span class = cF4 > Key Allocations< / span > < / a > < span class = cF2 > .< / span > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l16" > < / a > < / span > < span class = cF2 > //See < / span > < span class = cF4 > < u > Keyboard Devices< / u > < / span > < span class = cF2 > .< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l17" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l18" > < / a > < / span > < span class = cF2 > //You can customize keys. This routine< / span > < span class = cF0 >
< a name = "l19" > < / a > < / span > < span class = cF2 > //is called before the main editor< / span > < span class = cF0 >
2021-12-11 11:10:58 +00:00
< a name = "l20" > < / a > < / span > < span class = cF2 > //key handler < / span > < a href = "https://zeal-operating-system.github.io/ZealOS/System/DolDoc/DocPutKey.ZC.html#l3" > < span class = cF4 > DocPutKey< / span > < / a > < span class = cF2 > ().< / span > < span class = cF0 >
2021-07-04 23:11:34 +01:00
< a name = "l21" > < / a > < / span > < span class = cF2 > //You can intercept any key.< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l22" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l23" > < / a > < / span > < span class = cF2 > //Return TRUE if you completely< / span > < span class = cF0 >
< a name = "l24" > < / a > < / span > < span class = cF2 > //handled the key.< / span > < span class = cF0 >
< a name = "l25" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i;
< a name = "l26" > < / a > < / span > < span class = cF1 > U8< / span > < span class = cF0 > *st1, *st2;
2021-07-03 05:07:57 +01:00
< a name = "l27" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l28" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_ALT< / span > < span class = cF0 > & & !< / span > < span class = cF7 > (< / span > < span class = cF0 > sc & < / span > < span class = cF3 > SCF_CTRL< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l29" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l30" > < / a > < / span > < span class = cF1 > switch< / span > < span class = cF0 > (ch)
2021-07-03 05:07:57 +01:00
< a name = "l31" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l32" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cFE > 0< / span > < span class = cF0 > :
< a name = "l33" > < / a > < / span > < span class = cF1 > switch< / span > < span class = cF0 > (sc.u8[< / span > < span class = cFE > 0< / span > < span class = cF0 > ])
< a name = "l34" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l35" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_F1< / span > < span class = cF0 > :
< a name = "l36" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF0 > )
< a name = "l37" > < / a > {
< a name = "l38" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l39" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /LTPURPLE" < / span > < span class = cF0 > );
< a name = "l40" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l41" > < / a > < / span > < span class = cF6 > " $LTPURPLE$" < / span > < span class = cF0 > ;
< a name = "l42" > < / a > }
< a name = "l43" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l44" > < / a > {
< a name = "l45" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l46" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /PURPLE" < / span > < span class = cF0 > );
< a name = "l47" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l48" > < / a > < / span > < span class = cF6 > " $PURPLE$" < / span > < span class = cF0 > ;
< a name = "l49" > < / a > }
< a name = "l50" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l51" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l52" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_F2< / span > < span class = cF0 > :
< a name = "l53" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF0 > )
< a name = "l54" > < / a > {
< a name = "l55" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l56" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /LTRED" < / span > < span class = cF0 > );
< a name = "l57" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l58" > < / a > < / span > < span class = cF6 > " $LTRED$" < / span > < span class = cF0 > ;
< a name = "l59" > < / a > }
< a name = "l60" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l61" > < / a > {
< a name = "l62" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l63" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /RED" < / span > < span class = cF0 > );
< a name = "l64" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l65" > < / a > < / span > < span class = cF6 > " $RED$" < / span > < span class = cF0 > ;
< a name = "l66" > < / a > }
< a name = "l67" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l68" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l69" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_F3< / span > < span class = cF0 > :
< a name = "l70" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF0 > )
< a name = "l71" > < / a > {
< a name = "l72" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l73" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /LTGREEN" < / span > < span class = cF0 > );
< a name = "l74" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l75" > < / a > < / span > < span class = cF6 > " $LTGREEN$" < / span > < span class = cF0 > ;
< a name = "l76" > < / a > }
< a name = "l77" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l78" > < / a > {
< a name = "l79" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l80" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /GREEN" < / span > < span class = cF0 > );
< a name = "l81" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l82" > < / a > < / span > < span class = cF6 > " $GREEN$" < / span > < span class = cF0 > ;
< a name = "l83" > < / a > }
< a name = "l84" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l85" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l86" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_F4< / span > < span class = cF0 > :
< a name = "l87" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF0 > )
< a name = "l88" > < / a > {
< a name = "l89" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l90" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /Default Color" < / span > < span class = cF0 > );
< a name = "l91" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l92" > < / a > < / span > < span class = cF6 > " $FG$" < / span > < span class = cF0 > ;
< a name = "l93" > < / a > }
< a name = "l94" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l95" > < / a > {
< a name = "l96" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l97" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /BLUE" < / span > < span class = cF0 > );
< a name = "l98" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l99" > < / a > < / span > < span class = cF6 > " $BLUE$" < / span > < span class = cF0 > ;
< a name = "l100" > < / a > }
< a name = "l101" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l102" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l103" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_F7< / span > < span class = cF0 > :
< a name = "l104" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF7 > (< / span > < span class = cF0 > sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l105" > < / a > {
< a name = "l106" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l107" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /TimeIns" < / span > < span class = cF0 > );
< a name = "l108" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l109" > < / a > < / span > < span class = cF5 > TimeIns< / span > < span class = cF0 > ;
< a name = "l110" > < / a > }
< a name = "l111" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l112" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l113" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF3 > SC_DELETE< / span > < span class = cF0 > :
< a name = "l114" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_SHIFT< / span > < span class = cF0 > )
< a name = "l115" > < / a > {
< a name = "l116" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l117" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /Soft Reboot" < / span > < span class = cF0 > );
< a name = "l118" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l119" > < / a > < / span > < span class = cF5 > BootRAM< / span > < span class = cF0 > ;
< a name = "l120" > < / a > }
< a name = "l121" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l122" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l123" > < / a > < / span > < span class = cF1 > break< / span > < span class = cF0 > ;
< a name = "l124" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'a'< / span > < span class = cF0 > :
< a name = "l125" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l126" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /AutoComplete On" < / span > < span class = cF0 > );
< a name = "l127" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l128" > < / a > < / span > < span class = cF5 > AutoComplete< / span > < span class = cF0 > (< / span > < span class = cF3 > ON< / span > < span class = cF0 > );
< a name = "l129" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l130" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l131" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'A'< / span > < span class = cF0 > :
< a name = "l132" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l133" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /AutoComplete Off" < / span > < span class = cF0 > );
< a name = "l134" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l135" > < / a > < / span > < span class = cF5 > AutoComplete< / span > < span class = cF0 > ;
< a name = "l136" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l137" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l138" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'h'< / span > < span class = cF0 > :
< a name = "l139" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l140" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /WinTileHorz" < / span > < span class = cF0 > );
< a name = "l141" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l142" > < / a > < / span > < span class = cF5 > WinTileHorz< / span > < span class = cF0 > ;
< a name = "l143" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l144" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l145" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'm'< / span > < span class = cF0 > :
< a name = "l146" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l147" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /WinMax" < / span > < span class = cF0 > );
< a name = "l148" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l149" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l150" > < / a > < / span > < span class = cF5 > WinBorder< / span > < span class = cF0 > ;
< a name = "l151" > < / a > < / span > < span class = cF5 > WinMax< / span > < span class = cF0 > ;
< a name = "l152" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l153" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l154" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l155" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'v'< / span > < span class = cF0 > :
< a name = "l156" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l157" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Cmd /WinTileVert" < / span > < span class = cF0 > );
< a name = "l158" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l159" > < / a > < / span > < span class = cF5 > WinTileVert< / span > < span class = cF0 > ;
< a name = "l160" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l161" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l162" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'l'< / span > < span class = cF0 > :
< a name = "l163" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l164" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Edit/Put Link to Cur Pos on Clip" < / span > < span class = cF0 > );
< a name = "l165" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l166" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l167" > < / a > < / span > < span class = cF5 > ClipDel< / span > < span class = cF0 > ;
< a name = "l168" > < / a > st1 = < / span > < span class = cF5 > FileNameAbs< / span > < span class = cF0 > (< / span > < span class = cF3 > BIBLE_FILENAME< / span > < span class = cF0 > );
< a name = "l169" > < / a > st2 = < / span > < span class = cF5 > FileNameAbs< / span > < span class = cF0 > (< / span > < span class = cF5 > DocPut< / span > < span class = cF0 > -> filename.name);
< a name = "l170" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (!< / span > < span class = cF5 > StrCompare< / span > < span class = cF7 > (< / span > < span class = cF0 > st1, st2< / span > < span class = cF7 > )< / span > < span class = cF0 > )
< a name = "l171" > < / a > {
< a name = "l172" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (st1);
< a name = "l173" > < / a > st1 = < / span > < span class = cF5 > BibleLine2Verse< / span > < span class = cF0 > (< / span > < span class = cF5 > DocPut< / span > < span class = cF0 > -> cur_entry-> y + < / span > < span class = cFE > 1< / span > < span class = cF0 > , < / span > < span class = cF6 > ','< / span > < span class = cF0 > );
< a name = "l174" > < / a > < / span > < span class = cF5 > DocPrint< / span > < span class = cF0 > (< / span > < span class = cFB > sys_clip_doc< / span > < span class = cF0 > , < / span > < span class = cF6 > " $LK,\" BF:%s\" $" < / span > < span class = cF0 > , st1);
< a name = "l175" > < / a > }
< a name = "l176" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l177" > < / a > < / span > < span class = cF5 > DocPrint< / span > < span class = cF0 > (< / span > < span class = cFB > sys_clip_doc< / span > < span class = cF0 > , < / span > < span class = cF6 > " $LK,\" FL:%s,%d\" $" < / span > < span class = cF0 > , st2, < / span > < span class = cF5 > DocPut< / span > < span class = cF0 > -> cur_entry-> y + < / span > < span class = cFE > 1< / span > < span class = cF0 > );
< a name = "l178" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (st1);
< a name = "l179" > < / a > < / span > < span class = cF5 > Free< / span > < span class = cF0 > (st2);
< a name = "l180" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l181" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l182" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l183" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > 'L'< / span > < span class = cF0 > :
< a name = "l184" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l185" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Edit/Place Anchor, Put Link to Clip" < / span > < span class = cF0 > );
< a name = "l186" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l187" > < / a > < / span > < span class = cF7 > {< / span > < span class = cF0 >
< a name = "l188" > < / a > i = < / span > < span class = cF5 > RandU32< / span > < span class = cF0 > ;
< a name = "l189" > < / a > < / span > < span class = cF5 > ClipDel< / span > < span class = cF0 > ;
< a name = "l190" > < / a > < / span > < span class = cF5 > DocPrint< / span > < span class = cF0 > (< / span > < span class = cFB > sys_clip_doc< / span > < span class = cF0 > , < / span > < span class = cF6 > " $LK,\" < TODO> \" ,A=\" FA:%s,ANC%d\" $" < / span > < span class = cF0 > , < / span > < span class = cF5 > DocPut< / span > < span class = cF0 > -> filename.name, i);
< a name = "l191" > < / a > < / span > < span class = cF6 > " $AN,\" < TODO> \" ,A=\" ANC%d\" $" < / span > < span class = cF0 > , i;
< a name = "l192" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l193" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l194" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l195" > < / a > < / span > < span class = cF2 > //Ins your own ALT-key plug-ins< / span > < span class = cF0 >
2021-07-03 05:07:57 +01:00
< a name = "l196" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l197" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '1'< / span > < span class = cF0 > :
< a name = "l198" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l199" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /pi" < / span > < span class = cF0 > );
< a name = "l200" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l201" > < / a > < / span > < span class = cF6 > 'pi'< / span > < span class = cF0 > ;
< a name = "l202" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l203" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l204" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '2'< / span > < span class = cF0 > :
< a name = "l205" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l206" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /theta" < / span > < span class = cF0 > );
< a name = "l207" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l208" > < / a > < / span > < span class = cF6 > 'theta'< / span > < span class = cF0 > ;
< a name = "l209" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l210" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l211" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '3'< / span > < span class = cF0 > :
< a name = "l212" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l213" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /phi" < / span > < span class = cF0 > );
< a name = "l214" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l215" > < / a > < / span > < span class = cF6 > 'phi'< / span > < span class = cF0 > ;
< a name = "l216" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l217" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l218" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '4'< / span > < span class = cF0 > :
< a name = "l219" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l220" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /omega" < / span > < span class = cF0 > );
< a name = "l221" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l222" > < / a > < / span > < span class = cF6 > 'omega'< / span > < span class = cF0 > ;
< a name = "l223" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l224" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l225" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '9'< / span > < span class = cF0 > :
< a name = "l226" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l227" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /Indent 5" < / span > < span class = cF0 > );
< a name = "l228" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l229" > < / a > < / span > < span class = cF6 > " $ID,5$" < / span > < span class = cF0 > ;
< a name = "l230" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l231" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l232" > < / a > < / span > < span class = cF1 > case< / span > < span class = cF0 > < / span > < span class = cF6 > '0'< / span > < span class = cF0 > :
< a name = "l233" > < / a > < / span > < span class = cF1 > if< / span > < span class = cF0 > (sc & < / span > < span class = cF3 > SCF_KEY_DESC< / span > < span class = cF0 > )
< a name = "l234" > < / a > < / span > < span class = cF5 > KeyDescSet< / span > < span class = cF0 > (< / span > < span class = cF6 > " Dol /Unindent 5" < / span > < span class = cF0 > );
< a name = "l235" > < / a > < / span > < span class = cF1 > else< / span > < span class = cF0 >
< a name = "l236" > < / a > < / span > < span class = cF6 > " $ID,-5$" < / span > < span class = cF0 > ;
< a name = "l237" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > ;
< a name = "l238" > < / a > }
< a name = "l239" > < / a > < / span > < span class = cF7 > }< / span > < span class = cF0 >
< a name = "l240" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l241" > < / a > }
< a name = "l242" > < / a >
< a name = "l243" > < / a > < / span > < span class = cF1 > Bool< / span > < span class = cF0 > < / span > < span class = cF5 > MyPutS< / span > < span class = cF0 > (< / span > < span class = cF1 > U8< / span > < span class = cF0 > *)
< a name = "l244" > < / a > {
2021-07-04 23:11:34 +01:00
< a name = "l245" > < / a > < / span > < span class = cF1 > return< / span > < span class = cF0 > < / span > < span class = cF3 > FALSE< / span > < span class = cF0 > ;
2021-07-03 05:07:57 +01:00
< a name = "l246" > < / a > }
< a name = "l247" > < / a >
< a name = "l248" > < / a > < / span > < span class = cF5 > KeyDevAdd< / span > < span class = cF0 > (& < / span > < span class = cF5 > MyPutKey< / span > < span class = cF0 > , & < / span > < span class = cF5 > MyPutS< / span > < span class = cF0 > , < / span > < span class = cFE > 0x20000000< / span > < span class = cF0 > , < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > );
< / span > < / pre > < / body >
< / html >
