



		
		 InfixHex (lines 699-705)
			
		
				 
		Back to List 
				
					 
			Browsing infix.h
					0699  [ InfixHex x y;
0700        y = (x & $7f00) / $100;
0701        if (x<0) y=y+$80;
0702        x = x & $ff;
0703        print (Infixhexdigit) y/$10, (Infixhexdigit) y,
0704              (Infixhexdigit) x/$10, (Infixhexdigit) x;
0705  ];
  
    Last updated 27 February 2004.
  
  This site is no longer supported; information may be out of date.
  Maintained as a historical archive by the Interactive Fiction Technology Foundation.
  Copyright 1993-2018 IFTF, CC-BY-SA unless otherwise noted.
  
    This page was originally managed by Graham Nelson (graham@gnelson.demon.co.uk) assisted by C Knight.