; Writing texts, characters and numbers

PROC Main()
  Print("One ")              ; a text, the cursor stays on the line
  Print("line.")
  PutE()                     ; the end of the line

  PrintE("A line of its own.")

  Put('A)                    ; one character
  Put('B)
  Put('C)
  PutE()

  Print("A small number: ")
  PrintBE(200)               ; BYTE: 0 to 255

  Print("A big number: ")
  PrintCE(50000)             ; CARD: 0 to 65535

  Print("A number below zero: ")
  PrintIE(-150)              ; INT: -32768 to 32767

  PrintB(1) Put(' ) PrintB(2) Put(' ) PrintB(3)
  PutE()
RETURN