LOC Data_Segment
            GREG @
            
bufsize     IS 8            
buffer      BYTE "        ",#a,0
newline     BYTE #a,0

            LOC #100
Zahl        IS  $1
Main        SET Zahl,5
            PUSHJ $0,dec2bin
            TRAP 0,Halt,0