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-04 10:03:02 +00:00
< meta name = "generator" content = "ZealOS V1.06" >
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 = cF0 > TourPut(< / span > < span class = cF6 > " Press $GREEN$< ENTER> $FG$." < / span > < span class = cF0 > );
< a name = "l2" > < / a > < / span > < span class = cF6 > " Ed(\" HI:Debugging\" );" < / span > < span class = cF0 > ;
< a name = "l3" > < / a > < / span > < span class = cF5 > InGetStr< / span > < span class = cF0 > (< / span > < span class = cF6 > " \n" < / span > < span class = cF0 > );
< a name = "l4" > < / a >
< a name = "l5" > < / a > TourPut(< / span > < span class = cF6 > " Press $GREEN$< SHIFT-ESC> $FG$ to abort.\n" < / span > < span class = cF0 > );
< a name = "l6" > < / a > < / span > < span class = cF5 > InUntilChar< / span > < span class = cF0 > (< / span > < span class = cF3 > CH_ESC< / span > < span class = cF0 > , < / span > < span class = cF3 > CH_SHIFT_ESC< / span > < span class = cF0 > );
< a name = "l7" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l8" > < / a > TourPut( < / span > < span class = cF6 > " We will now use $RED$$TX+L+PU+UL,\" Uf\" ,A=\" MN:Uf\" $$FG$() to " < / span > < span class = cF0 >
< a name = "l9" > < / a > < / span > < span class = cF6 > " unassemble a function. It takes the function name as a string arg.\n\n" < / span > < span class = cF0 >
< a name = "l10" > < / a > < / span > < span class = cF6 > " Press $GREEN$< ENTER> $FG$.\n" < / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l11" > < / a >
< a name = "l12" > < / a > < / span > < span class = cF6 > " WinBorder; WinMax; \nUf(\" CAlloc\" );" < / span > < span class = cF0 > ;
< a name = "l13" > < / a > < / span > < span class = cF5 > InGetStr< / span > < span class = cF0 > (< / span > < span class = cF6 > " \n" < / span > < span class = cF0 > );
< a name = "l14" > < / a >
< a name = "l15" > < / a > TourPut(< / span > < span class = cF6 > " Press $GREEN$< CURSOR-UP> $FG$ eight times.." < / span > < span class = cF0 > );
< a name = "l16" > < / a > < / span > < span class = cF9 > I64< / span > < span class = cF0 > i;
< a name = "l17" > < / a > < / span > < span class = cF1 > for< / span > < span class = cF0 > (i = < / span > < span class = cFE > 0< / span > < span class = cF0 > ; i < < / span > < span class = cFE > 8< / span > < span class = cF0 > ; i++)
2021-07-04 23:11:34 +01:00
< a name = "l18" > < / a > < / span > < span class = cF5 > InKeyGet< / span > < span class = cF0 > (< / span > < span class = cF3 > SC_CURSOR_UP< / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l19" > < / a >
< a name = "l20" > < / a > TourPut(< / span > < span class = cF6 > " Press $GREEN$< SPACE> $FG$.\n" < / span > < span class = cF0 > );
< a name = "l21" > < / a > < / span > < span class = cF5 > InGetStr< / span > < span class = cF0 > (< / span > < span class = cF6 > " " < / span > < span class = cF0 > );
< a name = "l22" > < / a >
< a name = "l23" > < / a > TourPut(< / span > < span class = cF6 > " Press $GREEN$< SHIFT-ESC> $FG$ when finished.\n" < / span > < span class = cF0 > );
< a name = "l24" > < / a > < / span > < span class = cF5 > InUntilChar< / span > < span class = cF0 > (< / span > < span class = cF3 > CH_ESC< / span > < span class = cF0 > , < / span > < span class = cF3 > CH_SHIFT_ESC< / span > < span class = cF0 > );
< a name = "l25" > < / a >
< a name = "l26" > < / a > < / span > < span class = cF2 > //Puts the cursor at the bottom.< / span > < span class = cF0 >
< a name = "l27" > < / a > < / span > < span class = cF5 > Message< / span > < span class = cF0 > (< / span > < span class = cF3 > MESSAGE_KEY_DOWN< / span > < span class = cF0 > , < / span > < span class = cFE > 0< / span > < span class = cF0 > , < / span > < span class = cF3 > SC_CURSOR_DOWN< / span > < span class = cF0 > | < / span > < span class = cF3 > SCF_CTRL< / span > < span class = cF0 > );
< a name = "l28" > < / a >
2021-07-04 23:11:34 +01:00
< a name = "l29" > < / a > TourPut( < / span > < span class = cF6 > " We can unassemble a numeric address with " < / span > < span class = cF0 >
< a name = "l30" > < / a > < / span > < span class = cF6 > " $RED$$TX+L+PU+UL,\" U\" ,A=\" MN:U\" $$FG$().\n\n" < / span > < span class = cF0 >
< a name = "l31" > < / a > < / span > < span class = cF6 > " Press $GREEN$< ENTER> $FG$.\n" < / span > < span class = cF0 > );
2021-07-03 05:07:57 +01:00
< a name = "l32" > < / a >
< a name = "l33" > < / a > < / span > < span class = cF6 > " U(& CAlloc);" < / span > < span class = cF0 > ;
< a name = "l34" > < / a > < / span > < span class = cF5 > InGetStr< / span > < span class = cF0 > (< / span > < span class = cF6 > " \n" < / span > < span class = cF0 > );
< a name = "l35" > < / a >
< a name = "l36" > < / a > TourPut(< / span > < span class = cF6 > " The opcodes are slightly nonstandard.\n" < / span > < span class = cF0 > , < / span > < span class = cF3 > TRUE< / span > < span class = cF0 > );
< a name = "l37" > < / a > < / span > < span class = cF6 > " Ed(\" ::/Compiler/OpCodes.DD\" );\n" < / span > < span class = cF0 > ;
< a name = "l38" > < / a >
< a name = "l39" > < / a > < / span > < span class = cF5 > Message< / span > < span class = cF0 > (< / span > < span class = cF3 > MESSAGE_KEY_DOWN< / span > < span class = cF0 > ,< / span > < span class = cF3 > CH_CTRLF< / span > < span class = cF0 > , < / span > < span class = cFE > 0x42100000421< / span > < span class = cF0 > );
< a name = "l40" > < / a > < / span > < span class = cF6 > " MOV" < / span > < span class = cF0 > ;
< a name = "l41" > < / a > < / span > < span class = cF5 > Message< / span > < span class = cF0 > (< / span > < span class = cF3 > MESSAGE_KEY_DOWN< / span > < span class = cF0 > ,< / span > < span class = cF3 > CH_ESC< / span > < span class = cF0 > , < / span > < span class = cFE > 0x100000001< / span > < span class = cF0 > );
< a name = "l42" > < / a >
< a name = "l43" > < / a > TourPut(< / span > < span class = cF6 > " Press $GREEN$< SHIFT-ESC> $FG$ to abort.\n" < / span > < span class = cF0 > );
< a name = "l44" > < / a > < / span > < span class = cF5 > InUntilChar< / span > < span class = cF0 > (< / span > < span class = cF3 > CH_ESC< / span > < span class = cF0 > , < / span > < span class = cF3 > CH_SHIFT_ESC< / span > < span class = cF0 > );
< / span > < / pre > < / body >
< / html >