How to digitize without pline command

Way to replace the pline command and make our digitization fast in autocadmap

as we all know for digitization in autocadmap, we normally use the pline commandactually there is no need to use this command as it is time consumming o select pline every timr we need to digitizeon any layer
you can use the mapdigitize command to digitize as it is really a time saving
fist set your layer on which you want to digitize for this go to
Map menu>>Data Entry>>Digitize Setup

dialogboc will open ,set your layer and object type as links
close the dialog box.
type mapdigitize to digitize on layer you set .

you will feel this is time saving bacause for ending the the pline u made just right click once and againg start digitiging from where u wantand for ending the command right click twice .
this the actual method for digitization.

u can see my lisp which can help to set the digitization optionsand run the mapdigitize commanduse it and enjoy digitization!!

Lisp to set pd mode and pdsize

(DEFUN C:zm()
(Command "pdmode" "35" "pdsize" "3")
)

Lisp to run Point command

(DEFUN C:za()
(command "point" "") ;; this will run the point command
)

Lisp to run madigitize command

(DEFUN C:zl()
(c:mapdigitize) ;;this will start the mapdigitize command
)

Lisp to set units to meters

(DEFUN C:zz()
(COMMAND "insunits" "6") ;; this statement will set units to meters
)

Lisp to set mapdigisetup options(Node as Object Type and desired level) in autocadmap

(DEFUN C:zp()
(command "-layer" "set" "0" "") ;;;this will set current layer to dafault "0"
(Command "-layer" "thaw" "*" "" "on" "*" "" "") ;;; all layers will be on and thawed
(COMMAND "-LAYER" "make" "Z-Shape" "" " ") ;this will make a new layer named Z-Shape
(COMMAND "-LAYER" "COL" "White" "Z-Shape" "" " ") ;;this will set color of layer Z-Shape to white
(command "CMDDIA" "0") ;; This will set variable of cmddia to 0 which is required to run the below statement
(COMMAND "MAPDIGISETUP" "Nodes" "Layer" "Z-Shape" "DATA" "NO" "LABEL" "NO""" "")
(c:mapdigitize)
)

Lisp to set mapdigisetup options(Link as Object Type and desired level) in autocadmap

(DEFUN C:zrp()
(command "-layer" "set" "0" "");;this will set current layer to dafault "0"
(Command "-layer" "thaw" "*" "" "on" "*" "" "") ;;all layers will be on and thawed
(COMMAND "-LAYER" "make" "River_Poly" "" " ") ;this will make a new layer named River_Poly
(COMMAND "-LAYER" "COL" "Cyan" "River_Poly" "" " ") ;;;;;;this will set color of layer River_Poly to cyan
(COMMAND "insunits" "6") ;;;;;; this statement will set units to meters
(command "CMDDIA" "0") ;; This will set variable of cmddia to 0 which is required to run the below statement
(COMMAND "MAPDIGISETUP" "Links" "Layer" "River_Poly" "lineType" "ByLayer" "DATA" "NO" "LABEL" "NO""" "") ;;this will set the above layer to mapdigisetup
(c:mapdigitize) ;;;this will start the mapdigitize command