home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
forth
/
compiler
/
fpc
/
source
/
l3p030.seq
< prev
next >
Wrap
Text File
|
1988-10-30
|
686b
|
21 lines
\ Illustration of Number bases and formated display operators.
: NTABLE ( dn -- )
CR ." unsigned" ." signed" ." unsigned"
." signed" ." unsigned" ." signed"
CR ." decimal" ." decimal" ." octal "
." octal " ." hex " ." hex "
20 0 DO
CR
DECIMAL 2DUP 13 UD.R
2DUP 13 D.R
OCTAL 2DUP 13 UD.R
2DUP 13 D.R
HEX 2DUP 13 UD.R
2DUP 13 D.R
1. D+
LOOP
2DROP DECIMAL ;