RosettaCodeData/Task/User-input-Text/M2000-Interpreter/user-input-text.m2000

Module CheckIt {
      Keyboard "75000"+chr$(13)
      Input "Integer:", A%
      \\ Input erase keyboard buffer, we can't place in first Keyboard keys for second input
      Keyboard  "Hello World"+Chr$(13)
      Input "String:", A$
      Print A%, A$
}
CheckIt