Nil

Discussion in 'AutoCAD' started by IZZAT TAHA, Aug 4, 2003.

  1. IZZAT TAHA

    IZZAT TAHA Guest

    Hi I'm new in lisp routines, i'm trying to copy a lisp routine from another
    source and modified to fit our company needs, the problem is i'm getting the
    following error when i try to use it "V1 ; error: bad argument type:
    numberp: nil", you can read the lisp below

    Thanks

    (defun C:V1 ()(setq gap (* 0.25 dsf))(setq blkn "VGATE")(inbkgv))
    ;

    ; - inbkgv2 - Insert with gap on 1 side only:
    (defun inbkgv2 ()
    (setq xosmode (getvar "osmode"))
    (setvar "osmode" 0)
    (cmdoff)(setl)(smo)
    (setq pt1 (getpoint "Pick point:.. "))
    (setq anglr (getangle pt1 "\nShow direction of line: "))
    (setq sym (strcat blkdir blkn))
    (setq pt2 (polar pt1 anglr 0.28)) ;verify dimension
    (if (= noline nil)
    (command ".break" pt2 "f" (polar pt1 anglr 0)
    (polar pt1 anglr (/ gap 2)))
    (princ)
    )
    (setq noline nil)
    (command ".insert" sym pt1 dsf dsf pt2)
    (setq hsdsf dsf)
    (cmdrestor) (resetl)(setvar "osmode" xosmode)(prinC)
    )
     
    IZZAT TAHA, Aug 4, 2003
    #1
  2. IZZAT TAHA

    mattis Guest

    Lots of stuff missing here. There's no function definition for (inbkgv) (cmdoff) (setl) (smo) (cmdrestor) or (resetl). I can understand what these routines should do, but (smo) confuses me. Who knows what that's supposed to do. Also blkdir and blkn needs a value (some text). the value for gap needs to be set. There's other stuff, but what are you trying to do anyway?
     
    mattis, Aug 4, 2003
    #2
  3. IZZAT TAHA

    IZZAT TAHA Guest

    Actually this lisp is supposed to let me insert the block and break the line within the block



    "mattis" <> wrote in message news:...

    Lots of stuff missing here. There's no function definition for (inbkgv) (cmdoff) (setl) (smo) (cmdrestor) or (resetl). I can understand what these routines should do, but (smo) confuses me. Who knows what that's supposed to do. Also blkdir and blkn needs a value (some text). the value for gap needs to be set. There's other stuff, but what are you trying to do anyway?
     
    IZZAT TAHA, Aug 4, 2003
    #3
  4. IZZAT TAHA

    caduser Guest

    u orang mana ni..



    IZZAT TAHA <> wrote in message news:D...



    Actually this lisp is supposed to let me insert the block and break the line within the block



    "mattis" <> wrote in message news:...

    Lots of stuff missing here. There's no function definition for (inbkgv) (cmdoff) (setl) (smo) (cmdrestor) or (resetl). I can understand what these routines should do, but (smo) confuses me. Who knows what that's supposed to do. Also blkdir and blkn needs a value (some text). the value for gap needs to be set. There's other stuff, but what are you trying to do anyway?
     
    caduser, Aug 5, 2003
    #4
Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments (here). After that, you can post your question and our members will help you out.