subtypeidKGScriptParserduration?đ framebaseencodingparms inputFormat inputCountpublic insetwidthtitleinsetuitypetypeminmaxBHdefault?€value?€ framecolourColor˙˙˙˙˙˙˙˙ blurrinesssoftnessBČprivatestaticsscript€generator "frame"; group "stib's generators"; input insetWidth , "inset", slider, 1 , 0, 50; input framecolour, "Color", color, 255, 255, 255, 255; input blurriness, "softness", Slider, 0, 0, 100; ProducesAlpha AlphaType(kAlpha) code exposedBackground = true float width, height, i point innerFrame[4], outerFrame[4], borderFrame[10], centrePoint Dimensionsof(dest, width, height ) image buf1[width][height]; centrePoint = {0,0} insetWidth = 1- insetWidth/50 blurriness *= width/100 MakeRect(outerFrame, 0-width/2, 0-height/2, width, height) innerFrame = outerFrame; Scale(innerFrame, centrePoint, insetWidth, insetWidth) for i = 0 to 3 borderFrame[i] = outerFrame[i] next borderFrame[4] = outerFrame[0] for i = 0 to 3 //step -1 borderFrame[i+5] = innerFrame[i] next borderFrame[9] = innerFrame[0] FillPoly(borderFrame, buf1, framecolour) Blur(buf1, dest, blurriness, aspectOf(dest))nameframescriptid$groupstib's generators producesalpha alphatypeencoded