; PrintF and the conversions between numbers and strings

PROC Main()
  CHAR ARRAY name="Pedro", text(10)
  BYTE age
  CARD score, number
  INT  change

  age=12
  score=40000
  change=-25

  PrintF("%S is %U years old.%E", name, age)
  PrintF("Score %U, change %I%E", score, change)
  PrintF("%U in hexadecimal is %H%E", score, score)
  PrintF("A character: %C, a percent sign: %%%E", 'A)

  StrC(score, text)          ; a number into a string
  Print("As a string: ")
  PrintE(text)
  Print("It has ")
  PrintB(text(0))
  PrintE(" characters")

  number=ValC("1234")        ; a string into a number
  Print("ValC(""1234"") plus 1 is ")
  PrintCE(number+1)

  change=ValI("-77")
  Print("ValI(""-77"") times 2 is ")
  PrintIE(change*2)
RETURN