Toggle Drying: Will toggle Drying state for the current tool without changing any other parameters
Code: Select all
PARAM NONE
tv_getActiveShape
PARSE Result curShape
IF (CMP(curShape, "freehandfill") || CMP(curShape, "linefill") || CMP(curShape, "rectanglefill") || CMP(curShape, "ellipsefill"))
EXIT
END
IF (CMP(curShape, "circle2ptsfill") || CMP(curShape, "circle3ptsfill"))
EXIT
END
IF (CMP(curShape, "flood") || CMP(curShape, "bezierfill") || CMP(curShape, "bsplinefill"))
EXIT
END
tv_getactivetool
PARSE Result curTool toolArgs
dryVal = 0
WHILE (LEN(toolArgs) > 1)
PARSE toolArgs curArg curParam toolArgs
IF (CMP(curArg, "dry"))
IF (curParam == 0)
dryVal = 1
ELSE
dryVal = 0
END
tv_Cmd curTool Dry DryVal
END
END
Code: Select all
PARAM NONE
tv_getActiveShape
PARSE Result curShape
IF (CMP(curShape, "freehandfill") || CMP(curShape, "linefill") || CMP(curShape, "rectanglefill") || CMP(curShape, "ellipsefill"))
EXIT
END
IF (CMP(curShape, "circle2ptsfill") || CMP(curShape, "circle3ptsfill"))
EXIT
END
IF (CMP(curShape, "flood") || CMP(curShape, "bezierfill") || CMP(curShape, "bsplinefill"))
EXIT
END
tv_getactivetool
PARSE Result curTool toolArgs
tv_Cmd curTool Dry 1
Code: Select all
PARAM NONE
tv_getActiveShape
PARSE Result curShape
IF (CMP(curShape, "freehandfill") || CMP(curShape, "linefill") || CMP(curShape, "rectanglefill") || CMP(curShape, "ellipsefill"))
EXIT
END
IF (CMP(curShape, "circle2ptsfill") || CMP(curShape, "circle3ptsfill"))
EXIT
END
IF (CMP(curShape, "flood") || CMP(curShape, "bezierfill") || CMP(curShape, "bsplinefill"))
EXIT
END
tv_getactivetool
PARSE Result curTool toolArgs
tv_Cmd curTool Dry 0