GRG - Drying Toggle/On/Off

Share your custom panels, brushes, papers... (you need to be registered to read posts in this section)
Post Reply
User avatar
lemec
Posts: 1678
Joined: 19 Feb 2006, 08:54
Location: Toronto, Ontario, Canada
Contact:

GRG - Drying Toggle/On/Off

Post by lemec »

You can use these scripts as Embedded George Scripts in a custom panel action, which can then be mapped to a hotkey. They are designed to have no effect if a non-brush tool is activated.

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
Enable Drying: Will enable drying 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
tv_Cmd curTool Dry 1
Disable Drying: Will disable drying 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
tv_Cmd curTool Dry 0
(Win7x64, TVP Pro 11 32-bit)
Post Reply