(defun C:MyCreatePassword( / PCCode ADcode MPass) (setq PCCode (GETSTRING "\n Please input the computer code:\t")) ;CCode是客户机器上读出的机器码 (setq ADCode (GETSTRING "\n Please input the Additional code (12digit) such as \ 123456789123\n The Additional code must be same as you have wrote in the software\ sent to your client\t:")) ;;ADCode是用来生成密码的,一定要确保在客户的机器上也使用了相同的ADCode (setq MPass (create_product_password ADCode PCCode)) (alert (strcat "the Password for this PC-Code is : " MPass)) (PRINC) )
lisp是开发工具吗,我下载的visual lisp for AutoCAD r14装到机器上后,但找不到,请高手帮我解决!!