In testing the suggestion, here's the results:
Command: _appload SH+CMD.lsp successfully loaded.
Command: test
Press Enter or Shif+Enter: -> "Waited for me to press keys.."
; error: no function definition: ACET-SYS-SHIFT-DOWN -> Results
This is the current [acad-cepted] loaded code:
(defun c:test ()
(vl-load-com)
(arxunload "acetutil.arx")
(arxload "acetutil.arx")
(getstring "\nPress Enter or Shif+Enter: ")
(if (acet-sys-shift-down) (princ "\nYou pressed Shif+Enter "))
(princ)
)
So excited, this is going to be usable - in many ways! ?Do software companies
take/buy posted ideas off this site seeing as the team effort exhibited shows its
power so well? I'd rather the generosity used for the final effort of development,
design, production and efficiency etc. JMHO