code:

---

Function udfPause()
   Dim $null
   ; If a keyboard character is struck...
   If KbHit()
      ; Drain the keyboard buffer...
      While KbHit() Get $null Loop
      ; Prompt for a key to continue
      "PAUSED: Hit a key to continue: " Get $null
      ?
EndFunction

---