//RECORDED ZSCRIPT 1.23b
[Image,zscripticon.psd,0]
This small ZScript will show you some of the material effects that can be achieved with the  [ButtonFind,MATERIAL:BasicMaterial,"BasicMaterial"] found in the [ButtonFind,MATERIAL,"material panel"]
[PD][PD]

[IButton,"Run the ZScript","Press to play this ZScript. ZScript can be aborted at anytime by pressing the ‘esc’ key.",
[IReset]
[IUnPress,PREFERENCES:INTERFACE:FLOAT MENU]

[IPress,LAYER:INVENTORY:CREATE]
[FileNameSetNext,splashscreen.psd]
[IPress,DOCUMENT:IMPORT]
[IPress,LAYER:LAYER 1]

[Note,"Start with a basic sphere from the tool panel and use the EDIT mode.",TOOL:Sphere3D,10]
[IPress,TOOL:Sphere3D]

[CanvasStroke,( )]
[IPress,TRANSFORM: EDIT]
[IColorSet,122,59,0]

[Note,"Now choose the basic material from the MATERIAL panel.",MATERIAL:BasicMaterial,10]
[IPress,MATERIAL:BasicMaterial]

[Note,"Firstly add some noise.",MATERIAL:MODIFIERS:Noise,10]
[ISet,MATERIAL:MODIFIERS:Noise,0.03125]

[Note,"Next, alter the nosie radius a little. Use 3 to start",MATERIAL:MODIFIERS:Noise Radius,10]
[ISet,MATERIAL:MODIFIERS:Noise Radius,3]

[Note,"To give the sphere a little bump effect use the Colour Bump. This setting uses the objects current colour to apply bumpyness.",MATERIAL:MODIFIERS:Color Bump,10]
[ISet,MATERIAL:MODIFIERS:Color Bump,4.37538]

[ISet,MATERIAL:MODIFIERS:Noise Radius,3]

[Note,"To further adjust the noise you can use the graph to make infinite changes.",MATERIAL:MODIFIERS:NoiseCurve,10]
[IClick,MATERIAL:MODIFIERS:NoiseCurve]

[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n24=
H42V41H42V40H40V3EH3EV3CH3DV3AH3BV39H3BV38H39V36H37V34H35V32H32V31H30V2FH2DV2DH2CV2CH29V2BH27V2AH25V28H23V27H21V26H20V25H1FV24H1EV23H1EV22H1EV22)]

[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n31=
H4CV5H4CV6H4CV9H4CVBH4CVDH4CVFH4CV10H4CV14H4BV17H4BV1BH4BV1CH4AV1FH49V23H47V28H45V2EH44V32H43V36H42V39H41V3EH41V40H40V43H40V46H40V48H3FV4BH3FV4DH3FV4FH3FV52H3FV54H3FV55H3FV56H3FV56)]
[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n24=
H2FV39H2FV38H2FV37H30V36H31V35H31V34H32V33H32V32H33V30H34V2DH36V28H37V24H38V22H38V21H38V1FH39V1EH39V1DH3AV1CH3AV1DH39V1EH38V1FH37V1FH37V20H37V20)]

[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n22=
H6BV21H6AV20H69V20H67V20H65V1EH62V1EH61V1DH5FV1CH5EV1BH5DV1AH5CV1AH5BV1AH5BV19H5AV18H59V18H59V17H58V16H57V16H57V15H57V14H56V14H56V14)]

[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n17=
H6DV8H6DV9H6DVAH6DVDH6DV12H6DV17H6DV1BH6DV1FH6DV23H6DV26H6DV2BH6DV2FH6DV31H6DV34H6DV36H6DV37H6DV37)]
[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n16=
H1CV24H1CV23H1CV22H1BV20H1AV1FH19V1CH17V1AH16V18H16V17H15V15H14V12H13VEH12VCH11VAH10VAH10VA)]
[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n15=
H41V53H42V53H43V50H43V4EH43V4CH44V4BH45V48H45V46H47V42H48V3FH4AV3BH4BV38H4CV37H4CV36H4CV36)]
[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n13=
H36V22H36V23H36V24H35V25H35V27H35V28H35V29H35V2BH35V2DH35V2FH35V31H35V33H35V33)]


[Note,"More noise changes.......?.",MATERIAL:MODIFIERS:Noise,10]
[ISet,MATERIAL:MODIFIERS:Noise,0.03125]
[delay,2]

[ISet,MATERIAL:MODIFIERS:Noise,0.09848]

[Note,"More noise radius changes, up to 16 this time........",MATERIAL:MODIFIERS:Noise Radius,10]
[ISet,MATERIAL:MODIFIERS:Noise Radius,16]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n28=
H33V34H32V35H32V36H31V37H31V38H30V39H30V3BH2FV3DH2EV3DH2EV3EH2DV3FH2CV41H2BV41H2BV42H2AV44H2AV45H29V46H29V48H28V4AH28V4DH27V4FH27V50H26V51H26V52H26V53H26V54H26V55H26V55)]
[delay,2]

[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n24=
H27V55H28V55H29V55H29V54H29V53H29V52H29V51H29V4FH29V4BH29V49H29V47H29V46H29V43H28V41H28V3FH26V3CH26V39H25V37H25V35H25V34H25V31H24V2FH24V2DH24V2D)]

[Note,"Now make the material a little more shiny with specularity. Up to 50 here",MATERIAL:MODIFIERS:Specular,10]
[ISet,MATERIAL:MODIFIERS:Specular,50]

[Note,"again with the nosie curve......and a few other retouches.....",MATERIAL:MODIFIERS:NoiseCurve,10]
[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n18=
H4BV34H4AV34H4AV35H4AV37H49V39H49V3CH49V3DH49V41H49V44H48V49H48V4CH48V50H48V53H48V57H48V5AH48V5BH48V5CH48V5C)]
[delay,2]
[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n23=
H4AV5DH49V5DH48V5DH46V5DH45V5DH43V5CH42V5BH41V5BH40V59H3FV58H3FV56H3FV55H3EV53H3EV51H3EV4DH3EV4AH3EV48H3EV47H3EV45H3EV43H3EV42H3EV41H3EV41)]
[delay,2]
[IStroke,MATERIAL:MODIFIERS:NoiseCurve,(ZObjStrokeV02n21=
H6DV38H6DV37H6DV36H6DV34H6DV31H6DV2DH6DV2BH6DV28H6DV25H6DV21H6EV1DH6EV19H6EV17H6EV16H6EV13H6EV12H6EV11H6EVFH6EVEH6EVDH6EVD)]

[ISet,MATERIAL:MODIFIERS:Diffuse,68]
[ISet,MATERIAL:MODIFIERS:Specular,6]
[ISet,MATERIAL:MODIFIERS:Color Bump,-13.53245]

[IColorSet,80,80,80]

[Note,"Ok, that just about does it. Only a small script but some key examples of how to change a materials basic settings.                           http://www.southerngfx.co.uk"]
]
