LOC Data_Segment
            GREG @
            
buffer      BYTE 0,0
newline     BYTE #a,0

            LOC #100
Zahl        IS  $1

Main        SET Zahl,5
            PUSHJ $0,dec2bin
            
            LDA $255,newline
            TRAP 0,Fputs,StdOut
            TRAP 0,Halt,0