



InfixHex (lines 750-755)
Back to List
Browsing infix.h
0750 [ InfixHex x y;
0751 y = (x & $7f00) / $100;
0752 if (x < 0) y = y + $80;
0753 x = x & $ff;
0754 print (Infixhexdigit) y/$10, (Infixhexdigit) y, (Infixhexdigit) x/$10, (Infixhexdigit) x;
0755 ];
Last updated 27 February 2004. The librarian in charge of this page is Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight. Please email any comments, suggestions or corrections to cedenqs@inform-fiction.org.