home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / forth / compiler / fpc / source / p3_7bs.seq < prev    next >
Encoding:
Text File  |  1990-04-06  |  824 b   |  26 lines
  1. \ Balraj Sidhu   Set: 14D4
  2. \ Comp 462 - Forth
  3. \ Date: April 6, 1990
  4. \ Problem 3.7
  5.  
  6. : binary ( -- ) 2 base ! ;           \ set radix to binary
  7.  
  8. :   .h ( n -- ) hex     . decimal ;  \ display number in hex
  9. :  u.h ( n -- ) hex    u. decimal ;  \ display number in unsigned hex
  10. :   .o ( n -- ) octal   . decimal ;  \ display number in octal
  11. :  u.o ( n -- ) octal  u. decimal ;  \ display number in unsigned octal
  12. :   .b ( n -- ) binary  . decimal ;  \ display number in binary
  13. :  u.b ( n -- ) binary u. decimal ;  \ display number in unsigned binary
  14.  
  15. COMMENT:
  16.  
  17. Each definitions ends in decimal because so we no what mode it will
  18. be in once it displayed the number.
  19.  
  20. We do not need .D to display the top number in decimal because switching to
  21. decimal then display the number is just as easy.
  22.  
  23. COMMENT;
  24.  
  25.  
  26.