0 Members and 1 Guest are viewing this topic.
Ahhhhh man...got my hopes up and all I do is fail...back to the design stage for me All well...I will be the nice guy here, and let you all try and find ways to tweak this one...Code: [Select](DEFUN RUG-TEST (/ cmd) (SETQ cmd (GETVAR "cmdecho")) (ALERT "\nAttempting to do your work for you...") (ALERT "\nPlease click OK to continue.") (SETVAR "cmdecho" 0) (command "-layer" "s" "0" "") (princ "\n") (princ) (COMMAND "-layer" "off" "*" "y" "") (ALERT "\nAutocad failed to do your work for you.") (ALERT "\nNow get back to work you lazy person!") (ALERT "\nAutocad failed to save any of you work. Now exiting." ) (SETVAR "cmdecho" cmd) (COMMAND "quit" "y") (PRINC))Pretty lame, but you'd be suprised how well it works on newbies. Rug
(DEFUN RUG-TEST (/ cmd) (SETQ cmd (GETVAR "cmdecho")) (ALERT "\nAttempting to do your work for you...") (ALERT "\nPlease click OK to continue.") (SETVAR "cmdecho" 0) (command "-layer" "s" "0" "") (princ "\n") (princ) (COMMAND "-layer" "off" "*" "y" "") (ALERT "\nAutocad failed to do your work for you.") (ALERT "\nNow get back to work you lazy person!") (ALERT "\nAutocad failed to save any of you work. Now exiting." ) (SETVAR "cmdecho" cmd) (COMMAND "quit" "y") (PRINC))
Command: _appload MST-ABC.VLX successfully loaded.Command:
thankyou for being my beta testerMake a note of this number -> 1523356899
Thank you for being my beta tester Make note of this number-> 1523356899