PrintN()

[akee]

Fred,
Possible to change PrintN() to default to an empty string?

Then when we want to add a line, we can type:

Code: Select all

PrintN()

instead of

Code: Select all

PrintN("")

[mk-soft]

Code: Select all

Macro _PB_(Function)
  Function
EndMacro

Macro PrintN(text="")
  _PB_(PrintN)(text)
EndMacro

If OpenConsole()
  PrintN("Hello")
  PrintN()
  PrintN("World")
  Input()
EndIf

[#NULL]

Haha, nice mk-soft. I didn't know that works in PB. I would have used an additional Procedure to call PrintN from within the macro. Thanks

[Little John]

That can be made even simpler.

Code: Select all

Macro PrintN (text="", Function=PrintN)
   Function(text)
EndMacro

If OpenConsole()
   PrintN("Hello")
   PrintN()
   PrintN("World")
   Input()
EndIf

[akee]

mk-soft + Little John = 2 x thanks!