#!/bin/sh # MetaCard 2.4 stack # The following is not ASCII text, # so now would be a good time to q out of more exec mc $0 "$@" +Glazes"-- 1988-2004 Richard Burkett, All scripts -- All Rights Reserved Worldwide on shutdownRequest -- set the itemDelimiter to "." -- versions are of the form "x.y.z" -- if the platform is "MacOS" and item 1 of the systemVersion >= 10 then put true into myComputerIsOSX -- if myComputerIsOSX is true then answer "Save changes to HyperGlaze before quitting?" with "Don't Save" or "Cancel" or "Save" if it is "Don't Save" then pass shutDownRequest exit shutdownRequest end if if it is "Cancel" then exit shutdownRequest if it is "Save" then send SaveHyperGlaze to stack "HyperGlaze" pass shutDownRequest end if --end if end shutdownRequest --on closeStackRequest -- answer "Save changes to the Glazes stack first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit closeStackRequest -- set cursor to watch -- if it is "Save" then -- save stack "Glazes" -- if the result is not empty then -- answer "The Glazes stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- end if -- pass closeStackRequest --end closeStackRequest on idle global gimportingGlazes if gimportingGlazes is not empty then put empty into gimportingGlazes pass idle end idle on openStack if the platform is "MacOS" then put 325 into myMinHeight put 625 into myMaxHeight else -- for Windows with menus in window put 350 into myMinHeight put 650 into myMaxHeight end if if the icon of me is 200951 then revChangeWindowSize 525,myMinHeight else revChangeWindowSize 525,myMaxHeight end if end openstack -- on MakeHGMenu -- put "About HyperGlaze,-,Help Index,-,Main Index,Glaze Index,Clay Index,-,Materials Index,-,Glaze Calculator,Glaze Limits,"\ -- & "-,Unity Explained,Bibliography,-,Find,Find by Cone,Find by Name,Find by Color,Find by Surface,Find by Firing,Find by Tested" into HyperGlazeMenu -- if there is a menu "HyperGlaze" then delete menu "HyperGlaze" -- create menu "HyperGlaze" -- put HyperGlazeMenu into menu "HyperGlaze" -- end makeHGMenu function stripReturns myText repeat the number of lines of myText put offset(return,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat repeat the number of lines of myText put offset(lineFeed,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat return myText end stripReturns function StripTabs myText repeat put offset(Tab,myText) into myTab if myTab >0 then put "" into char myTab of myText else exit repeat end repeat return myText end StripTabs on FindIt LookWhere global MyQuery if lookWhere is "Tested" then put "by (un)tested" into lookwhere2 else put "by" && lookwhere into lookwhere2 if lookwhere is empty then put empty into lookWhere2 ask "What do you want to find " & lookWhere2 & "?" with MyQuery if it is empty then exit FindIt put it into myQuery push cd lock screen get the short name of this bg if it is "Glazes" or it is "Clays" then go next else go to first cd of bg "Glazes" if lookWhere is not empty then if lookwhere is "cone" then find word myQuery in fld LookWhere else find string myQuery in fld LookWhere if the result is not empty then play boing answer quote & myQuery & quote & " was not found in '" & lookwhere\ & "'." pop cd unlock screen exit FindIt end if if lookwhere is "cone" then put "Find word " & quote & myQuery & quote & " in fld " & lookWhere else put "Find String " & quote & myQuery & quote & " in fld " & lookWhere hide message else find string myQuery if the result is not empty then play boing answer quote & myQuery & quote & " was not found." pop cd unlock screen exit FindIt end if put "Find String " & quote & myQuery & quote hide message end if end findIt on doNewBatch lock screen put empty into newTotal put empty into fld "Batch" put empty into fld "Batch2" put fld "TotBatch" into Batchsize if batchsize >0 then if fld "lb/gm" is "gm" or fld "lb/gm" is "lb" then if batchsize>1999 then set numberformat to 0 else if batchsize>499 then set numberformat to 0.0 else set numberformat to 0.00 GramBatch else put PoundBatch(Batchsize) into newTotal end if --set the numberformat to 0.00 if batchsize is empty then put "100.00" into fld "totBatch" if newtotal >0 then put newTotal into fld "totBatch" else put (Batchsize*1) into fld "totBatch" put empty into Batchsize unlock screen if fld "Cost" is not empty then send mouseup to btn "Batch Cost" end doNewBatch on gramBatch if fld "TotBatch" is empty then put 100 into fld "TotBatch" put fld "totBatch" into myTotal set numberformat to 0 repeat with i=1 to 10 put ("amount" & i) into WhichField if myTotal<2000 then if myTotal<500 then set numberformat to 0.00 else set numberformat to 0.0 end if put (fld whichField) into MyField put ((MyField*MyTotal)/100.0) into line i of fld "Batch" set numberformat to 0 put ("amount" & (i+1)) into MyNewFieldNum if field MyNewFieldNum is empty then exit repeat end repeat repeat with i=11 to 14 put ("amount" & i) into WhichField if myTotal<2000 then if myTotal<500 then set numberformat to 0.00 else set numberformat to 0.0 end if put (fld whichField) into MyField if myField is not empty then put ((MyField*MyTotal)/100.0) into line (trunc(i-10)) of fld "Batch2" end if set numberformat to 0 put ("amount" & (i+1)) into MyNewFieldNum end repeat end gramBatch Function PoundBatch batchsize put 0.00 into newTotal repeat with i = 1 to 14 set numberformat to 0 put ("amount" & i) into myfield if fld myfield is not empty then set numberformat to 0.00 put (((fld myfield)*batchsize)/100) into Temp add temp to newTotal if batchsize<15 then set numberformat to 0.0 else set numberformat to 0 if Batchsize >=150 then if temp<1 then set numberformat to 0.0 else set numberformat to 0 if i<11 then put Temp & " Lb" & return after fld "Batch" else put Temp & " Lb" & return after fld "Batch2" else if i<11 then if temp<1 then set numberformat to 0.0 else set numberformat to 0 if trunc(Temp)>0 then put trunc(Temp) & " Lb " into Pounds else put empty into Pounds put (Pounds &\ (Temp-(trunc(Temp)))*16 & "oz") & return after\ fld "Batch" else if temp<1 then set numberformat to 0.0 if trunc(Temp)>0 then put trunc(Temp) & " Lb " into Pounds else put empty into Pounds put (Pounds & (Temp-(trunc(Temp)))*16 & "oz") & \ return after fld "Batch2" end if end if end if put empty into temp end repeat end PoundBatch on FindSelectedWord global selectedWord,myResult put empty into firstCard set lockscreen to true set lockmessages to true find string SelectedWord in fld 1 if the result is not empty then put "not found" into MyResult exit FindSelectedWord else put the number of this cd into firstcard if selectedword contains fld 1 then set lockscreen to false set lockmessages to false exit FindSelectedWord end if go next repeat until selectedWord contains fld 1 find string SelectedWord in fld 1 if the number of this cd is firstCard then put "not found" into myResult exit repeat end if end repeat set lockscreen to false set lockmessages to false end FindSelectedWord on findIndexName Global SelectedWord repeat 3 times delete last char of selectedWord end repeat if last char of selectedWord is "C" then delete last char of selectedWord if last char of selectedWord is " " then delete last char of selectedWord find string selectedWord in fld 1 put "find string " & quote & selectedWord & quote & " in fld 1" hide message end findIndexName on sendToGlazeCalculator go to stack "Glaze Calculator" send mouseup to btn "Get Current Glaze" end sendToGlazeCalculator on SetGlazeLimits go to stack "Glaze Limits" send mouseup to cd btn "Limits for Current Glaze" of stack "Glaze Limits" end SetGlazeLimits on SaveAsGlazeFile --saves an HGLZ .HGZ file of a single glaze put char 1 to 28 of fld "Name" & ".HGZ" into myFileName ask File "Save this material file as: " with myFileName if the result is not empty then exit SaveAsGlazeFile put it into myFileName set the fileType to "HGLZGLAZ" open file myFileName write "NewFormat" & tab to file myFileName makeHyperGlazeFile myFileName close file myFileName end SaveAsGlazeFile on SaveMarkedGlazes --saves an HGLZ .HGZ file of marked glaze cards if the number of marked cards <=0 then answer "There are no marked Glaze recipe cards!" exit saveMarkedGlazes end if put "HGGlazes" & ".HGZ" into myFileName ask File "Save marked materials as: " with myFileName if the result is not empty then exit SaveMarkedGlazes put it into myFileName set the fileType to "HGLZGLAZ" open file myFileName write "NewFormat" & tab to file myFileName repeat the number of marked cards set cursor to busy go to next marked card makeHyperGlazeFile myFileName end repeat close file myFileName end SaveMarkedGlazes on MakeHyperGlazeFile myFileName set cursor to 4 put "1 Name,2 cone,3 Color,4 Surface,5 Ingredient1,6 Amount1,7 Ingredient2,8 Amount2,9 Ingredient3,10 Amount3,11 Ingredient4,12 Amount4,13 Ingredient5,14 Amount5,15 Ingredient6,16 Amount6,17 Ingredient7,18 Amount7,19 Ingredient8,20 Amount8,21 Ingredient9,22 Amount9,23 Ingredient10,24 Amount10,25 Ingredient11,26 Amount11,27 Ingredient12,28 Amount12,29 Ingredient13,30 Amount13,31 Ingredient14,32 Amount14,33 Batch,34 Batch2,35 R2O,36 R2O3,37 RO2,38 Firing,39 Tested,40 Comments,41 thermalExpansion,42 Hazards,43 Date,44 lb/gm,45 C,46 Totals,47 TotAmt,48 TotBatch,49 unused,50 unused,51 unused,52 JPEGLoc,53 cost,54 GlazeType" into MyFldNames repeat with i=1 to 54 if last word of item i of MyFldNames is "unused" then next repeat if fld (last word of item i of MyFldNames) is empty or the sharedText of fld (last word of item i of MyFldNames) is true then write quote & quote & Tab to file myFileName else write fld (last word of item i of MyFldNames) & tab to file myFileName end if end repeat if fld "Cost" is empty then write quote & quote & tab to file myFileName else Write fld "Cost" & Tab to file myFileName if fld "GlazeType" is empty then write quote & quote & tab to file myFileName else Write fld "GlazeType" & Tab to file myFileName write numToChar(30) to file myFileName end MakeHyperGlazeFile on saveAsTextFile ask file "Save this glaze as the text file:" with char 1 to 29 of line 1 of fld "name" & ".txt" if it is empty then exit saveAsTextFile put it into myFileName set fileType to "ttxtTEXT" open file myFileName makeTextFile myFileName,true,false.false,false close file myFileName end saveAsTextFile on saveMarkedTextGlazes ask file "Save this glaze as the text file:" with "Marked Glazes.txt" if it is empty then exit saveMarkedTextGlazes put it into myFileName set fileType to "ttxtTEXT" open file myFileName repeat the number of marked cards go next marked card makeTextFile myFileName,true,false,false,false end repeat close file myFileName end saveMarkedTextGlazes on MakeTextFile myFileName, includeAnalysis, AmountFirst, includeBatch, includePct if AmountFirst is empty or AmountFirst is "AmountFirst" then put false into AmountFirst if includeBatch is empty or includeBatch is "includeBatch" then put false into includeBatch -- if includePct is empty or includePct is "includePct" then -- answer "Save with only Percentage or include Batch recipe?" with "Cancel" or "Batch" or "Percent" -- if it is "Cancel" then exit MakeTextFile -- if it is "Batch" then -- put true into includeBatch -- put false into includePct -- else put true into includePct --end if --end if put tab into tabChar put return into returnChar set cursor to busy write "Glaze name: " & line 1 of fld "Name" & returnChar & "Cone: " & line 1 of fld "Cone" &\ returnChar to file myFileName write "Color: " & line 1 of fld "Color" & returnChar & "Testing: " & fld "Tested" &\ returnChar to file myFileName write "Surface: " & line 1 of fld "surface" & returnChar to file myFileName write "Firing: " & fld "firing" to file myFileName write returnChar & "GlazeType: " & fld "GlazeType"\ to file myFileName if AmountFirst then if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Batch" & returnChar to file myFileName else write returnChar & returnChar & "Recipe:" & tabChar & "Percentage by weight" & returnChar to file myFileName else if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & tabChar & "Batch" & \ returnChar to file myFileName else write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & \ returnChar to file myFileName end if repeat with i=1 to 10 if fld ("Ingredient" & i) is empty then exit repeat if amountFirst then if includeBatch then put the number of chars of fld "TotBatch" into addSpaces else put the number of chars of fld "TotAmt" into addSpaces if IncludeBatch then put line i of fld "Batch" into myAmount else put line 1 of fld ("Amount" & i) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if AmountFirst then write myAmount & tab &\ line 1 of fld ("Ingredient" & i) &\ returnChar to file myFileName else if includeBatch then write line 1 of fld ("Ingredient" & i) & tab &\ line 1 of fld ("Amount" & i) & tab & line i of fld "Batch" & returnChar to file myFileName else write line 1 of fld ("Ingredient" & i) & tab &\ line 1 of fld ("Amount" & i) & returnChar to file myFileName end if end if end repeat if AmountFirst then if includeBatch then write fld "TotBatch" & tab & fld "lb/gm" && "Total Batch" & returnChar to file myFileName else write fld "TotAmt" & tab & "%" & "Total" & tab & returnChar to file myFileName else if includeBatch then write fld "totAmt" & tab & "%" & "Total" & tab & fld "TotBatch" & tab & fld "lb/gm" && "Total Batch" & returnChar to file myFileName else write "Totals:" & tab & fld "totAmt" & " %" & tab & returnChar to file myFileName end if if fld "ingredient11" is not empty then write returnChar & "Also add:" & returnChar to file myFileName repeat with i=11 to 14 if fld ("Ingredient" & i) is empty then exit repeat if AmountFirst then if includeBatch then put line i of fld "batch2" into myAmount else put line 1 of fld ("Amount" & i) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if amountFirst then write myAmount & tab & line 1 of fld ("Ingredient" & i) & returnChar to file myFileName else if includeBatch then write line 1 of fld ("Ingredient" & i) & tab & line 1 of fld ("Amount" & i) & tab & line i of fld "batch2" & returnChar to file myFileName else write line 1 of fld ("Ingredient" & i) & tab & line 1 of fld ("Amount" & i) & returnChar to file myFileName end if end repeat end if write return to file myFileName if fld "Comments" is not empty then put fld "comments" into myComments write returnChar & "Comments:" & returnChar to file myFileName repeat get offset(quote,myComments) if it>0 then put empty into char it of myComments else exit repeat end repeat repeat with i=1 to the number of lines of myComments write line i of myComments & returnChar to file myFileName end repeat end if if fld "Hazards" is not empty then write returnChar & "Possible Health Hazards:" & returnChar to file myFileName repeat with i=1 to the number of lines of fld "Hazards" write line i of fld "Hazards" & returnChar to file myFileName end repeat end if write return & "Estimated Thermal Expansion =" && fld "thermalExpansion" & "x10-6 /deg. C" & returnChar to file myFileName if includeAnalysis is true then write returnChar & "Unity Formula for " & (fld "Name") & ":" & returnChar to file myFileName put "K2O ,Na2O,CaO ,MgO ,Li2O,BaO ,PbO ,ZnO ,CuO ,CoO ,NiO ,SrO "\ into ROItems put "Al2O3,B2O3 ,Fe2O3,P2O5 ,Sb2O3,Cr2O3,V2O5" into R2O3Items put "SiO2 ,TiO2 ,ZrO2 ,SnO2 ,MnO2 ,F ,Si:Al Ratio" into RO2Items put empty into myAnalysis put empty into myRO put empty into myRO2 put empty into myR2O3 repeat with i=1 to 12 if line i of fld "R2O" is not empty then put line i of fld "R2O" && item i of ROitems \ & return after myRO if line i of fld "RO2" is not empty then put tab & line i of fld "RO2" && item i of RO2Items \ & return after myRO2 if line i of fld "R2O3" is not empty then put tab & line i of fld "R2O3" && item i of R2O3Items \ & return after myR2O3 end repeat repeat with i=1 to 12 if line i of MyRO is not empty or line i of MyRO2 is not empty\ or line i of MyR2O3 is not empty then put line i of myRO & line i of MyR2O3 & \ line i of MyRO2 & returnChar after myAnalysis else next repeat end repeat write myAnalysis to file myFileName if fld "PercentAnalysis" is empty then send mouseup to btn "Percent Analysis" write returnChar & "Percentage Analysis for " & fld "Name" & ":" & returnChar to file myFileName repeat with i=1 to the number of lines of fld "PercentAnalysis" write line i of fld "PercentAnalysis" & returnChar to file myFileName end repeat -- else -- put "SiO2,Al2O3,Fe2O3,TiO2,K2O,Na2O,Ca2O,MgO,Li2O,P2O5,MnO,S,F2,L.O.I" into OxideItems -- write returnChar & "Analysis for " & fld "Name" & ":" & returnChar to file myFileName -- repeat with i=1 to 14 -- if line i of fld "PercentAnalysis">0 -- then write tab & line i of fld "PercentAnalysis" && "%" &&\ -- item i of OxideItems & returnChar to file myFileName -- end repeat -- end if end if write return & return to file myFileName end MakeTextFile on importInsight myFileName if there is a bg btn "Import Insight" then send ("importInsight" && quote & MyFileName & quote) to bg btn "Import Insight" -- hidden button else answer "Go to any Glaze or Clay card to import an Insight recipe." end importInsight on saveInsight put line 1 of fld "Name" into myGlazeName put fld "cone" into myCone put ". Surface: " into SurfaceUse -- else if the short name of this bg is "Clays" then -- put line 1 of fld "ClayName" into myGlazeName -- put fld "ClayCone" into myCone -- put ". Best for: " into SurfaceUse put char 1 to 28 of myGlazeName into myFileName --put createHGFile(myFileName,IRCP) into myFileName set fileType to "IRCPTEXT" ask file "Save this glaze as an Insight file:" with myFileName & ".rcp" if it is empty then exit saveInsight put it into myFileName open file myFileName write " 4 " & return & "RCP" & return & "STAN.MDT" & return & myGlazeName & return to file myFileName repeat with i=1 to 14 put ("Ingredient" & i) into myIngred put ("Amount" & i) into myAmount if fld myIngred is empty then exit repeat write fld myIngred & return to file myFileName write " " & fld myAmount & " " & return to file myFileName end repeat -- repeat with i=25 to 32 -- if fld i is empty then exit repeat -- if i mod 2 >0 then -- write " " & fld i & return to file myFileName -- else write " " & fld i & " " & return to file myFileName -- end repeat write "EOF" & return & " 0 " & return to file myFileName put "NOTES" & return & "" & myCone && "Firing: " & fld "Firing" & return & fld "Color" && SurfaceUse & fld "surface" & return & fld "Comments" & "ENDNOTES" & return & " " & return into GlazeNotes write char 1 to 255 of glazeNotes to file myFileName close file myFileName if the number of chars of glazeNotes >255 then answer "Insight will only allow 255 characters in the notes field," & return & "so the comments of this glaze will be abbreviated." & \ return & "Any important information should be included in the first sentence" & return & "or two of the HyperGlaze comments field to be exported." end saveInsight function stripSpaces myText -- 1990 R. Burkett current 11/10/90 repeat with i= 1 to the number of lines of myText repeat if last char of item 1 of line i of myText is " " then delete last char of item 1 of line i of myText else exit repeat end repeat repeat if first char of item 1 of line i of myText is " " then delete first char of item 1 of line i of myText else exit repeat end repeat end repeat repeat put offset(" ",mytext) into doubleSpaces if doubleSpaces > 0 then delete char doubleSpaces of myText else exit repeat end repeat return myText end stripSpaces on SendGlaze CardKind -- no longer used in HGX? set cursor to watch put empty into myGlaze put empty into myCdFlds repeat with i=1 to the number of flds if the short name of fld i is "Comments" then put fld i into myComments put tab after myGlaze next repeat else put fld i & tab after myGlaze end repeat repeat with i=1 to the number of cd flds put cd fld i & tab after myCdFlds end repeat put the loc of cd fld "TotAmt" into AmtLoc put the loc of cd fld "TotBatch" into BatchLoc put the loc of cd fld "Totals" into TotLoc answer file "Select the HyperGlaze stack to save a copy of this glaze:" of type "STAK" if the result is not empty then exit sendGlaze lock screen go to stack it if there is no bg "Glazes" then answer "Sorry, the stack you chose was not the right kind to store glaze recipes. You must choose a copy of HyperGlaze." go back exit sendGlaze end if go to first cd of bg CardKind unlock screen if the result is not empty then answer "Sorry, this is not a HyperGlaze stack." unlock screen exit sendGlaze end if doMenu "New Card" if the result is not empty then exit sendGlaze repeat with i=1 to the number of flds put offset(tab,myGlaze) into endChar get char 1 to endChar of myGlaze delete last char of it put it into fld i delete char 1 to endChar of myGlaze end repeat put myComments into fld "Comments" repeat with i=1 to the number of cd flds put offset(tab,myCdFlds) into endChar get char 1 to endChar of myCdFlds delete last char of it put it into cd fld i delete char 1 to endChar of myCdFlds end repeat set the loc of cd fld "TotAmt" to AmtLoc set the loc of cd fld "TotBatch" to BatchLoc set the loc of cd fld "Totals" to TotLoc put "True" into fld "IndexMe" end SendGlaze on BlendGlaze -- put empty into myAmts put empty into myIngreds answer "Send this recipe to Blender as glaze 'A' or 'B'?" with "Cancel" or "Glaze A" or "Glaze B" if it is "Cancel" then exit BlendGlaze put it into whichGlaze answer "Include colorants in blend?" with "Cancel" or "Base Glaze" or "Include Color" if it is "Cancel" then exit BlendGlaze put it into myRecipe put fld "name" into GlazeName repeat with i=1 to 10 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat if myRecipe is "Include Color" then repeat with i=11 to 14 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat end if push card lock screen lock recent lock messages go to card "GlazeBlender" of stack "Potter's Friend" if whichGlaze is "Glaze A" then put GlazeName into cd fld 1 repeat with i= 1 to 14 set cursor to busy put ((i*2)) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat else put GlazeName into cd fld 30 repeat with i= 1 to 14 set cursor to busy put ((i*2)+29) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat end if pop card unlock screen unlock recent unlock messages answer "'" & (fld "Name") && "' sent to Glaze Blender." end BlendGlaze on opencard global gComplexSearch if the short name of this stack is "Glazes" then MakeGlazeGlobals if gComplexSearch is true then exit opencard if the hilite of btn "Graph UMF" is true then send "adjustGraph" to btn "Graph UMF" if fld "PercentAnalysis" is empty and fld "RO2" is not empty then send mouseup to btn "Percent Analysis" end if pass opencard end opencard on closecard if the short name of this stack is "Glazes" then global gimportingGlazes,importingGlazeBase,gComplexSearch if gComplexSearch is true then exit closecard if gimportingGlazes is true then exit closecard if importingGlazeBase is true then exit closecard if fld "name" of this card of stack "Glazes" is empty then put "?" into fld "name" if fld "Cone" of this card of stack "Glazes" is empty then ask "Please enter a cone number for this glaze: " & return & line 1 of fld "name" if it is not empty then put it into fld "cone" else exit closeCard answer "This glaze (" & line 1 of fld "name" & ") has not been indexed!" end if end if if fld "indexMe" contains "true" then put char 1 to 36 of line 1 of fld "name" into NewGlaze put the short id of this cd into NewID put fld "C" & line 1 of fld "Cone" into NewCone lock screen push cd set lockmessages to true go to stack "Glaze Index" set lockmessages to false indexNewCard newGlaze,NewID,NewCone pop cd put empty into fld "IndexMe" unlock screen end if end if pass closecard end closecard on makeGlazeGlobals global gComplexSearch,gGlazeName,gGlazeCone,gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion set numberformat to 0 put empty into gIngredList put empty into gIngredAmounts put empty into gColorList put empty into gColorAmts repeat with i=1 to 10 put "ingredient" & i into myField put "Amount" & i into myAmount if fld myField is not empty then put line 1 of field myField & return after gIngredList if gComplexSearch is not true then put line 1 of field myAmount & return after gIngredAmounts end if end repeat if last char of gIngredList is return then delete last char of gIngredList repeat with i=11 to 14 put "ingredient" & i into myField put "Amount" & i into myAmount if fld myField is not empty then put line 1 of field myField & return after gColorList if gComplexSearch is not true then put line 1 of field myAmount & return after gColorAmts end if end repeat if last char of gColorList is return then delete last char of gColorList if gComplexSearch is true then exit makeGlazeGlobals -- if we're doing a search then the rest isn't needed put line 1 of fld "name" into gGlazeName put line 1 of fld "cone" into gGlazeCone put line 1 of fld "surface" into gGlazeSurface put fld "R2O" into gR2O put fld "R2O3" into gR2O3 put fld "RO2" into gRO2 put fld "percentAnalysis" into gPercent put fld "ThermalExpansion" into gThermExpansion end makeGlazeGlobals on indexNewCard NewGlaze,NewID,NewCone put word 1 of NewCone into myCone if char 1 of myCone is "C" then delete char 1 of myCone if myCone > 7 and char 1 of myCone is not "0" then put "Highfire" into myField set the menuHistory of btn "whichIndex" to 3 else if myCone >1 and char 1 of myCone is not "0" then put "Midrange" into myField set the menuHistory of btn "whichIndex" to 2 else put "lowfire" into myField set the menuHistory of btn "whichIndex" to 1 end if put myField & "ID" into MyID -- put the short id of this cd into NewID put "*" & NewGlaze && NewCone & return before line 1 of fld myField put NewID & return before line 1 of fld MyID end indexNewCard on doGlazeLimits global myflux Put fld "R2O" into myRO put fld "R2O3" into myR2O3 put fld "RO2" into myRO2 Put fld "Name" into myGLaze put fld "Cone" into myCone put fld "Surface" into mySurface go to cd "limits" of stack "Glaze Calculator IIx" -- if the visible of cd fld "Na" is false -- then doMenu "Combine K & Na" put myGlaze into cd fld "Name" put myCone into cd fld "Cone" put "K,Na,Ca,Mg,Li,Ba,Pb,Zn" into ROList repeat with i=1 to 8 put line i of myRO into cd fld (item i of ROList) end repeat put line 12 of myRO into cd fld "Sr" put line 1 of myR2O3 into cd fld "Al" put line 2 of myR2O3 into cd fld "B" if there is a cd fld "P" then put line 4 of myR2O3 into cd fld "P" send closefield to cd fld "P" end if put line 1 of myRO2 into cd fld "Si" set numberformat to 0.0 put cd fld "Si"/cd fld "Al" into cd fld "Al/Si Ratio" if mySurface contains "Mat" then set the name of bg btn id 15 to "Matte" else set the name of bg btn id 15 to "Glossy" if cd fld "Pb">0 and the icon of bg btn "No Lead" is 30913 then send mouseup to bg btn "No Lead" put empty into myFlux send "AdjustAmounts" to cd "Limits" send "setGlazeLimits" to cd "Limits" send closefield to cd fld "B" send closefield to cd fld "P" send closefield to cd fld "Al" send closefield to cd fld "Si" end DoGlazeLimits on clearTotals set the loc of cd fld "totals" to 130,223 set the loc of cd fld "TotAmt" to 198,223 set the loc of cd fld "TotBatch" to 265,223 put "Batch?" into cd fld "TotAmt" put empty into cd fld "totals" put empty into fld "Batch" put empty into fld "Batch2" end clearTotals on goToGlazeCalculator if the optionkey is down then put True into IncludeColor else put empty into IncludeColor push cd answer "Do you want to use this Unity Formula?" with "Yes" or "No" or "Cancel" if it is "cancel" then exit goToGlazeCalculator if it is "yes" then set cursor to watch put empty into transfer put fld R2O into R2Otemp put fld R2O3 into R2O3Temp put fld RO2 into RO2Temp put fld "Name" into glazeName put fld "Cone" into ConeNumber repeat with i=1 to 10 set numberformat to 0 put "ingredient" & i into whichField set numberformat to 0.000 if fld whichField is empty then exit repeat else put fld whichField & "," after transfer end repeat if includeColor is true then repeat with i=11 to 14 set numberformat to 0 put "ingredient" & i into whichField set numberformat to 0.000 if fld whichField is empty then exit repeat else put fld whichField & "," after transfer end repeat put empty into includeColor end if delete last char of transfer go to stack "Glaze Calculator" if the result is "not found" then exit goToGlazeCalculator answer "Erase glaze currently in calculator?" with "OK" or "Cancel" if it is "Cancel" then exit goToGlazeCalculator if "Glaze Calculator" is not in the short name of this stack then exit goToGlazeCalculator set cursor to watch clearRecipe clearUnity ClearAmounts put glazeName into fld "GlazeName" put ConeNumber into fld "Cone" repeat with i=1 to 14 if item i of transfer is empty then exit repeat else put item i of transfer & return after fld 3 end repeat if the hilite of button "Combined K & Na" is true then send mouseup to button "Combined K & Na" put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr" into ROList repeat with i=1 to 12 put line i of R2Otemp into fld (item i of ROList) end repeat put "Al,B,Fe,P,Sb,Cr,V" into R2O3List repeat with i=1 to 7 put line i of R2O3temp into fld (item i of R2O3List) end repeat put "Si,Ti,Zr,Sn,Mn,F" into RO2List repeat with i=1 to 6 put line i of RO2temp into fld (item i of RO2List) end repeat send percentageAnalysis to stack "glaze calculator" click at loc of fld "GlazeName" else go to stack "Glaze Calculator" end if End goToGlazeCalculator on calculateMyGlaze set the cursor to busy Global gHowMany, gCalcAll, BailOut,myResult put empty into BailOut if the optionKey is down then put 14 into gHowMany else put 10 into gHowMany -- if the hilite of bg btn "Graph UMF" is true then send mouseup to bg btn "Graph UMF" if fld "ingredient1" is empty then answer "Please fill in an ingredient name." with "OK" exit calculateMyGlaze end if if fld "amount1" is empty then answer "Please fill in an amount for the ingredient." with "OK" exit calculateMyGlaze end if if the shiftKey is not down then doPercent donewBatch if the hilite of bg btn "LockUMF" is not true then doUnity else if gCalcAll is not "quick Calc" then answer "This unity formula is locked, the unity formula for this glaze will not be calculated." If bailOut is not empty then put empty into BailOut exit calculateMyGlaze else if line 1 of fld "RO2" is not empty and the hilite of bg btn "LockUMF" is not true then doThermalExpansion send mouseup to bg btn "Batch Cost" send mouseup to bg btn "Si/Al" send CalcPercentAnalysis to btn "Percent Analysis" end if end if put empty into BailOut else doPercent donewBatch if the hilite of bg btn "LockUMF" is not true then doThermalExpansion send mouseup to bg btn "Batch Cost" send mouseup to bg btn "Si/Al" end if end if put empty into gCalcAll end calculateMyGlaze Function GetIngredientList gHowMany put empty into myIngredientList set the numberFormat to 0 put GlazeIngredientList (gHowMany) into myingredientList --formerly xcmd set the numberformat to 0.000 put stripSpaces(myIngredientList) into myIngredientList return myIngredientList end GetIngredientList on CleanUp UnknownMaterials global UnknownMaterialsFile pop cd set lockrecent to false set lockmessages to false unlock screen put fld "name" & " cone " & fld "Cone" & return before unknownMaterials if UnknownMaterialsFile is empty then ask file "Save list of unknown materials as:" with "Unknown Materials List.txt" if the result is not empty then exit CleanUp put it into MyFileName else put UnknownMaterialsFile into MyFileName set fileType to "ttxtTEXT" open file MyFileName for write write unknownMaterials to file MyFileName at eof close file MyFileName end CleanUp on deleteCard global gDeleteAllCards if gDeleteAllCards is not true then set cursor to watch if fld "indexMe" contains "true" then exit deleteCard put the id of this cd into CardID put true into fld "indexMe" push cd Lock screen set lockrecent to true go to stack "Glaze Index" find string CardID if the result is not empty then exit deleteCard put the short name of the foundField into WhichIndex if WhichIndex is "HighfireID" then put "Highfire" into indexFld else if whichIndex is "MidrangeID" then put "Midrange" into indexFld else put "Lowfire" into indexfld put word 2 of the FoundLine into IndexLine delete the Foundline delete line IndexLine of fld Indexfld pop cd unlock screen set lockrecent to false end if end deleteCard on NewCard global NewHGStack, gimportingGlazes -- if new stack if NewHGStack is not empty then exit newCard if gimportingGlazes is not empty then exit newCard if there is a cd fld "Totals" then exit newCard set the cursor to 4 set lockmessages to true put "oxidation or reduction" into fld "firing" put "Untested" into fld "Tested" put "100.0" into fld "TotBatch" put "gm" into fld "lb/gm" put "C" into fld "c" put "true" into fld "IndexMe" if showlines of fld "name" is false then send mouseup to btn "show lines" click at ((item 3 of the rect of fld "name")-10),48 -- was 290 end NewCard on doThermalExpansion send mouseup to bg btn "Estimated Thermal Expansion:" end doThermalExpansion on doCompareFormulas hide message put fld "name" into GlazeName put fld "cone" into ConeNumber put fld "R2O" into fld "compareR2O" put fld "R2O3" into fld "compareR2O3" put fld "RO2" into fld "compareRO2" hide fld "BatchCost" hide bg btn "Batch Cost" show fld "backdrop" show fld "CompareR2O" show fld "CompareR2O3" show fld "CompareRO2" show fld "R2O3Labels" show fld "R2OLabels" show fld "RO2Labels" show fld "CompareName" show bg btn "HideCompare" put "Unity Formula for:" & return & glazeName && "- Cone " & \ ConeNumber & return & " -- click to hide --" into fld "compareName" unlock screen end doCompareFormulas on showHazards if field "Hazards" is empty then hide button Hazard else if the hilite of bkgnd button "comments" is false then send mouseup to bkgnd button "Unity Formula" end if end showHazards on importascii myFileName send "importascii" && quote & myFileName & quote to bg btn "import ascii" end importascii on CalculateThisGlaze -- sent by the button "calculate Glaze" -- new script to start glaze calculation 2004 Richard Burkett global gHowMany, gCalcALL, bailOut lock screen if the optionKey is down then put 14 into gHowMany else put 10 into gHowMany put the visible of stack "materials" into MaterialsState hide stack "materials" if fld "ingredient1" is empty then answer "Please enter an ingredient on the first line of the ingredient list." with "OK" focus on fld "ingredient1" exit CalculateThisGlaze end if if fld "amount1" is empty then answer "Please fill in an amount for the first ingredient." with "OK" focus on fld "Amount1" exit CalculateThisGlaze end if findPercent if fld "Totals" is empty then put "Totals:" into fld "totals" grambatch if the hilite of bg btn "LockUMF" is not true then doUnity end if if bailout is true then exit calculateThisGlaze unlock screen send mouseup to btn "Batch Cost" send mouseup to btn "Percent Analysis" send mouseup to btn "Estimated Thermal Expansion:" send mouseup to bg btn "Si/Al" makeGlazeGlobals set the visible of stack "materials" to MaterialsState go to stack "Glazes" if the hilite of bg btn "LockUMF" is true and gCalcALL is not "quick calc" then answer "The unity formula for this glaze is locked. The UMF was not calculated." end if if the visible of btn "UMFHide1" is true then send adjustGraph to btn "Graph UMF" end CalculateThisGlaze -- this button is hidden on doUnity global gcalcAll, UnlockIndex, NumberOfColorants, Whichfield,gWhichStack, bailOut, selectedWord, myResult,gHowMany,NumberOfIngredients hide message if fld "Ingredient1" is not empty then if fld "Amount1" is not empty then global IngredientList,hazardInfo,UnitCost,firstcolorant global lastingredient put empty into UnlockIndex put empty into myResult put empty into hazardInfo put empty into UnitCost put empty into bailOut put getIngredientList(gHowMany) into IngredientList push cd lock screen set lockmessages to true set lockrecent to true go stack "Materials" if the result is not empty or there is not a fld "CompiledAnalysis" then Answer "There is a serious problem with the Materials stack." put empty into ingredientList put true into bailout exit doUnity end if set cursor to busy hide message put empty into theOxides repeat 26 put return after theOxides end repeat put GlazeOxideAmountsX (ingredientList,TheOxides,firstColorant) into TheOxides if myResult is not empty then put item 2 of myResult into i put item 3 of myResult into ProblemIngred play boing -- Mat NotFound if gcalcAll is "quick Calc" then put Tab & ProblemIngred & return after UnknownMaterials put empty into myResult put true into BailOut else pop cd set lockmessages to false set lockrecent to false unlock screen answer "Unable to locate ingredient '" & ProblemIngred & "'." &\ return & return & "Find " & ProblemIngred & " in Materials Index?" \ with "Cancel" or "Go To Index" if it is "Cancel" then put empty into gHowMany put empty into myResult put empty into UnlockIndex put empty into Whichfield put true into BailOut exit DoUnity end if if it is "Go To Index" then put "unlocked" into UnlockIndex put true into BailOut push cd go to stack "Materials Index" answer "Find the correct name for '" & ProblemIngred & ",'in the Materials Index" & return & "and go to that Materials card." & return & "Then click 'Insert in Recipe' on the Materials card."\ & return & return & "Or return to the recipe and type in the correct ingredient name." put "Find correct name for:" & return & ProblemIngred into fld "LookFor" set the numberFormat to 0 put item 2 of myResult into LastLine if LastLine>firstColorant then put "ingredient" & trunc(LastLine-firstColorant+11) into Whichfield else put "ingredient" & trunc(LastLine) into Whichfield end if put "Glazes" into gWhichStack put empty into myResult exit doUnity end if end if end if if bailOut is true then cleanUp UnknownMaterials put empty into bailout exit DoUnity end if pop cd set lockmessages to false set lockrecent to false unlock screen -- End Mat retrieval CalculateGlazeX IngredientList,TheOxides,LastIngredient -- Xcmd put HazardInfo into fld "Hazards" put UnitCost into fld "Cost" put empty into gHowMany else --do something else? end if else --do something else? end if end doUnity on CalculateGLazeX IngredientList,TheOxides,LastIngredient -- 1990, 1993, 1995, 1998 Richard Burkett -- this is an experimental version for the unity formula calc. 12/23/93 -- recompiled 9/1995, modified 5/29/98 set numberformat to 0.00000000 put empty into myMolFormula put empty into totSum repeat with x=1 to 26 put "0.0" & return after myMolFormula end repeat repeat with i=1 to LastIngredient put (item 26 of line i of theOxides) into temp -- molecular Wt. if temp>0 then put (last item of line i of IngredientList)/temp into molEquiv else put (0.0) into molEquiv repeat with x=1 to 25 add (item x of line i of theOxides)*molEquiv to line x of myMolFormula end repeat end repeat repeat with i= 1 to 12 add line i of MyMolFormula to TotSum end repeat if TotSum > 0 then put empty into fld "R2O" put empty into fld "R2O3" put empty into fld "RO2" repeat with x= 1 to 25 put (line x of MyMolFormula) into temp if temp/totsum>0 then put temp/totsum into line x of MyMolFormula end repeat set numberformat to 0.000 repeat with i=1 to 12 if (line i of myMolFormula)>0 then put (line i of myMolFormula)*1 & return after myfluxes else put return after myfluxes end repeat repeat with i=13 to 19 if (line i of myMolFormula)>0 then put (line i of myMolFormula)*1 & return after myStabilizers else put return after myStabilizers end repeat repeat with i=20 to 25 if (line i of myMolFormula)>0 then put (line i of myMolFormula)*1 & return after myGlassFormers else put return after myGlassFormers end repeat put myFluxes into fld "R2O" put myStabilizers into fld "R2O3" put myGlassFormers into fld "RO2" else put empty into fld "R2O" put empty into fld "R2O3" put empty into fld "RO2" answer "This recipe has no flux and cannot be calculated in standard UMF format." end if end calculateGlazeX function GlazeOxideAmountsX ingredientList, theOxides -- used by the bkgnd script -- 1993-2005 Richard Burkett -- this comes from an experimental compiled version for the unity formula calculation 12/23/93 global SkipIt, FromFormula,HazardInfo,UnitCost,myResult global lastingredient put empty into theOxides put empty into myResult repeat with i=1 to 14 if line i of IngredientList is empty then exit repeat put item 1 of line i of IngredientList into myMaterial put true into skipIt put true into FromFormula put empty into firstCard find whole myMaterial in fld "Material" if the result is not empty then if i> lastIngredient then put "X" & return after unitCost next repeat else put "not found," & i & "," & item 1 of line i of ingredientList into MyResult exit repeat end if else if myMaterial contains field "Material" then put empty into myResult else put the number of this card into firstcard go next repeat until myMaterial contains field "Material" find whole myMaterial in field "Material" if the number of this card is firstCard then if i>= lastIngredient then put "X" & return after unitCost exit repeat else put "not found," & i & "," & item 1 of line i of ingredientList into MyResult exit repeat end if if fld "cost" is not empty --find out if there is a price then put fld "Cost" & return after UnitCost else put "X" & return after unitCost next repeat else if myMaterial contains field "Material" then exit repeat end repeat end if if MyResult is not empty then exit repeat put fld "CompiledAnalysis" & return after theOxides if the hilite of bg btn "health hazard" is true then put fld "Material" & ": " & fld "HealthHazards" & return after HazardInfo if fld "cost" is not empty --find out if there is a price then put fld "Cost" & return after UnitCost else put "X" & return after unitCost end repeat return theOxides end GlazeOxideAmountsX on FindPercent -- 1990-1992 Richard Burkett -- this is the current version 11/20/92, modified 6/18/2004 - was FindPercent put 0 into i -- put 0 into totalsLoc put 0 into whichField put 0.00 into MyTotal put 0.00 into totalPercent put 0.00 into MyField repeat with i = 1 to 10 set numberformat to 0 put ("amount" & i) into WhichField if fld WhichField is not empty then put (fld whichField) into MyField set numberformat to 0.00 add myfield to MyTotal else exit repeat end repeat if fld "TotBatch" =100 or fld "totBatch" is empty then put myTotal into fld "TotBatch" set numberformat to 0 repeat with i=1 to 10 put ("amount" & i) into WhichField set numberformat to 0.00 put (fld whichField) into MyField put ((MyField/MyTotal)*100.0) into MyField add MyField to TotalPercent put MyField into field WhichField set numberformat to 0 put ("amount" & (i+1)) into MyNewFieldNum if field MyNewFieldNum is empty then exit repeat end repeat put totalPercent into field "TotAmt" -- put whichfield into totalsLoc repeat with i=11 to 14 set numberformat to 0 put ("amount" & i) into WhichField set numberformat to 0.00 put (field whichField) into MyField if MyField > 0.0 then put ((MyField/MyTotal)*100.0) into MyField put MyField into fld WhichField else exit repeat end repeat end findPercent Function findGlazeMatch MyGlaze,FairPctx,GoodPctx,ExactPctx -- 1991-1992 Richard Burkett -- Installed in HyperGLaze 6/3/92 -- recompiled 9/1995, updated for Version X in 2004 -- This script matches unity analyses and is used the MatchMyGlaze script of the "Match Glazes" stack (substack of Glazes) put fairPctx into fairPct put goodPctx into goodPct put exactPctx into exactPct --myGlaze is the combined oxide analyses of the original glaze being compared put myGlaze into myGlazeX put empty into thisGlaze repeat with i=1 to 8 -- out of 12 put line i of fld "R2O" & return after ThisGlaze end repeat put line 12 of fld "R2O" & return after ThisGlaze repeat with i=1 to 2 -- out of 7 put line i of fld "R2O3" & return after ThisGlaze end repeat put line 4 of fld "R2O3" & return after ThisGlaze repeat with i=1 to 1 -- out of 6 put line i of fld "RO2" & return after ThisGlaze end repeat if ThisGlaze is empty then return "none" exit findGlazeMatch end if put True into ExactMatch put True into GoodMatch put True into FairMatch -- repeat with i=1 to 2 -- if line i of ThisGlaze is empty -- then put "0.000" into line i of ThisGlaze -- if line i of myGlazeX is empty -- then put "0.000" into line i of myGlazeX -- end repeat repeat with i=1 to 13 -- out of 25 if all oxides are used if line i of ThisGlaze is empty then put 0.000 into ThisOxide else put (line i of ThisGlaze)*1.0 into ThisOxide if line i of myGlazeX is empty then put "0.000" into myoxide else put (line i of myGlazeX)*1.0 into myoxide if ThisOxide<=0.007 and myoxide<=0.007 then next repeat if myoxide>0 then put abs (((myoxide-ThisOxide)/myoxide)*100) into OxideDiff if OxideDiff>ExactPct then put False into ExactMatch if OxideDiff> GoodPct then put False into GoodMatch if i<3 then put ((line 1 of myGlazeX)*1.0)+((line 2 of myGlazeX)*1.0) into myKNa put ((line 1 of thisGlaze)*1.0)+((line 2 of thisGlaze)*1.0) into thisKNa put abs(((myKna-thisKNa)/myKNa)*100) into CombKNa if CombKNa(FairPct/2) then put False into FairMatch end if else if oxideDiff> FairPct then put False into FairMatch end if end if else if ThisOxide>0.010 then put false into exactMatch if ThisOxide>0.020 then put false into GoodMatch if ThisOxide>0.050 then put false into FairMatch end if if ExactMatch is false and GoodMatch is false and FairMatch is false then exit repeat end repeat if ExactMatch then return "EXACT" else if GoodMatch then return "GOOD" else if FairMatch then return "FAIR" else return "NONE" end findGlazeMatch Function GlazeIngredientList gHowMany -- used by bkgnd script "Glazes" -- 1990-1993 Richard Burkett -- this is the current version 8/18/93 global AmountList,NumberOfIngredients,FirstColorant,LastIngredient put empty into myIngredientList put empty into myAmountList put empty into myNumberOfIngredients put empty into myFirstColorant put empty into myLastIngredient -- First assemble a list of ingredients repeat with i=1 to 10 put ("ingredient" & i) into myIngredient put ("Amount" & i) into myAmount if fld myIngredient is not empty and fld myAmount is not empty and char 1 of fld myIngredient is not "(" -- build list then put i into myNumberOfIngredients put (item 1 of fld myIngredient) & "," & fld myAmount & return after myIngredientList else exit repeat end if end repeat put mynumberOfIngredients into myLastIngredient put myNumberOfIngredients+1 into myFirstColorant -------assemble colorant list repeat with i=11 to 14 put ("ingredient" & i) into myIngredient put ("Amount" & i) into myAmount if fld myIngredient is not empty and fld myAmount is not empty and char 1 of fld myIngredient is not "(" then put fld myIngredient & "," & fld myAmount & return after myIngredientList add 1 to myNumberOfIngredients end if end repeat if gHowMany>10 -- 14 then put myNumberOfIngredients into myLastIngredient end if put myNumberOfIngredients into NumberOfIngredients put myFirstColorant into FirstColorant put myLastIngredient into LastIngredient return myIngredientList end GlazeIngredientList on deleteAllCards global gDeleteAllCards answer warning "Really delete ALL recipes in the Glazes stack?" & return &\ "WARNING: You cannot undo deleting ALL recipes." & return &\ "ALL recipes will be removed permanently." with "Delete All" or "Cancel" if it is "Cancel" then exit deleteAllCards answer warning "Really? Delete ALL cards?" with "Delete ALL" or "Cancel" if it is "Cancel" then exit deleteAllCards put true into gDeleteAllCards repeat (the number of cards of stack "Glazes")-1 set cursor to busy delete this card end repeat create card go prev delete this card put empty into gDeleteAllCards send mouseup to btn "Update Index" of stack "Glaze Index" answer "All cards in the Glazes stack have been deleted!" end deleteAllCards on setBatchSizeMarked if (the number of marked cards of stack "Glazes")<=0 then answer "There are no currently selected (marked) glazes." exit setBatchSizeMarked end if ask "Set batch size for the selected glazes to:" if it is empty then exit setBatchSizeMarked put it into myNewBatchSize answer "What weight measure for this batch size: " & myNewBatchSize & " ?" with "Cancel" or "Pounds" or "Grams" if it is "Cancel" then exit setBatchSizeMarked else if it is "Pounds" then put "lb" into myWeight else put "gm" into myWeight go to next marked card repeat (the number of marked cards of stack "Glazes") set cursor to busy put myWeight into fld "lb/gm" put myNewBatchSize into fld "TotBatch" doNewBatch go to next marked card end repeat end setBatchSizeMarked on copyRecipeAsText pWhich -- new script 7-8-2004 put "Glaze Name: " & line 1 of fld "Name" & return into myRecipe put "Cone: " & line 1 of fld "Cone" & return after myRecipe put "Color: " & line 1 of fld "color" & return after myRecipe put "Surface: " & line 1 of fld "surface" & return after myRecipe put "Firing: " & line 1 of fld "Firing" & return after myRecipe put "Testing: " & line 1 of fld "Tested" & return after myRecipe put return & "Base Glaze: " & tab & "Pct Amount" & tab & "Batch" & return after myRecipe set numberformat to 0 repeat with i=1 to 10 if fld ("Ingredient" & i) is not empty then put line 1 of fld ("Ingredient" & i) & tab & fld ("amount" & i) & tab & line i of fld "Batch" & return after myRecipe end if end repeat put "TOTALS: " & tab & fld "TotAmt" & tab & fld "totBatch" & return & return after myRecipe if fld "Ingredient11" is not empty then put "Also add these colorants and additions:" & return after myRecipe repeat with i=11 to 14 if fld ("Ingredient" & i) is not empty then put line 1 of fld ("Ingredient" & i) & tab & line 1 of fld ("amount" & i) & tab & line (i-10) of fld "Batch2" & return after myRecipe end if end repeat end if if pWhich is "Comments" or pWhich is "UMF" then put return & "Comments:" & return & fld "Comments" & return after myRecipe put return & "Health Hazards:" & return & fld "hazards" & return after myRecipe end if if pWhich is "UMF" then --add the UMF to the copy put "K2O,Na2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into myRO put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into myR2O3 put "SiO2,TiO2,ZrO2,SnO2,MnO2,F,Si:Al ratio" into myRO2 put return & "Unity Molecular Formula" & return after myRecipe put empty into UMFTemp repeat with i=1 to 12 -- assemble the unity formula with chemical labels get line i of fld "R2O" if it>0 then put it && (item i of myRO) after UMFTemp if i<7 then get line i of fld "R2O3" if it>0 then put tab & it && (item i of myR2O3) after UMFTemp get line i of fld "RO2" if it>0 then put tab & it && (item i of myRO2) after UMFTemp end if put return after UMFTemp end repeat repeat with i=(the number of lines of UMFTemp) down to 1 -- strip out blank lines if line i of UMFTemp is empty then delete line i of UMFTemp end repeat put UMFTemp after myRecipe end if set clipboardData to empty set clipboardData ["text"] to myRecipe end copyRecipeAsText on importGlazeFile global gimportingGlazes, gCalcAll if the platform is "MacOS" then if the optionkey is down then answer file "Select a GLAZE (.HGII or .HGZ) file to open:" else answer file "Select a GLAZE (.HGII or .HGZ) file to open:" with filter "Glaze files,GLAZ; " -- of type "GLAZ,TEXT" else if the platform is "Win32" then answer file "Select a GLAZE (.HGII or .HGZ) file to open:" with filter "Glaze files,*.HGZ;*.HGII" end if if the Result is not empty then exit importGlazeFile put it into MyFileName if MyFileName is empty then exit importGlazeFile put the number of chars of line 1 of MyFileName into NameSize put char (nameSize-4) to NameSize of line 1 of MyFileName into signature if "HGII" is not in signature then if ".HGZ" is not in signature then answer "That was not a HyperGlaze Glaze file, sorry! (Glaze files must have '.HGII' or '.HGZ' file extension)" exit importGlazeFile end if -- if the platform is "Win32" then -- if checkForProtectedFile(myFileName) is false then -- answer "This file is protected. Please unlock it before importing." -- exit importGlazeFile -- end if -- end if set cursor to busy open file MyFileName for read read from file MyFileName until tab if it is empty then close file MyFileName answer "Sorry, HyperGlaze could not read from that file." exit importGlazeFile end if if "NewFormat" is in it then put false into OldRecordSeparator put empty into TempFirstField else put true into OldRecordSeparator put it into tempFirstField end if if OldRecordSeparator then read from file MyFileName until "" else read from file MyFileName until (numToChar(30)) put it into MyGlaze if MyGlaze is empty then close file MyFileName exit importGlazeFile else put tab into last char of MyGlaze put tempFirstField before MyGlaze create card end if put "Quick Calc" into gCalcAll put true into gimportingGlazes put "1 Name,2 cone,3 Color,4 Surface,5 Ingredient1,6 Amount1,7 Ingredient2,8 Amount2,9 Ingredient3,10 Amount3,11 Ingredient4,12 Amount4,13 Ingredient5,14 Amount5,15 Ingredient6,16 Amount6,17 Ingredient7,18 Amount7,19 Ingredient8,20 Amount8,21 Ingredient9,22 Amount9,23 Ingredient10,24 Amount10,25 Ingredient11,26 Amount11,27 Ingredient12,28 Amount12,29 Ingredient13,30 Amount13,31 Ingredient14,32 Amount14,33 Batch,34 Batch2,35 R2O,36 R2O3,37 RO2,38 Firing,39 Tested,40 Comments,41 thermalExpansion,42 Hazards,43 Date,44 lb/gm,45 C,1 Totals,2 TotAmt,3 TotBatch,52 JPEGLoc,unused,unused,56 colorPatch,58 cost,60 GlazeType" into OldFldNames repeat set cursor to busy put empty into transfer repeat with i=1 to 54 if MyGlaze is empty then exit repeat -- put empty into gimportingGlazes -- exit importGlazeFile end if put (char 1 to offset (tab,MyGlaze) of MyGlaze) into temp delete last char of temp delete char 1 to offset (tab,MyGlaze) of MyGlaze if i=50 or i=51 or i =52 then next repeat --i =49 if temp is (quote & quote) then put empty into fld (word 2 of (item i of OldFldNames)) else put temp into fld (word 2 of (item i of OldFldNames)) end repeat if OldRecordSeparator then read from file MyFileName until "" else read from file MyFileName until numToChar(30) -- or eof put it into myGlaze if myGlaze is empty then close file MyFileName exit repeat else put tab into last char of myGlaze create card end if end repeat put empty into gCalcAll put empty into gimportingGlazes answer "Update the index now?" & return & "(updating can take a few minutes if there are many glazes)" with "Later" or "Update" if it is "Update" then send mouseup to btn "Update Index" of stack "Glaze Index" end if end importGlazeFile function CheckForProtectedFile myFileName open file myFileName for write -- try creating a file if the result is empty then -- success! close file myFileName return true else -- failed - couldn't create a file there return false end if end CheckForProtectedFile n\ Glazes v v% W helvetica W helvetica U helvetica U helveticaW helveticaU helvetica U helvetica Ucourier ULucida Grande WArialWArial UArial UArial UAmerican Typewriter U Courier New UCourierW Arial BlackW Arial Black WArialUArial WArialWArial UArial WArial UCourierWArial UArial AUArial !UArial UArial UArial WArial WLucida GrandeU Arial BlackUArial UArial WLucida GrandeGlazesMenubar cREVMastercolors0,0,0 255,255,255 id2038rect129,88,654,696cREVTempMaster+windowManagerPlacefalsemenubar GlazesMenubarlinkHiliteColor cantAbortfalse maxWidth525rect129,88,654,696 patterns colors0,0,0 255,255,255 decorations"title,menu,minimize,maximize,closeiconicfalselinkVisitedColorshadowtrue cantDeletefalseid2038altId0 hcAddressingfalsestartUpIconicfalse windowShape0titleGlazes linkColor cantModifyfalse textStyle maxHeight630underlineLinksstyletopleveldestroyWindowfalse liveresizingfalse passwordscroll22passkeyicon0nameGlazes resizabletrue alwaysBuffertrueformatForPrintingfalsevisibletruemetalfalse minWidth525 destroyStackfalse textSize textFont dynamicPathsfalse minHeight300cREVGeometryCachestackID11091cRevStandaloneSettings cREVGeneral debugObjects breakPoints$ @ cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9445 patterns defaultButtoncolors layer134 borderWidth2 cantDeletefalseid9445altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153x+@ x+@ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+u @ x+ @ x+ @ x+ @ x+ @ x+ @ x+@ x+@ x+ @ x+ @ x+ @ x+ @ x+v @ x+w @ x+x @ x+y @ x+z @ x+{ @ x+| @ x+} @ x+~ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+d @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+e @ x+f @ x+q @ x+ @ x+g @ x+r @ x+h @ x+s @ x+T @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+p @ x+U @ x+i @ x+j @ x+V @ x+m @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+W @ x+ @ x+X @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+ @ x+Y @ x+Z @ x+o @ x+[ @ x+\ @ x+t @ x+] @ x+^ @ x+n @ x+_ @ x+l @ x+` @ x+a @ x+k @ x+b @ x+c @ x+N @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x$ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641109543009380110611087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180110954298586011060cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9430 patterns defaultButtoncolors layer97 borderWidth2 cantDeletefalseid9430altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total155x+4+5$ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9446 patterns defaultButtoncolors layer135 borderWidth2 cantDeletefalseid9446altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x%] @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9565 patterns defaultButtoncolors layer602 borderWidth2 cantDeletefalseid9565altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x%l @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9580 patterns defaultButtoncolors layer685 borderWidth2 cantDeletefalseid9580altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x$ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9435 patterns defaultButtoncolors layer104 borderWidth2 cantDeletefalseid9435altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x%c @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9571 patterns defaultButtoncolors layer585 borderWidth2 cantDeletefalseid9571altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x% @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9624 patterns defaultButtoncolors layer943 borderWidth2 cantDeletefalseid9624altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x%w @ cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9591 patterns defaultButtoncolors layer749 borderWidth2 cantDeletefalseid9591altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153x$ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9447 patterns defaultButtoncolors layer138 borderWidth2 cantDeletefalseid9447altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x% @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9617 patterns defaultButtoncolors layer854 borderWidth2 cantDeletefalseid9617altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x%~ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9598 patterns defaultButtoncolors layer780 borderWidth2 cantDeletefalseid9598altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x% @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9605 patterns defaultButtoncolors layer805 borderWidth2 cantDeletefalseid9605altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153orderx% @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9625 patterns defaultButtoncolors layer956 borderWidth2 cantDeletefalseid9625altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153orderx' @ cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9988 patterns defaultButtoncolors layer93 borderWidth2 cantDeletefalseid9988altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153x'@ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10004 patterns defaultButtoncolors layer137 borderWidth2 cantDeletefalseid10004altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x'j @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10090 patterns defaultButtoncolors layer339 borderWidth2 cantDeletefalseid10090altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x' @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10165 patterns defaultButtoncolors layer477 borderWidth2 cantDeletefalseid10165altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x' @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10194 patterns defaultButtoncolors layer538 borderWidth2 cantDeletefalseid10194altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10243 patterns defaultButtoncolors layer642 borderWidth2 cantDeletefalseid10243altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10256 patterns defaultButtoncolors layer677 borderWidth2 cantDeletefalseid10256altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10260 patterns defaultButtoncolors layer686 borderWidth2 cantDeletefalseid10260altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10265 patterns defaultButtoncolors layer693 borderWidth2 cantDeletefalseid10265altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10269 patterns defaultButtoncolors layer699 borderWidth2 cantDeletefalseid10269altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x(8 @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10296 patterns defaultButtoncolors layer758 borderWidth2 cantDeletefalseid10296altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x+S @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x(B @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10306 patterns defaultButtoncolors layer778 borderWidth2 cantDeletefalseid10306altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x(K @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10315 patterns defaultButtoncolors layer794 borderWidth2 cantDeletefalseid10315altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x*+ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x(w @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10359 patterns defaultButtoncolors layer873 borderWidth2 cantDeletefalseid10359altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x(t @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10356 patterns defaultButtoncolors layer874 borderWidth2 cantDeletefalseid10356altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x*/ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x( @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10413 patterns defaultButtoncolors layer942 borderWidth2 cantDeletefalseid10413altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10681 patterns defaultButtoncolors layer1314 borderWidth2 cantDeletefalseid10681altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10691 patterns defaultButtoncolors layer1339 borderWidth2 cantDeletefalseid10691altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x(@ @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10304 patterns defaultButtoncolors layer772 borderWidth2 cantDeletefalseid10304altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10686 patterns defaultButtoncolors layer1333 borderWidth2 cantDeletefalseid10686altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x&I @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273638010361088712736379103410887127363811035108871273638210371088712736383103810887127363841039108871273638510401088712736386104110867153769781142108871273638710421088712736388104310887127363891044108871273639010451088712736401101010887127363911046108871273640210111088712736392104710887127363931048108871273640310141088712736394104910887127364041015108871273639510501088712736405101610887127363961067108871273640610171088712736397106810887127364071018108871273639810691088712736408101910887127363991065108871273640910201088712736410102110866314069411133108871273641110221086631406942113410887127364121023108871273641310241086631406943113510887127364141025108871273641510261087527540223118110887127364161027108776916727212611088712736417102810887127364181029108871273641910301088712736420103110887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736429105810887127364301059108871273643110601088712736432106110887127364331062108871273643410631088712736435106410887127364371070110954481537111065108871273643810711088712736440107410887127364391072108920513600120331088712736441107610887127364421077108871273644311111088712736444107910887127364451080108871273644610821088712736447108311270898359671107610887127364481085108871273645010871088712736449108610887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273645911201088712736460107310887127364611285108871273646212861087660388098118310887127364631287108871273646412881088712736465128910887127364661290108672403222711531108687930287110451088712736467129111086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181088701533915201911095436291991106310887015339162020108870153391720211088701533918202210887015339202024108870153391920231088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271087525400075117411086879412411104611086878981301104411095404579081103610937134945411076810881138002541307108777081909112631086714315743114010867227823941147110531758581111026108786696756112641087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9801 patterns defaultButtoncolors layer531 borderWidth2 cantDeletefalseid9801altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x&- @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9773 patterns defaultButtoncolors layer422 borderWidth2 cantDeletefalseid9773altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x&K @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9803 patterns defaultButtoncolors layer537 borderWidth2 cantDeletefalseid9803altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9735 patterns defaultButtoncolors layer254 borderWidth2 cantDeletefalseid9735altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x&f @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9830 patterns defaultButtoncolors layer655 borderWidth2 cantDeletefalseid9830altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x&g @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9831 patterns defaultButtoncolors layer656 borderWidth2 cantDeletefalseid9831altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9861 patterns defaultButtoncolors layer754 borderWidth2 cantDeletefalseid9861altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9860 patterns defaultButtoncolors layer755 borderWidth2 cantDeletefalseid9860altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9909 patterns defaultButtoncolors layer996 borderWidth2 cantDeletefalseid9909altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9952 patterns defaultButtoncolors layer1289 borderWidth2 cantDeletefalseid9952altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9731 patterns defaultButtoncolors layer243 borderWidth2 cantDeletefalseid9731altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9732 patterns defaultButtoncolors layer248 borderWidth2 cantDeletefalseid9732altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9760 patterns defaultButtoncolors layer363 borderWidth2 cantDeletefalseid9760altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10740 patterns defaultButtoncolors layer47 borderWidth2 cantDeletefalseid10740altId0 showBorderfalse textSize textFont textStylex) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10719 patterns defaultButtoncolors layer26 borderWidth2 cantDeletefalseid10719altId0 showBorderfalse textSize textFont textStylex) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCacheorder total153cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10725 patterns defaultButtoncolors layer32 borderWidth2 cantDeletefalseid10725altId0 showBorderfalse textSize textFont textStylex& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9873 patterns defaultButtoncolors layer834 borderWidth2 cantDeletefalseid9873altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x& @ cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9894 patterns defaultButtoncolors layer946 borderWidth2 cantDeletefalseid9894altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometryCachetotal153order x& @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9902 patterns defaultButtoncolors layer975 borderWidth2 cantDeletefalseid9902altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x*, @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x' @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 9991 patterns defaultButtoncolors layer102 borderWidth2 cantDeletefalseid9991altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x' @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10149 patterns defaultButtoncolors layer447 borderWidth2 cantDeletefalseid10149altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x' @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10155 patterns defaultButtoncolors layer455 borderWidth2 cantDeletefalseid10155altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order x*-card id 10797 @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVGeometrycachetotal153order x) @ cREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10678 patterns defaultButtoncolors layer1310 borderWidth2 cantDeletefalseid10678altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheorder total153x(2 @  cREVGeneralcREVGeometryCacheIDs10893856618672036108767941993611881108687678397110401108687678398110391108687678399110381093713423072107671087767896314126010887127363781033108871273637910341088712736380103610887127363811035108871273638210371088712736383103810887127363841039108871273638510401086715376978114210887127363861041108871273638710421088712736388104310887127363901045108871273638910441088712736391104610887127364011010108871273639210471088712736402101110887127364031014108871273639310481088712736404101510887127363941049108871273640510161088712736395105010887127364061017108871273639610671088712736407101810887127363971068108871273640810191088712736398106910887127364101021108871273640910201088712736399106510887127364111022108663140694111331088712736412102310866314069421134108663140694311351088712736413102410887127364141025108871273641510261088712736416102710875275402231181108871273641710281087769167272126110887127364181029108871273642010311088712736419103010887127364211032108871273642210511088712736423105210887127364241053108871273642510541088712736426105510887127364271056108871273642810571088712736430105910887127364291058108871273643110601088712736432106110887127364331062108871273643410631088712736435106411095448153711106510887127364371070108871273643810711088712736439107210887127364401074108871273644110761089205136001203310887127364421077108871273644311111088712736444107910887127364451080108871273644610821127089835967110761088712736447108310887127364481085108871273644910861088712736450108710887127364511097108920425528020311088712736453110110887127364541107108871273645511081088712736456109810887127364581118108871273646010731088712736459112010887127364611285108871273646212861088712736463128710876603880981183108871273646412881088712736465128910887127364661290108871273646712911108687930287110451086724032227115311086878721341104210875267122381179109380773168110792110868811753311047108870153391120091088701533912201610887015339132017108870153391420181109543629199110631088701533915201910887015339162020108870153391720211088701533918202210887015339192023108870153392020241088701533921201210887015339222013108870153392320141088701533924201511086866387151103510876592063001185108672442334011441086715840391114310888169050382028110868638836711034108809993554113061087525800822117510867130457161139108881685197520271108687941241110461087525400075117411086878981301104411095404579081103610937134945411076810881138002541307108671431574311401087770819091126310867227823941147108786696756112641105317585811110261087867369984126610877587036771197110868636328511028112722955701711080108881691913620291087767887834125910875267637331180cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,525,630name card id 10290 patterns defaultButtoncolors layer736 borderWidth2 cantDeletefalseid10290altId0 showBorderfalse textSize textFont textStylecREVGeometryCachetotal153order xx,( Glaze CardscREVTempMaster# traversalOntrue dontSearchfalsethreeDfalsescrollbarWidth20 boundingRectrect -3,26,523,646 patterns showNamefalsecolors 0,0,0 hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1144altId0radioBehaviorfalse textStyleboldlockLocfalselabel Glaze Cardsname group id 1144toolTiplayer1visibletrue cantSelectfalse borderWidth2margins1opaquefalse showBorderfalse textSize14 disabledfalse textFont Arial BlackvScroll0hilitedButton30 cREVGeneral revUniqueID 1086724423340 +RO2ColumnLabel  i(X cREVGeneral revUniqueID 1108686638715 SiO2    TiO2    Zr2O3       SnO2    MnO2    F Si:Al +ROColumnLabel H Ti$ cREVGeneral revUniqueID 1108686363285 K2O     Na2O     CaO MgO Li2O     BaO PbO ZnO CuO CoO NiO SrO+ Graphic 4Kw% cREVGeneral revUniqueID 1109540457908  cone iXon closefield set cursor to watch put AddSpaces(fld "Cone") into fld "Cone" pass closefield end closefield function addSpaces myText put false into CheckNext repeat with i= the number of chars of myText down to 1 get char i of myText -- if it is not in "a0123456789,- " -- then answer "Please use only numbers (0-9) and ',' or '-' in the cone field" if checkNext then if it is not " " then put " " after char i of myText put false into CheckNext if it is "-" then if char i+1 of myText is not " " then put " " after char i of myText put true into checkNext end if if it is "," then if char i+1 of myText is not " " then put " " after char i of myText end if end repeat return myText end addSpaces C'-cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 321,37,455,63multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1034altId45autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameconetoolTipvGridfalse listBehaviorfalselayer8visibletrue cantSelectfalse borderWidth2margins6 htmlText

6

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736379 + 10 R + 10 R + 10 + 10 ' 10 ( 10 $ 03 (2 9 - 10 - 11 ) 9 - 10 *- 9 - 10 ' 9 - 10 ' 9 - 10 ' 9 - 10 *, 8 - 9 - 10 & 6 & 6 & 6 ) 6 ) 6 ) 6 & 6 & 6 & 6 & 5 - 6 & 5 - 6 & 5 - 6 & 5 - 6 &g 5 - 6 &f 5 - 6 & 5 - 6 &K 5 &- 4 - 5 - 6 - 7 &I 4 ) 10 - 11 (@ 10 ) 10 ) 10 ( 10 */ 10 (t 10 (w 10 *+ 10 (K 10 (B 10 +S 10 - 11 (8 10 ( 10 ( 10 ( 10 ( 10 ' 10 ' 10 'j 10 ' 10 % 08, 07, 06 % 08, 07, 06 %~ 08, 07, 06 % 06, 05, 04 $ 06, 05, 04 %w 06 - 04 % 06 %c 04 - 03 $ 04 - 03 %l 04 %] 04 $ 04 $ 04 +N 10 +c 6 +b 6 +k 6 +a 6 +` 5 +l 6 +_ 6 +n 6 +^ 6 +] 6 +t 6 +\ 6 +[ 6 +o 6 +Z 6 +Y 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 9 + 6 + 6 +X 6 + 10 +W 6 + 6 + 6 + 6 + 6 + 6 + 6 + 10 + 5 + 10 + 5 + 6 +m 5 +V 5 +j 5 +i 5 +U 5 +p 5 + 10 + 10 + 10 + 10 + 10 + 10 +T 5 +s 6 +h 6 +r 6 +g 6 + 10 +q 6 +f 6 +e 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 +d 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 +~ 6 +} 6 +| 6 +{ 6 +z 6 +y 6 +x 6 +w 6 +v 6 + 10 + 6 + 6 + 6 + 6 + 6 + 6 + 6 + 6 +u 6 + 6 + + 6 + 6 + 6 + 6 + 6 + 6 + 10 + 10 + 10 + 10 + 10 + 10 + 10 + + 6 + 9 + 9 - 10 + 9 - 10 + 9 - 10  Colorhh BcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect 34,66,171,80multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1035altId2autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameColortoolTipvGridfalse listBehaviorfalselayer9visibletrue cantSelectfalse borderWidth1margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736381 + + + + ' Opaque White ( Translucent Blue $ Transparent Clear amber yellow (2 Translucent copper Red ) Green/Black/Red *- Transparent Clear ' white ' Translucent Greenish to brown ' Amber, honey, brown *, Opaque Red orange brown & white & aqua green w/ black where thick & ) Clear ) Translucent Yellow ) Semi-Opaque mint Green & Translucent Gray green? & Clear & Transparent Clear & Clear & Transparent Clear & Translucent White? & Opaque creamy White &g  Opaque White &f Transparent Clear & Transparent Clear &K Opaque White &- &I White ) opaque light yellow (@ purplish blue ) Translucent White ) blue/brown ( yellow / brown */ SemiOpaque White orange (t SemiOpaque White (w white/orange, Opaque *+ Opaque Black (K Translucent (B green/black +S Transparent Blue Green (8 light blue - greenish thin ( reddish brown ( mossy green ( Opaque Red Brown ( very, very green ' Opaque White ' clear, cloudy if thick 'j Opaque Purple ' clear % rainbow luster % Transparent Blue Green %~ multicolor % white $ %w Transparent Clear % base+color %c Opaque White $ Transparent Yellow %l clear %] White $ white majolica $ SemiOpaque Blue Green +N Translucent Blue Green +c Black +b Bronze yellow +k +a Green +` +l +_ Dity white +n +^ Turquiose +] white +t +\ white +[ +o +Z Blue with white spots +Y Green + + Black + Black + Black + Black + Black + Black + Black + Black + + + Black +X Black + red +W light turquiose + red + + light blue + green + black + + + + + + green +m +V Blue crystals +j +i +U Clear & crackled +p + Dark Green + Dark Green + Red + Dark Dark Blue + clear + Dark Blue +T Blue +s +h blue +r +g dull green + Dirty clear +q +f bright yellow +e Blueish-purple + + + + + + + + + + +d + clear + clear + clear + clear + clear + clear + clear + clear + clear + clear +~ old turqouse rust +} old turqouse rust +| old turqouse rust +{ old turqouse rust +z old turqouse rust +y white +x white +w white +v white + + redish + orange background blue front + dark green + + + + black + +u + dark green + + blue + dark red + brown + blue + green + white + Pink + + Green + + Yellow + Tourquoise + + + + + + +  Surfacehh B>cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect 206,66,336,80multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1036altId62autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSurfacetoolTipvGridfalse listBehaviorfalselayer10visibletrue cantSelectfalse borderWidth1margins6 htmlText

shiny glossy

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736380 + shiny glossy + shiny glossy + Crackle + texture ' Texture crawl beads ( Shiny or Glossy $ Shiny or Glossy (2 Shiny or Glossy ) varies *- Shiny or Glossy ' matte ' Texture rivulets ' Glossy *, Slip or Engobe & crawl & waxy rich satin matte & shiny glossy ) shiny or glossy ) matte rivulets ) semi-matte or satin & rivulet, drippy & shiny & shiny glossy & Glossy? & shiny & Matte & Satin Matt &g Shiny or Glossy &f drippy & Shiny or Glossy &K Satin Matte &- &I Satin ) glossy to matt (@ shiny ) Shiny or Glossy ) shiny ( matte */ shiny glossy (t Shiny or Glossy (w shiny *+ Satin Matte (K semi-mat, runny (B semi-matte +S Shiny or Glossy (8 shiny, glossy to mat thin ( shiny ( matte ( Satin Matte ( shiny ' Matte ' shiny 'j Satin Matte ' shiny % Semi-Matte Texture % Glossy or shiny %~ shiny % crawl $ %w Glossy or shiny % matte slip %c Glossy or shiny $ Shiny or Glossy %l shiny %] Glossy or shiny $ shiny $ Shiny or Glossy +N Shiny or Glossy +c shiny or glossy +b shiny or glossy +k +a shiny or glossy +` shiny or glossy +l crystalline +_ crystalline +n matte +^ semi-matte or satin +] texture +t texture +\ texture +[ shiny or glossy +o shiny or glossy +Z matte shiny or glossy +Y shiny or glossy + semi-matte or satin + metallic + metallic + metallic + metallic + metallic + metallic + metallic + metallic + + + metallic +X metallic + shiny glossy +W shiny or glossy + shiny glossy + + shiny or glossy + shiny or glossy + matte + shiny glossy + matte + matte + matte + + matte +m crystalline +V crystalline +j shiny or glossy +i +U  matte +p shiny or glossy + matte + shiny or glossy + shiny or glossy + shiny or glossy + crystalline + shiny glossy +T shiny glossy +s matte +h matte +r semi-matte or satin +g matte + shiny or glossy +q shiny or glossy +f matte +e semi-gloss + shiny or glossy transparent + shiny or glossy transparent + matte + matte + matte + shiny or glossy + shiny or glossy + matte + matte + matte +d shiny or glossy + crystalline + crystalline + crystalline + crystalline + matte + matte + matte + matte + crystalline + crystalline +~ semi-matte or satin +} semi-matte or satin +| semi-matte or satin +{ semi-matte or satin +z semi-matte or satin +y texture +x texture +w texture +v texture + shiny or glossy + shiny or glossy + semi-gloss + shiny or glossy + texture + texture + texture + matte + texture +u texture + dry matte + + texture + + + + matte + shiny glossy + + ? + ? + shiny glossy + + shiny glossy + shiny glossy + + + + + +  Ingredient1 mH _cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,87,166,104multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1037altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient1toolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins8 htmlText

frit 3124

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736382 + Nepheline Syenite + Nepheline Syenite + Soda Feldspar + Magnesium Carbonate ' Nepheline syenite ( Custer Feldspar $ Ferro frit 3124 (2 Custer feldspar ) Neph Sye *- Custer Feldspar ' Custer Feldspar ' Red Art clay ' Albany Slip *, Nepheline syenite & Neph Sy & Nepheline syenite & Ferro Frit 3110 ) Custer feldspar ) Strontium carbonate ) Custer feldspar & Gerstley Borate & Frit P-54 & Gerstley Borate & Frit 3195 & Gerstley Borate & Soda feldspar & Kona F-4 Spar &g Gerstley borate &f Custer Feldspar & Gerstley borate &K Kona F-4 feldspar &- PV Clay &I Nepheline Sye ) Nepheline syenite (@ Wood Ash ) Custer feldspar ) Potash Feldspar ( Potash Feldspar */ Spodumene (Australian) (t Spodumene (Australian) (w Soda Ash *+ RedArt Clay (K Custer Feldspar (B Nepheline Syenite +S Custer feldspar (8 Custer Feldspar ( Feldspar ( Hardwood Ash ( Custer Feldspar ( Custer Spar ' NC-4 Feldspar ' Flint 'j custer spar ' F-4 Feldspar % Gerstley Borate % Gerstley Borate %~ Gerstley Borate % Gerstley Borate $ Magnesium Carbonate %w Ferro Frit 3289 % Talc %c frit 3195 $ Ferro frit 3124 %l Flint %] Frit P-25 $ Ferro Frit 3124 $ Borax +N Custer feldspar +c G-200 Feldspar +b Red Clay +k G-200 Feldspar +a G-200 Feldspar +` G-200 Feldspar +l Frit 3110 +_ Frit 3110 +n Strontium Carbonate +^ Strontium Carbonate +] Magnesium Carbonate +t Magnesium Carbonate +\ Magnesium Carbonate +[ G-200 Feldspar +o G-200 Feldspar +Z G-200 Feldspar +Y Nepheline Syenite + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + Flint + Colemenite + G-200 Feldspar +X G-200 Feldspar + G-200 Feldspar +W G-200 Feldspar + Gerstley Borate + Magnesium Carbonate + G-200 Feldspar + G-200 Feldspar + Nepheline Syenite + Nepheline Syenite + Grolleg + Grolleg + Grolleg + Grolleg Kaolin + Custer Feldspar +m Kaolin +V Kaolin +j G-200 Feldspar +i G-200 Feldspar +U G-200 Feldspar +p Gerstley Borate + Strontium Carbonate + G-200 Feldspar + Magnesium Carbonate + G-200 Feldspar + Frit 3110 + Gerstley Borate +T Gerstley Borate +s G-200 Feldspar +h G-200 Feldspar +r G-200 Feldspar +g G-200 Feldspar + Magnesium Carbonate +q Nepheline Syenite +f Nepheline Syenite +e G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar + G-200 Feldspar +d G-200 Feldspar + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 + Frit 3110 +~ Strontium Carbonate +} Strontium Carbonate +| Strontium Carbonate +{ Strontium Carbonate +z Strontium Carbonate +y Magnesium Carbonate +x Magnesium Carbonate +w Magnesium Carbonate +v Magnesium Carbonate + Strontium Carbonate + Kaolin + Kaolin + Strontium Carbonate + Magnesium Carbonate + Magnesium Carbonate + Magnesium Carbonate + Custer Feldspar + Magnesium Carbonate +u Magnesium Carbonate + Strontium Carbonate + + Magnesium Carbonate + Frit #3134 + Frit (Ferro) #3134 + Custer Feldspar + Nepheline Syenite + Custer Feldspar + Kona F-4 Feldspar + Kona F-4 Feldspar + Flint + Albany Slip Clay + Kona Spar + Whiting + Custer Feldspar + + Whiting + Flint + Grolley Kaolin + Feldspar + Feldspar Amount1 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield _?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,87,228,104multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1038altId4autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount1toolTipvGridfalse listBehaviorfalselayer12visibletrue cantSelectfalse borderWidth2margins8 htmlText

12.67

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736383 + 70.75 + 72.73 + 58.00 + 22.76 ' 55.00 ( 49.52 $ 86.20 (2 73.80 ) 42.16 *- 39.92 ' 48.26 ' 45.77 ' 35.87 *, 25.00 & 70.00 & 57.30 & 8.98 ) 25.00 ) 15.79 ) 56.39 & 18.43 & 25.00 & 37.83 & 23.31 & 44.17 & 20.25 & 20.00 &g 5.34 &f 11.31 & 48.45 &K 60.20 &- 15.00 &I 35.00 ) 60.46 (@ 20.80 ) 80.00 ) 41.60 ( 43.10 */ 11.50 (t 11.20 (w 3.40 *+ 46.74 (K 21.50 (B 70.00 +S 43.90 (8 63.54 ( 48.65 ( 20.00 ( 35.06 ( 75.00 ' 33.28 ' 35.60 'j 41.00 ' 21.74 % 80.00 % 59.30 %~ 65.50 % 46.51 $ 33.33 %w 90.00 % 47.06 %c 41.18 $ 86.79 %l 42.00 %] 14.00 $ 86.29 $ 33.77 +N 30.45 +c 30.00 +b 60.00 +k 44.21 +a 42.11 +` 44.00 +l 51.56 +_ 52.63 +n 50.00 +^ 50.00 +] 31.00 +t 22.31 +\ 22.00 +[ 40.00 +o 63.79 +Z 46.00 +Y 40.00 + 86.42 + 81.27 + 79.60 + 85.60 + 83.60 + 81.60 + 81.60 + 79.59 + 81.64 + 1250 + 150 + 78.00 +X 78.00 + 17.41 +W 40.00 + 21.00 + 25.00 + 40.00 + 40.00 + 60.00 + 34.13 + 49.02 + 50.00 + 35.00 + 39.22 + 50.00 +m 22.22 +V 5.15 +j 55.82 +i 95.985 +U 70.00 +p 50.62 + 12.80 + 19.23 + 0.72 + 9.91 + 39.80 + 48.92 +T 50.00 +s 46.39 +h 46.00 +r 29.84 +g 30.00 + 3.91 +q 54.76 +f 40.00 +e 34.00 + 30.00 + 30.00 + 25.00 + 30.00 + 30.00 + 20.00 + 19.05 + 20.00 + 20.00 + 25.00 +d 30.00 + 51.56 + 51.56 + 51.56 + 51.56 + 43.00 + 37.00 + 40.00 + 46.00 + 49.00 + 51.56 +~ 59.99 +} 54.99 +| 54.99 +{ 54.99 +z 50.00 +y 37.31 +x 37.31 +w 32.31 +v 22.31 + 12.80 + 10.31 + 18.56 + 19.51 + 0.00 + 3.41 + 8.57 + 60.00 + 12.82 +u 18.03 + 39.02 + + 38.58 + 13.33 + 20.00 + 47.00 + 44.44 + 56.64 + 40.00 + 55.60 + 17.43 + 35.97 + 33.33 + 37.35 + 36.00 + + 24.6 + 25 + 42 + 34.7 + 43.6  Ingredient2 mH ncREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,103,166,120multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1039altId5autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient2toolTipvGridfalse listBehaviorfalselayer13visibletrue cantSelectfalse borderWidth2margins8 htmlText

Nepheline Syenite

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736384 + Ball Clay + Ball Clay + Talc + Nepheline Syenite ' Magnesium carbonate ( Gerstley borate $ EPK (2 Gerstley borate ) Flint *- Whiting ' EPK ' Custer feldspar ' Wollastonite *, EPK & Magnesium Carbonate & Strontium carbonate & Ferro Frit 3134 ) flint ) Kona F-4 feldspar ) whiting & Nepheline Syenite & Nepheline Syenite & EPK & Ferro Frit 3247 & Nepheline Syenite & Custer Spar & Custer Spar &g Nepheline Syenite &f Gerstley Borate & Kaolin &K Flint &- Custer Spar &I Frit 3110 ) Dolomite (@ Potash Feldspar ) EPK ) Flint ( Whiting */ Nepheline Syenite (t Nepheline Syenite (w F-4 Feldspar *+ Nepheline Syenite (K EPK (B Petalite +S Grolleg (8 Whiting ( Silica ( Dolomite ( EPK ( Whiting ' EPK ' Potash Feldspar 'j gerstley borate ' Custer Feldspar % Bone Ash % Nepheline Syenite %~ Custer Feldspar % Magnesium Carbonate $ Borax %w EPK % Frit 3110 %c frit 3124 $ EPK %l EPK %] Gerstley Borate $ EPK $ Soda Feldspar +N Tennessee #1 SGP Ball Clay +c Colemanite +b Frit 3134 +k Whiting +a Silica +` Flint +l Zinc Oxide +_ Zinc Oxide +n Nepheline Syenite +^ Nepheline Syenite +] Talc +t Nepheline Syenite +\ Nepheline Syenite +[ Silica +o Colemanite +Z Silica +Y Silica + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + EPK + Black Iron oxide + Colemanite +X Colemanite + Silica +W Silica + Nepheline Syenite + Nepheline Syenite + Whiting + Whiting + Strontium Carbonate + EPK + Silica + Silica + Tennessee #1 SGP Ball Clay + Tile #6 Clay + EPK +m Zinc Oxide +V Silica +j Whiting +i Whiting +U Whiting +p EPK + Nepheline Syenite + Zinc Oxide + Nepheline Syenite + Colemanite + Zinc Oxide + EPK +T EPK +s Tennessee #1 SGP Ball Clay +h Tennessee #1 SGP Ball Clay +r Wollastonite +g Wollastonite + Nepheline Syenite +q Zinc Oxide +f Silica +e Wollastonite + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay + Red Clay +d Red Clay + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting +~ Nepheline Syenite +} Nepheline Syenite +| Nepheline Syenite +{ Nepheline Syenite +z Nepheline Syenite +y Nepheline Syenite +x Nepheline Syenite +w Nepheline Syenite +v Nepheline Syenite + Nepheline Syenite + Flint + Flint + Nepheline Syenite + Nepheline Syenite + Nepheline Syenite + Nepheline Syenite + OM-4 Ball clay + Nepheline Syenite +u Nepheline Syenite + Nepheline Syenite + + NC-4 Feldspar + Kona F-4 + Dolomite + Gertsley Borate + flint + Whiting + Strontium Carbonate + Barium Carbonate + OM-4 Ball Clay + Wollastonite + Barium Carbonate + EPK + Gerstley Borate + + Frit 3195 + EPK + Custer Feldspar + Whiting + Whiting Amount2 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield o?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,104,228,121multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1040altId6autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount2toolTipvGridfalse listBehaviorfalselayer14visibletrue cantSelectfalse borderWidth2margins8 htmlText

29.00

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736385 + 23.58 + 18.18 + 12.00 + 47.05 ' 45.00 ( 10.48 $ 10.35 (2 10.20 ) 23.53 *- 16.45 ' 25.57 ' 5.34 ' 14.13 *, 42.00 & 25.00 & 27.08 & 20.91 ) 35.00 ) 63.16 ) 9.57 & 8.22 & 5.00 & 25.99 & 22.00 & 23.41 & 21.20 & 20.00 &g 33.14 &f 18.41 & 20.62 &K 5.80 &- 35.00 &I 20.00 ) 20.15 (@ 57.40 ) 20.00 ) 26.70 ( 0.50 */ 39.34 (t 63.96 (w 14.69 *+ 13.63 (K 24.70 (B 15.00 +S 13.00 (8 19.64 ( 21.69 ( 15.00 ( 21.06 ( 15.00 ' 21.55 ' 34.70 'j 12.00 ' 27.56 % 20.00 % 31.10 %~ 12.00 % 31.01 $ 26.67 %w 10.00 % 17.65 %c 51.76 $ 10.51 %l 22.00 %] 15.00 $ 10.31 $ 19.67 +N 6.88 +c 30.00 +b 20.00 +k 12.00 +a 26.32 +` 25.00 +l 26.30 +_ 26.32 +n 49.85 +^ 50.00 +] 8.00 +t 60.39 +\ 60.00 +[ 25.00 +o 31.76 +Z 28.00 +Y 25.00 + 13.29 + 12.50 + 12.24 + 6.20 + 8.20 + 8.20 + 8.20 + 10.20 + 10.20 + 1000 + 25 + 10.00 +X 12.00 + 23.86 +W 25.00 + 16.00 + 70.00 + 14.00 + 14.00 + 20.00 + 1.80 + 24.51 + 25.00 + 15.00 + 9.80 + 14.00 +m 29.29 +V 12.37 +j 27.10 +i 46.600 +U 20.00 +p 12.63 + 19.67 + 5.67 + 87.77 + 14.40 + 26.15 + 6.93 +T 15.00 +s 16.82 +h 18.00 +r 8.86 +g 30.00 + 50.79 +q 6.84 +f 25.00 +e 20.00 + 15.00 + 20.00 + 10.00 + 15.00 + 20.00 + 10.00 + 9.52 + 10.00 + 15.00 + 20.00 +d 20.00 + 9.16 + 7.16 + 5.16 + 2.16 + 2.00 + 2.00 + 2.00 + 2.00 + 2.00 + 2.16 +~ 20.85 +} 25.85 +| 30.85 +{ 35.85 +z 40.85 +y 28.39 +x 35.39 +w 40.39 +v 50.39 + 19.67 + 12.37 + 12.37 + 48.63 + 51.24 + 52.98 + 52.98 + 14.00 + 53.53 +u 53.54 + 48.63 + + 2.80 + 46.16 + 20.00 + 13.00 + 24.24 + 15.93 + 26.00 + 22.20 + 10.92 + 14.13 + 25.25 + 28.04 + 20.00 + + 134.64 + 20 + 33 + 10.2 + 19.8  Ingredient3 mH ~cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,120,166,137multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1041altId7autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient3toolTipvGridfalse listBehaviorfalselayer15visibletrue cantSelectfalse borderWidth2margins8 htmlText

Zinc Oxide

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736386 + Soda Ash + Silica + Wollastonite + EPK ' ( Wollastonite $ Barium carbonate (2 Whiting ) Whiting *- EPK Kaolin ' Dolomite ' Whiting ' EPK *, Calcined kaolin & Ball Clay & Lithium carbonate & Nepheline Syenite ) whiting ) Dolomite ) zinc oxide & Soda Ash & EPK & Flint & Custer Feldspar & EPK & EPK & Spodumene &g EPK &f EPK & Flint &K Whiting &- Flint &I Kaolin ) Zircopax (@ Silica ) ) OM-4 Ball Clay ( Dolomite */ RedArt clay (t RedArt clay (w Nepheline Syenite *+ Talc (K Silica (B Whiting +S whiting (8 Kaolin ( Kaolin ( Flint ( Dolomite ( Silica ' Dolomite ' Whiting 'j dolomite ' Whiting % % EPK %~ Flint % EPK $ Gerstley Borate %w % OM-4 Ball Clay %c EPK $ Strontium Carbonate %l Lithium Carbonate %] EPK $ Barium Carbonate $ Whiting +N EPK +c Tennessee #1 SGP Ball Clay +b Colemanite +k Tile #6 Clay +a Colemanite +` Kaolin +l Silica +_ Silica +n Flint +^ +] Zinc Oxide +t EPK +\ SGP Ball Clay +[ Colemanite +o Whiting +Z Colemanite +Y Colemanite + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Whiting + Custer + Maganesse Dioxide + Whiting +X Whiting + Colemanite +W Colemanite + EPK + Kentucky Ball Clay (OM-4) + Zinc Oxide + Zinc Oxide + Ball Clay + Gerstley Borate + G-200 Feldspar + Wollastonite + Silica + Bandy Black Clay + Whiting +m G-200 Feldspar +V Zinc Oxide +j Tile #6 Clay +i Tile #6 Clay +U Tile #6 Clay +p Silica + Gerstley Borate + Talc + EPK + Whiting + Bentonite + Cryolite +T Silica +s Zircopax +h Zircopax +r Spodumene +g Spodumene + EPK +q Kaolin +f Colemanite +e Zircopax + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite + Dolomite +d Dolomite + Borax + Borax + Borax + Borax + Borax + Borax + Borax + Borax + Borax + Borax +~ Soda Ash +} Soda Ash +| Soda Ash +{ Soda Ash +z Soda Ash +y EPK +x EPK +w EPK +v EPK + Gerstley Borate + Zinc Oxide + Zinc Oxide + Gerstley Borate + EPK + EPK + EPK + China Clay + EPK +u EPK + Flint + + Borax + Talc + Spodumene + Dolomite + Gerstley Borate + Zinc oxide + Avery Kaolin (EPK) + OM-4 Ball Clay + Whiting + EPK + Dolomite + Custer Feldspar + Flint + + G-200 Spar + Ball Clay + Silica + EPK + Silica Amount3 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ~?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,120,228,137multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1042altId8autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount3toolTipvGridfalse listBehaviorfalselayer16visibletrue cantSelectfalse borderWidth2margins8 htmlText

3.03

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736387 + 5.66 + 4.55 + 15.00 + 9.31 ' ( 23.81 $ 3.45 (2 11.10 ) 20.59 *- 11.80 ' 22.69 ' 37.75 ' 3.26 *, 30.00 & 5.00 & 2.08 & 24.91 ) 20.00 ) 21.05 ) 9.57 & 4.03 & 20.00 & 36.19 & 30.80 & 8.03 & 22.35 & 20.00 &g 4.63 &f 2.01 & 27.84 &K 18.20 &- 10.00 &I 10.00 ) 15.28 (@ 15.80 ) ) 12.90 ( 15.30 */ 4.00 (t 3.27 (w 50.24 *+ 18.84 (K 8.10 (B 5.00 +S 15.60 (8 16.82 ( 6.29 ( 20.00 ( 19.92 ( 5.00 ' 21.96 ' 15.80 'j 7.00 ' 24.65 % % 2.00 %~ 12.00 % 18.60 $ 33.33 %w % 35.29 %c 3.53 $ 2.70 %l 10.00 %] 22.00 $ 3.40 $ 9.18 +N 11.98 +c 20.00 +b 20.00 +k 0.71 +a 13.68 +` 1.00 +l 21.78 +_ 21.05 +n 0.11 +^ +] 6.00 +t 13.31 +\ 18.00 +[ 13.00 +o 4.45 +Z 23.00 +Y 13.00 + 5.54 + 5.21 + 5.10 + 3.06 + 3.06 + 3.06 + 3.06 + 3.06 + 3.06 + 1000 + 15 + 5.00 +X 5.00 + 13.84 +W 13.00 + 11.00 + 5.00 + 7.00 + 7.00 + 10.00 + 16.32 + 24.51 + 10.00 + 20.00 + 4.90 + 20.00 +m 11.23 +V 24.74 +j 17.08 +i 29.379 +U 10.00 +p 36.72 + 1.17 + 5.14 + 5.11 + 7.45 + 2.45 + 1.24 +T 35.00 +s 17.41 +h 18.00 +r 11.32 +g 12.00 + 6.39 +q 6.82 +f 13.00 +e 20.00 + 15.00 + 18.00 + 15.00 + 15.00 + 18.00 + 10.00 + 14.29 + 10.00 + 15.00 + 15.00 +d 18.00 + 5.20 + 4.20 + 4.20 + 4.20 + 1.00 + 1.00 + 1.00 + 1.00 + 1.00 + 1.20 +~ 13.05 +} 13.05 +| 10.05 +{ 5.05 +z 5.05 +y 18.31 +x 18.31 +w 18.31 +v 18.31 + 1.17 + 4.12 + 24.74 + 2.44 + 3.41 + 3.41 + 3.41 + 10.00 + 8.66 +u 13.86 + 9.86 + + 28.14 + 3.30 + 20.00 + 4.00 + 20.20 + 4.42 + 15.00 + 11.00 + 9.52 + 3.21 + 12.12 + 23.39 + 28.00 + + 20.91 + 20 + 24 + 4.3 + 11.9 +R203ColumnLabel  i(\ cREVGeneral revUniqueID 1108686388367 Al2O3       B2O3       Fe2O3       P2O5       Sb2O3       Cr2O3       V2O5        Ingredient4 mH  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,136,166,153multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1043altId9autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient4toolTipvGridfalse listBehaviorfalselayer17visibletrue cantSelectfalse borderWidth2margins8 htmlText

Dolomite

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736388 + + Salt + Ball Clay + Flint ' ( EPK $ (2 Flint ) EPK *- Flint ' Whiting ' Strontium Carbonate ' Gerstley Borate *, Red Horse Clay & & Flint & Whiting ) grolleg ) ) Strontium carbonate & EPK & Whiting & & Wollastonite & Bone Ash & Lithium carbonate & Dolomite &g Dolomite &f Bone Ash & Alumina hydrate &K Zinc oxide &- Whiting &I Flint ) OM-4 Ball clay (@ Whiting ) ) Whiting ( Talc */ EPK (t EPK (w Spodumene *+ Strontium Carbonate (K Talc (B Gerstley Borate +S flint (8 ( Talc ( Custer Feldspar ( Bone Ash ( EPK ' Strontium carbonate ' EPK 'j talc ' EPK Kaolin % % Flint %~ Ball Clay % Borax $ Flint %w % %c Kona F-4 feldspar $ %l Whiting %] Barium Carbonate $ $ China clay +N Talc +c Barnard +b +k Borax +a Whiting +` Colemanite +l Borax +_ +n Soda Ash +^ +] Frit P-25 (Pemco) +t Flint +\ +[ Whiting +o +Z Whiting +Y Whiting + Kaolin + Kaolin + Kaolin + Kaolin + Kaolin + Kaolin + Kaolin + Kaolin + Kaolin + Nephline Syenite + Cobalt Carbonate + Kaolin +X Kaolin + Whiting +W Whiting + Whiting + + EPK + EPK + Lithium Carbonate + Flint + Macaloid + Nepheline Syenite + Nepheline Syenite + Nepheline Syenite + Zinc Oxide +m Petalite +V Whiting +j +i +U +p Wollastonite + Flint + Wollastonite + Flint + Borax + Colemanite + Ferro Frit 3195 +T +s Colemanite +h Wollastonite +r Kaolin +g Kaolin + Flint +q Talc +f Whiting +e Colemanite + Lithium Carbonate + Lithium Carbonate + Silica + Silica + Silica + Spodumene + Spodumene + Spodumene + Spodumene + Spodumene +d Spodumene + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide + Zinc Oxide +~ Flint +} Flint +| Flint +{ Flint +z Flint +y Flint +x Flint +w Flint +v Flint + Flint + Whiting + Whiting + Soda Ash + Flint + Flint + Flint + Whiting + Flint +u Flint + Soda Ash + + EPK + EPK + SGP Ball Clay + Whiting + Zinc Oxide + Talc + Whiting + Whiting + Dolomite + Colemanite + EPK + Flint + Whiting + + NC-4 Spar + Custer Feldspar + + Silica + Kaolin Amount4 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ? cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,136,228,153multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1044altId10autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount4toolTipvGridfalse listBehaviorfalselayer18visibletrue cantSelectfalse borderWidth2margins8 htmlText

5.64

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736389 + + 4.55 + 5.00 + 13.38 ' ( 11.43 $ (2 4.90 ) 11.76 *- 31.84 ' 3.48 ' 7.92 ' 3.26 *, 3.00 & & 7.29 & 13.45 ) 20.00 ) ) 12.77 & 2.21 & 20.00 & & 12.00 & 0.60 & 3.16 & 20.00 &g 2.28 &f 3.46 & 3.09 &K 10.00 &- 10.00 &I 20.00 ) 4.11 (@ 5.00 ) ) 17.80 ( 3.10 */ 25.65 (t 13.03 (w 12.59 *+ 7.76 (K 2.70 (B 2.00 +S 25.10 (8 ( 6.29 ( 35.00 ( 10.39 ( 5.00 ' 12.28 ' 11.90 'j 15.00 ' 4.31 % % 7.60 %~ 6.00 % 3.88 $ 6.67 %w % %c 3.53 $ %l 10.00 %] 5.00 $ $ 3.28 +N 3.33 +c 20.00 +b +k 11.04 +a 8.42 +` 21.00 +l 0.20 +_ +n 0.05 +^ +] 6.00 +t 3.99 +\ +[ 8.00 +o +Z 3.00 +Y 8.00 + -5.25 + 1.02 + 3.06 + 3.10 + 3.10 + 5.10 + 5.10 + 5.10 + 5.10 + 500 + 5 + 5.00 +X 5.00 + 4.74 +W 8.00 + 20.00 + + 8.00 + 8.00 + 1.00 + 31.83 + 1.96 + 15.00 + 20.00 + 19.61 + 10.00 +m 37.26 +V 13.40 +j +i +U +p 0.03 + 54.70 + 22.76 + 3.71 + 10.12 + 0.58 + 0.66 +T +s 7.72 +h 10.00 +r 6.81 +g 10.00 + 13.57 +q 5.80 +f 8.00 +e 16.00 + 15.00 + 12.00 + 20.00 + 15.00 + 12.00 + 10.00 + 14.29 + 15.00 + 15.00 + 15.00 +d 12.00 + 26.30 + 26.30 + 26.30 + 26.30 + 26.00 + 26.00 + 26.00 + 26.00 + 26.00 + 26.30 +~ 6.11 +} 6.11 +| 4.11 +{ 4.11 +z 4.11 +y 15.99 +x 8.99 +w 8.99 +v 8.99 + 54.69 + 13.40 + 13.40 + 0.05 + 19.58 + 19.58 + 19.58 + 12.00 + 14.57 +u 9.36 + 0.05 + + 18.70 + 6.40 + 20.00 + 6.00 + 3.03 + 4.42 + 9.00 + 5.60 + 6.61 + 3.21 + 7.07 + 9.31 + 11.00 + + 50.64 + 15 + + 26.0 + 9.9  Ingredient5 mH  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,152,166,169multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1045altId11autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient5toolTipvGridfalse listBehaviorfalselayer19visibletrue cantSelectfalse borderWidth2margins8 htmlText

EPK

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736390 + + + Silica + Whiting ' ( Silica $ (2 ) Bentonite *- ' ' Silica ' Whiting *, & & EPK & Flint ) ) ) OM-4 ball clay & Bone Ash & Flint & & Flint & Wollastonite & Dolomite & Whiting &g Whiting &f Dolomite & &K EPK &- Gerstley Borate &I Whiting ) (@ Bone Ash ) ) Bentonite ( OM-4 Ball Clay */ Soda Ash (t Soda Ash (w OM-4 Ball Clay *+ EPK (K Whiting (B OM-4 Ball Clay +S magnesium carbonate (8 ( Whiting ( Georgia Kaolin ( Wollastonite ( ' Flint ' Talc 'j ball clay ' Silica % % %~ Strontium Carbonate % $ %w % %c $ %l Zinc Oxide %] Zinc Oxide $ $ Quartz +N Whiting +c +b +k Flint +a Zinc Oxide +` Whiting +l Whiting +_ +n +^ +] F-4 spar +t +\ +[ Zinc Oxide +o +Z +Y Zinc Oxide + + + + Borax + Borax + Borax + Borax Soap + Borax Soap + + Borax + Masonstain Black 6066 + Borax +X + Zinc Oxide +W Zinc Oxide + Flint + + Flint + Flint + Flint + Whiting + + + Wollastonite + Wollastonite + Flint +m +V Lithium Carbonate +j +i +U +p + Whiting + Cryolite + Colemanite + Pyrophyllite + Wollastonite + Feldspar +T +s Talc +h Colemanite +r Zircopax +g Zircopax + Whiting +q Wollastonite +f Zinc Oxide +e SGP Ball Clay + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite + Colemanite +d Colemanite + Flint + Flint + Flint + Flint + Flint + Flint + Flint + Flint + Flint + Flint +~ +} +| +{ +z +y +x +w +v + Whiting + Lithium Carbonate + Lithium Carbonate + Flint + Zinc Oxide + Zinc Oxide + Zinc Oxide + Flint + Zinc Oxide +u Zinc Oxide + Gerstley Borate + + Whiting + Whiting + Flint + Zinc Oxide + Barium Carbonate + EPK + Lithium Carbonate + Zinc Oxide + Barium Carbonate + Whiting + Flint + Bentonite + Dolomite + + Flint + Neph Sy + + Dolomite + Rutile Amount5 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ? cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,152,228,169multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1046altId12autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount5toolTipvGridfalse listBehaviorfalselayer20visibletrue cantSelectfalse borderWidth2margins8 htmlText

21.93

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736391 + + + 10.00 + 0.16 ' ( 4.76 $ (2 ) 1.96 *- ' ' 3.22 ' 7.61 *, & & 6.25 & 31.74 ) ) ) 2.13 & 3.47 & 30.00 & & 5.80 & 0.89 & 19.85 & 5.00 &g 9.35 &f 8.76 & &K 5.80 &- 30.00 &I 10.00 ) (@ 1.00 ) ) 1.00 ( 9.20 */ 8.00 (t 3.26 (w 16.18 *+ 3.63 (K 43.00 (B 8.00 +S 2.40 (8 ( 7.19 ( 10.00 ( 1.67 ( ' 10.93 ' 2.00 'j 5.00 ' 21.74 % % %~ 4.50 % $ %w % %c $ %l 10.00 %] 2.00 $ $ 24.92 +N 17.01 +c +b +k 32.04 +a 5.26 +` 2.00 +l 0.16 +_ +n +^ +] 30.00 +t +\ +[ 5.00 +o +Z +Y 5.00 + + + + 2.04 + 2.04 + 2.04 + 2.04 + 2.04 + + 250 + 15 + 2.00 +X + 5.13 +W 5.00 + 32.00 + + 22.00 + 22.00 + 9.00 + 3.90 + + + 10.00 + 24.51 + 6.00 +m +V 7.22 +j +i +U +p + 0.29 + 8.16 + 2.69 + 9.18 + 1.14 + 14.79 +T +s 0.49 +h 8.00 +r 16.89 +g 18.00 + 18.74 +q 25.78 +f 5.00 +e 10.00 + 10.00 + 10.00 + 10.00 + 10.00 + 10.00 + 25.00 + 19.05 + 20.00 + 15.00 + 10.00 +d 10.00 + 7.78 + 10.78 + 12.78 + 15.78 + 19.00 + 19.00 + 19.00 + 19.00 + 19.00 + 18.78 +~ +} +| +{ +z +y +x +w +v + 0.29 + 22.68 + 7.22 + 29.37 + 25.77 + 20.62 + 15.46 + 4.00 + 10.42 +u 5.21 + 2.44 + + 3.75 + 14.29 + 20.00 + 4.00 + 6.06 + 7.96 + 5.00 + 5.60 + 13.63 + 7.62 + 7.07 + 1.90 + 3.00 + + 58.78 + 10 + + 8.1 + 7.9  Ingredient6 mH  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,168,166,185multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1047altId13autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient6toolTipvGridfalse listBehaviorfalselayer21visibletrue cantSelectfalse borderWidth2margins8 htmlText

Flint

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736392 + + + + Alumina Hydrate ' ( $ (2 ) *- ' ' ' Flint *, & & & ) ) ) Kona F-4 feldspar & Dolomite & & & EPK & Flint & Whiting & Kaolin &g Flint &f Whiting & &K &- &I Barium Carbonate ) (@ ) ) ( Flint */ Flint (t Flint (w EPK *+ Whiting (K (B +S (8 ( Bone Ash ( ( Flint ( ' ' 'j flint ' % % %~ % $ %w % %c $ %l Barium Carbonate %] Zircopax $ $ Zinc oxide +N Flint +c +b +k +a Talc +` Zinc Oxide +l +_ +n +^ +] Kaolin +t +\ +[ Kaolin +o +Z +Y Kaolin + + + + + + + + + + Whiting + + +X + Kaolin +W Kaolin + + + Gerstley Borate + Gerstley Borate + + Zinc Oxide + + + + Macaloid + +m +V G-200 Feldspar +j +i +U +p + Alumina Hydrate + Pyrophyllite + + EPK + Flint + Flint +T +s Whiting +h +r Talc +g + Titanium Dioxide +q +f Kaolin +e + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay + SGP Ball Clay +d SGP Ball Clay + + + + + EPK + EPK + EPK + EPK + EPK + +~ +} +| +{ +z +y +x +w +v + Alumina Hydrate + G-200 + G-200 + + + + + + +u + + + Silica + Flint + + EPK + Whiting + Zircopax + Flint + + Custer Feldspar + Flint + Zircopax + + EPK + + EPK + Borax + + Rutile + Red iron Oxide Amount6 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,168,228,185multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1048altId14autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount6toolTipvGridfalse listBehaviorfalselayer22visibletrue cantSelectfalse borderWidth2margins8 htmlText

22.05

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736393 + + + + 7.34 ' ( $ (2 ) *- ' ' ' 14.13 *, & & & ) ) ) 8.51 & 8.77 & & & 6.10 & 22.90 & 5.51 & 15.00 &g 45.26 &f 47.32 & &K &- &I 5.00 ) (@ ) ) ( 4.80 */ 10.94 (t 4.94 (w 2.90 *+ 6.63 (K (B +S (8 ( 9.89 ( ( 11.89 ( ' ' 'j 20.00 ' % % %~ % $ %w % %c $ %l 6.00 %] 16.00 $ $ 9.18 +N 30.36 +c +b +k +a 4.21 +` 7.00 +l +_ +n +^ +] 19.00 +t +\ +[ 5.00 +o +Z +Y 5.00 + + + + + + + + + + 250 + + +X + 7.40 +W 5.00 + + + 9.00 + 9.00 + + 6.11 + + + + 1.96 + +m +V 37.11 +j +i +U +p + 11.37 + 11.96 + + 11.39 + 27.15 + 27.47 +T +s 7.52 +h +r 0.98 +g + 0.24 +q +f 5.00 +e + 15.00 + 10.00 + 20.00 + 15.00 + 10.00 + 25.00 + 23.81 + 25.00 + 20.00 + 15.00 +d 10.00 + + + + + 9.00 + 15.00 + 12.00 + 6.00 + 3.00 + +~ +} +| +{ +z +y +x +w +v + 11.37 + 37.11 + 23.71 + + + + + + +u + + + 8.03 + 16.52 + + 3.00 + 2.02 + 10.63 + 5.00 + + 22.65 + 14.13 + 15.15 + + 2.00 + + 20.88 + 5 + + 6.1 + 3.0  Ingredient7 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,184,166,201multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1049altId15autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient7toolTipvGridfalse listBehaviorfalselayer23visibletrue cantSelectfalse borderWidth2margins8 htmlText

Whiting

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736394 + + + + ' ( $ (2 ) *- ' ' ' Custer Feldspar *, & & & ) ) ) Lithium carbonate & Whiting & & & & & Flint & &g &f Soda Ash & &K &- &I ) (@ ) ) ( Barium Carbonate */ whiting (t whiting (w *+ Flint (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] Silica $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ Talc +o +Z +Y Talc + + + + + + + + + + Black Stain + + +X + Talc +W Talc + + + + + + Barium + + + + + +m +V +j +i +U +p + + Flint + + Flint + Pearl Ash + +T +s Flint +h +r Whiting +g + Zinc Oxide +q +f Talc +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + Flint + + + + + Kona F-4 Feldspar + Custer Feldspar + + + + + Bentonite + Whiting + + Magnesium Carbonate + Zircopax Amount7 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,184,228,201multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1050altId16autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount7toolTipvGridfalse listBehaviorfalselayer24visibletrue cantSelectfalse borderWidth2margins8 htmlText

5.12

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736395 + + + + ' ( $ (2 ) *- ' ' ' 21.74 *, & & & ) ) ) 1.06 & 47.37 & & & & & 7.68 & &g &f 3.94 & &K &- &I ) (@ ) ) ( 24.00 */ 0.56 (t 0.34 (w *+ 2.76 (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] 20.00 $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ 4.00 +o +Z +Y 4.00 + + + + + + + + + + 250 + + +X + 4.26 +W 4.00 + + + + + + 5.91 + + + + + +m +V +j +i +U +p + + 27.08 + + 37.55 + 2.73 + +T +s 3.65 +h +r 15.02 +g + 6.15 +q +f 4.00 +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + 23.00 + + + + + 19.24 + 21.74 + + + + + 6.33 + 5 + + 1.7 + 2.0{(H3d RO fieldscREVTempMaster# traversalOnfalse dontSearchfalsethreeDfalsescrollbarWidth20 boundingRectrect306,101,487,241 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1147altId0radioBehaviortrue textStylelockLocfalselabel RO fieldsname group id 1147toolTiplayer25visibletrue cantSelectfalse borderWidth2margins1opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1086722782394 +R2OX on mouseup answer "The unity formula is calculated here." & return & "To enter new unity formulas or change the unity formula, use the Glaze Calculator." end mouseup 4g(%cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight11rect307,105,347,240multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1067altId37autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2OtoolTipvGridfalse listBehaviorfalselayer26visibletrue cantSelectfalse borderWidth2margins6 htmlText

0.059

0.218

0.443

0.114

0.028

0.139

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736396 + 0.171 0.762 0.048 0.019 + 0.203 0.623 0.056 0.119 + 0.091 0.183 0.449 0.277 + 0.062 0.197 0.021 0.720 ' 0.041 0.133 0.010 0.816 ( 0.159 0.102 0.684 0.055 $ 0.021 0.266 0.659 0.001 0.053 (2 0.275 0.157 0.536 0.032 ) 0.074 0.221 0.695 0.009 0.000 *- 0.188 0.085 0.726 0.002 ' 0.146 0.065 0.462 0.327 ' 0.053 0.012 0.788 0.036 0.111 ' 0.110 0.057 0.733 0.099 *, 0.224 0.624 0.084 0.068 & 0.077 0.244 0.020 0.659 & 0.083 0.267 0.022 0.005 0.083 0.540 & 0.043 0.289 0.666 0.002 ) 0.125 0.051 0.818 0.006 ) 0.072 0.145 0.305 0.242 0.237 ) 0.154 0.086 0.240 0.000 0.034 0.280 0.205 & 0.005 0.088 0.825 0.082 & 0.010 0.145 0.843 0.003 & 0.005 0.156 0.676 0.163 & 0.113 0.126 0.488 0.016 0.258 & 0.038 0.244 0.588 0.131 & 0.088 0.081 0.454 0.268 0.110 & 0.092 0.081 0.450 0.274 0.103 &g 0.074 0.257 0.590 0.079 &f 0.016 0.078 0.825 0.081 & 0.003 0.157 0.677 0.162 &K 0.074 0.149 0.479 0.001 0.297 &- 0.134 0.131 0.641 0.094 &I 0.080 0.373 0.453 0.005 0.090 ) 0.085 0.271 0.345 0.300 (@ 0.207 0.082 0.657 0.054 ) 0.658 0.297 0.039 0.006 ) 0.190 0.083 0.719 0.008 0.000 ( 0.123 0.054 0.251 0.261 0.310 */ 0.108 0.675 0.058 0.017 0.142 (t 0.159 0.632 0.058 0.016 0.135 (w 0.181 0.619 0.065 0.015 0.120 *+ 0.076 0.071 0.265 0.437 0.149 (K 0.049 0.022 0.888 0.042 (B 0.146 0.466 0.275 0.024 0.089 +S 0.191 0.083 0.612 0.114 (8 0.228 0.103 0.666 0.002 ( 0.178 0.079 0.591 0.151 ( 0.241 0.054 0.361 0.345 ( 0.099 0.044 0.589 0.268 ( 0.296 0.135 0.568 0.001 ' 0.040 0.096 0.349 0.298 0.217 ' 0.166 0.073 0.698 0.064 'j 0.132 0.092 0.315 0.461 ' 0.128 0.103 0.768 0.001 % 0.111 0.777 0.112 % 0.038 0.254 0.573 0.135 %~ 0.032 0.153 0.599 0.142 0.073 % 0.001 0.080 0.277 0.641 $ 0.153 0.194 0.653 %w 0.002 0.330 0.002 0.002 0.665 % 0.018 0.097 0.169 0.716 %c 0.018 0.299 0.683 0.000 $ 0.021 0.265 0.658 0.001 0.055 %l 0.002 0.258 0.002 0.345 0.078 0.315 %] 0.037 0.194 0.496 0.060 0.106 0.108 $ 0.021 0.266 0.660 0.001 0.052 $ 0.031 0.330 0.296 0.000 0.344 +N 0.135 0.060 0.705 0.099 +c 0.178 0.069 0.710 0.043 +b 0.096 0.138 0.668 0.097 +k +a 0.144 0.063 0.502 0.097 0.194 +` 0.169 0.073 0.458 0.011 0.289 +l 0.024 0.245 0.114 0.618 +_ 0.024 0.248 0.113 0.615 +n 0.054 0.176 0.014 0.003 0.753 +^ 0.054 0.176 0.014 0.003 0.753 +] 0.033 0.078 0.034 0.728 0.127 +t 0.075 0.239 0.020 0.666 +\ 0.079 0.239 0.021 0.661 +[ 0.145 0.062 0.501 0.098 0.194 +o 0.221 0.095 0.669 0.015 +Z 0.223 0.096 0.666 0.015 +Y 0.059 0.189 0.473 0.095 0.184 + 0.352 0.152 0.490 0.007 + 0.352 0.151 0.490 0.008 + 0.352 0.151 0.489 0.008 + 0.441 0.213 0.340 0.005 + 0.417 0.202 0.374 0.006 + 0.414 0.201 0.379 0.007 + 0.359 0.175 0.458 0.007 + 0.359 0.175 0.458 0.007 + 0.404 0.173 0.415 0.008 + + + 0.359 0.175 0.458 0.007 +X 0.352 0.151 0.489 0.008 + 0.093 0.196 0.413 0.102 0.195 +W 0.145 0.062 0.501 0.098 0.194 + 0.023 0.124 0.797 0.056 + + 0.132 0.079 0.517 0.024 0.248 + 0.132 0.079 0.517 0.024 0.248 + 0.107 0.334 0.029 0.009 0.047 0.475 + 0.054 0.220 0.338 0.050 0.096 0.242 + + 0.132 0.189 0.619 0.059 + 0.132 0.232 0.581 0.055 + + 0.133 0.060 0.501 0.001 0.304 +m 0.034 0.018 0.007 0.010 0.121 0.810 +V 0.071 0.030 0.231 0.000 0.162 0.506 +j 0.171 0.074 0.749 0.006 +i +U 0.245 0.106 0.645 0.004 +p 0.002 0.157 0.679 0.162 + 0.069 0.230 0.070 0.011 0.620 + 0.056 0.178 0.475 0.114 0.177 + 0.197 0.635 0.116 0.052 + 0.061 0.160 0.766 0.014 + 0.061 0.195 0.112 0.004 0.000 0.629 + 0.054 0.195 0.609 0.143 +T 0.002 0.157 0.678 0.162 +s 0.265 0.112 0.594 0.029 +h 0.258 0.111 0.602 0.029 +r 0.116 0.049 0.729 0.034 0.071 +g 0.111 0.049 0.734 0.035 0.072 + 0.059 0.190 0.458 0.113 0.179 +q 0.058 0.187 0.463 0.113 0.180 +f 0.059 0.189 0.473 0.095 0.184 +e 0.128 0.056 0.782 0.034 + 0.087 0.033 0.292 0.175 0.413 + 0.091 0.034 0.330 0.212 0.334 + 0.128 0.049 0.517 0.306 + 0.148 0.056 0.497 0.298 + 0.137 0.051 0.495 0.318 + 0.100 0.036 0.609 0.194 0.062 + 0.091 0.032 0.550 0.244 0.083 + 0.108 0.038 0.555 0.202 0.098 + 0.102 0.035 0.510 0.264 0.089 + 0.130 0.045 0.453 0.279 0.093 +d 0.131 0.047 0.459 0.295 0.067 + 0.020 0.225 0.238 0.516 + 0.021 0.229 0.214 0.536 + 0.022 0.237 0.187 0.554 + 0.023 0.250 0.144 0.584 + 0.021 0.214 0.135 0.001 0.629 + 0.020 0.194 0.128 0.001 0.657 + 0.021 0.204 0.132 0.001 0.643 + 0.022 0.224 0.138 0.000 0.615 + 0.023 0.233 0.142 0.000 0.602 + 0.023 0.239 0.146 0.592 +~ 0.018 0.271 0.005 0.001 0.706 +} 0.023 0.297 0.006 0.001 0.674 +| 0.028 0.268 0.007 0.001 0.695 +{ 0.035 0.209 0.009 0.002 0.745 +z 0.042 0.235 0.011 0.002 0.710 +y 0.029 0.088 0.009 0.874 +x 0.034 0.107 0.010 0.849 +w 0.043 0.134 0.012 0.810 +v 0.067 0.210 0.019 0.704 + 0.069 0.230 0.070 0.011 0.620 + 0.077 0.033 0.250 0.001 0.548 0.091 + 0.048 0.020 0.238 0.001 0.168 0.525 + 0.093 0.313 0.060 0.013 0.520 + 0.058 0.187 0.015 0.003 0.736 + 0.063 0.203 0.016 0.101 0.616 + 0.063 0.204 0.017 0.251 0.465 + 0.298 0.134 0.560 0.008 + 0.066 0.211 0.018 0.384 0.321 +u 0.067 0.212 0.018 0.541 0.161 + 0.061 0.206 0.040 0.009 0.684 + + 0.003 0.133 0.068 0.795 + + + + 0.072 0.294 0.342 0.064 0.103 0.125 + 0.177 0.081 0.489 0.093 0.159 + + 0.086 0.168 0.212 0.003 0.329 0.202 + 0.114 0.100 0.450 0.113 0.222 + 0.111 0.049 0.749 0.092 + + 0.066 0.029 0.899 0.006 0.000 + 0.124 0.113 0.656 0.107 + + + + + + ,R2O3X on mouseup answer "The unity formula is calculated here." & return & "To enter new unity formulas or change the unity formula, use the Glaze Calculator." end mouseup xe(Z&cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect374,102,414,188multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1068altId38autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2O3toolTipvGridfalse listBehaviorfalselayer27visibletrue cantSelectfalse borderWidth2margins8 htmlTextS

0.592

0.093

0.003

0.001

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736397 + 1.031 0.009 + 1.157 0.008 + 0.380 0.003 + 0.518 0.001 0.000 ' 0.192 0.000 ( 0.389 0.130 0.004 0.000 $ 0.370 0.516 0.001 0.000 (2 0.437 0.148 0.003 ) 0.472 0.003 0.000 *- 0.481 0.003 0.001 ' 0.486 0.004 0.001 ' 0.171 0.042 0.001 ' 0.317 0.042 0.038 0.000 *, 5.319 0.054 0.008 & 0.382 0.001 & 0.454 0.001 0.000 & 0.180 0.218 0.000 ) 0.464 0.004 ) 0.267 0.001 ) 0.277 0.002 & 0.038 0.101 0.001 0.015 & 0.247 0.242 0.002 0.001 & 0.468 0.736 0.007 0.002 & 0.393 0.259 0.002 0.000 & 0.283 0.589 0.004 0.007 & 0.406 0.003 0.001 & 0.465 0.010 0.001 &g 0.421 0.100 0.002 0.000 &f 0.038 0.101 0.001 0.015 & 0.382 0.740 0.006 0.001 &K 0.327 0.001 0.000 &- 0.236 0.369 0.003 &I 0.442 0.027 0.002 0.000 ) 0.422 0.002 (@ 0.244 0.021 ) 1.586 0.010 0.002 ) 0.426 0.004 ( 0.250 0.002 */ 1.082 0.014 0.003 (t 1.095 0.010 0.002 (w 1.121 0.016 0.000 *+ 0.341 0.059 0.002 (K 0.260 0.002 0.001 (B 0.842 0.034 0.004 +S 0.466 0.004 (8 0.562 0.004 0.001 ( 0.353 0.001 0.106 ( 0.209 0.003 0.052 ( 0.353 0.003 0.087 ( 0.532 0.003 0.000 ' 0.370 0.003 0.001 ' 0.443 0.002 0.001 'j 0.249 0.148 0.004 ' 0.316 0.001 0.000 % 0.014 0.521 0.002 0.101 % 0.213 0.618 0.003 0.000 %~ 0.104 0.654 0.004 % 0.116 0.335 0.002 0.000 $ 0.006 0.428 0.001 %w 0.350 0.664 0.001 0.001 % 0.213 0.014 0.006 %c 0.379 0.750 0.000 0.000 $ 0.370 0.515 0.001 0.000 %l 0.208 0.002 0.001 %] 0.415 0.401 0.004 0.001 $ 0.370 0.517 0.001 0.000 $ 0.150 0.536 0.000 0.000 +N 0.457 0.004 0.001 +c 0.568 0.906 0.084 +b 0.359 0.768 0.098 0.003 +k +a 0.230 0.286 0.001 +` 0.281 0.491 0.001 0.000 +l 0.036 0.039 +_ 0.036 0.037 +n 0.253 0.000 +^ 0.254 0.000 +] 0.230 0.025 0.001 0.000 +t 0.468 0.002 0.000 +\ 0.468 0.003 +[ 0.288 0.285 0.001 0.000 +o 0.353 0.671 0.001 +Z 0.355 0.678 0.001 +Y 0.328 0.271 0.001 0.000 + 0.492 0.330 0.001 + 0.574 0.330 0.002 0.000 + 0.603 0.329 0.002 0.000 + 0.753 0.243 0.002 0.000 + 0.713 0.296 0.002 0.000 + 0.740 0.300 0.003 0.000 + 0.645 0.322 0.002 0.000 + 0.645 0.322 0.002 0.000 + 0.723 0.307 0.003 0.000 + + + 0.645 0.322 0.002 0.000 +X 0.631 0.329 0.002 0.000 + 0.299 0.298 0.001 0.000 +W 0.288 0.285 0.001 0.000 + 0.225 0.247 0.002 0.000 + + 0.297 0.107 0.002 0.000 + 0.297 0.107 0.002 0.000 + 0.574 0.003 + 0.278 0.218 0.002 0.000 + + 1.652 0.018 + 1.517 0.018 + + 0.335 0.002 0.000 +m 0.362 0.002 0.001 +V 0.144 0.001 0.000 +j 0.435 0.002 +i +U 0.499 0.002 +p 0.184 0.742 0.005 0.001 + 0.912 0.035 0.001 + 0.214 0.002 + 1.005 0.086 0.002 0.000 + 0.403 0.773 0.003 0.001 + 0.039 0.037 0.001 + 0.195 0.667 0.004 0.000 +T 0.218 0.742 0.005 0.001 +s 0.628 0.258 0.005 +h 0.635 0.262 0.006 +r 0.383 0.007 0.000 +g 0.386 0.008 0.000 + 0.330 0.004 0.000 +q 0.331 0.002 0.000 +f 0.328 0.271 0.001 0.000 +e 0.295 0.354 0.003 + 0.245 0.142 0.015 0.000 + 0.236 0.144 0.020 0.000 + 0.423 0.253 0.020 0.000 + 0.417 0.242 0.026 0.001 + 0.354 0.216 0.029 0.001 + 0.462 0.551 0.023 0.000 + 0.448 0.394 0.023 0.000 + 0.528 0.465 0.027 0.000 + 0.462 0.317 0.030 0.001 + 0.495 0.221 0.038 0.001 +d 0.413 0.200 0.032 0.001 + 0.030 0.074 + 0.031 0.068 + 0.032 0.070 + 0.034 0.074 + 0.096 0.042 0.001 0.000 + 0.141 0.039 0.001 0.000 + 0.118 0.040 0.001 0.000 + 0.075 0.043 0.000 0.000 + 0.054 0.044 0.000 0.000 + 0.034 0.047 +~ 0.083 0.000 +} 0.107 0.000 +| 0.132 0.000 +{ 0.164 0.000 +z 0.196 0.000 +y 0.261 0.001 0.000 +x 0.284 0.001 0.000 +w 0.337 0.002 0.000 +v 0.483 0.002 0.001 + 0.912 0.035 0.001 + 0.189 0.001 0.000 + 0.192 0.001 0.000 + 0.439 0.040 0.001 + 0.300 0.001 0.000 + 0.324 0.001 0.000 + 0.326 0.001 0.000 + 0.788 0.008 0.001 + 0.386 0.001 0.000 +u 0.436 0.002 0.000 + 0.289 0.026 0.001 + + 0.129 0.256 0.001 0.000 + + + + 0.347 0.281 0.002 + 0.363 0.002 0.000 + + 0.394 0.003 + 0.334 0.003 + 0.317 0.069 0.038 0.000 + + 0.351 0.004 0.001 + 0.225 0.267 0.003 0.000 + + + + + + -RO2X on mouseup answer "The unity formula is calculated here." & return & "To enter new unity formulas or change the unity formula, use the Glaze Calculator." end mouseup e+Y'cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect444,102,486,188multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1069altId39autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameRO2toolTipvGridfalse listBehaviorfalselayer28visibletrue cantSelectfalse borderWidth2margins8 htmlTextA

3.511

0.004

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736398 + 4.289 0.016 4.2:1 + 5.279 0.015 4.6:1 + 3.315 0.002 0.001 8.7:1 + 2.044 0.001 3.9:1 ' 0.848 4.4:1 ( 2.833 0.002 0.000 7.3:1 $ 2.652 0.001 7.2:1 (2 3.300 7.6:1 ) 3.052 0.002 6.5:1 *- 4.693 0.002 9.8:1 ' 2.087 0.003 4.3:1 ' 1.251 0.013 7.3:1 ' 3.015 0.012 0.000 9.5:1 *, 13.412 0.117 2.5:1 & 1.663 0.002 4.4:1 & 2.207 0.001 4.9:1 & 3.133 17.4:1 ) 4.179 0.000 9.0:1 ) 1.580 5.9:1 ) 1.810 0.001 6.5:1 & 0.336 0.000 8.8:1 & 2.599 0.003 10.5:1 & 4.046 0.005 8.6:1 & 3.165 0.001 0.000 8.1:1 & 2.434 0.001 0.000 8.6:1 & 2.001 0.003 4.9:1 & 2.069 0.002 4.4:1 &g 5.106 0.001 12.1:1 &f 0.337 0.000 8.9:1 & 2.578 0.003 6.7:1 &K 1.967 0.001 6.0:1 &- 2.400 0.000 10.2:1 &I 3.540 0.002 8.0:1 ) 2.076 0.002 0.236 4.9:1 (@ 2.309 9.5:1 ) 8.175 0.007 5.2:1 ) 4.166 0.008 9.8:1 ( 1.755 0.004 0.000 7.0:1 */ 4.610 0.008 4.3:1 (t 4.698 0.005 4.3:1 (w 4.772 0.013 4.3:1 *+ 2.524 0.018 0.001 7.4:1 (K 1.221 0.002 0.000 4.7:1 (B 4.014 0.005 0.000 4.8:1 +S 3.960 0.000 8.5:1 (8 2.860 0.003 5.1:1 ( 3.403 0.001 0.000 9.6:1 ( 1.758 0.004 0.013 8.4:1 ( 2.003 0.002 0.000 5.7:1 ( 3.624 0.001 6.8:1 ' 1.905 0.003 5.1:1 ' 4.720 0.002 0.000 10.7:1 'j 3.003 0.002 0.001 12.1:1 ' 2.841 0.001 9.0:1 % 0.204 14.6:1 % 1.384 0.000 6.5:1 %~ 1.201 0.002 11.5:1 % 0.344 0.001 3.0:1 $ 0.254 42.3:1 %w 3.374 0.002 9.6:1 % 2.049 0.011 0.002 9.6:1 %c 2.746 0.001 7.2:1 $ 2.649 0.001 7.2:1 %l 2.222 0.003 10.7:1 %] 3.041 0.004 0.363 7.3:1 $ 2.653 0.001 7.2:1 $ 2.007 0.000 13.4:1 +N 4.171 0.007 0.000 9.1:1 +c 3.192 0.024 0.034 5.6:1 +b 2.998 0.030 8.4:1 +k +a 2.850 0.000 12.4:1 +` 3.089 0.000 11.0:1 +l 1.826 50.7:1 +_ 1.819 50.5:1 +n 1.125 4.4:1 +^ 1.124 4.4:1 +] 1.042 0.001 0.000 4.5:1 +t 1.949 0.002 4.2:1 +\ 1.950 0.008 4.2:1 +[ 2.965 0.001 0.000 10.3:1 +o 2.190 6.2:1 +Z 4.174 11.8:1 +Y 2.695 0.001 0.000 8.2:1 + 3.290 6.7:1 + 3.455 0.000 6.0:1 + 3.514 0.001 5.8:1 + 4.386 0.001 5.8:1 + 4.155 0.001 5.8:1 + 4.187 0.001 5.7:1 + 3.647 0.001 5.7:1 + 3.647 0.001 5.7:1 + 4.092 0.001 5.7:1 + + + 3.647 0.001 5.7:1 +X 3.571 0.001 5.7:1 + 2.828 0.001 0.000 9.5:1 +W 2.965 0.001 0.000 10.3:1 + 2.302 0.001 10.2:1 + + 2.541 0.001 8.6:1 + 2.541 0.001 8.6:1 + 2.978 0.005 5.2:1 + 2.942 0.000 10.6:1 + + 7.993 0.002 0.000 4.8:1 + 7.326 0.021 0.000 4.8:1 + + 1.930 0.002 5.8:1 +m 1.746 0.002 0.001 4.8:1 +V 1.088 0.000 7.6:1 +j 2.015 0.008 4.6:1 +i +U 2.615 0.005 5.2:1 +p 2.789 0.002 0.000 15.2:1 + 7.958 8.7:1 + 2.652 0.002 0.000 0.603 12.4:1 + 4.530 0.001 4.5:1 + 4.755 0.005 11.8:1 + 1.849 0.000 47.4:1 + 2.480 0.001 0.118 12.7:1 +T 2.782 0.002 12.8:1 +s 4.022 0.015 0.455 0.000 6.4:1 +h 4.072 0.016 0.461 0.000 6.4:1 +r 2.683 0.002 0.298 0.000 7.0:1 +g 2.703 0.001 0.300 0.000 7.0:1 + 1.865 0.008 5.7:1 +q 1.869 0.001 0.000 5.6:1 +f 2.695 0.001 0.000 8.2:1 +e 2.399 0.006 0.346 0.000 8.1:1 + 1.308 0.010 5.3:1 + 1.333 0.009 5.6:1 + 3.309 0.018 7.8:1 + 3.093 0.017 7.4:1 + 2.616 0.014 7.4:1 + 2.168 0.019 4.7:1 + 2.082 0.017 4.6:1 + 2.457 0.020 4.7:1 + 2.242 0.017 4.9:1 + 2.533 0.017 5.1:1 +d 2.220 0.013 5.4:1 + 1.157 38.6:1 + 1.282 41.4:1 + 1.383 43.2:1 + 1.547 45.5:1 + 1.733 0.001 18.1:1 + 1.765 0.001 12.5:1 + 1.749 0.001 14.8:1 + 1.718 0.001 22.9:1 + 1.703 0.000 31.5:1 + 1.661 48.9:1 +~ 0.543 6.5:1 +} 0.657 6.1:1 +| 0.710 5.4:1 +{ 0.862 5.3:1 +z 1.009 5.1:1 +y 1.370 0.002 5.2:1 +x 1.241 0.002 4.4:1 +w 1.474 0.002 4.4:1 +v 2.116 0.002 4.4:1 + 7.957 8.7:1 + 1.248 0.001 6.6:1 + 1.054 0.001 5.5:1 + 3.876 8.8:1 + 2.014 0.000 6.7:1 + 2.151 0.000 6.6:1 + 2.164 0.000 6.6:1 + 4.335 0.011 5.5:1 + 2.125 0.001 5.5:1 +u 2.018 0.002 4.6:1 + 1.708 5.9:1 + + 0.539 0.001 4.2:1 + + + + 2.958 8.5:1 + 2.365 0.001 0.169 0.000 6.5:1 + + 2.121 0.005 5.4:1 + 2.794 0.005 8.4:1 + 3.010 0.012 0.000 9.5:1 + + 1.581 0.003 4.5:1 + 2.974 0.000 13.2:1 + + + + + +  MatGlossC#@$.cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect449,143,485,189 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1179altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyleopaque disabledIcon0 armBordertruenameMatGlossicon1180toolTiplayer29 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087526712238 hazard $on mouseup showHazards end mouseup &(GColor]Clear Translucent Opaque - White Gray Black - Red Orange Yellow Green Blue-Green Blue PurplecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 455,24,493,64 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1153altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelColor autoHilitetruestyle rectangle disabledIcon0 armBordertruenamehazardicon1095toolTiplayer30 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines15margins4opaquetrue accelModstext\Clear Translucent Opaque - White Gray Black - Red Orange Yellow Green Blue-Green Blue Purple shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1086724032227 )BatchMH\P!cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect227,84,307,256multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1065altId33autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameBatchtoolTipvGridfalse listBehaviorfalselayer31visibletrue cantSelectfalse borderWidth2margins8 htmlTextY

634

1450

151

282

1096

1102

256

28

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736399 + 35.38 11.79 2.83 + 80.00 20.00 5.00 5.00 + 58.00 12.00 15.00 5.00 10.00 + 22.76 47.05 9.31 13.38 0.16 7.34 ' 4400 3600 ( 52.00 11.00 25.00 12.00 5.00 $ 431.0 51.8 17.2 (2 5904 816 888 392 ) 42.16 23.53 20.59 11.76 1.96 *- 19.96 8.23 5.90 15.92 ' 28.96 15.34 13.61 2.09 ' 3662 427 3020 634 258 ' 35.87 14.13 3.26 3.26 7.61 14.13 21.74 *, 1000 1680 1200 120 & 3500 1250 250 & 55.01 26.00 2.00 7.00 6.00 & 8.98 20.91 24.91 13.45 31.73 ) 1250 1750 1000 1000 ) 15.00 60.00 20.00 ) 54.70 9.28 9.28 12.39 2.07 8.25 1.03 & 18.43 8.22 4.03 2.21 3.47 8.77 47.37 7.51 & 1250 250 1000 1000 1500 & 37.83 25.99 36.19 & 23.08 21.78 30.49 11.88 5.74 6.04 1.5 & 44.17 23.41 8.03 0.60 0.89 22.90 & 20.25 21.20 22.35 3.16 19.85 5.51 7.68 & 20.00 20.00 20.00 20.00 5.00 15.00 &g 427 2651 370 182 748 3621 &f 11.31 18.41 2.01 3.46 8.76 47.32 3.94 4.78 & 47.00 20.00 27.00 3.00 &K 60.20 5.80 18.20 10.00 5.80 &- 15.00 35.00 10.00 10.00 30.00 &I 35.00 20.00 10.00 20.00 10.00 5.00 ) 4854 1618 1227 330 (@ 1664 4592 1264 400 80 ) 4000 1000 ) 3328 2136 1032 1424 80 ( 7.76 0.09 2.75 0.56 1.66 0.86 4.32 */ 920 3147 320 2052 640 875 45 (t 56.0 319.8 16.4 65.2 16.3 24.7 1.7 (w 272 1175 4019 1007 1294 232 *+ 3739 1090 1507 621 290 530 221 (K 1720 1976 648 216 3440 (B 3500 750 250 100 400 +S 2195 650 780 1255 120 (8 38.12 11.78 10.09 ( 29.19 13.01 3.77 3.77 4.31 5.93 ( 1600 1200 1600 2800 800 ( 2805 1685 1594 831 134 951 ( 6000 1200 400 400 ' 2662 1724 1757 982 874 ' 6.41 6.25 2.84 2.14 0.36 'j 41.00 12.00 7.00 15.00 5.00 20.00 ' 1739 2205 1972 345 1739 % 4000 1000 % 296.5 155.5 10.0 38.0 %~ 3275 600 600 300 225 % 2326 1550 930 194 $ 33.33 26.67 33.33 6.67 %w 180.00 20.00 % 235.25 88.23 176.41 %c 824 1035 71 71 $ 433.9 52.5 13.5 %l 168.00 88.00 40.00 40.00 40.00 24.00 %] 70.0 75.0 110.0 25.0 10.0 80.0 100.0 30.0 $ 7046 842 278 $ 67.54 39.34 18.36 6.56 49.84 18.36 +N 2436 550 958 266 1361 2429 +c 30.00 30.00 20.00 20.00 +b 60.00 20.00 20.00 +k +a 40.00 25.00 13.00 8.00 5.00 4.00 +` 44.00 25.00 1.00 21.00 2.00 7.00 +l 51.56 26.30 21.78 0.20 0.16 +_ 50.00 25.00 20.00 +n 50.00 49.85 0.11 0.05 +^ 50.00 50.00 +] 31.00 8.00 6.00 6.00 30.00 19.00 +t 22.31 60.39 13.31 3.99 +\ 22.00 60.00 18.00 +[ 40.00 25.00 13.00 8.00 5.00 5.00 4.00 +o 63.79 31.76 4.45 +Z 46.00 28.00 23.00 3.00 +Y 40.00 25.00 13.00 8.00 5.00 5.00 4.00 + 86.42 13.29 5.54 -5.25 + 81.27 12.50 5.21 1.02 + 79.60 12.24 5.10 3.06 + 85.60 6.20 3.06 3.10 2.04 + 83.60 8.20 3.06 3.10 2.04 + 81.60 8.20 3.06 5.10 2.04 + 81.60 8.20 3.06 5.10 2.04 + 78.00 10.00 3.00 5.00 2.00 + 81.64 10.20 3.06 5.10 2.00 + + + 78.00 10.00 5.00 5.00 2.00 +X 78.00 12.00 5.00 5.00 + 17.41 23.86 13.84 4.74 5.13 7.40 4.26 19.71 3.64 +W 40.00 25.00 13.00 8.00 5.00 5.00 4.00 + 21.00 16.00 11.00 20.00 32.00 + 25.00 70.00 5.00 + 2000 700 350 400 1100 450 + 2000 700 350 400 1100 450 + 3000 1000 500 50 450 + 34.13 1.80 16.32 31.83 3.90 6.11 5.91 + 50.00 25.00 25.00 2.00 + 50.00 25.00 10.00 15.00 + 35.00 15.00 20.00 20.00 10.00 + 39.22 9.80 4.90 19.61 24.51 1.96 + 50.00 14.00 20.00 10.00 6.00 +m 22.22 29.29 11.23 37.26 +V 5.00 12.00 24.00 13.00 7.00 36.00 +j 96.01 46.61 29.38 +i +U 70.00 20.00 10.00 +p 50.62 12.63 36.72 0.03 + 12.80 19.67 1.17 54.70 0.29 11.37 + 19.23 5.67 5.14 22.76 8.16 11.96 27.08 + 0.72 87.77 5.11 3.71 2.69 + 9.91 14.40 7.45 10.12 9.18 11.39 37.55 + 39.80 26.15 2.45 0.58 1.14 27.15 2.73 + 48.92 6.93 1.24 0.66 14.79 27.47 +T 50.00 15.00 35.00 +s 46.39 16.82 17.41 7.72 0.49 7.52 3.65 +h 46.00 18.00 18.00 10.00 8.00 +r 29.84 8.86 11.32 6.81 16.89 0.98 15.02 4.41 5.86 +g 30.00 30.00 12.00 10.00 18.00 + 3.91 50.79 6.39 13.57 18.74 0.24 6.15 0.21 +q 54.76 6.84 6.82 5.80 25.78 +f 40.00 25.00 13.00 8.00 5.00 5.00 4.00 +e 34.00 20.00 20.00 16.00 10.00 + 30.00 15.00 15.00 15.00 10.00 15.00 + 30.00 20.00 18.00 12.00 10.00 10.00 + 25.00 10.00 15.00 20.00 10.00 20.00 + 30.00 15.00 15.00 15.00 10.00 15.00 + 30.00 20.00 18.00 12.00 10.00 10.00 + 20.00 10.00 10.00 10.00 25.00 25.00 + 19.05 9.52 14.29 14.29 19.05 23.81 + 20.00 10.00 10.00 15.00 20.00 25.00 + 20.00 15.00 15.00 15.00 15.00 20.00 + 25.00 20.00 15.00 15.00 10.00 15.00 +d 30.00 20.00 18.00 12.00 10.00 10.00 + 51.56 9.16 5.20 26.30 7.78 + 51.56 7.16 4.20 26.30 10.78 + 51.56 5.16 4.20 26.30 12.78 + 51.56 2.16 4.20 26.30 15.78 + 43.00 2.00 1.00 26.00 19.00 9.00 + 37.00 2.00 1.00 26.00 19.00 15.00 + 40.00 2.00 1.00 26.00 19.00 12.00 + 46.00 2.00 1.00 26.00 19.00 6.00 + 49.00 2.00 1.00 26.00 19.00 3.00 + 51.56 2.16 1.20 26.30 18.78 +~ 59.99 20.85 13.05 6.11 +} 54.99 25.85 13.05 6.11 +| 54.99 30.85 10.05 4.11 +{ 55.54 36.21 5.10 4.15 +z 50.00 40.85 5.05 4.11 +y 37.31 28.39 18.31 15.99 +x 37.31 35.39 18.31 8.99 +w 32.31 40.39 18.31 8.99 +v 22.31 50.39 18.31 8.99 + 12.80 19.67 1.17 54.69 0.29 11.37 + 10.31 12.37 4.12 13.40 22.68 37.11 + 18.56 12.37 24.74 13.40 7.22 23.71 + 19.51 48.63 2.44 0.05 29.37 + 0.00 49.70 3.31 18.99 25.00 + 3.41 52.98 3.41 19.58 20.62 + 8.57 52.98 3.41 19.58 15.46 + 60.00 14.00 10.00 12.00 4.00 + 12.82 53.53 8.66 14.57 10.42 +u 18.03 53.54 13.86 9.36 5.21 + 39.02 48.63 9.86 0.05 2.44 + + 38.58 2.80 28.14 18.70 3.75 8.03 + 667 2308 165 320 715 826 + 20.00 20.00 20.00 20.00 20.00 + 47.00 13.00 4.00 6.00 4.00 3.00 23.00 + 1100 600 500 75 150 50 + 2832 797 221 221 398 532 + 40.00 26.00 15.00 9.00 5.00 5.00 + 55.60 22.20 11.00 5.60 5.60 + 17.43 10.92 9.52 6.61 13.63 22.65 19.24 + 35.97 14.13 3.21 3.21 7.62 14.13 21.74 + 33.00 25.00 12.00 7.00 7.00 15.00 + 35.48 26.64 22.22 8.84 1.80 + 36.00 20.00 28.00 11.00 3.00 2.00 + + + + + + mTotals  @^FcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect92,250,162,267multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1133altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitefalsestyle transparent showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameTotalstoolTipvGridfalse listBehaviorfalselayer32visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1086631406941 Totals: nTotAmt  ?cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect167,251,230,268multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1134altId2autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTotAmttoolTipvGridfalse listBehaviorfalselayer33visibletrue cantSelectfalse borderWidth2margins8 htmlText

100

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1086631406942 + 100 + 100 + 100 + 100 ' 100 ( 100 $ 100 (2 100 ) 100 *- 100 ' 100 ' 100 ' 100 *, 100 & 100 & 100 & 100 ) 100 ) 100 ) 100 & 100 & 100 & 100 & 100 & 100 & 100 & 100 &g 100 &f 100 & 100 &K 100 &- 100 &I 100 ) 100 (@ 100 ) 100 ) 100 ( 100 */ 100 (t 100 (w 100 *+ 100 (K 100 (B 100 +S 100.00 (8 100 ( 100 ( 100 ( 100 ( 100 ' 100 ' 100 'j 100 ' 100 % 100 % 100 %~ 100 % 100 $ 100 %w 100 % 100 %c 100 $ 100 %l 100 %] 100 $ 100 $ 100 +N 100 +c 100 +b 100 +k +a 100 +` 100 +l 100 +_ 100 +n 100 +^ 100 +] 100 +t 100 +\ 100 +[ 100 +o 100 +Z 100 +Y 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + + + 100 +X 100 + 100 +W 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +m 100 +V 100 +j 100 +i +U 100 +p 100 + 100 + 100 + 100 + 100 + 100 + 100 +T 100 +s 100 +h 100 +r 100 +g 100 + 100 +q 100 +f 100 +e 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +d 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +~ 100 +} 100 +| 100 +{ 100 +z 100 +y 100 +x 100 +w 100 +v 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +u 100 + 100 + + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + + + + + + Monetary Unite I-- bg btn for setting monetary units in HG Stack on mouseUp if the optionKey is down then Answer "Change the monetary unit shown?" & return & return &\ "WARNING: This will only change the monetary symbol shown. It does NOT translate the value." &\ "You must re-enter the correct prices of all ingredients in the Materials stack." with "Change" or "Cancel" if it is "Cancel" then exit mouseup get the label of me ask "Enter the monetary unit you want to use:" with it if it is not empty then set the label of me to it if the label of me is "$" then answer "NOTE: Using the symbol '$' assumes that prices in U.S. Dollars per POUND have been entered in the Materials Stack." & return &\ "To use the metric system, use a monetary symbol other than '$'. (examples: 'C$' '' or '')" else answer "NOTE: Using monetary symbols other than '$' assumes that material prices per KILOGRAM have been entered in the Materials Stack." end if else answer "To change the monetary unit, hold down the Option key and click again." end mouseUp u%$cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect372,292,396,308 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1010altId165 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename$icon0toolTiplayer34 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736401 LockUMF`@on mouseUp if the optionKey is down then set the hilite of me to not the hilite of me -- if the hilite of me is true then set the icon of me to "11060" -- else set the icon of me to "11061" else answer "Hold the option key down to lock or unlock this unity formula." & return &\ "When this box is checked and the unity formula is locked, the unity formula will not be recalculated and prices will not be updated. All other calculations will function normally." end if end mouseUp @3option [ALT] click to lock or unlock unity formulacREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect494,191,511,206 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitefalseshadowfalse textAlignleftarmedfalsemenuMouseButton1id1011altId164 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestylecheckbox disabledIcon0 armBorderfalsenameLockUMFicon0toolTiplocks unity formulalayer35 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736402 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + Glaze type PUC Con mousedown send mousedown to bg btn "Glaze Type:" end mousedown $cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect447,193,460,206 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1014altId146 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename Glaze type PUicon9461toolTiplayer36 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736403  UMFHide1@AOV"cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect340,193,370,227 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1015altId140 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameUMFHide1icon0toolTiplayer37 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736404  UMFHide2@AO$$cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect411,154,444,190 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1016altId141 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameUMFHide2icon0toolTiplayer38 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736405  UMFHide3@AO!.cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect484,130,513,176 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1017altId142 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameUMFHide3icon0toolTiplayer39 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736406 KA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~Xj{cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect333,107,346,115 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1018altId123 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameKicon0toolTiplayer40 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736407 NaA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~Pv |cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect340,118,346,126 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1019altId124 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameNaicon0toolTiplayer41 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736408 CaA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~M}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736409 MgA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~O ~cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,140,346,148 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1021altId126 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameMgicon0toolTiplayer43 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736410 LiA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar 2~~ZcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,150,346,158 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1022altId127 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameLiicon0toolTiplayer44 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736411 BaA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2ZcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect325,162,346,170 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 204,0,0 255,0,0 153,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1023altId128 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBaicon0toolTiplayer45 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736412 PbA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2ZcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,173,346,181 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 204,0,0 255,0,0 153,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1024altId134 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePbicon0toolTiplayer46 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736413 ZnA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~ZcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,184,346,192 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1025altId135 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameZnicon0toolTiplayer47 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736414 AlA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 374 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 414 into minHt put 40 into totHt -- total pixel height of bar graph put 1.5 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2~~j cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect397,107,414,115 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors& 25,186,176 173,214,218 19,126,136 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1026altId129 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameAlicon0toolTiplayer48 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736415 BA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 374 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 414 into minHt put 40 into totHt -- total pixel height of bar graph put 1.5 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 yyYYvcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect414,119,415,127 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 121,89,133 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1027altId130 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBicon0toolTiplayer49 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736416 FeA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 374 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 414 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 yyYYcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect414,131,415,139 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 121,89,133 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1028altId136 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameFeicon0toolTiplayer50 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736417 PA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 374 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 414 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 yyYYcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect414,143,415,151 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 121,89,133 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1029altId137 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePicon0toolTiplayer51 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736418 SiA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 448 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 483 into minHt put 35 into totHt -- total pixel height of bar graph put 6 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2 00}}j cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect448,107,486,115 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 11,129,48 22,220,24 2,125,6 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1030altId131 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSiicon0toolTiplayer52 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736419 TiA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 448 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 483 into minHt put 35 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 22vcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect483,119,486,127 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 183,175,50 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1031altId138 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameTiicon0toolTiplayer53 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736420 SiRatioA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 448 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 483 into minHt put 35 into totHt -- total pixel height of bar graph put 15 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar -- ScriptEdit Prefs:Monaco,9,47,24,398,565,91,91,50 2ss䥥44SS cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect460,179,486,187 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors$ 183,115,16 228,165,52 155,83,27 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1032altId139 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSiRatioicon0toolTiplayer54 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736421  Ingredient8 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,200,166,217multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1051altId17autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient8toolTipvGridfalse listBehaviorfalselayer55visibletrue cantSelectfalse borderWidth2margins8 htmlText

Lithium Carbonate

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736422 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & Flint & & & & & & &g &f Flint & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] Whiting $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + Soda Feldspar +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r Pyrophyllite +g + Red Iron Oxide +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + Black Stain + + Barium Carbonate + Magnesium Carbonate Amount8 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,200,228,217multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1052altId18autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount8toolTipvGridfalse listBehaviorfalselayer56visibletrue cantSelectfalse borderWidth2margins8 htmlText

0.55

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736423 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & 7.51 & & & & & & &g &f 4.78 & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] 6.00 $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + 19.71 +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r 4.41 +g + 0.21 +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + 5 + + 4.6 + 2.0  Ingredient9 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,216,166,233multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1053altId19autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient9toolTipvGridfalse listBehaviorfalselayer57visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736424 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + Soda Ash +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r Flint +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + Colemanite + Amount9 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,216,228,233multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1054altId20autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount9toolTipvGridfalse listBehaviorfalselayer58visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736425 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + 3.64 +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r 5.86 +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + 3.6 +  Ingredient10 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,232,166,249multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1055altId21autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient10toolTipvGridfalse listBehaviorfalselayer59visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736426 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + Copper Carbonate +  Amount10 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect165,232,228,249multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1056altId22autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount10toolTipvGridfalse listBehaviorfalselayer60visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736427 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + .8 + o TotBatch X lon closefield doNewBatch pass closefield end closefield on enterInField doNewBatch end enterInField Menter a new batch size herecREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect228,254,305,267multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1135altId3autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameTotBatchtoolTipenter a new batch size herevGridfalse listBehaviorfalselayer61visibletrue cantSelectfalse borderWidth2margins5 htmlText

5000.00

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1086631406943 + 50.00 + 110 + 100 + 100 ' 8000 ( 105.0 $ 500.0 (2 8000.00 ) 100 *- 50.01 ' 60.00 ' 8000 ' 100 *, 4000 & 5000 & 96.0 & 99.98 ) 5000.00 ) 95 ) 97 & 100 & 5000 & 100 & 99 & 100 & 100 & 100 &g 8000 &f 100 & 97.00 &K 100 &- 100 &I 100 ) 8029 (@ 8000 ) 5000 ) 8000 ( 18.00 */ 7999 (t 500.0 (w 8000 *+ 7999 (K 8000 (B 5000 +S 5000 (8 60.00 ( 60.00 ( 8000 ( 8000 ( 8000 ' 8000 ' 18.00 'j 100 ' 8000 % 5000 % 500.0 %~ 5000 % 5000 $ 100 %w 200.00 % 499.9 %c 2000 $ 500.0 %l 400.00 %] 500.0 $ 8165 $ 200.00 +N 8000 +c 100 +b 100 +k 100.0 +a 95 +` 100 +l 100 +_ 95 +n 100 +^ 100 +] 100 +t 100 +\ 100 +[ 100 +o 100 +Z 100 +Y 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 98 + 100 + 100.0 + 100.0 + 100 +X 100 + 100 +W 100 + 100 + 100 + 5000 + 5000 + 5000 + 100 + 102 + 100 + 100 + 100 + 100 +m 100 +V 97 +j 172 +i 100.0 +U 100 +p 100 + 100 + 100 + 100 + 100 + 100 + 100 +T 100 +s 100 +h 100 +r 100 +g 100 + 100 +q 100 +f 100 +e 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +d 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 + 100 +~ 100 +} 100 +| 100 +{ 101 +z 100 +y 100 +x 100 +w 100 +v 100 + 100 + 100 + 100 + 100 + 97 + 100 + 100 + 100 + 100 +u 100 + 100 + 100.0 + 100 + 5000 + 100 + 100 + 2475 + 5000 + 100 + 100 + 100 + 100 + 99 + 95 + 100 + 100.0 + 100.0 + 100.0 + 100.0 + 100.0 + 100.0 ! Ingredient11 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,270,166,287multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1057altId23autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient11toolTipvGridfalse listBehaviorfalselayer62visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736428 + + + + ' ( cobalt carbonate $ bentonite (2 Bentonite ) Copper Carbonate *- bentonite ' ' ' Yellow Ochre *, & & Copper carbonate & bentonite ) ) bentonite ) bentonite & & & & Bentonite & & & Tin Oxide &g Zircopax &f & &K Opax &- Black stain &I ) Red Iron Oxide (@ Copper Carbonate ) ) Red Iron Oxide ( Yellow Ochre */ (t (w *+ Red Iron oxide (K (B Cobalt Carbonate +S red iron oxide (8 Rutile ( Red Iron Oxide ( Nickel Oxide ( Red Iron Oxide ( Chrome Oxide ' ' 'j bentonite ' % Copper Carbonate % Copper carbonate %~ Copper Carbonate % Zircopax $ Zircopax %w Bentonite % Commercial Stain %c zircopax $ Bentonite %l %] $ Zircopax $ Copper oxide +N red iron oxide +c +b +k +a Copper Carbonate +` Copper Oxide +l Titianium Dioxide +_ Titianium Dioxide +n Gerstley Borate +^ Gerstley Borate +] +t +\ +[ Lavender #6333 +o Colbalt Carbonate +Z Colbalt Carbonate +Y Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + + + Copper Carbonate +X Copper Carbonate + Copper Carbonate +W Copper Carbonate + Tin Oxide + + Mason #292 + Mason #6371 + Black Stain #6600 + Rutile + + + + + Copper Oxide +m Nickel +V Nickel +j +i +U +p Colbalt Carbonate + Bentonite + Copper Carbonate + Copper Carbonate + Colbalt Carbonate + Titianium Dioxide + Colbalt Carbonate +T Colbalt Carbonate +s Cobalt Carbonite +h Cobalt Carbonite +r Copper Carbonate +g Copper Carbonate + Inclusion yellow +q Yellow #239416 +f Yellow #239416 +e Cobalt Carbonate + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + Bentonite + Nickel + Nickel + Bentonite + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate + Copper Carbonate +u + Bentonite + + Cobalt + Tin Oxide + Manganesse Dioxde + Rutile + Rutile + + Rutile + Copper Carbonate + Copper Carbonate + Yellow Ochre + Red Iron Oxide + Rutile + Copper Carbonate + + + + + + " Amount11 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect166,270,228,287multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1058altId24autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount11toolTipvGridfalse listBehaviorfalselayer63visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736429 + + + + ' ( 3.00 $ 4.00 (2 1.00 ) 5.88 *- 1.00 ' ' ' 8.70 *, & & 10.42 & 3.00 ) ) 2.11 ) 3.19 & & & & 1.50 & & & 6.00 &g 10.14 &f & &K 4.00 &- 7.00 &I ) 0.96 (@ 1.50 ) ) 4.00 ( 0.40 */ (t (w *+ 1.00 (K (B 1.00 +S 1.00 (8 3.76 ( 10.79 ( 5.00 ( 5.30 ( 4.00 ' ' 'j 2.00 ' % 5.00 % 1.00 %~ 12.18 % 5.43 $ 6.67 %w 4.00 % 17.65 %c 4.71 $ 2.00 %l %] $ 20.72 $ 1.64 +N 0.50 +c +b +k +a 5.26 +` 1.50 +l 0.53 +_ 0.53 +n 2.50 +^ 2.50 +] +t +\ +[ 5.00 +o 1.50 +Z 1.50 +Y 6.00 + 4.00 + 4.17 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + + + 4.00 +X 4.00 + 1.67 +W 5.00 + 5.00 + + 8.00 + 6.00 + 5.00 + 5.01 + + + + + 3.00 +m 1.03 +V 1.03 +j +i +U +p 1.50 + 2.93 + 5.26 + 3.43 + 1.50 + 0.53 + 1.50 +T 1.50 +s 2.00 +h 2.00 +r 2.50 +g 2.50 + 6.00 +q 6.00 +f 6.00 +e 2.00 + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + 2.93 + 1.03 + 1.03 + 2.93 + 1.13 + 1.10 + 1.07 + 8.00 + 1.04 +u + 2.93 + + 3.00 + 2.24 + 3.00 + 2.00 + 3.03 + + 8.00 + 3.30 + 6.01 + 7.62 + 3.03 + 2.75 + 3.00 + + + + + + # Ingredient12 mH cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 2,285,166,302multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1059altId25autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient12toolTipvGridfalse listBehaviorfalselayer64visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736430 + + + + ' ( $ Burnt umber (2 Copper carbonate ) *- epsom salts ' ' ' *, & & & Epsom salts ) ) crocus martis ) copper carbonate & & & & & & & &g Bentonite &f & &K &- &I ) Bentonite (@ Tin Oxide ) ) Rutile ( Red Iron Oxide */ (t (w *+ Cobalt oxide (K (B Rutile +S (8 Cobalt Carbonate ( Bentonite ( ( Tin Oxide ( Bentonite ' ' 'j cobalt ' % Cobalt Carbonate % %~ % $ %w % %c tin $ burnt umber %l %] $ $ +N bentonite +c +b +k +a Ziropax +` +l Rutile +_ Rutile +n Bentonite +^ Bentonite +] +t +\ +[ +o +Z +Y Rutile + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + Magganese Carbonate + + + Magganese Carbonate +X Magganese Carbonate + +W + Chrome Oxide + + + + + Red Iron Oxide + + + + + +m +V +j +i +U +p Copper Carbonate + Copper Carbonate + Ziropax + + + Rutile + Copper Carbonate +T Copper Carbonate +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + Copper Carbonate + + + Copper Carbonate + + + + + +u + Copper Carbonate + + + Red Copper Oxide + Red Iron Oxide + Copper Carbonate + Copper Carbonate + + Bentonite + Rutile + + + + Copper Carbonate + + + + + + + $ Amount12 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect166,285,228,302multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1060altId26autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount12toolTipvGridfalse listBehaviorfalselayer65visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736431 + + + + ' ( $ 7.00 (2 0.30 ) *- 0.15 ' ' ' *, & & & 0.25 ) ) 4.21 ) 2.13 & & & & & & & &g 3.30 &f & &K &- &I ) 3.82 (@ 1.50 ) ) 4.00 ( 2.90 */ (t (w *+ 2.00 (K (B 1.00 +S (8 0.73 ( 1.46 ( ( 6.30 ( 2.00 ' ' 'j 2.00 ' % 5.00 % %~ % $ %w % %c 12.94 $ 7.00 %l %] $ $ +N 1.00 +c +b +k +a 5.26 +` +l 0.53 +_ 0.53 +n 3.00 +^ 3.00 +] +t +\ +[ +o +Z +Y 10.00 + 4.00 + 4.17 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + 4.08 + + + 4.00 +X 4.00 + +W + 0.15 + + + + + 2.50 + + + + + +m +V +j +i +U +p 3.00 + 3.90 + 5.26 + + + 0.53 + 3.00 +T 3.00 +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + 3.90 + + + 3.90 + + + + + +u + 3.90 + + + 1.07 + 5.00 + 1.40 + 3.03 + + 2.00 + 3.30 + + + + 3.07 + + + + + + + % Ingredient13 mH ,cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 3,300,167,317multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1061altId27autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient13toolTipvGridfalse listBehaviorfalselayer66visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736432 + + + + ' ( $ (2 Tin oxide ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g Epsom salts &f & &K &- &I ) Epsom Salts (@ ) ) ( Zircopax */ (t (w *+ Chrome oxide (K (B +S (8 Bentonite ( ( ( ( ' ' 'j tin oxide ' % Tin Oxide % %~ % $ %w % %c bentonite $ %l %] $ $ +N epsom salts +c +b +k +a +` +l Bentonite +_ Bentonite +n Copper Carbonate +^ Copper Carbonate +] +t +\ +[ +o +Z +Y + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + Colbalt Carbonate + + + Colbalt Carbonate +X Colbalt Carbonate + +W + + + + + + + + + + + +m +V +j +i +U +p Rutile + + + + + + Rutile +T Rutile +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + V-gum T + + Cobalt Carbonate + + + + + + + + + + + + + + + & Amount13 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ,?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect166,300,228,317multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1062altId28autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount13toolTipvGridfalse listBehaviorfalselayer67visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736433 + + + + ' ( $ (2 1.00 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g 0.55 &f & &K &- &I ) 0.15 (@ ) ) ( 14.40 */ (t (w *+ 2.00 (K (B +S (8 2.09 ( ( ( ( ' ' 'j 2.00 ' % 2.00 % %~ % $ %w % %c 2.35 $ %l %] $ $ +N 0.15 +c +b +k +a +` +l 0.32 +_ 0.32 +n 4.00 +^ 4.00 +] +t +\ +[ +o +Z +Y + 2.00 + 2.08 + 2.04 + 2.04 + 2.04 + 2.04 + 2.04 + 2.04 + 2.04 + + + 2.00 +X 2.00 + +W + + + + + + + + + + + +m +V +j +i +U +p 1.00 + + + + + + 1.00 +T 1.00 +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + 1.00 + + 0.50 + + + + + + + + + + + + + + + ' Ingredient14 mH ;cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 3,315,167,332multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1063altId29autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Ingredient14toolTipvGridfalse listBehaviorfalselayer68visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736434 + + + + ' ( $ (2 Epsom salts ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ manganese dioxide (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + Bentonite + + + + + + + + + + + + + + + ( Amount14 mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ;?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect166,315,228,332multipleHilitesfalse patterns colors 255,255,255 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1064altId30autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAmount14toolTipvGridfalse listBehaviorfalselayer69visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736435 + + + + ' ( $ (2 0.15 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ 1.00 (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + 3.00 + + + + + + + + + + + + + + + .Si/AlAVon mouseUp set numberformat to 0.0 if (line 1 of field "R2O3") >0 then put (line 1 of field "RO2"/ line 1 of field "R2O3") & ":1"\ into line 7 of field "RO2" else if (line 1 of fld "RO2")<=0 then answer "Please calculate the unity formula first." else put empty into line 7 of fld "R2O" end if end mouseUp >click to calculate Si:Al rationcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect452,175,514,189 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1070altId110 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameSi/Alicon0toolTipclick to calculate Si:Al ratiolayer71 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736437 /Firingjh SBx=cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight10rect 338,66,458,80multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1071altId61autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameFiringtoolTipvGridfalse listBehaviorfalselayer72visibletrue cantSelectfalse borderWidth1margins8 htmlText

Oxidation or Reduction

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736438 + reduction + reduction + oxidation or reduction + oxidation or reduction ' Reduction ( Reduction $ Oxidation (2 Reduction ) Reduction *- Reduction ' Reduction ' oxidation or reduction ' Reduction *, Salt - Soda & oxidation or reduction & Oxidation & oxidation or reduction ) oxidation ) oxidation ) oxidation & oxidation or reduction & Oxidation & oxidation or reduction & oxidation or reduction & Oxidation & Oxidation & oxidation or reduction &g oxidation or reduction &f Oxidation & oxidation or reduction &K oxidation or reduction &- oxidation or reduction &I oxidation or reduction ) Salt - Soda (@ Reduction ) oxidation or reduction ) Reduction ( Reduction */ Reduction (t Reduction (w Reduction *+ Reduction (K Reduction (B Reduction +S Reduction (8 Reduction ( Reduction ( Reduction ( Reduction ( Reduction ' Reduction ' Reduction 'j Reduction ' Reduction % Raku % Raku %~ Raku % Oxidation $ Oxidation %w Oxidation % Oxidation %c Oxidation $ Oxidation %l Oxidation %] Oxidation $ Oxidation $ Oxidation +N Reduction +c oxidation +b oxidation +k oxidation or reduction +a oxidation +` oxidation +l oxidation or reduction +_ oxidation +n oxidation or reduction +^ oxidation +] oxidation +t oxidation or reduction +\ oxidation +[ oxidation +o oxidation or reduction +Z oxidation +Y oxidation + oxidation or reduction + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation or reduction + oxidation + oxidation +X oxidation + reduction +W oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation +m oxidation or reduction +V oxidation +j oxidation or reduction +i oxidation or reduction +U oxidation +p oxidation or reduction + reduction + reduction + reduction + reduction + reduction + reduction +T oxidation +s oxidation or reduction +h oxidation +r oxidation or reduction +g oxidation + oxidation or reduction +q oxidation or reduction +f oxidation +e oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation +d oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation +~ oxidation +} oxidation +| oxidation +{ oxidation +z oxidation +y oxidation +x oxidation +w oxidation +v oxidation + oxidation or reduction + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation +u oxidation + oxidation + oxidation or reduction + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation or reduction + oxidation + oxidation or reduction + oxidation or reduction + reduction + oxidation or reduction 0TestedJh B4<cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight10rect 470,66,522,80multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1072altId60autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTestedtoolTipvGridfalse listBehaviorfalselayer73visibletrue cantSelectfalse borderWidth1margins8 htmlText

Tested

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736439 + Untested + Untested + Untested + Untested ' Untested ( Untested $ Untested (2 Untested ) Untested *- Tested ' Untested ' Untested ' Untested *, Untested & Tested & Untested & Untested ) Tested ) Tested ) Tested & Untested & Tested & Untested & Untested & Tested & Untested & Tested &g Tested &f Untested & Untested &K Untested &- Untested &I Untested ) Untested (@ Tested ) Tested ) Tested ( Tested */ Untested (t Tested (w Tested *+ Tested (K Tested (B Untested +S Untested (8 Tested ( Tested ( Tested ( Tested ( Tested ' Tested ' Tested 'j Tested ' Tested % Tested % Untested %~ Untested % Tested $ Untested %w Untested % Untested %c Untested $ Untested %l Untested %] Tested $ Untested $ Untested +N Tested +c Tested +b Tested +k Untested +a Tested +` Untested +l Untested +_ Tested +n Untested +^ Tested +] Tested +t Untested +\ Tested +[ Untested +o Untested +Z Tested +Y Tested + Untested + Tested + Tested + Tested + Tested + Tested + Tested + Tested + Tested + Untested + Untested + Tested +X Tested + Tested +W Tested + Untested + Untested + Tested + Tested + Untested + Untested + Untested + Untested + Untested + Untested + Untested +m Untested +V Tested +j Untested +i Untested +U Tested +p Untested + Tested + Tested + Tested + Tested + Tested + Tested +T Tested +s Untested +h Tested +r Untested +g Tested + Untested +q Untested +f Tested +e Tested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested +d Untested + Untested + Untested + Untested + Untested + Tested + Tested + Tested + Tested + Tested + Untested +~ Untested +} Untested +| Untested +{ Untested +z Untested +y Untested +x Untested +w Untested +v Untested + Untested + Tested + Tested + Tested + Tested + Tested + Tested + Tested + Tested +u Untested + Tested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested + Untested 2 Comments)h pr(cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight13rect 4,367,374,543multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid1074altId40autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCommentstoolTipvGridfalse listBehaviorfalselayer74visibletrue cantSelectfalse borderWidth2margins8 htmlText

Penland glaze class - 2004 Brian Bosworth

Revised to eliminate crazing. Nice transparent satin matte. Very close to the original glaze, but no crazing.

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736440 + Sharkskin Shino + "shino" + Crackle + ' Looks great over colored slip or stains. Can be varied in the ratio of neph sy and magnesium carb to get variations in surface. ( (very very dark blue. best on porcelain. $ a classic lead-like amber clear. Can be made substituting strontium carbonate for the barium at 75% of the barium carb amount. (2 +Sample picture is on very white porcelain. ePete Pinnell says: I have been quite interested to read the traffic concerning copper red glazes. Up until a year and a half ago, I worked exclusively in porcelain, and for a period of seven years at least half of all my work was glazed with copper reds. During that time I tested hundreds of different formulas and tried a number of different firing schedules in order to produce better reds, and also to better understand the mechanisms involved in their production. Frankly, I was certain that the red color itself formed during the body reduction, the first reduction I did from about cone 012 to cone 04.  R Last week Richard Burkett wrote that he thought the red formed during the cooling cycle and since Richard knows his stuff, I thought I should put this to the test. I no longer work high fire (I have seen the light--- EARTHENWARE!) But one of my neighbors is Victor Babu and I knew he was firing this week. He very graciously allowed me to include some tests. I placed a number of porcelain draw rings just inside the top peephole. The rings were glazed with Petes Copper Red from Victors supply. I dipped them at the same time his canisters were dipped, so I would know the glaze was well mixed. The firing consisted of three very large canisters (up to 2 ft. diameter), two of which were glazed in copper red. This particular glaze batch had already been used with great success in two firings over the last few weeks, so we know both the glaze and firing cycle were good. qThe rings were pulled form the top peephole at various times during the firing, and the results were as follows: 9Cone 012 (before reduction) - Color: white. Surface: dry aCone 04 (after body reduction) - Color: gray with just a trace of pink. Surface: a bit less dry DCone 2 (light reduction) Color: light gray. Surface : satin matt. DCone 5 (light reduction) - Color: light gray. Surface: semi-gloss. wCone 91/2 (end of reduction, begin 1 Hr. of re-oxidation) -Color: Clear with a very slight gray tint. Surface: Glossy. ECone 10 down (kiln off) - Color: none. Surface: glossy transparent. xI did not include any draw rings for the cooling cycle - just one last one to remain in the kiln until it was unloaded. 3Well, I was perplexed. Victor was, well, nervous. rAt this point I decided to do what I should of done in the first place: consult Robert Tichanes excellent book: Reds, Reds, Copper Reds. Sure enough, Richard was right. According to Tichane, the glaze must reoxidize during the cooling cycle in order for the reduced copper metal in the glaze to return to the cuprous oxide state, and for the reds to nucleate and form. uSince, I had two nervous days to wait until Victor could unload his kiln, I decided to run a further test. I placed kthe last two (cone 9 and 10) draw rings in my electric kiln and fired them to cone 08 in oxidation. RED!!! 4Both are a bright, deep, semi-transparent ruby red, Qbut the one that went to cone 10 and was reoxidized is slightly better in color. pI wondered how this would effect an already fired red, so I broke an old teapot lid of mine in two and put half din the same cone 08 firing. It changed the color from an almost opaque orange-red to a deeper more ptransparent ruby red. It is a definite improvement in quality - the color is now very similar to Ching Dynasty reds. hI am now very curious. The only person I know who fires down is John Neely. John, how far down do you bkeep the burners on, and have you ever included any copper reds in your reduction-cooled firings? VBy the way, Victors canisters are stunning. It is amazing to see such huge red pots. I also was curious about what the tiles would look like which were pulled from the kiln before cone 10, so last night I fired the rest of the drawrings to cone 08 in the electric kiln. Results: Cone 010 ring: White, dry Cone 04 ring: Pink, dry Cone 2 ring: pink, satin matt *Cone 5 ring: darker pink-red, semi-gloss kI think the results show that the copper in the glaze is reduced enough at even cone 04, but the glaze has `not matured enough to dissolve the copper, so it does not have the intensity of a mature glaze. qThis raises an interesting question: if the glaze were mature at cone 04, it looks as if a true copper red would be possible. I do not name my glazes after myself- I originally called this cranberry red, but my KCAI (Kansas City Art Institute) students dubbed it Pete's, Xand thats the way I keep seeing it on all the photocopy glaze sheets that float around. lThis glaze works best if it's reduced early, beginning at cone 012 and continuing until cone 04. From then ountil cone ten we keep it in a light reduction. The exact color seems to depend primarily on how heavily it's reduced: its different colors are distinct enought that I (and my students) use it as a measuring stick after the firing to judge the intensity of reduction. In case you are interested: ,Oxidation: glossy, crazed, very light green 2Neutral: clear (no color) crazed, slight pigskin (dimpling) on surface 3Light reduction: very dark burgundy, almost black- heavy pigskinning on surface cMedium to heavy reduction: bright cherry red, semi-transparent, smooth glossy surface. Beautiful! cHeavy reduction: some blue appears, surface can mottle, or begin to take on a matt appearance-also quite nice. 7Extremely heavy reduction: matt surface some bubbling, !lots of blue mixed with the red. lOf all the reds I tried, this one seems to be the most dependable, and has become the standard around here. 8----Pete Pinnell, who now prefers a red terra sigilatta ) This glaze is from that same Grad thesis?? Notes on this glaze say, "Green to Black where thick. Over reduction may result in Copper reds. From Tom Dimig." Glaze Type: Ca Na CopperRed. Opacity: ??. Firing type: Reduction From Val Cushing. *- Revised by adding more flint to make a slightly lower thermal expansion and stop crazing. This was the best clear I found in testing about 9 or 10 clear recipes. Many were good clears but had a slight celadon tinge. This one is stable, clear and light grey over white stoneware with no appreciable greenish hue. No crazing over the shop clay bodies (commercially available west coast stoneware clays). Sample picture is on very white porcelain. ' Also known as Hi Alumina Matt - This glaze is essentially Rhodes #32 from "Clay and Glazes." Can pick up a pinkness in areas during firing. Very flat soft matte white. Nice on porcelain (sample picture). ' Revised to replace Albany slip with Red Art clay. Most red earthenware clays would probably work, but the glaze may vary if not recalculated with the new clay. Richard Burkett 1995 ' Substitute Barnard clay for Albany and it's still amber, but darker and less yellowish. Glaze Type: Ca SlipGlaze. Opacity: Varies. Firing type: Reduction From Val Cushing. *, WThis one works quite well on bisqueware, but keep the coating quite thin (the slip should be about like water in consistency). Dampening the bisque helps greatly to help the slip stick without peeling. Use more calcined clay and less EPK if peeling continues to be a problem. Can be used on dry greenware-spray the ware (take care not to crack the ware with thick applications). Increase the red clay a percentage or two for darker slips and flashing. C-red (Carbondale red) clay would be a good substitute. Use RedArt if nothing else is available. Sample picture is on white stoneware, soda fired. & From Jamie Walker via Craig Bachman. Works well over slips. Colorants: Beige 10% Rutile. Brown 10% Mason 6134. Yellow 7% Mason 6485. When sprayed it develops a finely pebbled surface even when fairly thin. When brushed it breaks into a more platelet-like crawl. Can be fired to a higher temperature to get a glossier surface and more rounded globs of glaze. Good response to colored stains brushed or sprayed over. Try this over dark slips or engobes for a dramatic effect. You can make this glaze bead up just by spraying it on thickly or at least somewhat drier than normal (step back from the piece while spraying so that the droplets of sprayed glaze dry out a bit before they get to the piece), so that the surface is very pebbly BEFORE firing. You can control whether it is a fine pebble or large beads this way - Thicker=glassy beads, thinner=fine pebble. Brushing or pouring it tends to make it break into more flat platelets, although firing a bit higher will usually convert a thickly crawl glazed piece to bead-like droplets. Doing this with any crawl-type glaze, along with firing the glaze a bit hotter, will help promote beading. & Somewhat crusty black where thick when 10% copper carb is used. 4% copper carbonate gives a green. Nice waxy white matte with no colorants. LUse barium carb for more turquoise with copper, but will not be food safe. & $revised to use more available frits ) Penland glaze class 2004 Ea dependable clear glaze that shouldn't craze over most clay bodies. ) :Helen Mackersie via Lana Wilson. Penland glaze class 2004 Beautiful on porcelain - very yellow rivulet ash glaze color. Apply very thinly as it runs (rivulets of glaze), turns a darker yellow tan, and pinholes badly if too thick. ) Penland glaze 2004 'A cool, dark mint green lustery matte. 9Use as base with following strontium versions of glazes: #CHARTREUSE: dark mint, matte green BS BLUE: matte turquoise !FAKE ASH: matte, dark mint green +Tested on white stoneware by Chris. Miller & 8Altered form of VC 4 - a cone 6 fake ash glaze. RB 1992 & Like Robbin's Egg Blue Raku, but without the Cornwall stone. %~ 4revised with Strontium carbonate - SDSU raku glaze % dThis glaze comes from SDSU grad student Mark Messenger. This is a nice,dependable crawl glaze. Fine to almost no crawling when very thin. Large platelets of glaze when thicker, but they may flake off. Fired to cone 04 this glaze becomes more glassy, giving beads of glaze. For a more crusty surface, sift the dry glaze onto the clay surface, then fire. $ a classic lowfire crawl glaze %w From Pete Pinnell. Supposedly this is a safe Barium glaze, safe to handle before firing and with no Barium release after firing. One would be wise to have it checked by a lab before making ware for food use. He suggests that you can directly substitute Pemco frit P-626 for the frit 3289. This glaze may settle badly - add the bentonite or a similar material. Epsom salts or another flocculant may also be required. % 6Note: at c/6-8 this makes an interesting matte glaze. %c from Linda Arbuckle $ {Revised to use strontium instead of barium carbonate for safety. Should resemble the yellow color of a classic lead glaze. %l .Use with colors that need a Boron-free glaze. %] IReformulated from Ric's Majolica which used frit P-311 or 3124. This glaze is roughly half the cost of fully fritted glaze. Seemed to work well in test, but it needs further testing on actual work. Revised 3/21/91 - RB. Use these Duncan EZ-stroke transparent underglazes as overglaze wash for color: 003, EZ004, EZ007, EZ012, EZ014, EZ019, EZ020, EZ021, EZ024, EZ025, EZ027, EZ028, EZ030, EZ032, EZ053 (lip red), EZ161. Most others will work.EZ017 is slightly dry, EZ006 is quite dry - not recommended. Cover coat CC 154 works as well. Most other Cover Coat colors will work when quite thin, but will be dry if thick. Try adding a teaspoonful of frit or gerstley borate to a jar of CC underglaze for glossier color. Other color possibilities include washes of the common colorants (mix chrome and rutile 50/50 with gerstley borate or frit). $ Use the following for painting colors over the RAW unfired glaze: 40% Mason Stain, 60% Frit 3124 + liq. laundry starch +water. Bentonite+ epsom salts may be needed in these washes to keep the stain/frit mixture in suspension. Paint on as a thin wash. $ Egyptian blue gloss. +N `revised from the original to use whiting instead of wollastonite (gets lumpy - needs screening) 8Original recipe found by Linda Litteral 1998 undergrad. Original revision of glaze was just a little too opaque and not quite glossy enough for a good celadon, revised again to lower one cone as original looked best if fired to close to cone 11. Could be made with 1% red iron oxide for a slightly darker green. SDSU SDSU Shop Glaze 2004 Sample picture is on very white porcelain. +c Applied thin then it is transparent. Applied thick then it bubbles up and it looks like it should got to a higher cone temperature. +b 'Very runny glaze. Transpsrent as well. +k +a IA stable glaze that covers up details. has some melting patterns in it. +` +l +_ 0.005 -- then -- put "contains Lithium oxide." into GlazeKind -- --if CantCalcThermEx(gCalcAll,GlazeKind) is not empty then exit mouseup -- end if -- if line 6 of fld "R2O">0.005 -- then -- put "contains Fluorine." into GlazeKind -- --if CantCalcThermEx(gCalcAll,GlazeKind) is not empty then exit mouseup -- end if -- if line 12 of fld "R2O">0.005 -- then -- put "contains Strontium oxide." into GlazeKind -- --if CantCalcThermEx(gCalcAll,GlazeKind) is not empty then exit mouseup -- end if if fld "Surface" is empty then if gCalcAll is not "Quick Calc" then answer "Is this a matte glaze?" with "Don't know" or "Yes" or "No" if it is "yes" then put "matte" into fld "Surface" else if it is "Don't know" then put "?" into fld "Surface" else put "shiny glossy" into fld "Surface" end if end if end if -- if fld "Surface" contains "mat" or fld "Surface" contains "Slip"\ -- or fld "Surface" contains "Engobe" -- then -- put "is a matte glaze." into GlazeKind -- --if CantCalcThermEx(gCalcAll,GlazeKind) is not empty then exit mouseup -- end if -- if GlazeKind is not empty then -- show btn "TEWarning" -- else hide btn "TEWarning" set numberFormat to 0.00 put fld "R2O" into Fluxes put fld "R2O3" into Stabilizers put fld "RO2" into GlassFormers put theThermExpansion(Fluxes,Stabilizers,GlassFormers) into fld "ThermalExpansion" end mouseUp function CantCalcThermEx gCalcAll,GlazeKind if GlazeKind contains "Lithium" or GlazeKind contains "Strontium" then put "The thermal expansion should be lower with increasing amounts, but large amounts may have an unpredictable effect." into GlazeEffect if gCalcAll is not "Quick Calc" then answer "This glaze " & GlazeKind & return & "The thermal expansion cannot be accurately calculated."\ & return & return & "Do you want to calculate it anyway?" with "Don't Calc" or "Calculate" if it is "Don't Calc" then return "exitMouseup" else return "" else return "" end CantCalcThermEx function theThermExpansion Fluxes,Stabilizers,GlassFormers -- 1990-1992 Richard Burkett -- This one works! 6/24/92 Script for Glaze Cards and the Glaze Calculator. put 0.000 into TotSum put 0.000 into TExp put "0,0,0,0,0,0,0,0,0,0,0,0,0,0,0," into myFlux put "0,0,0,0,0,0,0,0,0," into myStabilizer put "0,0,0,0,0,0,0,0,0," into myGlass put 0.000 into myMolWt put 0.000 into temp put 0.000 into myTemp put empty into CoeffTE put empty into mystring put Fluxes into myFlux put Stabilizers into myStabilizer put GlassFormers into myGlass repeat with i=1 to 12 if line i of myFlux is empty then put "0.00" into line i of myFlux end repeat repeat with i=1 to 7 if line i of myStabilizer is empty then put "0.00" into line i of myStabilizer end repeat repeat with i=1 to 6 if line i of myGlass is empty then put "0.00" into line i of myGlass end repeat put "94.192,61.98,56.08,40.32,39.88,153.36, 223.21,81.38,79.54,74.94,74.69,103.62,"\ into FluxWts repeat with i=1 to 12 put line i of myFlux into myString put myString^1 into myTemp put (item i of FluxWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of MyFlux end repeat put "101.94,69.64,159.694,141.6, 291.52,152.02,181.9," into StabWts repeat with i=1 to 7 put line i of myStabilizer into myString put myString^1 into myTemp put (item i of StabWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myStabilizer end repeat put "60.06,79.9,123.22,150.69,86.93,18.998," into GlassWts repeat with i=1 to 6 put line i of myGlass into myString put myString^1 into myTemp put (item i of GlassWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myGlass end repeat put the fluxTEpref of btn "estimated thermal expansion:" into myFluxCoeffs if myFluxCoeffs is "default" or myFluxCoeffs is empty then put "3.3,3.9,1.5, 0.3,2.0,1.3, 0.8,1.0,2.2, 4.4,4.0,1.372," into FluxCoeffs else put myFluxCoeffs into fluxCoeffs repeat with i=1 to 12 put line i of MyFlux into myString put (myString)^1 into myTemp put (item i of FluxCoeffs)^1 into CoeffTE add (myTemp/TotSum)*CoeffTE to TExp end repeat put the StabilizerTEPref of btn "estimated thermal expansion:" into myStabilizerCoeffs if myStabilizerCoeffs is "default" or myStabilizerCoeffs is empty then put "0.61,0.29, 4.0,2.0, 3.6, 5.1," into StabCoeffs else put myStabilizerCoeffs into StabCoeffs repeat with i=1 to 6 put line i of MyStabilizer into myString put myString^1 into myTemp if i=2 then put (myTemp/TotSum) into pctBoron if pctBoron<=0.12 then add PctBoron*(-1.98) to TExp else add PctBoron*0.29 to TExp else put (item i of StabCoeffs)^1 into CoeffTE add (myTemp/TotSum)*CoeffTE to TExp end if end repeat put the GlassTEPref of btn "estimated thermal expansion:" into myGlassCoeffs if myGlassCoeffs is "default" or myGlassCoeffs is empty then put "0.37,1.5,0.7,2.0,2.2," into GlassCoeffs else put myGlassCoeffs into GlassCoeffs repeat with i=1 to 5 put line i of MyGlass into myString put myString^1 into myTemp put (item i of GlassCoeffs)^1 into CoeffTE add myTemp/TotSum*CoeffTE to TExp end repeat put TExp*10 into TExp return TExp end theThermExpansion 2i GlassTEPrefDefault FluxTEPrefDefaultStabilizerTEPrefDefault0calculates estimated thermal expansion of glazecThermal ExpansioncREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect306,244,421,271 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1076altId99 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelThermal Expansion autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameEstimated Thermal Expansion:icon0toolTip/calculates estimated thermal expansion of glazelayer75 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736441 5Date:`E 1on mouseUp if the optionKey is down then put the date into field "date" else if fld "Date" is empty then put the date into field "date" else answer "Hold down the Option [ALT] Key and click to replace current date with today's date!" with "OK" end if end if end mouseUp 3&)option [ALT] click to enter today's dateEcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect306,275,344,291 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1077altId69 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameDate:icon0toolTip(option [ALT] click to enter today's datelayer76 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736442 W GlazeType)H z"Click on 'Glaze Type:'rcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect377,207,511,237multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1111altId114autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name GlazeTypetoolTipvGridfalse listBehaviorfalselayer77visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736443 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + 7thermalExpansionmH *acREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect420,254,458,270multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1079altId97autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0namethermalExpansiontoolTipvGridfalse listBehaviorfalselayer78visibletrue cantSelectfalse borderWidth2margins8 htmlText

7.14

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736444 + 9.46 + 8.27 + 7.23 + 6.95 ' 7.44 ( 7.26 $ 7.75 (2 7.83 ) 8.02 *- 7.00 ' 7.89 ' 10.35 ' 7.70 *, 6.33 & 8.15 & 9.60 & 6.76 ) 6.79 ) 9.08 ) 9.37 & 10.58 & 5.89 & 5.96 & 6.54 & 7.65 & 7.83 & 7.88 &g 6.32 &f 10.64 & 6.58 &K 8.60 &- 5.78 &I 8.33 ) 8.63 (@ 9.23 ) 7.69 ) 7.31 ( 8.86 */ 8.71 (t 8.66 (w 8.71 *+ 8.07 (K 8.92 (B 8.36 +S 7.24 (8 8.58 ( 8.03 ( 9.89 ( 8.33 ( 8.46 ' 7.72 ' 6.72 'j 5.90 ' 8.04 % 11.66 % 8.84 %~ 8.41 % 7.18 $ 8.27 %w 5.38 % 5.90 %c 7.48 $ 7.72 %l 7.01 %] 5.51 $ 7.75 $ 8.59 +N 6.75 +c 8.13 +b 8.40 +k +a 5.64 +` 4.75 +l 8.62 +_ 8.68 +n 11.06 +^ 11.06 +] 6.24 +t 7.66 +\ 7.75 +[ 5.61 +o 8.34 +Z 4.28 +Y 5.91 + 7.22 + 7.10 + 7.07 + 7.63 + 7.38 + 7.33 + 7.16 + 7.16 + 7.20 + + + 7.16 +X 7.03 + 5.93 +W 5.61 + 5.83 + + 7.19 + 7.19 + 9.07 + 6.51 + + 6.06 + 6.32 + + 8.56 +m 7.07 +V 9.15 +j 9.08 +i +U 9.00 +p 6.46 + 6.04 + 7.45 + 8.44 + 6.16 + 8.58 + 7.27 +T 6.46 +s 6.63 +h 6.57 +r 7.71 +g 7.67 + 8.81 +q 8.71 +f 5.91 +e 5.77 + 7.80 + 7.79 + 5.58 + 6.01 + 6.32 + 7.34 + 4.98 + 4.83 + 5.66 + 6.53 +d 6.74 + 9.40 + 9.23 + 9.05 + 8.78 + 8.39 + 8.12 + 8.26 + 8.51 + 8.65 + 8.78 +~ 14.22 +} 13.92 +| 13.32 +{ 12.15 +z 11.90 +y 5.82 +x 6.31 +w 6.61 +v 7.11 + 6.04 + 9.81 + 8.70 + 7.98 + 8.21 + 8.05 + 7.81 + 7.89 + 7.67 +u 7.53 + 9.84 + + 6.88 + + + + 6.66 + 8.30 + + 9.08 + 8.06 + 7.51 + + 8.58 + 5.97 + + + + + + 8HazardsIh .rT)cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight13rect 4,558,374,642multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid1080altId41autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameHazardstoolTipvGridfalse listBehaviorfalselayer79visibletrue cantSelectfalse borderWidth2margins8 htmlText\

Flint: free silica-wear a NIOSH approved dust mask when handling dry material

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736445 + ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + ATalc: wear a NIOSH approved dust mask when handling dry material OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ' ( OSilica: free silica-wear a NIOSH approved dust mask when handling dry material $ Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. (2 NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ) NFlint: free silica-wear a NIOSH approved dust mask when handling dry material *- NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ' ' OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ' NFlint: free silica-wear a NIOSH approved dust mask when handling dry material *, & & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ) NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ) ) & ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & &g NFlint: free silica-wear a NIOSH approved dust mask when handling dry material &f ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material & NFlint: free silica-wear a NIOSH approved dust mask when handling dry material &K NFlint: free silica-wear a NIOSH approved dust mask when handling dry material &- NFlint: free silica-wear a NIOSH approved dust mask when handling dry material &I NFlint: free silica-wear a NIOSH approved dust mask when handling dry material Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. ) (@ 2Wood Ash: caustic-avoid contact with skin or eyes OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ) ) NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ( ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. */ ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material (t ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material (w ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists *+ ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material RChrome Oxide: all chromium compounds should be viewed as potentially carcinogenic eManganese Dioxide: TOXIC-avoid inhalation-wear a NIOSH approved dust mask when handling dry material (K OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material (B +S NFlint: free silica-wear a NIOSH approved dust mask when handling dry material (8 ( OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material ( =Hardwood Ash: caustic material, use hand and eye protection. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material 0Nickel Oxide: can cause allergic skin reactions ( NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ( OSilica: free silica-wear a NIOSH approved dust mask when handling dry material RChrome Oxide: all chromium compounds should be viewed as potentially carcinogenic ' NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ' NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material 'j ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ' OSilica: free silica-wear a NIOSH approved dust mask when handling dry material % % NFlint: free silica-wear a NIOSH approved dust mask when handling dry material %~ NFlint: free silica-wear a NIOSH approved dust mask when handling dry material % MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. $ MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material %w % ATalc: wear a NIOSH approved dust mask when handling dry material %c $ %l NFlint: free silica-wear a NIOSH approved dust mask when handling dry material Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. %] Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. OSilica: free silica-wear a NIOSH approved dust mask when handling dry material $ Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. $ MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. +N ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +c +b +k +a OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material +` NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +l OSilica: free silica-wear a NIOSH approved dust mask when handling dry material MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. +_ OSilica: free silica-wear a NIOSH approved dust mask when handling dry material +n NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists +^ +] ATalc: wear a NIOSH approved dust mask when handling dry material +t NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +\ +[ OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material +o +Z OSilica: free silica-wear a NIOSH approved dust mask when handling dry material +Y OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material + + + + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. + + + + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. +X + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists +W OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material RChrome Oxide: all chromium compounds should be viewed as potentially carcinogenic + + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ]Barium Carb: HIGHLY Toxic-avoid ingestion. Do not use in glazes intended for use with food. + + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +m 6Green Nickel Oxide: can cause allergic skin reactions +V OSilica: free silica-wear a NIOSH approved dust mask when handling dry material 6Green Nickel Oxide: can cause allergic skin reactions +j +i +U +p OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + ATalc: wear a NIOSH approved dust mask when handling dry material kCryolite: Possibly Toxic - avoid breathing dust. Properly ventilate kilns - releases Fluorine when fired. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material MPearl Ash: CAUSTIC and soluble - avoid skin contact and inhalation of mists. + kCryolite: Possibly Toxic - avoid breathing dust. Properly ventilate kilns - releases Fluorine when fired. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +T OSilica: free silica-wear a NIOSH approved dust mask when handling dry material +s ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +h +r ATalc: wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +g + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +q ATalc: wear a NIOSH approved dust mask when handling dry material +f OSilica: free silica-wear a NIOSH approved dust mask when handling dry material ATalc: wear a NIOSH approved dust mask when handling dry material +e + + + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + + + + + +d + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +~ ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +} ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +| ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +{ ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +z ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +y NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +x NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +w NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +v NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material 6Green Nickel Oxide: can cause allergic skin reactions + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material 6Green Nickel Oxide: can cause allergic skin reactions + ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material +u NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material ISoda Ash: caustic-avoid contact with skin or eyes or inhalation of mists + + MBorax: moderately toxic-avoid ingestion or contact with open cuts or wounds. OSilica: free silica-wear a NIOSH approved dust mask when handling dry material + + + + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. + ATalc: wear a NIOSH approved dust mask when handling dry material + + Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material Barium Carbonate: HIGHLY Toxic-avoid ingestion. Glazes containing barium may not be safe for ware intended for use with food - test them for barium release. + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + NFlint: free silica-wear a NIOSH approved dust mask when handling dry material + + + + + + 9`@j/ R:nextC? zon mouseup global gComplexSearch,gCalcAll,gHGImageFolderLoc put empty into gComplexSearch put empty into gCalcAll if the hilite of btn "viewMarked" is true then go to next marked card if the result is not empty then answer "There are no marked cards!" Send mouseup to btn "viewMarked" end if else go to next card end if if the visible of stack "Glaze Picture" is true then push card put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" pop card end if end mouseup "UcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 489,27,521,53 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1082altId85 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedtrue showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenamenexticon200946toolTiplayer80 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736446 ;prevC? on mouseup global gComplexSearch,gCalcAll,gHGImageFolderLoc put empty into gComplexSearch put empty into gCalcAll if the hilite of btn "viewMarked" is true then go to previous marked card if the result is not empty then answer "There are no marked cards!" Send mouseup to btn "viewMarked" end if else go to the previous card end if if the visible of stack "Glaze Picture" is true then push card put (fld "JPEGLoc" of stack "Glazes") into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" pop card end if end mouseup  T cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 455,27,487,53 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1083altId84 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameprevicon202249toolTiplayer81 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736447 =DateiH Z8cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect341,272,511,289multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1085altId56autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameDatetoolTipvGridfalse listBehaviorfalselayer82visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736448 + + + + ' 4/1/04 ( 8/22/99 $ 8/5/93 (2 1/15/94 ) *- 11/9/94 ' ' 9/10/95 ' *, 1/26/03 & & 11/22/92 & 9/2/2001 ) ) ) & 6/4/92 & 11/27/90 & 6/22/92 & & 11/10/91 & 12/1/91 & &g 11/30/96 &f 12/9/91 & 2/20/95 &K 8/29/92 &- 1/26/95 &I ) 4/29/94 (@ ) 4/3/93 ) ( */ 5/11/03 (t 11/21/02 (w *+ 5/3/92 (K 7/12/88 (B +S (8 ( ( ( 11/16/91 ( ' ' 'j ' % Sunday, November 11, 1990 % 9/28/92 %~ % $ %w 2/22/92 % %c 2/2/92 $ 5/3/95 %l %] 3/21/91 $ $ 31/10/93 +N 4/14/99 +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + >lb/gmKX on mouseup global BatchSize put the short name of the target into myField if field myField is not in "lb,gm,lb/oz" then put "Gm" into field myField get field myField if it is "lb" then put "Gm" into field myField set numberformat to 0.000 put field "TotBatch"*453.592 into BatchSize put BatchSize into field "TotBatch" else if it is "gm" then put "lb/oz" into field myField set numberformat to 0.000 put fld "TotBatch"/453.592 into BatchSize put BatchSize into field "TotBatch" else if it is "lb/oz" then put "Lb" into field myField set numberformat to 0.000 end if doNewBatch if it is empty then put "gm" into field myField end mouseup S' /click to change batch between grams and poundsZcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 270,79,309,94multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1086altId90autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namelb/gmtoolTip.click to change batch between grams and poundsvGridfalse listBehaviorfalselayer83visibletrue cantSelectfalse borderWidth2margins4 htmlText

gm

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736449 + gm + gm + gm + gm ' gm ( gm $ Gm (2 gm ) Gm *- Lb ' Lb ' Gm ' Gm *, gm & Gm & gm & gm ) gm ) gm ) gm & gm & gm & gm & Gm & gm & gm & Gm &g Gm &f gm & gm &K gm &- gm &I gm ) Gm (@ Gm ) gm ) Gm ( Lb */ gm (t gm (w Gm *+ gm (K gm (B Gm +S gm (8 Lb ( Lb ( Gm ( gm ( Gm ' gm ' Lb 'j gm ' Gm % gm % gm %~ gm % Gm $ Gm %w gm % Gm %c gm $ gm %l Gm %] Gm $ Gm $ Gm +N gm +c gm +b gm +k gm +a gm +` gm +l gm +_ gm +n gm +^ gm +] gm +t gm +\ gm +[ gm +o gm +Z gm +Y gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm +X gm + gm +W gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm +m gm +V gm +j gm +i gm +U gm +p gm + gm + gm + gm + gm + gm + gm +T gm +s gm +h gm +r gm +g gm + gm +q gm +f gm +e gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm +d gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm +~ gm +} gm +| gm +{ gm +z gm +y gm +x gm +w gm +v gm + gm + gm + gm + gm + gm + gm + gm + gm + gm +u gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm + gm ?CHX on mouseup if the optionKey is down then if charToNum(field "C")=67 then put "c" into field "C" else put "C" into field "C" end if else answer "Hold down the Option [ALT] key and click to change cone size." end mouseup @.%6option [ALT] click to change from large to small coneDcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight24rect 300,35,321,71multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1087altId68autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameCtoolTip5option [ALT] click to change from large to small conevGridfalse listBehaviorfalselayer84visibletrue cantSelectfalse borderWidth2margins8 htmlText

C

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088712736450 + C + C + C + C ' C ( C $ C (2 C ) C *- C ' C ' C ' C *, C & C & C & C ) C ) C ) C & C & C & C & c & C & C & C &g C &f C & C &K C &- C &I C ) C (@ C ) C ) C ( C */ C (t C (w C *+ C (K C (B C +S C (8 C ( C ( C ( C ( C ' C ' C 'j C ' C % C % C %~ C % C $ C %w C % C %c C $ C %l C %] C $ C $ C +N C +c C +b C +k C +a C +` C +l C +_ C +n C +^ C +] C +t C +\ C +[ C +o C +Z C +Y C + C + C + C + C + C + C + C + C + C + C + C + C +X C + C +W C + C + C + C + C + C + C + C + C + C + C + C +m C +V C +j C +i C +U C +p C + C + C + C + C + C + C +T C +s C +h C +r C +g C + C +q C +f C +e C + C + C + C + C + C + C + C + C + C + C +d C + C + C + C + C + C + C + C + C + C + C +~ C +} C +| C +{ C +z C +y C +x C +w C +v C + C + C + C + C + C + C + C + C + C +u C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + C + CI CommentsE  Aon mouseUp send mouseup to button "Unity Formula" end mouseUp `r#enter notes about this recipe here9cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 4,352,374,368 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1097altId57 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCommentsicon0toolTip"enter notes about this recipe herelayer85 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736451 MHealth Hazardse   33"r/possible hazards from ingredients in the glaze;Possible Health HazardscREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 4,546,374,561 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors153,0,51 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1101altId59 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelPossible Health Hazards autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameHealth Hazardsicon0toolTip.possible hazards from ingredients in the glazelayer87 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736453 S Batch Cost@E -- bg btn for Batch Cost on mouseUp if fld "Cost" is empty then answer "Please calculate this glaze first to get cost information from the Materials stack." exit mouseup end if if the optionKey is down then put true into BaseOnly else put false into BaseOnly hide message set the cursor to busy put empty into noPrices put empty into totalCost if the short name of bg btn id 165 is "$" then if field "Lb/Gm" is "gm" then put 453.59237 into conversionFactor else put 1 into conversionFactor else if field "Lb/Gm" is "gm" then put 1000 into conversionFactor else put 2.2046226 into conversionFactor end if if BaseOnly then put 10 into HowManyIngred else put 14 into HowManyIngred set numberFormat to 0.00 if fld "TotBatch" >0 and fld "Cost" is not ("X" & return) then put Cost(HowManyIngred,conversionFactor) into CostOfItems -- XFcn:Cost put item 1 of CostOfItems into TotalCost if baseOnly then put totalCost*1 & " (base glaze)" into fld "BatchCost" else put totalCost*1 into fld "BatchCost" if item 2 of CostOfItems is not empty then -- put "No price info on: " & item 2 to 15 of CostOfItems put "+ Unknown: " & (item 2 to 15 of CostOfItems) after fld "batchCost" end if else if fld "Cost" is ("X" & return) then put "unknown" into fld "BatchCost" else put "0.00" into fld "BatchCost" end mouseUp function Cost HowManyIngred,conversionFactor -- 1990-1993 Richard Burkett -- this is the current version 8/18/93 for the HyperGlaze (Glaze & Clay) stack put 0 into i put 0.00 into totalCost put 0.000 into amount put empty into noPrices put "" into TheIngredients put "" into TheAmounts -- set the numberformat to 0 repeat with i=1 to HowManyIngred put ("amount" & i) into whichField put ("ingredient" & i) into whichIngred if field whichIngred is not empty then put field whichingred & return after TheIngredients put field whichField & return after TheAmounts end if end repeat -- set the numberformat to 0.00 put (field "totBatch")/100.0 into batchFactor repeat with i=1 to number of lines of TheIngredients if line i of TheIngredients is not empty then if char 1 of line i of field "cost" is not in " 1234567890." then if char 1 of line i of TheIngredients is not "(" and char 1 of line i of TheIngredients is not "[" then put (line i of TheIngredients) & ", " after NoPrices next repeat end if next repeat end if else next repeat put (line i of TheAmounts)*batchFactor into amount add ((amount)*(line i of field "cost"))/(conversionFactor) to TotalCost end repeat put TotalCost & "," before noPrices return noPrices end Cost 3'C'recalculates the cost of current batchjcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect306,294,373,310 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1107altId106 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename Batch Costicon0toolTip&recalculates the cost of current batchlayer88 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736454 T BatchCost)H ~$:kcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect376,290,522,350multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1108altId107autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name BatchCosttoolTipvGridfalse listBehaviorfalselayer89visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736455 + 0.01 + 0.02+ Unknown: Salt, + 0.01 + 0.05 ' 6.99 ( 0.05 $ 0.28+ Unknown: Burnt umber, (2 1.94+ Unknown: Epsom salts, ) 0.04 *- 2.51+ Unknown: epsom salts, ' 3.69 ' 1.60 ' 0.06 *, 0.79 & 2.85 & 0.09 & 0.04+ Unknown: Epsom salts, ) 0.71 ) 0.03+ Unknown: crocus martis, ) 0.05 & 0.02 & 1.14 & 0.02 & !0.03+ Unknown: Ferro Frit 3247, & 0.02 & 0.03 & 0.09 &g 2.00+ Unknown: Epsom salts, &f 0.02 & 0.02 &K 0.02+ Unknown: Opax, &- 0.01+ Unknown: Black stain, &I 0.03 ) 2.57+ Unknown: Epsom Salts, (@ 2.56 ) 0.62 ) 1.33 ( 3.24 */ 1.54 (t 0.09 (w 1.62+ Unknown: F-4 Feldspar, *+ 4.59 (K 0.79 (B 1.83 +S (8 6.21 ( 6.52 ( 6.09 ( 7.39 ( 2.36 ' 2.08 ' 0.89 'j 0.03+ Unknown: cobalt, ' 0.62+ Unknown: F-4 Feldspar, % 6.36 % 0.12 %~ 3.60 % 3.67 $ 0.09 %w !0.00+ Unknown: Ferro Frit 3289, % "0.13+ Unknown: Commercial Stain, %c 2.06+ Unknown: tin, $ 0.28+ Unknown: burnt umber, %l 0.26 %] 0.20 $ 6.21 $ 0.08 +N +c 60.01+ Unknown: Tennessee #1 SGP Ball Clay, Barnard, +b 0.04 +k +a 0.04+ Unknown: Ziropax, +` 0.03 +l #0.09+ Unknown: Titianium Dioxide, +_ #0.08+ Unknown: Titianium Dioxide, +n 0.08 +^ 0.08 +] 0.07 +t 0.05 +\ 0.05+ Unknown: SGP Ball Clay, +[ 0.02+ Unknown: Lavender #6333, +o #0.02+ Unknown: Colbalt Carbonate, +Z #0.02+ Unknown: Colbalt Carbonate, +Y 0.06 + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + + + 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, +X 80.04+ Unknown: Magganese Carbonate, Colbalt Carbonate, + 0.03 +W 0.04 + 0.07 + + 1.14+ Unknown: Mason #292, + 1.14+ Unknown: Mason #6371, + #1.92+ Unknown: Black Stain #6600, + 0.03+ Unknown: Barium, + + 0.02 + -0.02+ Unknown: Tennessee #1 SGP Ball Clay, + + 0.04 +m 0.07+ Unknown: Nickel, +V 0.07+ Unknown: Nickel, +j 0.03 +i +U 0.02 +p #0.03+ Unknown: Colbalt Carbonate, + 0.04 + '0.06+ Unknown: Pyrophyllite, Ziropax, + 0.03 + 10.02+ Unknown: Pyrophyllite, Colbalt Carbonate, + #0.08+ Unknown: Titianium Dioxide, + #0.03+ Unknown: Colbalt Carbonate, +T #0.03+ Unknown: Colbalt Carbonate, +s ?0.03+ Unknown: Tennessee #1 SGP Ball Clay, Cobalt Carbonite, +h ?0.03+ Unknown: Tennessee #1 SGP Ball Clay, Cobalt Carbonite, +r 0.04+ Unknown: Pyrophyllite, +g 0.05 + "0.03+ Unknown: Inclusion yellow, +q 0.03+ Unknown: Yellow #239416, +f 0.02+ Unknown: Yellow #239416, +e 10.04+ Unknown: SGP Ball Clay, Cobalt Carbonate, + 0.07+ Unknown: SGP Ball Clay, + 0.06+ Unknown: SGP Ball Clay, + 0.01+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, + 0.02+ Unknown: SGP Ball Clay, +d 0.02+ Unknown: SGP Ball Clay, + 0.09 + 0.09 + 0.09 + 0.09 + 0.08 + 0.07 + 0.08 + 0.08 + 0.08 + 0.09 +~ 0.07 +} 0.07 +| 0.07 +{ 0.07 +z 0.06 +y 0.07 +x 0.07 +w 0.07 +v 0.05 + 0.04 + 0.10+ Unknown: G-200, + 0.06+ Unknown: G-200, + 0.05 + 0.05 + 0.05 + 0.05 + 0.04 + 0.05 +u 0.05 + 0.07 + + 0.08+ Unknown: Cobalt, + + + + 0.97 + 1.26 + + 0.05 + 0.04 + 0.06 + + 0.02 + 0.03 + + + + + + ^PercentAnalysish}pcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight15rect380,366,516,643multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1118altId148autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namePercentAnalysistoolTipvGridfalse listBehaviorfalselayer91visibletrue cantSelectfalse borderWidth2margins14 htmlText

62.15 % SiO2

17.79 % Al2O3

1.90 % B2O3

1.64 % K2O

3.98 % Na2O

7.32 % CaO

1.35 % MgO

0.25 % Li2O

3.33 % ZnO

0.14 % Fe2O3

0.04 % P2O5

0.09 % TiO2

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736458 +  59.60 % SiO2     24.32 % Al2O3        3.73 % K2O      10.93 % Na2O      0.62 % CaO  0.18 % MgO  0.33 % Fe2O3        0.30 % TiO2    +  63.01 % SiO2     23.44 % Al2O3        3.80 % K2O      7.67 % Na2O      0.62 % CaO  0.95 % MgO  0.25 % Fe2O3        0.24 % TiO2    +  67.53 % SiO2     13.14 % Al2O3        2.91 % K2O      3.85 % Na2O      8.54 % CaO  3.79 % MgO  0.16 % Fe2O3        0.05 % TiO2     0.03 % MnO2    +  54.79 % SiO2     23.57 % Al2O3        2.61 % K2O      5.45 % Na2O      0.53 % CaO  12.96 % MgO  0.07 % Fe2O3        0.04 % TiO2    '  43.88 % SiO2     16.86 % Al2O3        3.33 % K2O      7.10 % Na2O      0.48 % CaO  28.35 % MgO (  60.44 % SiO2     14.09 % Al2O3        3.21 % B2O3        5.32 % K2O      2.25 % Na2O      13.63 % CaO  0.79 % MgO  0.23 % Fe2O3        0.06 % TiO2    $  53.69 % SiO2     12.71 % Al2O3        12.08 % B2O3        0.67 % K2O      5.56 % Na2O      12.46 % CaO  0.01 % MgO  2.74 % BaO  0.05 % Fe2O3        0.03 % TiO2    (2  61.84 % SiO2     13.90 % Al2O3        3.21 % B2O3        8.08 % K2O      3.04 % Na2O      9.38 % CaO  0.40 % MgO  0.15 % Fe2O3       )  62.76 % SiO2     16.47 % Al2O3        2.39 % K2O      4.69 % Na2O      13.34 % CaO  0.12 % MgO  0.16 % Fe2O3        0.05 % TiO2    *-  71.28 % SiO2     12.40 % Al2O3        4.48 % K2O      1.33 % Na2O      10.30 % CaO  0.02 % MgO  0.12 % Fe2O3        0.04 % P2O5        0.04 % TiO2    '  53.85 % SiO2     21.28 % Al2O3        5.91 % K2O      1.73 % Na2O      11.13 % CaO  5.66 % MgO  0.27 % Fe2O3        0.06 % P2O5        0.10 % TiO2    '  46.00 % SiO2     10.67 % Al2O3        3.06 % K2O      0.46 % Na2O      27.06 % CaO  0.89 % MgO  7.04 % SrO  4.11 % Fe2O3        0.09 % P2O5        0.64 % TiO2    '  64.14 % SiO2     11.45 % Al2O3        1.03 % B2O3        3.67 % K2O      1.25 % Na2O      14.56 % CaO  1.41 % MgO  2.15 % Fe2O3        0.34 % TiO2    *,  56.17 % SiO2     37.81 % Al2O3        1.47 % K2O      2.70 % Na2O      0.33 % CaO  0.19 % MgO  0.60 % Fe2O3        0.08 % P2O5        0.65 % TiO2    &  52.79 % SiO2     20.58 % Al2O3        3.83 % K2O      7.99 % Na2O      0.59 % CaO  14.04 % MgO  0.08 % Fe2O3        0.08 % TiO2    &  50.34 % SiO2     17.58 % Al2O3        2.97 % K2O      6.28 % Na2O      0.47 % CaO  0.08 % MgO  0.94 % Li2O      21.25 % SrO  0.06 % Fe2O3        0.03 % TiO2    &  66.95 % SiO2     6.53 % Al2O3        5.39 % B2O3        1.44 % K2O      6.37 % Na2O      13.29 % CaO  0.03 % MgO )  69.72 % SiO2     13.14 % Al2O3        3.27 % K2O      0.88 % Na2O      12.74 % CaO  0.07 % MgO  0.18 % Fe2O3       )  50.09 % SiO2     14.37 % Al2O3        3.58 % K2O      4.74 % Na2O      9.03 % CaO  5.15 % MgO  12.96 % SrO  0.08 % Fe2O3       )  50.40 % SiO2     13.09 % Al2O3        6.73 % K2O      2.47 % Na2O      6.24 % CaO  0.47 % Li2O      10.56 % ZnO  9.85 % SrO  0.15 % Fe2O3        0.04 % TiO2    &  22.71 % SiO2     4.36 % Al2O3        7.89 % B2O3        0.53 % K2O      6.14 % Na2O      52.07 % CaO  3.72 % MgO  0.18 % Fe2O3        2.39 % P2O5       &  60.95 % SiO2     9.83 % Al2O3        6.56 % B2O3        0.37 % K2O      3.51 % Na2O      18.46 % CaO  0.05 % MgO  0.12 % Fe2O3        0.06 % P2O5        0.09 % TiO2    &  61.02 % SiO2     11.98 % Al2O3        12.83 % B2O3        0.12 % K2O      2.43 % Na2O      9.52 % CaO  1.65 % MgO  0.28 % Fe2O3        0.07 % P2O5        0.10 % TiO2    &  56.82 % SiO2     11.97 % Al2O3        5.38 % B2O3        3.18 % K2O      2.33 % Na2O      8.18 % CaO  0.19 % MgO  11.83 % BaO  0.10 % Fe2O3        0.02 % TiO2    &  53.24 % SiO2     10.51 % Al2O3        14.89 % B2O3        1.30 % K2O      5.51 % Na2O      12.01 % CaO  1.92 % MgO  0.23 % Fe2O3        0.36 % P2O5        0.03 % TiO2    &  55.82 % SiO2     19.22 % Al2O3        3.85 % K2O      2.33 % Na2O      11.83 % CaO  5.02 % MgO  1.53 % Li2O      0.22 % Fe2O3        0.07 % P2O5        0.11 % TiO2    &  54.84 % SiO2     20.92 % Al2O3        3.82 % K2O      2.22 % Na2O      11.14 % CaO  4.88 % MgO  1.36 % Li2O      0.70 % Fe2O3        0.06 % P2O5        0.07 % TiO2    &g  73.70 % SiO2     10.31 % Al2O3        1.67 % B2O3        1.68 % K2O      3.83 % Na2O      7.95 % CaO  0.77 % MgO  0.08 % Fe2O3        0.02 % TiO2    &f  22.67 % SiO2     4.34 % Al2O3        7.86 % B2O3        1.69 % K2O      5.41 % Na2O      51.82 % CaO  3.66 % MgO  0.18 % Fe2O3        2.38 % P2O5       &  51.44 % SiO2     12.94 % Al2O3        17.07 % B2O3        0.09 % K2O      3.23 % Na2O      12.61 % CaO  2.17 % MgO  0.32 % Fe2O3        0.05 % P2O5        0.08 % TiO2    &K  53.95 % SiO2     15.22 % Al2O3        3.18 % K2O      4.22 % Na2O      12.27 % CaO  0.02 % MgO  11.04 % ZnO  0.07 % Fe2O3        0.04 % TiO2    &-  56.58 % SiO2     9.44 % Al2O3        10.06 % B2O3        4.95 % K2O      3.19 % Na2O      14.11 % CaO  1.49 % MgO  0.19 % Fe2O3       &I  64.41 % SiO2     13.65 % Al2O3        0.57 % B2O3        2.28 % K2O      7.00 % Na2O      7.70 % CaO  0.06 % MgO  4.18 % BaO  0.10 % Fe2O3        0.05 % TiO2    )  49.18 % SiO2     16.97 % Al2O3        3.16 % K2O      6.63 % Na2O      7.63 % CaO  4.77 % MgO  0.13 % Fe2O3        0.06 % TiO2     11.47 % ZrO2    (@  60.26 % SiO2     10.81 % Al2O3        8.47 % K2O      2.21 % Na2O      16.01 % CaO  0.95 % MgO  1.29 % P2O5       )  66.54 % SiO2     21.91 % Al2O3        8.40 % K2O      2.49 % Na2O      0.30 % CaO  0.03 % MgO  0.22 % Fe2O3        0.04 % P2O5        0.08 % TiO2    )  69.77 % SiO2     12.11 % Al2O3        4.99 % K2O      1.43 % Na2O      11.24 % CaO  0.09 % MgO  0.18 % Fe2O3        0.18 % TiO2    (  48.22 % SiO2     11.66 % Al2O3        5.30 % K2O      1.53 % Na2O      6.44 % CaO  4.81 % MgO  21.75 % BaO  0.15 % Fe2O3        0.15 % TiO2    */  61.44 % SiO2     24.47 % Al2O3        2.26 % K2O      9.28 % Na2O      0.72 % CaO  0.15 % MgO  0.94 % Li2O      0.50 % Fe2O3        0.09 % P2O5        0.14 % TiO2    (t  61.59 % SiO2     24.36 % Al2O3        3.27 % K2O      8.55 % Na2O      0.71 % CaO  0.14 % MgO  0.88 % Li2O      0.35 % Fe2O3        0.06 % P2O5        0.09 % TiO2    (w  61.28 % SiO2     24.43 % Al2O3        3.65 % K2O      8.20 % Na2O      0.78 % CaO  0.13 % MgO  0.77 % Li2O      0.55 % Fe2O3        0.22 % TiO2    *+  58.97 % SiO2     13.52 % Al2O3        2.78 % K2O      1.71 % Na2O      5.78 % CaO  6.85 % MgO  6.01 % SrO  3.66 % Fe2O3        0.11 % P2O5        0.56 % TiO2     0.03 % MnO2    (K  46.43 % SiO2     16.78 % Al2O3        2.92 % K2O      0.86 % Na2O      31.53 % CaO  1.07 % MgO  0.20 % Fe2O3        0.09 % P2O5        0.10 % TiO2    (B  61.50 % SiO2     21.90 % Al2O3        0.60 % B2O3        3.51 % K2O      7.37 % Na2O      3.93 % CaO  0.25 % MgO  0.68 % Li2O      0.16 % Fe2O3        0.10 % TiO2    +S  68.34 % SiO2     13.65 % Al2O3        5.17 % K2O      1.48 % Na2O      9.86 % CaO  1.32 % MgO  0.18 % Fe2O3       (8  58.15 % SiO2     19.40 % Al2O3        7.27 % K2O      2.16 % Na2O      12.64 % CaO  0.03 % MgO  0.22 % Fe2O3        0.05 % P2O5        0.08 % TiO2    (  64.57 % SiO2     11.37 % Al2O3        5.30 % K2O      1.55 % Na2O      10.47 % CaO  1.92 % MgO  0.05 % Fe2O3        4.74 % P2O5        0.03 % TiO2    (  53.76 % SiO2     10.85 % Al2O3        11.56 % K2O      1.70 % Na2O      10.31 % CaO  7.08 % MgO  0.24 % Fe2O3        3.75 % P2O5        0.16 % TiO2     0.58 % MnO2    (  53.44 % SiO2     15.98 % Al2O3        4.14 % K2O      1.21 % Na2O      14.67 % CaO  4.80 % MgO  0.21 % Fe2O3        5.47 % P2O5        0.07 % TiO2    (  63.91 % SiO2     15.92 % Al2O3        8.19 % K2O      2.46 % Na2O      9.35 % CaO  0.01 % MgO  0.14 % Fe2O3        0.02 % TiO2    '  52.78 % SiO2     17.40 % Al2O3        1.74 % K2O      2.74 % Na2O      9.03 % CaO  5.54 % MgO  10.37 % SrO  0.22 % Fe2O3        0.07 % P2O5        0.11 % TiO2    '  72.47 % SiO2     11.55 % Al2O3        4.00 % K2O      1.16 % Na2O      10.01 % CaO  0.66 % MgO  0.08 % Fe2O3        0.04 % P2O5        0.04 % TiO2    'j  66.48 % SiO2     9.36 % Al2O3        3.79 % B2O3        4.58 % K2O      2.10 % Na2O      6.51 % CaO  6.85 % MgO  0.24 % Fe2O3        0.06 % TiO2     0.03 % MnO2    '  64.48 % SiO2     12.17 % Al2O3        4.56 % K2O      2.41 % Na2O      16.28 % CaO  0.02 % MgO  0.06 % Fe2O3        0.03 % TiO2    %  10.26 % SiO2     1.19 % Al2O3        30.29 % B2O3        5.76 % Na2O      36.48 % CaO  3.78 % MgO  0.27 % Fe2O3        11.97 % P2O5       %  40.52 % SiO2     10.59 % Al2O3        20.92 % B2O3        1.74 % K2O      7.67 % Na2O      15.67 % CaO  2.65 % MgO  0.23 % Fe2O3       %~  38.30 % SiO2     5.63 % Al2O3        24.11 % B2O3        1.60 % K2O      5.04 % Na2O      17.84 % CaO  3.04 % MgO  4.02 % SrO  0.34 % Fe2O3        0.08 % TiO2    %  20.14 % SiO2     11.53 % Al2O3        22.68 % B2O3        0.09 % K2O      4.83 % Na2O      15.14 % CaO  25.20 % MgO  0.31 % Fe2O3        0.08 % TiO2    $  16.50 % SiO2     0.66 % Al2O3        32.15 % B2O3        10.26 % Na2O      11.77 % CaO  28.48 % MgO  0.17 % Fe2O3       %w  49.70 % SiO2     8.75 % Al2O3        11.31 % B2O3        0.05 % K2O      5.02 % Na2O      0.03 % CaO  0.02 % MgO  25.01 % BaO  0.04 % Fe2O3        0.03 % P2O5        0.04 % TiO2    %  63.50 % SiO2     11.20 % Al2O3        0.50 % B2O3        0.87 % K2O      3.10 % Na2O      4.89 % CaO  14.90 % MgO  0.49 % Fe2O3        0.45 % TiO2     0.09 % MnO2    %c  52.48 % SiO2     12.29 % Al2O3        16.57 % B2O3        0.54 % K2O      5.90 % Na2O      12.19 % CaO  0.03 % TiO2    $  54.14 % SiO2     12.84 % Al2O3        12.17 % B2O3        0.67 % K2O      5.59 % Na2O      12.56 % CaO  0.01 % MgO  1.94 % SrO  0.05 % Fe2O3        0.03 % TiO2    %l  61.22 % SiO2     9.73 % Al2O3        0.09 % K2O      6.64 % CaO  0.04 % MgO  4.73 % Li2O      5.49 % BaO  11.76 % ZnO  0.15 % Fe2O3        0.06 % P2O5        0.11 % TiO2    %]  49.44 % SiO2     11.45 % Al2O3        7.54 % B2O3        0.94 % K2O      3.25 % Na2O      7.53 % CaO  0.65 % MgO  4.40 % BaO  2.38 % ZnO  0.17 % Fe2O3        0.04 % P2O5        0.09 % TiO2     12.11 % ZrO2    $  53.71 % SiO2     12.71 % Al2O3        12.10 % B2O3        0.67 % K2O      5.56 % Na2O      12.48 % CaO  0.01 % MgO  2.69 % BaO  0.05 % Fe2O3        0.03 % TiO2    $  50.01 % SiO2     6.34 % Al2O3        15.44 % B2O3        1.21 % K2O      8.49 % Na2O      6.89 % CaO  11.62 % ZnO +N  69.90 % SiO2     13.00 % Al2O3        3.55 % K2O      1.04 % Na2O      11.03 % CaO  1.11 % MgO  0.18 % Fe2O3        0.04 % P2O5        0.16 % TiO2    +c  48.73 % SiO2     14.72 % Al2O3        15.99 % B2O3        4.26 % K2O      1.09 % Na2O      10.12 % CaO  0.44 % MgO  3.41 % Fe2O3        0.49 % TiO2     0.75 % MnO2    +b  51.83 % SiO2     10.53 % Al2O3        15.35 % B2O3        2.60 % K2O      2.46 % Na2O      10.78 % CaO  1.13 % MgO  4.50 % Fe2O3        0.12 % P2O5        0.69 % TiO2    +k +a  61.14 % SiO2     8.37 % Al2O3        7.09 % B2O3        4.84 % K2O      1.39 % Na2O      10.06 % CaO  1.40 % MgO  5.64 % ZnO  0.06 % Fe2O3       +`  58.25 % SiO2     8.99 % Al2O3        10.70 % B2O3        5.00 % K2O      1.42 % Na2O      8.06 % CaO  0.14 % MgO  7.38 % ZnO  0.05 % Fe2O3       +l  57.67 % SiO2     1.93 % Al2O3        1.42 % B2O3        1.19 % K2O      7.98 % Na2O      3.36 % CaO  26.44 % ZnO +_  57.65 % SiO2     1.94 % Al2O3        1.36 % B2O3        1.19 % K2O      8.11 % Na2O      3.34 % CaO  26.41 % ZnO +n  35.89 % SiO2     13.70 % Al2O3        2.70 % K2O      5.79 % Na2O      0.42 % CaO  0.06 % MgO  41.44 % SrO +^  35.85 % SiO2     13.75 % Al2O3        2.70 % K2O      5.79 % Na2O      0.42 % CaO  0.06 % MgO  41.43 % SrO +]  45.50 % SiO2     17.05 % Al2O3        1.26 % B2O3        2.26 % K2O      3.51 % Na2O      1.39 % CaO  21.34 % MgO  7.51 % ZnO  0.12 % Fe2O3        0.06 % TiO2    +t  54.42 % SiO2     22.18 % Al2O3        3.28 % K2O      6.89 % Na2O      0.52 % CaO  12.48 % MgO  0.15 % Fe2O3        0.07 % TiO2    +\  54.21 % SiO2     22.08 % Al2O3        3.44 % K2O      6.86 % Na2O      0.55 % CaO  12.34 % MgO  0.22 % Fe2O3        0.30 % TiO2    +[  60.82 % SiO2     10.03 % Al2O3        6.76 % B2O3        4.66 % K2O      1.31 % Na2O      9.60 % CaO  1.35 % MgO  5.39 % ZnO  0.05 % Fe2O3        0.03 % TiO2    +o  47.13 % SiO2     12.89 % Al2O3        16.69 % B2O3        7.46 % K2O      2.11 % Na2O      13.44 % CaO  0.22 % MgO  0.06 % Fe2O3       +Z  62.83 % SiO2     9.07 % Al2O3        11.80 % B2O3        5.26 % K2O      1.49 % Na2O      9.36 % CaO  0.15 % MgO  0.04 % Fe2O3       +Y  58.44 % SiO2     12.07 % Al2O3        6.79 % B2O3        2.01 % K2O      4.23 % Na2O      9.58 % CaO  1.38 % MgO  5.41 % ZnO  0.06 % Fe2O3        0.03 % TiO2    +  57.92 % SiO2     14.70 % Al2O3        6.72 % B2O3        9.72 % K2O      2.76 % Na2O      8.05 % CaO  0.08 % MgO  0.05 % Fe2O3       +  57.71 % SiO2     16.27 % Al2O3        6.37 % B2O3        9.22 % K2O      2.60 % Na2O      7.64 % CaO  0.09 % MgO  0.09 % Fe2O3       +  57.66 % SiO2     16.79 % Al2O3        6.24 % B2O3        9.06 % K2O      2.56 % Na2O      7.49 % CaO  0.09 % MgO  0.09 % Fe2O3        0.02 % TiO2    +  61.05 % SiO2     17.79 % Al2O3        3.91 % B2O3        9.63 % K2O      3.06 % Na2O      4.42 % CaO  0.05 % MgO  0.07 % Fe2O3        0.02 % TiO2    +  59.96 % SiO2     17.46 % Al2O3        4.94 % B2O3        9.44 % K2O      3.01 % Na2O      5.04 % CaO  0.06 % MgO  0.08 % Fe2O3        0.02 % TiO2    +  59.69 % SiO2     17.91 % Al2O3        4.94 % B2O3        9.26 % K2O      2.96 % Na2O      5.05 % CaO  0.07 % MgO  0.11 % Fe2O3        0.02 % TiO2    +  57.92 % SiO2     17.39 % Al2O3        5.91 % B2O3        8.94 % K2O      2.87 % Na2O      6.79 % CaO  0.07 % MgO  0.08 % Fe2O3        0.02 % TiO2    +  57.92 % SiO2     17.39 % Al2O3        5.91 % B2O3        8.94 % K2O      2.87 % Na2O      6.79 % CaO  0.07 % MgO  0.08 % Fe2O3        0.02 % TiO2    +  59.40 % SiO2     17.81 % Al2O3        5.15 % B2O3        9.20 % K2O      2.59 % Na2O      5.63 % CaO  0.08 % MgO  0.12 % Fe2O3        0.02 % TiO2    + + +  57.92 % SiO2     17.39 % Al2O3        5.91 % B2O3        8.94 % K2O      2.87 % Na2O      6.79 % CaO  0.07 % MgO  0.08 % Fe2O3        0.02 % TiO2    +X  57.61 % SiO2     17.28 % Al2O3        6.14 % B2O3        8.91 % K2O      2.51 % Na2O      7.37 % CaO  0.09 % MgO  0.09 % Fe2O3        0.02 % TiO2    +  59.53 % SiO2     10.68 % Al2O3        7.25 % B2O3        3.07 % K2O      4.26 % Na2O      8.12 % CaO  1.44 % MgO  5.56 % ZnO  0.06 % Fe2O3        0.03 % TiO2    +W  60.82 % SiO2     10.03 % Al2O3        6.76 % B2O3        4.66 % K2O      1.31 % Na2O      9.60 % CaO  1.35 % MgO  5.39 % ZnO  0.05 % Fe2O3        0.03 % TiO2    +  58.70 % SiO2     9.74 % Al2O3        7.28 % B2O3        0.92 % K2O      3.26 % Na2O      18.97 % CaO  0.96 % MgO  0.14 % Fe2O3        0.03 % TiO2    + +  59.11 % SiO2     11.73 % Al2O3        2.88 % B2O3        4.82 % K2O      1.90 % Na2O      11.23 % CaO  0.37 % MgO  7.82 % ZnO  0.12 % Fe2O3        0.03 % TiO2    +  59.11 % SiO2     11.73 % Al2O3        2.88 % B2O3        4.82 % K2O      1.90 % Na2O      11.23 % CaO  0.37 % MgO  7.82 % ZnO  0.12 % Fe2O3        0.03 % TiO2    +  55.61 % SiO2     18.19 % Al2O3        3.13 % K2O      6.44 % Na2O      0.51 % CaO  0.11 % MgO  0.44 % Li2O      15.30 % SrO  0.15 % Fe2O3        0.12 % TiO2    +  59.98 % SiO2     9.62 % Al2O3        5.14 % B2O3        1.73 % K2O      4.63 % Na2O      6.43 % CaO  0.68 % MgO  5.00 % BaO  6.68 % ZnO  0.11 % Fe2O3       + +  67.35 % SiO2     23.63 % Al2O3        1.74 % K2O      1.64 % Na2O      4.87 % CaO  0.33 % MgO  0.40 % Fe2O3        0.02 % TiO2    +  66.59 % SiO2     23.40 % Al2O3        1.88 % K2O      2.18 % Na2O      4.93 % CaO  0.34 % MgO  0.43 % Fe2O3        0.25 % TiO2    + +  52.77 % SiO2     15.55 % Al2O3        5.70 % K2O      1.69 % Na2O      12.79 % CaO  0.02 % MgO  11.26 % ZnO  0.15 % Fe2O3        0.07 % TiO2    +m  48.31 % SiO2     17.00 % Al2O3        1.48 % K2O      0.51 % Na2O      0.18 % CaO  0.19 % MgO  1.67 % Li2O      30.37 % ZnO  0.15 % Fe2O3        0.07 % P2O5        0.07 % TiO2     0.01 % F +V  44.24 % SiO2     9.94 % Al2O3        4.53 % K2O      1.26 % Na2O      8.77 % CaO  3.28 % Li2O      27.88 % ZnO  0.11 % Fe2O3       +j  52.79 % SiO2     19.34 % Al2O3        7.03 % K2O      2.00 % Na2O      18.32 % CaO  0.11 % MgO  0.14 % Fe2O3        0.28 % TiO2    +i +U  57.19 % SiO2     18.52 % Al2O3        8.40 % K2O      2.39 % Na2O      13.17 % CaO  0.06 % MgO  0.12 % Fe2O3        0.15 % TiO2    +p  57.09 % SiO2     6.39 % Al2O3        17.56 % B2O3        0.06 % K2O      3.32 % Na2O      12.98 % CaO  2.23 % MgO  0.27 % Fe2O3        0.05 % P2O5        0.05 % TiO2    +  72.10 % SiO2     14.02 % Al2O3        0.37 % B2O3        0.98 % K2O      2.15 % Na2O      0.59 % CaO  0.07 % MgO  9.69 % SrO  0.02 % Fe2O3       +  62.47 % SiO2     8.56 % Al2O3        2.07 % K2O      4.33 % Na2O      10.45 % CaO  1.80 % MgO  5.65 % ZnO  0.13 % Fe2O3        0.06 % TiO2     4.49 % F +  60.81 % SiO2     22.90 % Al2O3        1.33 % B2O3        4.15 % K2O      8.80 % Na2O      1.45 % CaO  0.47 % MgO  0.07 % Fe2O3        0.02 % TiO2    +  64.82 % SiO2     9.33 % Al2O3        12.18 % B2O3        1.30 % K2O      2.25 % Na2O      9.75 % CaO  0.13 % MgO  0.11 % Fe2O3        0.03 % P2O5        0.09 % TiO2    +  57.47 % SiO2     2.06 % Al2O3        1.33 % B2O3        2.97 % K2O      6.26 % Na2O      3.25 % CaO  0.08 % MgO  26.49 % ZnO  0.08 % Fe2O3       +  54.12 % SiO2     7.22 % Al2O3        16.83 % B2O3        1.85 % K2O      4.39 % Na2O      12.41 % CaO  2.10 % MgO  0.23 % Fe2O3        0.03 % TiO2     0.81 % F +T  56.37 % SiO2     7.50 % Al2O3        17.38 % B2O3        0.06 % K2O      3.28 % Na2O      12.83 % CaO  2.20 % MgO  0.27 % Fe2O3        0.05 % P2O5        0.05 % TiO2    +s  53.93 % SiO2     14.29 % Al2O3        4.00 % B2O3        5.57 % K2O      1.55 % Na2O      7.44 % CaO  0.26 % MgO  0.18 % Fe2O3        0.27 % TiO2     12.52 % ZrO2    +h  54.03 % SiO2     14.30 % Al2O3        4.02 % B2O3        5.37 % K2O      1.52 % Na2O      7.46 % CaO  0.26 % MgO  0.21 % Fe2O3        0.28 % TiO2     12.55 % ZrO2    +r  54.34 % SiO2     13.17 % Al2O3        3.68 % K2O      1.02 % Na2O      13.79 % CaO  0.46 % MgO  0.72 % Li2O      0.38 % Fe2O3        0.05 % TiO2     12.38 % ZrO2    +g  54.43 % SiO2     13.19 % Al2O3        3.51 % K2O      1.02 % Na2O      13.80 % CaO  0.47 % MgO  0.72 % Li2O      0.43 % Fe2O3        0.03 % TiO2     12.40 % ZrO2    +  53.58 % SiO2     16.09 % Al2O3        2.66 % K2O      5.63 % Na2O      12.29 % CaO  2.18 % MgO  6.97 % ZnO  0.31 % Fe2O3        0.31 % TiO2    +q  53.81 % SiO2     16.17 % Al2O3        2.62 % K2O      5.56 % Na2O      12.45 % CaO  2.18 % MgO  7.02 % ZnO  0.15 % Fe2O3        0.04 % TiO2    +f  58.44 % SiO2     12.07 % Al2O3        6.79 % B2O3        2.01 % K2O      4.23 % Na2O      9.58 % CaO  1.38 % MgO  5.41 % ZnO  0.06 % Fe2O3        0.03 % TiO2    +e  47.54 % SiO2     9.92 % Al2O3        8.11 % B2O3        3.98 % K2O      1.15 % Na2O      14.47 % CaO  0.45 % MgO  0.16 % Fe2O3        0.16 % TiO2     14.07 % ZrO2    +  48.31 % SiO2     15.36 % Al2O3        6.06 % B2O3        5.04 % K2O      1.26 % Na2O      10.07 % CaO  4.34 % MgO  7.59 % Li2O      1.47 % Fe2O3        0.49 % TiO2    +  48.30 % SiO2     14.52 % Al2O3        6.03 % B2O3        5.17 % K2O      1.27 % Na2O      11.17 % CaO  5.16 % MgO  6.02 % Li2O      1.93 % Fe2O3        0.43 % TiO2    +  62.01 % SiO2     13.45 % Al2O3        5.48 % B2O3        3.76 % K2O      0.95 % Na2O      9.05 % CaO  3.85 % MgO  1.00 % Fe2O3        0.45 % TiO2    +  60.31 % SiO2     13.80 % Al2O3        5.46 % B2O3        4.53 % K2O      1.13 % Na2O      9.05 % CaO  3.90 % MgO  1.35 % Fe2O3        0.05 % P2O5        0.44 % TiO2    +  58.03 % SiO2     13.33 % Al2O3        5.54 % B2O3        4.77 % K2O      1.17 % Na2O      10.25 % CaO  4.74 % MgO  1.71 % Fe2O3        0.05 % P2O5        0.41 % TiO2    +  47.14 % SiO2     17.05 % Al2O3        13.85 % B2O3        3.41 % K2O      0.81 % Na2O      12.36 % CaO  2.83 % MgO  0.67 % Li2O      1.33 % Fe2O3        0.55 % TiO2    +  48.69 % SiO2     17.78 % Al2O3        10.65 % B2O3        3.34 % K2O      0.77 % Na2O      12.01 % CaO  3.83 % MgO  0.97 % Li2O      1.43 % Fe2O3        0.53 % TiO2    +  50.14 % SiO2     18.29 % Al2O3        10.97 % B2O3        3.46 % K2O      0.80 % Na2O      10.58 % CaO  2.77 % MgO  0.99 % Li2O      1.46 % Fe2O3        0.54 % TiO2    +  51.06 % SiO2     17.86 % Al2O3        8.35 % B2O3        3.64 % K2O      0.82 % Na2O      10.84 % CaO  4.04 % MgO  1.01 % Li2O      1.82 % Fe2O3        0.05 % P2O5        0.52 % TiO2    +  54.34 % SiO2     18.02 % Al2O3        5.48 % B2O3        4.37 % K2O      1.00 % Na2O      9.07 % CaO  4.02 % MgO  0.99 % Li2O      2.17 % Fe2O3        0.05 % P2O5        0.49 % TiO2    +d  53.23 % SiO2     16.81 % Al2O3        5.54 % B2O3        4.93 % K2O      1.16 % Na2O      10.28 % CaO  4.75 % MgO  0.80 % Li2O      2.04 % Fe2O3        0.06 % P2O5        0.41 % TiO2    +  46.68 % SiO2     2.05 % Al2O3        3.45 % B2O3        1.27 % K2O      9.37 % Na2O      8.97 % CaO  28.21 % ZnO +  49.15 % SiO2     2.02 % Al2O3        3.01 % B2O3        1.26 % K2O      9.06 % Na2O      7.66 % CaO  27.84 % ZnO +  50.80 % SiO2     1.99 % Al2O3        2.97 % B2O3        1.27 % K2O      8.98 % Na2O      6.41 % CaO  27.57 % ZnO +  53.16 % SiO2     1.98 % Al2O3        2.94 % B2O3        1.24 % K2O      8.87 % Na2O      4.62 % CaO  27.19 % ZnO +  54.48 % SiO2     5.12 % Al2O3        1.53 % B2O3        1.04 % K2O      6.94 % Na2O      3.96 % CaO  0.02 % MgO  26.79 % ZnO  0.08 % Fe2O3        0.04 % TiO2    +  53.56 % SiO2     7.26 % Al2O3        1.37 % B2O3        0.95 % K2O      6.08 % Na2O      3.63 % CaO  0.02 % MgO  27.01 % ZnO  0.08 % Fe2O3        0.04 % TiO2    +  54.01 % SiO2     6.19 % Al2O3        1.43 % B2O3        1.02 % K2O      6.50 % Na2O      3.81 % CaO  0.02 % MgO  26.91 % ZnO  0.08 % Fe2O3        0.04 % TiO2    +  54.99 % SiO2     4.07 % Al2O3        1.59 % B2O3        1.10 % K2O      7.40 % Na2O      4.12 % CaO  26.67 % ZnO  0.04 % TiO2    +  55.47 % SiO2     2.99 % Al2O3        1.66 % B2O3        1.17 % K2O      7.83 % Na2O      4.32 % CaO  26.57 % ZnO +  55.47 % SiO2     1.93 % Al2O3        1.81 % B2O3        1.20 % K2O      8.24 % Na2O      4.55 % CaO  26.79 % ZnO +~  24.51 % SiO2     6.36 % Al2O3        1.27 % K2O      12.63 % Na2O      0.21 % CaO  0.03 % MgO  54.99 % SrO +}  27.95 % SiO2     7.73 % Al2O3        1.53 % K2O      13.04 % Na2O      0.24 % CaO  0.03 % MgO  49.48 % SrO +|  28.85 % SiO2     9.10 % Al2O3        1.78 % K2O      11.24 % Na2O      0.27 % CaO  0.03 % MgO  48.73 % SrO +{  31.86 % SiO2     10.29 % Al2O3        2.03 % K2O      7.97 % Na2O      0.31 % CaO  0.05 % MgO  47.50 % SrO +z  34.95 % SiO2     11.52 % Al2O3        2.28 % K2O      8.40 % Na2O      0.36 % CaO  0.05 % MgO  42.44 % SrO +y  53.73 % SiO2     17.37 % Al2O3        1.78 % K2O      3.56 % Na2O      0.33 % CaO  23.01 % MgO  0.10 % Fe2O3        0.10 % TiO2    +x  50.21 % SiO2     19.50 % Al2O3        2.16 % K2O      4.47 % Na2O      0.38 % CaO  23.06 % MgO  0.11 % Fe2O3        0.11 % TiO2    +w  52.37 % SiO2     20.32 % Al2O3        2.40 % K2O      4.91 % Na2O      0.40 % CaO  19.32 % MgO  0.19 % Fe2O3        0.09 % TiO2    +v  56.30 % SiO2     21.81 % Al2O3        2.80 % K2O      5.77 % Na2O      0.47 % CaO  12.58 % MgO  0.14 % Fe2O3        0.06 % P2O5        0.07 % TiO2    +  72.10 % SiO2     14.03 % Al2O3        0.37 % B2O3        0.98 % K2O      2.15 % Na2O      0.59 % CaO  0.07 % MgO  9.69 % SrO  0.02 % Fe2O3       +  52.93 % SiO2     13.61 % Al2O3        5.12 % K2O      1.44 % Na2O      9.90 % CaO  0.03 % MgO  11.56 % Li2O      5.23 % ZnO  0.11 % Fe2O3        0.06 % TiO2    +  42.20 % SiO2     13.05 % Al2O3        3.01 % K2O      0.83 % Na2O      8.90 % CaO  0.03 % MgO  3.35 % Li2O      28.48 % ZnO  0.11 % Fe2O3        0.05 % TiO2    +  63.53 % SiO2     12.21 % Al2O3        0.76 % B2O3        2.39 % K2O      5.29 % Na2O      0.92 % CaO  0.14 % MgO  14.71 % SrO  0.04 % Fe2O3       +  52.68 % SiO2     13.32 % Al2O3        2.38 % K2O      5.05 % Na2O      0.37 % CaO  0.05 % MgO  26.09 % ZnO  0.07 % Fe2O3       +  54.74 % SiO2     14.00 % Al2O3        2.51 % K2O      5.33 % Na2O      0.38 % CaO  1.73 % MgO  21.24 % ZnO  0.07 % Fe2O3       +  56.30 % SiO2     14.40 % Al2O3        2.57 % K2O      5.48 % Na2O      0.41 % CaO  4.38 % MgO  16.39 % ZnO  0.07 % Fe2O3       +  63.33 % SiO2     19.54 % Al2O3        6.83 % K2O      2.02 % Na2O      7.64 % CaO  0.08 % MgO  0.31 % Fe2O3        0.03 % P2O5        0.21 % TiO2    +  55.70 % SiO2     17.17 % Al2O3        2.71 % K2O      5.71 % Na2O      0.44 % CaO  6.76 % MgO  11.40 % ZnO  0.07 % Fe2O3        0.03 % TiO2    +u  54.72 % SiO2     20.07 % Al2O3        2.85 % K2O      5.93 % Na2O      0.46 % CaO  9.85 % MgO  5.92 % ZnO  0.14 % Fe2O3        0.07 % TiO2    +  45.39 % SiO2     13.04 % Al2O3        0.80 % B2O3        2.54 % K2O      5.65 % Na2O      0.99 % CaO  0.16 % MgO  31.36 % SrO  0.07 % Fe2O3       + +  29.99 % SiO2     12.18 % Al2O3        16.47 % B2O3        0.26 % K2O      7.64 % Na2O      3.53 % CaO  29.70 % MgO  0.15 % Fe2O3        0.07 % TiO2    + + + +  58.13 % SiO2     11.58 % Al2O3        6.39 % B2O3        2.22 % K2O      5.96 % Na2O      6.28 % CaO  0.84 % MgO  5.17 % BaO  3.33 % ZnO  0.10 % Fe2O3       +  53.38 % SiO2     13.91 % Al2O3        6.27 % K2O      1.89 % Na2O      10.31 % CaO  1.41 % MgO  4.86 % ZnO  0.12 % Fe2O3        0.03 % TiO2     7.83 % ZrO2    + +  47.92 % SiO2     15.11 % Al2O3        3.05 % K2O      3.92 % Na2O      4.47 % CaO  0.05 % MgO  18.98 % BaO  6.18 % ZnO  0.18 % Fe2O3        0.15 % TiO2    +  59.19 % SiO2     12.01 % Al2O3        3.79 % K2O      2.19 % Na2O      8.90 % CaO  1.61 % MgO  12.01 % BaO  0.17 % Fe2O3        0.14 % TiO2    +  63.63 % SiO2     11.37 % Al2O3        1.69 % B2O3        3.68 % K2O      1.07 % Na2O      14.78 % CaO  1.31 % MgO  2.14 % Fe2O3        0.34 % TiO2    + +  49.86 % SiO2     18.79 % Al2O3        3.26 % K2O      0.94 % Na2O      26.48 % CaO  0.13 % MgO  0.34 % Fe2O3        0.07 % P2O5        0.13 % TiO2    +  63.71 % SiO2     8.18 % Al2O3        6.61 % B2O3        4.17 % K2O      2.50 % Na2O      13.12 % CaO  1.54 % MgO  0.17 % Fe2O3       + + + + + + `SrA on adjustBar newPct -- Set these parameters to be specific to your needs, same as above put 305 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 346 into minHt put 40 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put item 1 of the bottomRight of me into MyBase put the rect of me into myRect put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight put myHeight into item 1 of myRect set the rect of me to myRect end adjustBar 2~~ZcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,228,346,236 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1120altId149 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSricon0toolTiplayer92 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736459 tPercent Analysisd -- 1988-2004 Richard Burkett on mouseUp set cursor to watch lock screen if fld "RO2" is not empty then CalcPercentAnalysis else answer "Please calculate this glaze first!" unlock screen end mouseUp on CalcPercentAnalysis put PercentageAnalysis() into myPercentages if myPercentages is empty then put "No Unity formula available. You must calculate this glaze first." into myPercentages put myPercentages into field "percentAnalysis" formatPercentageAnalysis end CalcPercentAnalysis function PercentageAnalysis put "94.192,61.98,56.08,40.32,29.88,153.36,223.21,81.38,79.54,79.94,74.69,103.62" into myROMolWts put "101.94,69.44,159.68,141.6,291.52,152.02,181.9" into myR2O3MolWts put "60.06,79.9,123.22,150.69,86.93,18.998" into myRO2MolWts put " K2O, Na2O, CaO, MgO, Li2O, BaO, PbO, ZnO, CuO, CoO, NiO, SrO,Al2O3, B2O3,Fe2O3, P2O5,Sb2O3,Cr2O3, V2O3, SiO2, TiO2, ZrO2, SnO2, MnO2, F" into myOxideList put empty into myPA put empty into myTotal set numberformat to 0.00000000 repeat with i=1 to 12 get (line i of fld "R2O")*(item i of myROMolWts) add it to myTotal put it & return after myPA end repeat repeat with i=1 to 7 get (line i of fld "R2O3")*(item i of myR2O3MolWts) add it to myTotal put it & return after myPA end repeat repeat with i=1 to 6 get (line i of fld "RO2")*(item i of myRO2MolWts) add it to myTotal put it & return after myPA end repeat if myTotal=0 then answer "Please calculate this glaze first." exit PercentageAnalysis end if put myTotal/100 into myTotal repeat with i=the number of lines of myPA down to 1 get line i of myPA if it>0 then put (it/myTotal) into line i of myPA end repeat set numberformat to 0.00 repeat with i=1 to the number of lines of myPA put (line i of myPA)*1 & " % " & item i of myOxideList into line i of myPA end repeat put line 20 of myPA & return into tempPA put line 13 of myPA & return after tempPA put line 14 of myPA & return after tempPA delete line 20 of myPA delete line 14 of myPA delete line 13 of myPA put tempPA before myPA repeat with i= the number of lines of myPA down to 1 get word 1 of line i of myPA if it=0 then delete line i of myPA else if it<10 then put " " & it into word 1 of line i of myPA else put " " & it into word 1 of line i of myPA end if end repeat return myPA end PercentageAnalysis on formatPercentageAnalysis -- formats chemical subscripts of oxides repeat with i=1 to the number of lines of fld "percentAnalysis" get offset ("2", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("3", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("5", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if end repeat end formatPercentageAnalysis }`percentage analysis by weightPercentage AnalysiscREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect380,352,516,368 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors 143,173,181 hilitedfalse sharedHilitefalseshadowfalse textAligncenterarmedfalsemenuMouseButton1id1140altId147 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelPercentage Analysis autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenamePercent Analysisicon0toolTippercentage analysis by weightlayer94 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1086714315743 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + wTesting ]#lon menupick myItem if myitem is not empty then put myItem into fld "tested" end if end menupick Bmark glaze as testedTested UntestedcREVTempMaster; traversalOnfalseinkclearthreeDtrue hiliteBordertruerect 457,66,471,80 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1143altId0 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestylemenu disabledIcon0 armBorderfalsenameTestingicon200936toolTipmark glaze as testedlayer96 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines8margins4opaquetrue accelModstextTested Untested shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1086715840391  GlazeType on menupick myItem if myItem is not empty then put " " & (first word of myItem) after fld "GlazeType" end if end menupick yJchoose a type of glaze Glaze Type:Na - Sodium K - Potassium Li - Lithium Ba - Barium Ca - Calcium Mg - Magnesium Pb - Lead Zn - Zinc B - Boron - Alkaline AlMatt - Alumina matt Majolica MidRoad - average SlipGlaze - LeadFree RawLead FritLead cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect377,193,461,211 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowtrue textAlignleftarmedfalsemenuMouseButton1id1175altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel Glaze Type: autoHilitefalsestylemenu disabledIcon0 armBorderfalsename GlazeTypeicon0toolTipchoose a type of glazelayer97 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines13margins4opaquetrue accelModstextNa - Sodium K - Potassium Li - Lithium Ba - Barium Ca - Calcium Mg - Magnesium Pb - Lead Zn - Zinc B - Boron - Alkaline AlMatt - Alumina matt Majolica MidRoad - average SlipGlaze - LeadFree RawLead FritLead shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087525800822 mattGloss.jpg@)#)MSJFIFHHExifMM*bj(1r2iHHAdobe Photoshop CS Macintosh2004:06:17 19:41:18#)&(.LHHJFIFHH Adobe_CMAdobed            )#"?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?~uK^9gMnYv=d[]٘VʬV:VvV_O >\kr}ۉVN'ϳ݇Q>tޡ}Z)ȥd L@eٕe;;bQUgc3=/79mYt}ۻ#Ӌu?c~RSӾa=޵LٗU8dT٧;:˕~>GH*ηl^r7TΣ};䵕6rkWVkY[o\E9XQGɏ߭y`ѓVcmx7^} r~Of纝?Ҟ$IOUPjϯd.81~f=<, ߍw꾭/Sª߲t[ksY{ ;uSEж #]1z}ﱆcdE]c,~.?Y3}МL^z^(v\]m9Y6cm~E?guY]:1>?Lȫd1cQQO}n~o'~z?0Ĭݟkk{]}G! +e]ҺWUM-d]GO=:]Q^/b]W:/ZgSmkAǾX[u~)I$SUS7Y8 dmߺ--/[J/cۏFV7I$$I))Photoshop 3.08BIM%8BIM com.apple.print.PageFormat.PMHorizontalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMHorizontalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMOrientation com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMOrientation 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.subTicket.paper_info_ticket com.apple.print.PageFormat.PMAdjustedPageRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMAdjustedPaperRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMPaperName na-letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.PaperInfo.PMUnadjustedPageRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMUnadjustedPaperRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2004-06-18T02:39:58Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.ppd.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.ppd.PMPaperName US Letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PaperInfoTicket com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PageFormatTicket 8BIMxHH@Rg(HH(dh 8BIMHH8BIM&?8BIM x8BIM8BIM 8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM8BIM8BIM@@8BIM8BIMI)# Untitled-1#)nullboundsObjcRct1Top longLeftlongBtomlong)Rghtlong#slicesVlLsObjcslicesliceIDlonggroupIDlongoriginenum ESliceOrigin autoGeneratedTypeenum ESliceTypeImg boundsObjcRct1Top longLeftlongBtomlong)Rghtlong#urlTEXTnullTEXTMsgeTEXTaltTagTEXTcellTextIsHTMLboolcellTextTEXT horzAlignenumESliceHorzAligndefault vertAlignenumESliceVertAligndefault bgColorTypeenumESliceBGColorTypeNone topOutsetlong leftOutsetlong bottomOutsetlong rightOutsetlong8BIM( ?8BIM8BIM8BIM h#)lLLJFIFHH Adobe_CMAdobed            )#"?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?~uK^9gMnYv=d[]٘VʬV:VvV_O >\kr}ۉVN'ϳ݇Q>tޡ}Z)ȥd L@eٕe;;bQUgc3=/79mYt}ۻ#Ӌu?c~RSӾa=޵LٗU8dT٧;:˕~>GH*ηl^r7TΣ};䵕6rkWVkY[o\E9XQGɏ߭y`ѓVcmx7^} r~Of纝?Ҟ$IOUPjϯd.81~f=<, ߍw꾭/Sª߲t[ksY{ ;uSEж #]1z}ﱆcdE]c,~.?Y3}МL^z^(v\]m9Y6cm~E?guY]:1>?Lȫd1cQQO}n~o'~z?0Ĭݟkk{]}G! +e]ҺWUM-d]GO=:]Q^/b]W:/ZgSmkAǾX[u~)I$SUS7Y8 dmߺ--/[J/cۏFV7I$$I)8BIM!SAdobe PhotoshopAdobe Photoshop CS8BIMhttp://ns.adobe.com/xap/1.0/ 4294967295 35 41 1 72/1 72/1 2 2004-06-17T19:41:18-07:00 2004-06-17T19:41:18-07:00 2004-06-17T19:41:18-07:00 Adobe Photoshop CS Macintosh adobe:docid:photoshop:a1ec217c-c228-11d8-90da-f1c4e34552a2 image/jpeg Adobed            )#"?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?~uK^9gMnYv=d[]٘VʬV:VvV_O >\kr}ۉVN'ϳ݇Q>tޡ}Z)ȥd L@eٕe;;bQUgc3=/79mYt}ۻ#Ӌu?c~RSӾa=޵LٗU8dT٧;:˕~>GH*ηl^r7TΣ};䵕6rkWVkY[o\E9XQGɏ߭y`ѓVcmx7^} r~Of纝?Ҟ$IOUPjϯd.81~f=<, ߍw꾭/Sª߲t[ksY{ ;uSEж #]1z}ﱆcdE]c,~.?Y3}МL^z^(v\]m9Y6cm~E?guY]:1>?Lȫd1cQQO}n~o'~z?0Ĭݟkk{]}G! +e]ҺWUM-d]GO=:]Q^/b]W:/ZgSmkAǾX[u~)I$SUS7Y8 dmߺ--/[J/cۏFV7I$$I)cREVTempMaster traversalOnfalsepalindromeFramesfalse repeatCount0inksrcCopysize19795threeDtrue blendLevel50rect165,297,200,338angle0name mattGloss.jpghotSpot1,1 fileNamecolorstoolTip alwaysBuffertruelayer98 dontDitherfalsevisiblefalse cantSelectfalse borderWidth2opaquetrueyHot1id1180 currentFrame1altId0 showBorderfalse disabledfalsexHot1 frameCount0 constantMaskfalseshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1087526763733 ColorPopup on menupick myItem if myItem is not empty then if fld "color" is not empty then put " " after fld "color" get offset("|",myItem) if it>0 then put " " into char it of myItem if the last word of myItem is "color" then delete last word of myItem if the last word of myItem is "no" then delete last word of myItem put myItem after fld "Color" select after line 1 of fld "Color" end if end menupick B!choose glaze colorColorvClear No color Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Translucent No color White Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Semi-Opaque White Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Opaque White Gray Black Brown Red Orange Yellow Green Blue-Green Blue PurplecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 3,66,39,84 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowtrue textAlignleftarmedfalsemenuMouseButton1id1181altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelColor autoHilitefalsestylemenu disabledIcon0 armBorderfalsename ColorPopupicon0toolTipchoose glaze colorlayer99 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines16margins4opaquetrue accelModstextuClear No color Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Translucent No color White Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Semi-Opaque White Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple Opaque White Gray Black Brown Red Orange Yellow Green Blue-Green Blue Purple shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087527540223 IndexMe!`=cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeightrect243,317,375,335multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1185altId0autoTabfalse textStylehGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameIndexMetoolTipvGridfalse listBehaviorfalselayer100visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize disabledfalsefixedLineHeighttrue textFontvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087659206300 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + Calculate GlazeEp,on mouseup CalculateThisGlaze end mouseup cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 170,4,324,26 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1183altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameCalculate Glazeicon0toolTiplayer101 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087660388098 Cost!`6?F4cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeightrect309,319,379,371multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1188altId0autoTabfalse textStylehGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCosttoolTipvGridfalse listBehaviorfalselayer102visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize disabledfalsefixedLineHeighttrue textFontvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087679419936 + .1975 .126 .50 + .1975 .126 .1095 X .456 + 0.122 .103 .29 .126 .1095 + 1.70 .1975 .15 .1095 .059 .4875 ' .1975 1.70 ( .1175 .2235 .29 .15 .1095 9.35 $ .60 .15 .5973 .152 X (2 .1175 .2235 .059 .1095 .152 4.05 10.7 X ) .1975 .1095 .059 .15 .152 4.05 *- .1175 .059 .15 .1095 .152 X ' .1175 .15 0.17 .059 ' .19 .1175 .059 1.015 .1095 ' 1.20 .29 .15 .2235 .059 .1095 .1175 1.00 *, .1975 .15 .28 .074 & .1975 1.70 .126 & .1975 1.015 4.05 .1095 .15 4.05 & 1.00 1.00 .1975 .059 .1095 .152 X ) .1175 .1095 .059 .31 ) 1.015 .16 0.17 .152 X ) .1175 .059 1.20 1.015 .126 .16 4.05 .152 4.05 & .2235 .1975 .50 .15 1.05 0.17 .059 .1095 & .57 .1975 .15 .059 .1095 & .2235 .15 .1095 & 1.00 X .1175 .29 .1095 .15 .152 & .2235 .1975 .15 1.05 .29 .1095 & 0.122 .1175 .15 4.05 0.17 .059 .1095 & .16 .1175 .4925 0.17 .059 .15 10.7 &g .2235 .1975 .15 0.17 .059 .1095 1.00 .152 X &f .1175 .2235 .15 1.05 0.17 .059 .50 .1095 & .2235 .15 .1095 .4875 &K .16 .1095 .059 1.20 .15 X &- .1075 .1175 .1095 .059 .2235 X &I .1975 1.00 .15 .1095 .059 .5973 ) .1975 0.17 1.00 .126 .30 .152 X (@ 0.00 .1175 .1095 .059 1.05 4.05 10.7 ) .1175 .15 ) .1175 .1095 .126 .059 .152 .30 1.20 ( .1175 .059 0.17 .103 .126 .1095 .5973 1.00 .30 1.00 */ .1381 .1975 .19 .15 .50 .1095 .059 (t .1381 .1975 .19 .15 .50 .1095 .059 (w .50 X .1975 .4925 .126 .15 *+ .19 .1975 .103 1.015 .15 .059 .1095 .30 12.30 4.55 .73 (K .1175 .15 .1095 .103 .059 (B .1975 0.704 .059 .2235 .126 9.35 1.20 +S (8 .1175 .059 .15 1.20 9.35 .152 ( .1175 .1095 .15 .103 .059 1.05 .30 .152 ( 0.00 0.17 .1095 .1175 .1585 13.15 ( .1175 .15 0.17 1.05 .29 .1095 .30 10.7 ( .1175 .059 .1095 .15 4.55 .152 ' .16 .15 0.17 1.015 .1095 ' .1095 .1175 .059 .15 .103 'j .1175 .2235 0.17 .103 .126 .1095 .152 X 9.35 10.7 ' X .1175 .059 .15 .1095 % .2235 1.05 4.05 9.35 10.7 % .2235 .1975 .15 .1095 4.05 %~ .2235 .1175 .1095 .126 1.015 4.05 % .2235 1.70 .15 .51 1.00 $ 1.70 .51 .2235 .1095 1.00 %w X .15 .152 % .103 1.00 .126 X %c 1.00 .60 .15 .16 1.00 X 10.7 .152 $ .60 .15 1.015 .152 X %l .1095 .15 4.05 .059 1.20 .5973 %] .62 .2235 .15 .5973 1.20 1.00 .1095 .059 $ .60 .15 .5973 1.00 $ .51 0.122 .059 .15 .1095 1.20 4.53 +N +c .197 .2235 X X .66 +b .19 1.00 .2235 +k +a .197 .1095 .2235 .059 1.20 .103 4.05 X +` .197 .1095 .15 .2235 .059 1.20 4.53 +l 1.00 1.20 .1095 .51 .059 X 1.20 .152 +_ 1.00 1.20 .1095 X 1.20 .152 +n 1.015 .1975 .1095 .50 .2235 .152 4.05 +^ 1.015 .1975 .2235 .152 4.05 +] 1.70 .103 1.20 .62 .16 .15 +t 1.70 .1975 .15 .1095 +\ 1.70 .1975 X X +[ .197 .1095 .2235 .059 1.20 .15 .103 X +o .197 .2235 .059 X +Z .197 .1095 .2235 .059 X +Y .1975 .1095 .2235 .059 1.20 .15 .103 4.05 1.20 + .197 .2235 .059 .15 4.05 X X + .197 .2235 .059 .15 4.05 X X + .197 .2235 .059 .15 4.05 X X + .197 .2235 .059 .15 .51 4.05 X X + .197 .2235 .059 .15 .51 4.05 X X + .197 .2235 .059 .15 .51 4.05 X X + .197 .2235 .059 .15 .51 4.05 X X + .197 .2235 .059 .15 .51 4.05 X X + .197 .2235 .059 .15 4.05 X X + + + .197 .2235 .059 .15 .51 4.05 X X +X .197 .2235 .059 .15 4.05 X X + .197 .1095 .2235 .059 1.20 .15 .103 0.122 .50 4.05 +W .197 .1095 .2235 .059 1.20 .15 .103 4.05 + .2235 .1975 .15 .059 .1095 10.7 4.55 + + .197 .059 1.20 .15 .1095 .2235 X + .197 .059 1.20 .15 .1095 .2235 X + .1975 1.015 .126 4.05 .1095 X + .1975 .15 .2235 .1095 .059 1.20 X .5973 1.20 .30 + + .31 .1095 .29 .1975 + .31 X .1095 .1975 .29 + + .1175 .15 .059 1.20 .1095 4.53 +m .15 1.20 .197 0.704 X X +V .15 .1095 1.20 .059 4.05 .197 X X +j .197 .059 0.178 +i +U .197 .059 0.178 +p .2235 .15 .1095 .29 X 4.05 1.20 + 1.015 .1975 .2235 .1095 .059 .4875 .152 4.05 + .197 1.20 .103 .29 2.03 X .1095 4.05 X + 1.70 .1975 .15 .1095 .2235 4.05 + .197 .2235 .059 .51 X .15 .1095 X + 1.00 1.20 .152 .2235 .29 .1095 2.00 X 1.20 + .2235 .15 2.03 1.00 .1175 .1095 X 4.05 1.20 +T .2235 .15 .1095 X 4.05 1.20 +s .197 X 1.00 .2235 .103 .059 .1095 X +h .197 X 1.00 .29 .2235 X +r .197 .29 .4925 .15 1.00 .103 .059 X .1095 4.05 +g .197 .29 .4925 .15 1.00 4.05 + 1.70 .1975 .15 .1095 .059 3.05 1.20 .30 X +q .1975 1.20 .15 .103 .29 X +f .1975 .1095 .2235 .059 1.20 .15 .103 X +e .197 .29 1.00 .2235 X X 9.35 + .197 .19 0.17 4.05 .2235 X X + .197 .19 0.17 4.05 .2235 X X + .197 .19 0.17 .1095 .2235 X X + .197 .19 0.17 .1095 .2235 X X + .197 .19 0.17 .1095 .2235 X X + .197 .19 0.17 .4925 .2235 X X + .197 .19 0.17 .4925 .2235 X X + .197 .19 0.17 .4925 .2235 X X + .197 .19 0.17 .4925 .2235 X X + .197 .19 0.17 .4925 .2235 X X +d .197 .19 0.17 .4925 .2235 X X + 1.00 .059 .51 1.20 .1095 + 1.00 .059 .51 1.20 .1095 + 1.00 .059 .51 1.20 .1095 + 1.00 .059 .51 1.20 .1095 + 1.00 .059 .51 1.20 .1095 .15 + 1.00 .059 .51 1.20 .1095 .15 + 1.00 .059 .51 1.20 .1095 .15 + 1.00 .059 .51 1.20 .1095 .15 + 1.00 .059 .51 1.20 .1095 .15 + 1.00 .059 .51 1.20 .1095 +~ 1.015 .1975 .50 .1095 +} 1.015 .1975 .50 .1095 +| 1.015 .1975 .50 .1095 +{ 1.015 .1975 .50 .1095 +z 1.015 .1975 .50 .1095 +y 1.70 .1975 .15 .1095 +x 1.70 .1975 .15 .1095 +w 1.70 .1975 .15 .1095 +v 1.70 .1975 .15 .1095 + 1.015 .1975 .2235 .1095 .059 .4875 .152 4.05 + .15 .1095 1.20 .059 4.05 X .197 X X + .15 .1095 1.20 .059 4.05 X .197 X X + 1.015 .1975 .2235 .50 .1095 .152 4.05 + 1.70 .1975 .15 .1095 1.20 4.05 + 1.70 .1975 .15 .1095 1.20 4.05 + 1.70 .1975 .15 .1095 1.20 4.05 + .1175 .126 .15 .059 .1095 4.05 + 1.70 .1975 .15 .1095 1.20 4.05 +u 1.70 .1975 .15 .1095 1.20 + 1.015 .1975 .1095 .50 .2235 .152 4.05 + + 1.70 .16 .51 .15 .059 .1095 X 9.35 + + + + .1975 .1095 .2235 1.20 .5973 .059 1.20 4.05 + .1175 .059 1.20 .103 .15 1.00 + + .16 .5973 .126 .059 1.20 4.05 1.20 + .1095 .126 .059 0.17 .5973 .1175 .16 4.05 + 1.20 .29 .15 .2235 .059 .1095 .1175 1.00 + + .059 .15 .1175 .1095 .152 1.20 4.05 + .1175 .2235 .1095 .059 0.17 .15 4.05 + + + + + + Import Glaze FileEp+on mouseup importglazefile end mouseup cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect -2,4,170,27 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1197altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameImport Glaze Fileicon0toolTiplayer103 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087758703677  Graphic 2KF(cREVTempMaster, traversalOnfalseinksrcCopythreeDtrue startAngle0rect184,251,224,253angle0filledtrue patterns showNamefalsecolors arcAngle360 dontResizefalse startArrowfalsepoints185,252 223,252id1259 markerDrawnfalse arrowSize3altId0 markerFilledfalsemarkerLineSize1 textStylelockLocfalse roundRadius15labelstyleline endArrowfalse markerPointsdashesname Graphic 2toolTip lineSize1 polySides4layer104visibletrue cantSelectfalse borderWidth2margins4 roundEndstrueopaquetrue showBorderfalse textSize disabledfalse textFontshowFocusBordertrue cREVGeneral revUniqueID 1087767887834 Graphic 3KF&*cREVTempMaster, traversalOnfalseinksrcCopythreeDtrue startAngle0rect260,251,298,253angle0filledtrue patterns showNamefalsecolors arcAngle360 dontResizefalse startArrowfalsepoints261,252 297,252id1260 markerDrawnfalse arrowSize3altId0 markerFilledfalsemarkerLineSize1 textStylelockLocfalse roundRadius15labelstyleline endArrowfalse markerPointsdashesname Graphic 3toolTip lineSize1 polySides4layer105visibletrue cantSelectfalse borderWidth2margins4 roundEndstrueopaquetrue showBorderfalse textSize disabledfalse textFontshowFocusBordertrue cREVGeneral revUniqueID 1087767896314i>cREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -2,257,60,275 patterns showNamefalsecolors hScroll0backgroundBehaviorfalse cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1261altId0radioBehaviortrue textStylelockLocfalselabelname group id 1261toolTiplayer107visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1087769167272 Also Add:D H 6 Benter colorants and other additives here as a percentage additioncREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 2,261,56,271 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors 0,0,0 hilitedfalse sharedHilitefalseshadowfalse textAligncenterarmedfalsemenuMouseButton1id1174altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle transparent disabledIcon0 armBordertruename Also Add:icon0toolTipAenter colorants and other additives here as a percentage additionlayer108 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087525400075 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + +  Show Lines@e on mouseUp set the showlines of fld "name" to not the showLines of fld "name" put the showlines of fld "name" into ShowOrHide repeat with i=1 to 14 set the showlines of field ("amount" & i) to ShowOrHide set the showlines of field ("ingredient" & i) to ShowOrHide set the visible of btn ("PopIngred" & i) to ShowOrHide end repeat if ShowOrHide is false then set the label of me to "Show Lines" else set the label of me to "Hide Lines" end if set the showlines of fld "totBatch" to ShowOrHide set the showlines of fld "date" to ShowOrHide set the showlines of fld "cone" to ShowOrHide set the showlines of fld "batch2" to false set the showlines of fld "batch" to false set the showlines of fld "color" to false set the showlines of fld "R2O" to false set the showlines of fld "R2O3" to false set the showlines of fld "RO2" to false end mouseUp 38C hides or shows recipe underlinej Hide LinescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect306,311,373,327 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1263altId106 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel Show Lines autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename Show Linesicon0toolTiphides or shows recipe underlinelayer109 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087770819091 Estimated Thermal Expansion%X on mouseUp global CalcAll set the cursor to busy put empty into fld "ThermalExpansion" if line 5 of fld R2O >0.005 then put "contains Lithium oxide." into GlazeKind if CantCalcThermEx(CalcAll,GlazeKind) is not empty then exit mouseup end if if line 6 of fld RO2>0.005 then put "contains Fluorine." into GlazeKind if CantCalcThermEx(CalcAll,GlazeKind) is not empty then exit mouseup end if if line 12 of fld R2O>0.005 then put "contains Strontium oxide." into GlazeKind if CantCalcThermEx(CalcAll,GlazeKind) is not empty then exit mouseup end if if fld "Surface" is empty then if CalcAll is not "Quick Calc" then answer "Is this a matte glaze?" with "Don't know" or "Yes" or "No" if it is "yes" then put "matte" into fld "Surface" else if it is "Don't know" then put "?" into fld "Surface" else put "shiny glossy" into fld "Surface" end if end if end if if fld "Surface" contains "mat" or fld "Surface" contains "Slip"\ or fld "Surface" contains "Engobe" then put "is a matte glaze." into GlazeKind if CantCalcThermEx(CalcAll,GlazeKind) is not empty then exit mouseup end if set numberFormat to 0.00 put fld "R2O" into Fluxes put fld "R2O3" into Stabilizers put fld "RO2" into GlassFormers put theThermExpansion(Fluxes,Stabilizers,GlassFormers) into fld "ThermalExpansion" end mouseUp function CantCalcThermEx CalcAll,GlazeKind if GlazeKind contains "Lithium" or GlazeKind contains "Strontium" then put "The thermal expansion should be lower with increasing amounts, but large amounts may have an unpredictable effect." into GlazeEffect if CalcAll is not "Quick Calc" then answer "This glaze " & GlazeKind & return & "The thermal expansion cannot be accurately calculated."\ & return & return & "Do you want to calculate it anyway?" with "Calculate" or "Don't Calc" if it is "Don't Calc" then return "exitMouseup" else return "" else return "" end CantCalcThermEx function theThermExpansion Fluxes,Stabilizers,GlassFormers -- 1990-1992 Richard Burkett -- This one works! 6/24/92 Script for Glaze Cards and the Glaze Calculator. put 0.000 into TotSum put 0.000 into TExp put "0,0,0,0,0,0,0,0,0,0,0,0,0,0,0," into myFlux put "0,0,0,0,0,0,0,0,0," into myStabilizer put "0,0,0,0,0,0,0,0,0," into myGlass put 0.000 into myMolWt put 0.000 into temp put 0.000 into myTemp put empty into CoeffTE put empty into mystring put Fluxes into myFlux put Stabilizers into myStabilizer put GlassFormers into myGlass repeat with i=1 to 12 if line i of myFlux is empty then put "0.00" into line i of myFlux end repeat repeat with i=1 to 7 if line i of myStabilizer is empty then put "0.00" into line i of myStabilizer end repeat repeat with i=1 to 6 if line i of myGlass is empty then put "0.00" into line i of myGlass end repeat put "94.192,61.98,56.08,40.32,39.88,153.36, 223.21,81.38,79.54,74.94,74.69,103.62,"\ into FluxWts repeat with i=1 to 12 put line i of myFlux into myString put myString^1 into myTemp put (item i of FluxWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of MyFlux end repeat put "101.94,69.64,159.694,141.6, 291.52,152.02,181.9," into StabWts repeat with i=1 to 7 put line i of myStabilizer into myString put myString^1 into myTemp put (item i of StabWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myStabilizer end repeat put "60.06,79.9,123.22,150.69,86.93,18.998," into GlassWts repeat with i=1 to 6 put line i of myGlass into myString put myString^1 into myTemp put (item i of GlassWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myGlass end repeat put "3.3,3.9,1.5, 0.3,2.0,1.3, 0.8,1.0,2.2, 4.4,4.0,1.372," into FluxCoeffs repeat with i=1 to 12 put line i of MyFlux into myString put (myString)^1 into myTemp put (item i of FluxCoeffs)^1 into CoeffTE add (myTemp/TotSum)*CoeffTE to TExp end repeat put "0.61,0.29, 4.0,2.0, 3.6, 5.1," into StabCoeffs repeat with i=1 to 6 put line i of MyStabilizer into myString put myString^1 into myTemp put (item i of StabCoeffs)^1 into CoeffTE add myTemp/TotSum*CoeffTE to TExp end repeat put "0.37,1.5,0.7,2.0,2.2," into GlassCoeffs repeat with i=1 to 5 put line i of MyGlass into myString put myString^1 into myTemp put (item i of GlassCoeffs)^1 into CoeffTE add myTemp/TotSum*CoeffTE to TExp end repeat put TExp*10 into TExp return TExp end theThermExpansion ZEstimated to be:cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect424,246,512,256 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1264altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelEstimated to be: autoHilitetruestyle transparent disabledIcon0 armBordertruenameEstimated Thermal Expansionicon0toolTiplayer110 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087866967561  TE LABELH@BcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect450,256,516,272multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1266altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTextfalsescroll0nameTE LABELtoolTipvGridfalse listBehaviorfalselayer111visibletrue cantSelectfalse borderWidth2margins2 htmlText

X10-6/deg C

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1087867369984 x10-6/deg C    ViewMarked`%*X on mouseup set the hilite of me to not the hilite of me if the hilite of me is false then if char 1 to 2 of line 10 of btn ID 1289 is "!c" then delete char 1 to 2 of line 10 of btn ID 1289 -- "Find" menu button end if else if char 1 to 2 of line 10 of btn ID 1289 is not "!c" then put "!c" before line 10 of btn ID 1289 end if end if end mouseup 335B click to view only marked cards View MarkedcREVTempMaster; traversalOntrueinksrcCopythreeDfalse hiliteBorderfalserect 455,53,521,65 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors204,204,204 153,0,51 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1306altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel View Marked autoHilitefalsestyleopaque disabledIcon0 armBordertruename ViewMarkedicon0toolTipclick to view only marked cardslayer112 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins2opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088099935541  PopIngred1f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick a+popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,88,16,114 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2009altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred1icon200086toolTip*popup menu of a list of common ingredientslayer114 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533911  PopIngred2f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick q+popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,105,16,131 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2016altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred2icon200086toolTip*popup menu of a list of common ingredientslayer115 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533912  PopIngred3f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,121,16,147 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2017altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred3icon200086toolTip*popup menu of a list of common ingredientslayer116 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533913  PopIngred4f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,137,16,163 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2018altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred4icon200086toolTip*popup menu of a list of common ingredientslayer117 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533914  PopIngred5f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,153,16,179 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2019altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred5icon200086toolTip*popup menu of a list of common ingredientslayer118 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533915  PopIngred6f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,170,16,196 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2020altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred6icon200086toolTip*popup menu of a list of common ingredientslayer119 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533916  PopIngred7f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,186,16,212 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2021altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred7icon200086toolTip*popup menu of a list of common ingredientslayer120 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533917  PopIngred8f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,202,16,228 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2022altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred8icon200086toolTip*popup menu of a list of common ingredientslayer121 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533918  PopIngred9f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,219,16,245 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2023altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred9icon200086toolTip*popup menu of a list of common ingredientslayer122 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533919  PopIngred10f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick +popup menu of a list of common ingredients  China Clay Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 3134 3110 3195 3191 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate WollastonitedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,236,16,262 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2024altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred10icon200086toolTip*popup menu of a list of common ingredientslayer123 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextKaolin Ball Clay (- Potash Feldspar Soda Feldspar Nepheline Syenite Cornwall Stone (- Silica (- Frit 3124 Frit 3134 Frit 3110 Frit 3195 (- Gerstley borate (- Whiting Dolomite Bone Ash Talc (- Strontium carbonate Magnesium carbonate Lithium Carbonate Barium carbonate Wollastonite shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533920  PopIngred11f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick )popup menu of a list of common colorants  Bentonite CMC Veegum Cer Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide ZircopaxdcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,271,16,297 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2012altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred11icon200086toolTip(popup menu of a list of common colorantslayer124 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextBentonite Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide Zircopax shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533921  PopIngred12f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick )popup menu of a list of common colorants  Bentonite CMC Veegum Cer Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide ZircopaxdcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,286,16,312 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2013altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred12icon200086toolTip(popup menu of a list of common colorantslayer125 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextBentonite Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide Zircopax shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533922  PopIngred13f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick -)popup menu of a list of common colorants  Bentonite CMC Veegum Cer Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide ZircopaxdcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,301,16,327 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2014altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred13icon200086toolTip(popup menu of a list of common colorantslayer126 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextBentonite Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide Zircopax shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533923  PopIngred14f]on menuPick myItem put the short name of me into myName delete char 1 to 9 of myName put ("ingredient" & myName) into myField put myItem into myIngredient get offset ("|",myIngredient) if it>0 then put " " into char it of myIngredient if fld myField is not empty then answer "Replace '" & fld myField & "' with '" & myIngredient & "'?" with "Replace" or "Cancel" if it is "Replace" then put myIngredient into fld myField end if else put myIngredient into fld myField end menuPick <)popup menu of a list of common colorants  Bentonite CMC Veegum Cer Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide ZircopaxdcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect -2,316,16,342 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2015altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename PopIngred14icon200086toolTip(popup menu of a list of common colorantslayer127 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines100margins1opaquetrue accelModstextBentonite Epsom salts (- Mason stain 6000, shell pink 6001, alpine rose 6002, rose pink 6020, MnAl Pink 6121, Saturn Orange 6201, Celadon 6206, Victoria green 6236, Chartreuse 6288, Turquoise 6305, Teal 6319, Lavender 6371. Dark teal 6364, Turquoise 6373, Turquoise 6381, Blackberry wine 6385, Pansy purple 6450, Praseodymium 6572. Natural gray 6600, Black 6650, Co-free Black (- 6022, Shrimp pink 6024, Orange 6025, Coral red 6026, Lobster 6027, Tangerine 6033, Sunset 6304, Violet (- Cobalt carbonate Cobalt oxide Copper carbonate Copper oxide Red iron oxide Black iron oxide Yellow ochre Rutile Titanium dioxide Chrome oxide Nickel oxide Nickel carbonate Manganese carbonate Manganese dioxide Tin Oxide Zircopax shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepopupfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088701533924 bigSmallWindowCon mouseup if the platform is "MacOS" then put 325 into myMinHeight put 625 into myMaxHeight else -- for Windows with menus in window put 350 into myMinHeight put 650 into myMaxHeight end if if the icon of me is 201186 then set the icon of me to 200951 revChangeWindowSize 525,myMinHeight else set the icon of me to 201186 revChangeWindowSize 525,myMaxHeight end if end mouseup O click to show or hide commentscREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 2,334,28,348 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id2036altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle transparent disabledIcon0 armBordertruenamebigSmallWindowicon201186toolTipclick to show or hide commentslayer129 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089385661867 * Import ASCII@E Bon mouseUp importAscii end mouseUp on importAscii myFileName global importingGlazeBase put true into importingGlazeBase if myFileName is empty then answer file "Find the text file (.txt) of glazes to import:" -- of type "TEXT.*.txt" if the result is not empty then exit importAscii put it into myFile else put myFileName into myFile open file myFile for read set itemDelimiter to ":" put empty into Comments put empty into Materials put empty into Amounts put empty into Colorants put empty into colorAmounts put false into NewGlaze put empty into NumberOfColorants put empty into continueData put empty into numberLast put empty into includesBatch put "copper oxide, copper carbonate, red iron oxide, black iron oxide, rutile, cobalt carbonate, cobalt oxide, bentonite, zircopax, ultrox, superpax, tin oxide," & " chrome oxide, chromium oxide, chromic oxide, titanium dioxide, manganese carbonate, manganese dioxide, yellow ochre, red copper oxide, black copper oxide" & " mason stain, commercial stain, nickel oxide, nickel carbonate, vanadium pentoxide, iron chromate, water, copper oxide red, copper oxide black, " & " cmc, gum arabic, macaloid, epsom salts, methocel, black copper ox, red copper ox, copper ox, iron oxide red, iron oxide black, zirconium oxide, " & " praseodymium oxide, silicon carbide" into colorantList repeat set cursor to busy read from file myFile until return if it is empty then exit repeat put it into tempText if last char of tempText is return then delete last char of TempText put stripSpaces(tempText) into tempText repeat the number of chars of tempText -- strip tabs get offset(tab,tempText) if it>0 then put space into char it of tempText else exit repeat end repeat if tempText is empty then next repeat -- 2/22/97 if char 1 of tempText is ">" then delete char 1 of tempText if word 1 of tempText is ">" then delete word 1 of tempText if char 1 of word 1 of tempText is ">" then delete char 1 of word 1 of tempText if item 1 of tempText contains "Comments" then put "Comments" into ContinueData if tempText is "Also Add:" then next repeat if TempText contains "Totals:" then next repeat -- put myHeader && item 1 of tempText -- delete later -- wait until the mouse is down -- delete later if (":" is not in tempText and ContinueData is not "recipe") then -- -- or (":" is in tempText and (item 1 of tempText is not in "recipe, glaze, name, comment, color, surface, cone, firing, tested, date " -- or "Material #" is not in item 1 of TempText)) then -- 2/22/97 if myHeader contains "Comments" or (myHeader contains "recipe" and "source" is not in myHeader) then if myHeader is "Comments" then put "Comments" into ContinueData if myHeader is "recipe" and "source" is not in myHeader then put "recipe" into ContinueData end if else if myHeader is not empty then put empty into ContinueData put empty into myHeader if "recipe" is not in ContinueData then if offset(":", tempText)>0 or offset("-", tempText)>0 then if item 1 of tempText is "comments" then delete item 1 of tempText --8/8/97 put return & tempText after Comments else put " " & tempText after Comments end if else put item 1 of tempText into myHeader get offset(">", myHeader) if it>0 then delete char it of myHeader if myHeader is "Glaze Name" then if NewGlaze then finishImport materials,amounts,Colorants,ColorAmounts,comments -- then initialize variables for the next recipe put empty into NumberOfColorants put empty into Materials put empty into Amounts put empty into Colorants put empty into colorAmounts put empty into comments put empty into continueData put empty into NumberLast put empty into includesBatch end if doMenu "New Card" if the result is not empty then answer "Can't make a new card. Import Canceled!" close file myFile put empty into importingGlazeBase set itemdelimiter to "," exit importAscii end if put true into NewGlaze delete item 1 of TempText put stripSpaces(tempText) into tempText put tempText into fld "name" next repeat end if if not NewGlaze then next repeat if myHeader is "Cone" then delete item 1 of TempText put empty into continueData if tempText contains "small" then put "c" into fld "C" end if put FormatCones(tempText) into tempText put tempText into fld "cone" -- else if myHeader contains "Cone Size" then -- delete item 1 of TempText -- if tempText contains "small" then -- put "c" into fld "C" -- end if else if myHeader is "Color" and the number of words of myHeader=1 then delete item 1 of TempText put deleteExtraChars(TempText) into TempText put empty into continueData if the number of chars of tempText>40 then put "Color: " & tempText & return after comments put char 1 to 32 of tempText into fld "Color" else if myHeader is "Testing" and the number of words of myHeader=1 then delete item 1 of TempText put deleteExtraChars(TempText) into TempText put empty into continueData if the number of chars of tempText>9 or tempText is not in " Tested , Untested " then put "Testing: " & tempText & return after comments put word 1 of tempText into fld "Tested" else if (myHeader contains "Surface Quality" or myHeader contains "Surface") and "variations" is not in myHeader then delete item 1 of TempText put deleteExtraChars(TempText) into TempText put stripSpaces(tempText) into tempText put empty into continueData if the number of chars of tempText>40 then put "Surface: " & tempText & return after comments put char 1 to 32 of tempText into fld "Surface" else if myHeader is "Firing Type" or myHeader contains "FIring" or myHeader contains "atmosphere" then put deleteExtraChars(TempText) into TempText put empty into continueData if the number of chars of tempText>25 then put "Firing: " & tempText & return after comments delete item 1 of TempText put char 1 to 12 of tempText into fld "Firing" else if myHeader contains "kiln" then put empty into continueData put tempText & return after comments else if myHeader contains "Total" then next repeat -- delete item 1 of tempText -- put first word of tempText into cd fld "TotBatch" else if myHeader contains "Material #" or (myHeader is "recipe" and "source" is not in myHeader) or ContinueData contains "recipe" then if myHeader is "recipe" and "source" is not in myHeader then put "recipe" into ContinueData if ContinueData is empty then delete item 1 of TempText if myHeader is "recipe" and TempText contains ":" then next repeat if last char of tempText is "%" then delete last char of tempText if last word of tempText is "gram" or last word of temptext is "grams" or last word of tempText is "lb" or last word of temptext is "gm" or last word of tempText is "lbs" or last word of temptext is "oz" then delete last word of tempText -- find out recipe format if NumberLast is empty and ContinueData contains "recipe" then if isNumber(last word of tempText) is true then put true into NumberLast else put false into NumberLast end if end if put (the number of words of temptext)-1 into pctAmount -- don't delete - needed later if (includesBatch is empty) and numberLast is true and ContinueData contains "recipe" then if pctAmount>1 and isNumber(word pctAmount of temptext) and word pctAmount of temptext contains "." then put true into includesBatch else put false into includesBatch end if if includesBatch is true then delete last word of TempText put stripSpaces(tempText) into tempText -- if offset(tab,temptext)>0 and ContinueData contains "recipe" then -- put tab into myDelimitChar -- else if includesBatch is true then -- put space into myDelimitChar -- else put the itemDelimiter into myDelimitChar -- put the itemDelimiter into theDelimitChar -- set the itemdelimiter to myDelimitChar -- if the number of items of tempText>2 and item 2 of tempText is not empty then -- delete last item of tempText -- else if includesBatch is true then delete last word of TempText -- set the itemdelimiter to theDelimitChar if numberLast is true then put last word of tempText into myWord else put first word of tempText into myWord put empty into tempWord repeat with i= the number of chars of myWord down to 1 if char i of myWord is not in "0123456789 ." then put char i of myWord before tempWord delete char i of myWord end if end repeat put myWord into tempAmount if numberLast is true then delete last word of tempText else delete first word of TempText if tempWord is not empty then put tempText & " " & tempWord into tempText else put tempText into tempText -- strip tabs & spaces was here if continueData is "recipe" or (tempText is not empty and tempText is not " " and tempText is not " ") then if (colorantList contains tempText or tempText contains "stain") and NumberOfColorants<5 then put tempAmount & return after ColorAmounts put tempText & return after Colorants add 1 to NumberOfColorants else put tempAmount & return after Amounts put tempText & return after Materials end if end if -- else if myHeader contains "Clay Color/Type" then -- these are used only by GlazeBase Stack -- put deleteExtraChars(TempText) into TempText -- if there is a fld "ClayType" then -- delete item 1 of TempText -- put tempText into fld "ClayType" -- else -- put return & tempText after comments -- end if -- else if myHeader contains "Clarity" then -- put deleteExtraChars(TempText) into TempText -- if there is a fld "Opacity" then -- delete item 1 of TempText -- put tempText into fld "Opacity" -- else -- put return & tempText after comments -- end if -- else if myHeader contains "Crystals" then -- put deleteExtraChars(TempText) into TempText -- if there is a fld "Crystals" then -- delete item 1 of TempText -- put tempText into fld "Crystals" -- else -- put return & tempText after comments -- end if -- else if myHeader contains "Glaze Flow" then -- put deleteExtraChars(TempText) into TempText -- if there is a fld "GlazeFlow" then -- delete item 1 of TempText -- put tempText into fld "GlazeFlow" -- else -- put return & tempText after comments -- end if -- else if myHeader contains "Glaze Contributor" then -- if there is a fld "Submitter" then -- delete item 1 of TempText -- put tempText into fld "Submitter" -- else -- put return & tempText after comments -- end if -- else if myHeader contains "Date of Submission" then -- delete item 1 of TempText -- put tempText into fld "Date" else if myHeader contains "cone type" then put deleteExtraChars(TempText) into TempText if myHeader contains "Bubbles Within Glaze" then put deleteExtraChars(TempText) into TempText if offset(":", tempText)>0 or offset("-", tempText)>0 then put return & tempText after Comments else put " " & tempText after Comments end if end if end repeat if NewGlaze then FinishImport materials,amounts,Colorants,ColorAmounts,comments else answer "This was not a properly formatted GlazeBase recipe." close file myFile set itemdelimiter to "," put empty into importingGlazeBase end importAscii on finishImport materials,amounts,Colorants,ColorAmounts,comments put the number of lines of Materials into NumberOfMaterials put empty into MaterialOverFlow if NumberOfMaterials>10 then repeat with i=11 to NumberOfMaterials if line i of materials is not empty or line i of materials is not " " then put line i of materials && line i of amounts & return after MaterialOverFlow end repeat put "Too many ingredients (these ingredients are also to be added to the recipe):" & return & MaterialOverFlow before comments put 10 into NumberOfMaterials end if repeat with i=1 to NumberOfMaterials if the number of words of line i of Materials>0 then put line i of Materials into fld ("ingredient" & i) put line i of Amounts into fld ("amount" & i) end if end repeat put the number of lines of Materials into NumberOfMaterials if NumberOfColors>4 then put 4 into NumberOfColors repeat with i=1 to NumberOfColors if the number of words of line i of Colorants>0 then put line i of Colorants into fld ("ingredient" & i+10) put line i of ColorAmounts into fld ("amount" & i+10) end if end repeat if the number of chars of comments>29900 then put char 1 to 29900 of comments into fld "Comments" -- put " > GlazeBase recipe < " & return before fld "Comments" ask file "Too many comments." & return & "Save the remainder as:" with char 1 to 20 of fld "name" && "Comments" if the result is not empty then put it into CommentFile open file CommentFile write char 29901 to (the number of chars of Comments) of Comments to file CommentFile close file commentFile end if else if word 1 of comments is "comments" or word 1 of comments is "comments:" then delete word 1 of comments --8/8/97 if char 1 of comments is ":" then delete char 1 of comments --8/8/97 repeat the number of lines of comments if line 1 of comments is empty then delete line 1 of comments else exit repeat end repeat put comments into fld "Comments" -- put "> ClayArt Listserv recipe <" & return & -- "If you find this glaze useful, please consider submitting it to the GlazeBase project with full documentation. " & -- "Use one of the GlazeBase submission formats available on the CeramicsWeb web page. " & return -- before fld "Comments" end if if fld "Date" is empty then put the short date into fld "Date" end if end finishImport function FormatCones myText put false into CheckNext repeat with i=the number of words of myText down to 1 get word i of myText put true into NotNumber repeat with x=1 to the number of chars of it if char x of it is in "0123456789 ,-" then put false into NotNumber end repeat if NotNumber then delete word i of myText end repeat put stripSpaces(myText) into myText repeat with i= the number of chars of myText down to 1 -- if char i of myText is " " then delete char i of myText if char i of myText is not in "a0123456789 ,-" then put "," into char i of myText get char i of myText if checkNext then if it is not " " then put " " after char i of myText put false into CheckNext if it is "-" then if char i+1 of myText is not " " then put " " after char i of myText put true into checkNext end if if it is "," then if char i+1 of myText is not " " then put " " after char i of myText end if end repeat put stripSpaces(myText) into myText return myText end FormatCones function deleteExtraChars myText -- get offset(">", myText) -- if it>0 then put empty into char it of myText get offset("[", myText) if it>0 then repeat put empty into char it of myText get offset("[",myText) if it<=0 then exit repeat end repeat end if get offset("]", myText) if it>0 then repeat put empty into char it of myText get offset("]",myText) if it<=0 then exit repeat end repeat end if return myText end deleteExtraChars function isNumber mytext repeat with x=1 to the number of chars of mytext if char x of mytext is in "1234567890. " then put true into myResult else put false into myResult exit repeat end if end repeat return myResult end isNumber KCjcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalse mnemonic0rect306,311,373,327armFillfalse patterns visitedIcon0colors showIconfalse showNametruehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1263altId106 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalse autoHilitetruelabel Show Lines showHilitefalsevisitedfalse disabledIcon0style rectangle armBorderfalseicon0name Show LinestoolTiphides or shows recipe underline accelTextlayer109 borderWidth2 cantSelectfalsevisibletrue menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize10autoArmfalsefamily0 menuMode textFontArial menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1093713423072 *Import InsightD !on mouseup answer file "Please locate the Insight recipe file (.RCP or .RCX file) to open:" --with filter "????,*.rcp" if the result is not empty then exit mouseup put it into myFileName put the number of chars of myFileName into myFileChars put (char (myFileChars-3) to myFileChars of myFileName) into myFileExtension if myFileExtension = ".RCP" then importInsight myFileName else if myFileExtension = ".RCX" then importNewInsight myFileName else answer "This doesn't appear to be an Insight recipe file." & return & " It does not end in '.RCP' or '.RCX'" end mouseup on importInsight myFileName put "copper oxide, copper carbonate, red iron oxide, black iron oxide, rutile, cobalt carbonate, cobalt oxide, bentonite, zircopax, ultrox, superpax, tin oxide," & " chrome oxide, chromium oxide, chromic oxide, titanium dixoide, manganese carbonate, manganese dioxide, yellow ochre, red copper oxide, black copper oxide" & " mason stain, commercial stain, nickel oxide, nickel carbonate, vanadium pentoxide, iron chromate, water, copper oxide red, copper oxide black, " & " cmc gum arabic, macaloid, epsom salts, methocel, black copper ox, red copper ox, copper ox, iron oxide red, iron oxide black" into colorantList put 0 into NumberOfColorants put empty into colorants put empty into materials put empty into colorantAmounts put empty into materialAmounts put false into isColorant if myFileName is empty then answer file "Please locate the Insight recipe file (.RCP or .RCX file) to open:" --with filter "????,*.rcp" if the result is not empty then exit importInsight put it into myFileName end if set the cursor to watch open file myFileName for read read from file myFileName until return put char 1 of word 1 of it into INSGHTver read from file myFileName until return if "RCP" is not in it then put "Sorry, " & myFileName & " wasn't an insight glaze recipe." play boing close file myFileName exit importInsight end if doMenu "New Card" read from file myFileName until return read from file myFileName until return if last char of it is return then delete last char of it put it into fld "Name" repeat with i = 1 to 14 read from file myFileName until return put it into tempText if tempText contains "EOF" then repeat with x=1 to the number of lines of materials put line x of materials into fld ("ingredient" & x) put line x of materialAmounts into fld ("amount" & x) end repeat repeat with x= 1 to the number of lines of colorants put line x of colorants into fld ("ingredient" & x+10) put line x of colorantAmounts into fld ("amount" & x+10) end repeat checkForNotes myFileName close file myFileName exit importinsight end if if last char of tempText is return then delete last char of tempText put stripSpaces(tempText) into tempText if colorantList contains tempText and NumberOfColorants<4 then put true into isColorant put tempText & return after Colorants add 1 to NumberOfColorants else put tempText & return after Materials end if read from file myFileName until return if INSGHTver<4 then read from file myFileName until return put it into tempText if last char of tempText is return then delete last char of tempText if isColorant then put tempText & return after colorantAmounts put false into isColorant else put tempText & return after materialAmounts end repeat repeat read from file myFileName until return if it is empty or it contains "EOF" then exit repeat if last char of it is return then delete last char of it put it & " " after theRestOfRecipe read from file myFileName until return if it is empty or it contains "EOF" then exit repeat read from file myFileName until return if INSGHTver<4 then read from file myFileName until return if it is empty or it contains "EOF" then exit repeat if last char of it is return then delete last char of it put it & ", " after theRestOfRecipe end repeat if theRestOfRecipe is not empty then answer "Sorry, this Insight recipe contains more than 14 ingredients. The additional ingredients will appear in the comments." put "Truncated recipe, translated from Insight recipe." && "Additional ingredients include: " & theRestOfRecipe after fld "Comments" play boing checkForNotes myFileName close file myFileName exit importInsight end if close file myFileName end importInsight on checkForNotes myFileName read from file myFileName until return read from file myFileName until end repeat with i=1 to the number of lines of it if line i of it is "NOTES" or line i of it is "ENDNOTES" then delete line i of it end repeat put it into fld "Comments" end CheckForNotes on importNewInsight myFileName put "copper oxide, copper carbonate, red iron oxide, black iron oxide, rutile, cobalt carbonate, cobalt oxide, bentonite, zircopax, ultrox, superpax, tin oxide," & " chrome oxide, chromium oxide, chromic oxide, titanium dixoide, manganese carbonate, manganese dioxide, yellow ochre, red copper oxide, black copper oxide" & " mason stain, commercial stain, nickel oxide, nickel carbonate, vanadium pentoxide, iron chromate, water, copper oxide red, copper oxide black, " & " cmc gum arabic, macaloid, epsom salts, methocel, black copper ox, red copper ox, copper ox, iron oxide red, iron oxide black" into colorantList put 0 into NumberOfColorants put empty into colorants put empty into materials put empty into colorantAmounts put empty into materialAmounts put false into isColorant if myFileName is empty then answer file "Please locate the Insight recipe file (.RCP or .RCX file) to open:" --with filter "????,*.rcp" if the result is not empty then exit importNewInsight put it into myFileName end if set the cursor to watch open file myFileName for read read from file myFileName until ">" if char 2 to 4 of it is not "RCX" then answer "This is not an Insight 'RCX' file." exit importNewInsight end if doMenu "New Card" read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if repeat 10 delete last char of it end repeat put it into fld "Name" put it into myGlaze get offset("Cone", myGlaze) if it>0 then put char 1 to (it-2) of myGlaze into NewGlazeName delete char 1 to (it+4) of myGlaze get offset(" ",myGlaze) put char 1 to (it-1) of myGlaze into fld "Cone" delete char 1 to (it-1) of myGlaze put NewGlazeName before myGlaze put myGlaze into fld "Name" end if read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if repeat 7 delete last char of it end repeat put it into fld "Date" read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if put it into myRecipe repeat with i=1 to 14 get offset("",myRecipe) if it =0 then then exit repeat delete char 1 to (it+9) of myRecipe get offset("",myRecipe) if it is empty then exit repeat put char 1 to (it-1) of myRecipe into myMaterial --delete char 1 to it of myRecipe put myMaterial into fld ("Ingredient" & i) get offset("",myRecipe) if it =0 then then exit repeat delete char 1 to (it+7) of myRecipe get offset("",myRecipe) if it is empty then exit repeat put char 1 to (it-1) of myRecipe into myMaterial --delete char 1 to it of myRecipe put myMaterial into fld ("Amount" & i) end repeat read from file myFileName until "" --put it if it is empty then bailOutImport myFileName exit importNewInsight end if read from file myFileName until "" if it is empty then bailOutImport myFileName exit importNewInsight end if repeat 8 delete last char of it end repeat put it into fld "Comments" close file myFileName end importNewInsight on bailOutImport myFileName close file myFileName end bailOutImport )KNjcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect306,311,373,327 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1263altId106 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel Show Lines autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename Show Linesicon0toolTiphides or shows recipe underlinelayer109 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1093713494541 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + *( TEwarningCon mouseup put empty into CalcProblems if line 6 of fld "RO2">0.005 then put "& Fluorine" into CalcProblems put line 12 of fld "R2O" into mySrO put line 5 of fld "R2O" into myLiO2 if myLiO2 >0.005 and myLiO2 >0.005 then if calcProblems is not empty then put ", " after CalcProblems put " Lithium oxide & Strontium oxide" after CalcProblems else if myLiO2 >0.005 then if calcProblems is not empty then put ", " after CalcProblems put "Lithium oxide" after CalcProblems end if if mySrO >0.005 then if calcProblems is not empty then put ", " after CalcProblems put "Strontium oxide" after CalcProblems end if end if if calcProblems is not empty then put "This formula contains " & calcProblems & "." & return & "Thermal expansion calculations are not accurate."\ & return & "The estimated thermal expansion offers only an approximation of" & return & "how changes in the glaze will affect glaze fit." & return\ into TEdialog end if if fld "Surface" contains "mat" then put "You have specified this as a MATTE glaze." & return & "Thermal expansion calculations are not accurate for matte glazes." \ & return & "but they may offer an approximation of how changes in the" & return & "glaze will affect glaze fit." after TEdialog end if if fld "Surface" contains "slip" or fld "Surface" contains "engobe" then put "You have specified this as a SLIP or ENGOBE." & return & "Thermal expansion calculations are not accurate for non-glaze surfaces." \ after TEdialog end if if TEdialog is not empty then answer TEdialog -- else -- hide me end if end mouseup 8click to see if estimated thermal expansion is accurate*) cREVGeneral revUniqueID 1093807731681  Name iX on closefield put stripSpaces(fld "Name") into fld "Name" put stripReturns(fld "Name") into fld "Name" pass closefield end closefield on openfield click at ((item 3 of the rect of fld "name")-10),48 -- was 290 end openfield '2cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect -2,38,304,68multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1033altId1autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNametoolTipvGridfalse listBehaviorfalselayer7visibletrue cantSelectfalse borderWidth2margins6 htmlText#

Satin White Transparent rev.

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088712736378 + nhhf01 + nhhf02 + nhhf03 + Round Texture Glaze ' Crawl Glaze ( Noxema Blue $ Batz Clear Amber (2 Pete's Copper Red ) Willie Hillix Green *- Meloy Clear revised ' Hippie White ' Hay's Drippy rev. ' Amber Celadon *, Fake Avery Flashing Slip #5 & Texture/Crawl glaze & Stephans Strontium & Satin Base (for pink) rev. ) Pete's Clear Liner ) Mackersie Yellow Matte ) Hamada Strontium & Fake Ash Rivulet 1 & Clear Glaze (for pink) & Clear Bright rev. & Very Stable Clear & Transparent 4 rev.2 & Polished Matt revised & Polished Matt &g Midrange Majolica 96 &f Midrange Drip & Clear - no craze &K L. A. Satin Matt white &- Black Gloss &I Kranz ) Yellow Salt (@ Red Blue Ash ) Zelmer Trailing Glaze ) Woo Blue Brown ( St. Johns Yellow */ Shaner Shino rev03 (t Shaner Shino rev. 02 (w Shaner Shino *+ Satin Doll Black - rev. (K Richard's Drip (B Reitz M-2 +S Celadon - Blue (8 Powder Blue ( Ohata Khaki ( No. 22 Green ( New Maryse Red 2 ( Mean Green ' L.P. Mat rev. ' Japanese Limestone 'j Emily Purple ' Alfred L Transparent % Sun Set Sand % Robbin's Egg Blue Raku rev. %~ Reynold's Wrap revised % SDSU Crawl $ Beads %w Pinnell's Lowfire % Stain Colored Engobe %c Majolica $ Amber Clear rev. 2 %l No Boron %] Majolica Ric's New $ Batz Majolica Glaze $ Alkaline Egyptian Blue +N Celadon - SDSU 1999 +c Phoenix 2 +b New Tyler Amber +k Jade Green altered +a Jade Green +` Peacock +l Crystal Glaze altered +_ Crystal Glaze +n !Lana's Bronze Aqua Glaze altered +^ Lana's Bronze Aqua Glaze +] Mark Bell's Lichen Glaze +t Lana's Lichen Glaze altered +\ Lana's Lichen Glaze +[ Gina's Perwinkle +o Spiffy Blue altered +Z Spiffy Blue +Y Kiwi Green + Metallic Black alt 1 + Metallic Black alt 3 + Metallic Black alt 2 + Metallic Black alt10 + Metallic Black alt9 + Metallic Black alt8 + Metallic Black alt7 + Metallic Black alt6 + Metallic Black alt5 + Black Slip + Black Slip + Metallic Black alt4 +X Metallic Black + Destiny Red +W Bertha's Caribbiean Vacation + ACE Red + SDSU Texture Crawl Glaze + Rudy's Opal Light Blue + Rudy's Opal flat green + !Strontium Matt Smooth Black no.6 + Residential + Basic White Slip + Adraine Mota's White Base Slip + Adriane Mota's Best Base Slip + Elaine Johnson's Slip Base + Jarvis Matt Green +m Orange Blue Crystal altered +V Orange Blue Crystal +j Crackle Glaze altered +i Crackle Glaze +U Crackle Glaze +p Opaque Semi Blue Gloss altered + Green Rock + Deep Forest Green + Phantom Red + Dark Abyss Blue + Large Crystal Glaze + Stone Blue +T Opaque Semi Blue Gloss +s TMH 4 altered +h TMH 4 +r Denton altered +g Denton + Wasteland Clear +q Nordhoff Yellow altered +f Nordhoff Yellow +e TMH 2 + Pharsalia 9 + Pharsalia 7 + Pharsalia 10 + Pharsalia 8 + Pharsalia 6 + Pharsalia 5 + Pharsalia 4 + Pharsalia 3 + Pharsalia 2 + Pharsalia 1 +d Pharsalia + Crystal #5 + Crystal #4 + Crystal #3 + Crystal #2 + Crystal #1.2 + Crystal #1.5 + Crystal #1.4 + Crystal #1.3 + Crystal #1.1 + Crystal #1 +~ Aqua Bronze #5 +} Aqua Bronze #4 +| Aqua Bronze #3 +{ Aqua Bronze #2 +z Aqua Bronze #1 +y Lichen #5 +x Lichen #4 +w Lichen #3 +v Lichen #2 + Bronze Aqua Glaze Gloss 2 + Orange Blue Crystal 2 + Orange Blue Crystal 1 + Dark Jello Green + Lichen #1E + Lichen #1D + Lichen #1C + Cool Black + Lichen #1B +u White Dragon Skin + Earth Green + ? + Jarson's Blue Fish Scale + Oxblood + Honey Amber + Chun-Like Blue + Transparent Green + New White + Kim Dickey's Pink Cream + Dan's Matte Green + Randy's Green + Amber Celedon + Woo (Lewis) Yellow + Laura's Tourquoise + Seafoam Green + ? + Kurt's Clear + Kurt's Black Slip + Kurt's Porcelain Slip + Dobson's Speckled Desert + Tan Rust+i  cREVGeneral revUniqueID 1105317585811 Graphic 1KFcREVTempMaster, traversalOnfalseinksrcCopythreeDtrue startAngle0rect 3,643,517,645angle0filledtrue patterns showNamefalsecolors204,204,204 204,204,204 arcAngle360 dontResizefalse startArrowfalsepoints 4,644 516,644id2033 markerDrawnfalse arrowSize3altId0 markerFilledfalsemarkerLineSize1 textStylelockLocfalse roundRadius15labelstyleline endArrowfalse markerPointsdashesname Graphic 1toolTip lineSize1 polySides4layer128visibletrue cantSelectfalse borderWidth2margins4 roundEndstrueopaquetrue showBorderfalse textSize disabledfalse textFontshowFocusBordertrue cREVGeneral revUniqueID 1089205136001  Glazes Label ̙cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight14rect 2,28,306,40multipleHilitesfalse patterns colors204,204,153 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1307altId0autoTabfalse textStyle bold,italichGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0name Glazes LabeltoolTipvGridfalse listBehaviorfalselayer113visibletrue cantSelectfalse borderWidth2margins2 htmlText4

G L A Z E R E C I P E

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize11 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088113800254 .G L A Z E R E C I P Ei O cREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect 12,76,278,96 patterns showNamefalsecolors hScroll0backgroundBehaviorfalse cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid2031altId0radioBehaviortrue textStylelockLocfalselabelname group id 2031toolTiplayer3visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1089204255280 label H @S( Abatch amounts are calculated - change the total batch size belowcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 234,80,274,92multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid2029altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTip@batch amounts are calculated - change the total batch size belowvGridfalse listBehaviorfalselayer6visibletrue cantSelectfalse borderWidth2margins5 htmlText

Batch:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088816919136 Batch: label H ffffff@SL Ingredients:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088816851975 INGREDIENTS: label H ffffff@TF type recipe amounts herecREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 152,80,222,90multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid2028altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTiptype recipe amounts herevGridfalse listBehaviorfalselayer5visibletrue cantSelectfalse borderWidth2margins5 htmlText

Amounts:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088816905038 AMOUNTS: + RO2TopLabel  ff33Z@ cREVGeneral revUniqueID 1108687678397 RO2 + R2O3TopLabel  ~Z@ cREVGeneral revUniqueID 1108687678398 R2O3 + ROTopLabel  4Z@ cREVGeneral revUniqueID 1108687678399 RO - FluxJUnity Formula%  on mouseUp show fld "GlazeType" show fld "Comments" show fld "hazards" show button "Health Hazards" set the scroll of fld "Comments" to 0 end mouseUp 3Q:Unity Molecular FormulacREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 306,81,514,95 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1098altId58 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruename Unity Formulaicon0toolTiplayer90 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins6opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736456 1 Graph UMF`E  on mouseUp set cursor to watch set hilite of me to not hilite of me put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Sr" into RO put "Al,B,Fe,P" into R2O3 put "Si,Ti" into RO2 if the hilite of me is true then hide fld "R2O" hide fld "R2O3" hide fld "RO2" show btn "UMFHide1" show btn "UMFHide2" show btn "UMFHide3" show btn "MatGloss" repeat with i=1 to 8 show btn (item i of RO) graph line i of fld "R2O",item i of RO end repeat show btn "Sr" graph line 12 of fld "R2O", "Sr" repeat with i=1 to 4 show btn (item i of R2O3) graph line i of fld "R2O3",item i of R2O3 end repeat repeat with i=1 to 2 show btn (item i of RO2) graph line i of fld "RO2",item i of RO2 end repeat show btn "SiRatio" put line 1 of fld "R2O3" into myAl if myAl>0 then graph (line 1 of fld "RO2")/myAl,"SiRatio" else graph 0,"SiRatio" else repeat with i=1 to 8 hide btn (item i of RO) end repeat hide btn "Sr" repeat with i=1 to 4 hide btn (item i of R2O3) end repeat repeat with i=1 to 2 hide btn (item i of RO2) end repeat hide btn "SiRatio" hide btn "UMFHide1" hide btn "UMFHide2" hide btn "UMFHide3" hide btn "matGloss" show fld "R2O" show fld "R2O3" show fld "RO2" end if end mouseUp on adjustGraph set cursor to watch put "K,Na,Ca,Mg,Li,Ba,Pb,Zn" into RO put "Al,B,Fe,P" into R2O3 put "Si,Ti" into RO2 repeat with i=1 to 8 graph (line i of fld "R2O"),(item i of RO) end repeat graph (line 12 of fld "R2O"), "Sr" repeat with i=1 to 4 graph (line i of fld "R2O3"),(item i of R2O3) end repeat repeat with i=1 to 2 graph (line i of fld "RO2"),(item i of RO2) end repeat put line 1 of fld "R2O3" into myAl if myAl>0 then graph ((line 1 of fld "RO2")/myAl),"SiRatio" else graph 0,"SiRatio" end adjustGraph on graph what,where send ("AdjustBar " & what) to btn where end graph QL#shows unity formula as a bar graphcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 446,81,522,95 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors141,3,3 187,231,229 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1073altId133 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruename Graph UMFicon0toolTip"shows unity formula as a bar graphlayer106 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736460 +" Graphic 4K2]3^3 cREVGeneral revUniqueID 1108687872134+$ Graphic 4K^b_ cREVGeneral revUniqueID 1108687898130+% Graphic 4K34 cREVGeneral revUniqueID 1108687930287+& Graphic 4K3#4$$ cREVGeneral revUniqueID 1108687941241+' Graphic 4Kv]w^w cREVGeneral revUniqueID 1108688117533sSurface on menupick myItem if myItem is "Help with Surface Descriptions" then Answer "Shiny/Glossy: very bright and smooth" & return &\ "SemiGloss: slightly dulled surface" & return &\ "Satin: waxy mat or satiny feel & low sheen" & return &\ "Matte: little sheen, dull surface" & return & \ "Dry Matte: almost slip-like, very dull surface" & return & \ "Luster: metallic sheen" & return & \ "Texture: crawl, etc. (specify)" else if myItem is not empty then if fld "surface" is not empty then put " " after fld "surface" put myItem after fld "Surface" select after line 1 of fld "Surface" end if end menupick B+!choose the surface of your glazeSurfaceshiny or glossy semi-gloss semi-matte or satin matte dry matte - crystalline metallic luster texture rivulet slip or engobe stain - Help with Surface Descriptions cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 167,66,211,84 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowtrue textAlignleftarmedfalsemenuMouseButton1id1139altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelSurface autoHilitefalsestylemenu disabledIcon0 armBorderfalsenameSurfaceicon0toolTip choose the surface of your glazelayer93 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines13margins4opaquetrue accelModstextshiny or glossy semi-gloss semi-matte or satin matte dry matte - crystalline luster texture slip or engobe stain - Help with Surface Descriptions shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1086713045716 vFiring ]lon menupick myItem if myitem is not empty then put myItem into fld "firing" end if end menupick IB popup menu - choose firing typePoxidation reduction oxidation or reduction Raku salt or soda wood luster saggarcREVTempMaster; traversalOnfalseinkclearthreeDtrue hiliteBordertruerect 328,66,342,80 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1142altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestylemenu disabledIcon0 armBorderfalsenameFiringicon200936toolTippopup menu - choose firing typelayer95 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines8margins4opaquetrue accelModstextOoxidation reduction oxidation or reduction Raku salt or soda wood luster saggar shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1086715376978 +7Batch2MH@ PP cREVGeneral revUniqueID 1109543629199 + + + + ' ( 3.15 $ 20.0 35.0 (2 80 24 80 12 ) 5.88 *- 0.50 0.08 ' ' ' 8.70 *, & & 10.00 & 3.00 0.25 ) ) 2.00 4.00 ) 3.09 2.07 & & & & 1.49 & & & 6.00 &g 811 264 44 &f & &K 4.00 &- 7.00 &I ) 77 307 12 (@ 120 120 ) ) 320 320 ( 0.07 0.52 2.59 */ (t (w *+ 80 160 160 80 (K (B 50 50 +S 50 (8 2.26 0.44 1.25 ( 6.47 0.88 ( 400 ( 424 504 ( 320 160 ' ' 'j 2.00 2.00 2.00 ' % 250 250 100 % 5.0 %~ 609 % 272 $ 6.67 %w 8.00 % 88.23 %c 94 259 47 $ 10.0 35.0 %l %] $ 1692 $ 3.28 +N 40 80 12 +c +b +k +a 5.00 5.00 +` 1.50 +l 0.53 0.53 0.32 +_ 0.50 0.50 0.30 +n 2.50 3.00 4.00 +^ 2.50 3.00 4.00 +] +t +\ +[ 5.00 +o 1.50 +Z 1.50 +Y 6.00 10.00 + 4.00 4.00 2.00 + 4.17 4.17 2.08 + 4.08 4.08 2.04 + 4.08 4.08 2.04 + 4.08 4.08 2.04 + 4.08 4.08 2.04 + 4.08 4.08 2.04 + 4.00 4.00 2.00 + 4.08 4.08 2.04 + + + 4.00 4.00 2.00 +X 4.00 4.00 2.00 + 1.67 +W 5.00 + 5.00 0.15 + + 400 + 300 + 250 + 5.01 2.50 + + + + + 3.00 +m 1.03 +V 1.00 +j +i +U +p 1.50 3.00 1.00 + 2.93 3.90 + 5.26 5.26 + 3.43 + 1.50 + 0.53 0.53 + 1.50 3.00 1.00 +T 1.50 3.00 1.00 +s 2.00 +h 2.00 +r 2.50 +g 2.50 + 6.00 +q 6.00 +f 6.00 +e 2.00 + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + 2.93 3.90 + 1.03 + 1.03 + 2.93 3.90 + 1.10 + 1.10 + 1.07 + 8.00 + 1.04 +u 1.04 + 2.93 3.90 + + 3.00 + 112 54 50 + 3.00 5.00 + 2.00 1.40 0.50 3.00 + 75 75 + + 8.00 2.00 + 3.30 3.30 + 6.01 + 7.62 + 3.00 + 2.61 2.92 + 3.00 + + + + + + +9 UMFLockImagebB*8on mouseUp send mouseup to btn "LockUMF" end mouseUp +5 cREVGeneral revUniqueID 1109544815371 + + + + ' ( $ (2 ) *- ' ' ' *, & & & ) ) ) & & & & & & & &g &f & &K &- &I ) (@ ) ) ( */ (t (w *+ (K (B +S (8 ( ( ( ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + +DJPEGLoc @&H cREVGeneral revUniqueID 1127089835967 + + + + ' ( $ (2 Pete'sRed.JPG ) *- Clear-MeloyRev.JPG ' HippieWhite.JPG ' ' *, FakeAvery.JPG & & & ) ) ) & & & & & & & &g &f & &K &- &I ) YellowSalt.JPG (@ ) ) ( */ (t (w *+ (K BlueDrip.JPG (B +S Celadon-Blue.jpg (8 ( Ohata-SDSU.JPG ( ( NewMaryseRed2.jpg ( ' ' 'j ' % % %~ % $ %w % %c $ %l %] $ $ +N Celadon-SDSU.JPG +c +b +k +a +` +l +_ +n +^ +] +t +\ +[ +o +Z +Y + + + + + + + + + + + + +X + +W + + + + + + + + + + + +m +V +j +i +U +p + + + + + + +T +s +h +r +g + +q +f +e + + + + + + + + + + +d + + + + + + + + + + +~ +} +| +{ +z +y +x +w +v + + + + + + + + + +u + + + + + + + + + + + + + + + + + + + + + +HPicture@e on mouseUp global gHGImageFolderLoc if the optionkey is down then answer file "Where is the picture of this glaze?" if the result is not empty then exit mouseup else set the itemdelimiter to "/" put the last item of it into fld "JPEGloc" put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation open stack "Glaze Picture" show stack "Glaze Picture" set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation put GlazeImageFilename into fld "GlazePictureFilename" end if else if the visible of stack "Glaze Picture" is true then hide stack "Glaze Picture" close stack "Glaze Picture" else if fld "JPEGloc" is empty then answer file "Where is the picture of this glaze?" if the result is not empty then exit mouseup else set the itemdelimiter to "/" put the last item of it into fld "JPEGloc" put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation open stack "Glaze Picture" show stack "Glaze Picture" set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation put GlazeImageFilename into fld "GlazePictureFilename" end if else put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation open stack "Glaze Picture" show stack "Glaze Picture" set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation put GlazeImageFilename into fld "GlazePictureFilename" -- if the result is not empty then -- answer "Could not find picture file." -- end if end if end if end if end mouseUp 3HCGhides or shows image of the glaze - Option [ALT] click to change imagejPicturecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalse mnemonic0rect306,311,373,327armFillfalse patterns visitedIcon0colors showIconfalse showNametruehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1263altId106 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalse autoHilitetruelabel Show Lines showHilitefalsevisitedfalse disabledIcon0style rectangle armBorderfalseicon0name Show LinestoolTiphides or shows recipe underline accelTextlayer109 borderWidth2 cantSelectfalsevisibletrue menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize10autoArmfalsefamily0 menuMode textFontArial menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1127229557017 GlazesMenubarIcREVTempMaster# traversalOnfalse dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -3,-5,212,22 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1285altId0radioBehaviortrue textStyleboldlockLocfalselabelname GlazesMenubartoolTiplayer130visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize11 disabledfalse textFont Lucida GrandevScroll0hilitedButton0 cREVGeneral revUniqueID 1088712736461FileUA --The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Open" if the platform is "MacOS" then answer file "Select the HyperGlaze stack to open:" of type "RSTK" else if the platform is "Win32" then answer file "Select the HyperGlaze stack to open:" with filter "Stack file,*.rev" end if if it is empty then exit menuPick open stack it show stack it break case "Close" close stack the topstack break case "Save" set cursor to busy save stack "Glazes" if the result is not empty then answer "The Glazes stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Index" if the result is not empty then answer "The Glaze Index stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Materials" if the result is not empty then answer "The Materials stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Materials Index" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "clays" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Clay Index" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Limits" if the result is not empty then answer "The Glaze Limits stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Calculator" if the result is not empty then answer "The Glaze Calculator stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Complex Search" if the result is not empty then answer "The Complex Search stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "QuadBlender" if the result is not empty then answer "The QuadBlender stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Bibliography" if the result is not empty then answer "The Bibliography stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if break case "Import|HyperGlaze file" send mouseup to btn "import Glaze File" --hidden break case "Import|Insight file" send mouseup to btn "import Insight" --hidden break case "Import|GlazeBase TEXT file" send mouseup to btn "import ASCII" --hidden break case "Export|as HyperGlaze file" saveAsGlazeFile break case "Export|as Text file" saveAsTextFile break case "Export|as Insight RCP file" saveInsight break case "Export Marked Cards|as Text file" saveMarkedTextGlazes break case "Export Marked Cards|as HyperGlaze file" saveMarkedGlazes break case "Page Setup" answer printer break case "Print Card" click at "350,30" if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches open printing with dialog if the result is not empty then exit menuPick print this card close printing break case "Print Marked Cards" if the number of marked cards of stack "Glazes" <=0 then answer "There are no marked glaze cards!" exit menuPick end if if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches open printing with dialog if the result is not empty then exit menuPick click at 350,30 print marked cards close printing break case "Print Special|Glaze with Limit graph" if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" open printing with dialog click at 350,30 print this card push card go to stack "Glaze Limits" send mouseup to btn "Limits for Current Glaze" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" print this card pop card close printing break case "Print Special|Marked Glazes w Limit graph" if the number of marked cards of stack "Glazes" <=0 then answer "There are no marked glaze cards!" exit menuPick end if push card if the showLines of fld "name" is true then send mouseup to btn "Show Lines" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" open printing with dialog repeat the number of marked cards go to next marked card click at 350,30 print this card go to stack "Glaze Limits" send mouseup to btn "Limits for Current Glaze" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" print this card go to stack "Glazes" end repeat close printing pop card break case "Print Special|Marked Glazes as Labels 3.3x4" hide stack "Label Printing" open stack "Label Printing" send mouseup to btn "Print Glazes" of stack "Label Printing" break case "Print Special|Marked Glazes as Labels with Hazards" hide stack "Label GlazeHazards" open stack "Label GlazeHazards" send mouseup to btn "Print GlazeHazards" of stack "Label GlazeHazards" break case "Quit HyperGlaze" -- set the itemDelimiter to "." -- versions are of the form "x.y.z" -- if the platform is "MacOS" and item 1 of the systemVersion >= 10 then put true into myComputerIsOSX -- if myComputerIsOSX is not true then -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- set cursor to watch -- if it is "Save" then -- save stack "Glazes" -- if the result is not empty then -- answer "The Glazes stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Index" -- if the result is not empty then -- answer "The Glaze Index stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials" -- if the result is not empty then -- answer "The Materials stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "clays" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Clay Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Limits" -- if the result is not empty then -- answer "The Glaze Limits stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Calculator" -- if the result is not empty then -- answer "The Glaze Calculator stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Complex Search" -- if the result is not empty then -- answer "The Complex Search stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- end if quit --end if break case "Quit" -- set the itemDelimiter to "." -- versions are of the form "x.y.z" -- if the platform is "MacOS" and item 1 of the systemVersion >= 10 then put true into myComputerIsOSX -- if myComputerIsOSX is not true then -- -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- set cursor to watch -- if it is "Save" then -- save stack "Glazes" -- if the result is not empty then -- answer "The Glazes stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Glaze Index" -- if the result is not empty then -- answer "The Glaze Index stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Materials" -- if the result is not empty then -- answer "The Materials stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Materials Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "clays" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- -- save stack "Clay Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Glaze Limits" -- if the result is not empty then -- answer "The Glaze Limits stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Glaze Calculator" -- if the result is not empty then -- answer "The Glaze Calculator stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Complex Search" -- if the result is not empty then -- answer "The Complex Search stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- set cursor to busy -- save stack "Bibliography" -- if the result is not empty then -- answer "The Bibliography stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- -- end if quit --end if break end switch end menuPick File&Open/0 Clos&e/W - &Save/S (- Import HyperGlaze file Insight file GlazeBase TEXT file Export as HyperGlaze file as Text file as Insight RCP file Export Marked Cards as HyperGlaze file as Text file - Page Setup &Print Card/P Print Marked Cards Print Special Glaze with Limit graph Marked Glazes w Limit graph Marked Glazes as Labels 3.3x4 Marked Glazes as Labels with Hazards - &Quit/QcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 1,-1,31,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1286altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameFileicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext&Open/0 Clos&e/W - &Save/S (- Import Export as HyperGlaze file as Text file Export Marked Cards as HyperGlaze file as Text file - Page Setup &Print Card/P Print Marked Cards Print Special Glaze with Limit graph Marked Glazes w Limit graph - &Quit/Q shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory11 cREVGeneral revUniqueID 1088712736462 EditU X--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Undo" undo break case "Cut" cut break case "Copy" Copy break case "Copy Recipe as Text|Recipe Only" copyRecipeAsText "RecipeOnly" break case "Copy Recipe as Text|Include Comments" copyRecipeAsText "Comments" break case "Copy Recipe as Text|Include UMF" copyRecipeAsText "UMF" break case "Paste" if the clipboard is "text" then paste break case "Clear" delete break case "Add Comment to Marked Cards" if the number of marked cards=0 then answer "There are no marked cards." exit menuPick end if ask "Type the text to be added to the comments of all currently marked glazes:" if it is empty then exit menuPick put it into myComment repeat the number of marked cards go to next marked card put " " & myComment after fld "comments" end repeat break case "New Card" create card break case "Duplicate Card" copy this card paste set clipboardData to empty put "True" into fld "indexMe" break case "Delete Card" if the number of cards of stack "Glazes"=1 then answer "This is the last card in the Glazes stack. It cannot be deleted." & return & "Make a new card first, then delete this card." exit menupick end if answer "Delete this Glaze recipe permanently?" with "Delete" or "Cancel" if it is "Delete" then delete this card --add update index script break case "Delete Marked Cards" answer "Delete ALL Marked Glaze recipes permanently?" with "Delete" or "Cancel" if it is "Delete" then lock messages repeat the number of marked cards set cursor to busy go next marked card if the number of cards of stack "Glazes"=1 then answer "This is the last card in the Glazes stack. It cannot be deleted." & return & "Make a new card first, then delete this card." exit repeat end if delete this card end repeat unlock messages --add update index script send mouseup to btn "Update Index" of stack "Glaze Index" end if break case "Delete ALL Glaze Recipes" deleteALLCards break case "Preferences" open stack "Preferences" break end switch end menuPick " Edit&Undo/Z (- Cu&t/X &Copy/C Copy Recipe as Text Recipe Only Include Comments Include UMF &Paste/V Clea&r - Add Comment to Marked Cards (- &New Card/N &Duplicate Card/D (- D&elete Card/E Delete Marked Cards (- Delete ALL Glaze Recipes (- PreferencescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 31,-1,63,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1287altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameEditicon0toolTiplayer132 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext&Undo/Z (- Cu&t/X &Copy/C Copy Recipe as Text Recipe Only Include Comments Include UMF &Paste/V Clea&r - &New Card/N &Duplicate Card/D (- D&elete Card/E Delete Marked Cards (- Delete ALL Glaze Recipes (- Preferences shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736463 GoU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Back" go back break case "Forward" go forward break case "index" open stack "HyperGlaze" show stack "HyperGlaze" break case "Glazes" open stack pWhich show stack pWhich break case "Glaze Index" open stack pWhich show stack pWhich break case "Glaze Limits" open stack pWhich show stack pWhich break case "Glaze Calculator" open stack pWhich show stack pWhich break case "Clays" open stack pWhich show stack pWhich break case "Clay Index" open stack pWhich show stack pWhich break case "Materials" open stack pWhich show stack pWhich break case "Materials Index" open stack pWhich show stack pWhich break case "Unity Explained" open stack pWhich show stack pWhich break case "Bibliography" open stack pWhich show stack pWhich break case "QuadBlender" open stack pWhich show stack pWhich break case "Potter's Friend" open stack pWhich show stack pWhich break end switch end menuPick BGoBack/[ Forward/] (- Index/H (- (Glazes Glaze Index (- Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography QuadBlender Potter's FriendcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 63,-1,90,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1288altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameGoicon0toolTiplayer133 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextBack/[ Forward/] (- Index/H (- (Glazes Glaze Index (- Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography QuadBlender Potter's Friend shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736464  FindU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich global gFindWord, gFindWhich switch pWhich case "Find" ask "What would you like to find?" with gFindWord titled "Find" if it is empty then exit menuPick put it into gFindWord put empty into gFindWhich find string gFindWord if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found." break case "Find by Name" ask "Enter a glaze name to find:" with gFindWord titled "Find by Name" if it is empty then exit menuPick put it into gFindWord put "Name" into gFindWhich find string it in fld "Name" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Name field." break case "Find by Cone" ask "Enter a cone number to find:" with gFindWord titled "Find by Cone" if it is empty then exit menuPick put it into gFindWord put "Cone" into gFindWhich find whole it in fld "Cone" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Cone field." break case "Find by Color" ask "Enter a color to find:" with gFindWord titled "Find by Color" if it is empty then exit menuPick put it into gFindWord put "Color" into gFindWhich find string it in fld "Color" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Color field." break case "Find by Surface" ask "Enter a glaze surface (mat, gloss, etc.) to find:" with gFindWord titled "Find by Surface" if it is empty then exit menuPick put it into gFindWord put "Surface" into gFindWhich find string it in fld "Surface" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Surface field." break case "Find by Firing" ask "Enter a firing type to find:" & return & "(oxidation, reduction, soda, salt, wood, luster, raku, saggar)"\ with gFindWord titled "Find by Firing" if it is empty then exit menuPick put it into gFindWord put "Firing" into gFindWhich find string it in fld "Firing" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Firing field." break case "Find in Comments" ask "Enter a comment phrase to find:" with gFindWord titled "Find in Comments" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Comments" into gFindWhich find string it in fld "Comments" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Comments field." break case "Find Again" if gFindWhich is not empty then if gFindWhich is "Cone" then find whole gFindWord in fld gFindWhich if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the " & gFindWhich & " field." end if else find string gFindWord in fld gFindWhich if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the " & gFindWhich & " field." end if end if else find string gFindWord if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found." end if break case "View ONLY Marked Cards" send mouseup to btn "ViewMarked" if the hilite of btn "ViewMarked" is false then if char 1 to 2 of line 10 of btn ID 1289 is "!c" then delete char 1 to 2 of line 10 of btn ID 1289 -- the FIND menu end if else if char 1 to 2 of line 10 of btn ID 1289 is not "!c" then put "!c" before line 10 of btn ID 1289 end if end if break case "Complex Search" open stack "Complex Search" show stack "Complex Search" go to cd "Glazes" break case "Find Matching Glazes" open stack "Match Glazes" show stack "Match Glazes" if fld "ExactPct" is empty then put 50 into fld "exactPct" break end switch end menuPick ]#Find&Find/F Find by Name Find by Cone Find by Color Find by Surface Find by Firing Find in Comments Find A&gain/G (- View ONLY Marked Cards - Complex Search Find Matching GlazescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 90,-1,125,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1289altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameFindicon0toolTiplayer134 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext&Find/F Find by Name Find by Cone Find by Color Find by Surface Find by Firing Find in Comments Find A&gain/G (- View ONLY Marked Cards - Complex Search Find Matching Glazes shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736465  GlazesUB--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Calculate" send mouseup to btn "calculate Glaze" -- hidden break case "New Batch" doNewBatch break case "Set Batch Size for Marked Cards" send "setBatchSizeMarked" to stack "Glazes" break case "Calculate Marked Cards" push card go to stack "Glazes" go to first marked card global gCalcAll put "Quick Calc" into gCalcAll repeat the number of marked cards send "mouseup" to btn "Calculate Glaze" go to next marked card end repeat put empty into gCalcAll pop card break case "Calculate All Cards" push card go to stack "Glazes" go to first card global gCalcAll put "Quick Calc" into gCalcAll repeat the number of cards send "mouseup" to btn "Calculate Glaze" go to next card end repeat put empty into gCalcAll pop card break case "Mark Card" mark this card put the id of this card into myID push card go to stack "Glaze Index" find empty find myID if the result is "not found" then exit menuPick put last word of the foundline into myFieldNum put word 2 of the foundline into myLine put the short name of fld myFieldNum into myField delete last char of myField delete last char of myField if char 1 of line myLine of fld myField is not "+" then put "+" before line myLine of fld myField set the foregroundColor (line myLine of fld myField) to "#990000" end if pop card break case "Mark ALL Cards" Mark All Cards push card go to stack "Glaze Index" put "lowfire,midrange,highfire" into myIndexes repeat with i=1 to 3 put item i of myIndexes into myField repeat with x=1 to the number of lines of fld myField set cursor to busy if char 1 of line x of fld myField is not "+" then put "+" before line x of fld myField set the foregroundColor (line x of fld myField) to "#990000" end if end repeat end repeat pop card break case "Unmark Card" unmark this card put the id of this cd into myID push card go to stack "Glaze Index" find empty find myID put last word of the foundline into myFieldNum put word 2 of the foundline into myLine put the short name of fld myFieldNum into myField delete last char of myField delete last char of myField if char 1 of line myLine of fld myField is "+" then delete char 1 of line myLine of fld myField set the foregroundColor (line myLine of fld myField) to "#000000" end if pop card break case "Unmark ALL Cards" answer "Unmark all cards in the Glazes stack?" with "Unmark" or "Cancel" if it is "Unmark" then unmark all cards push card lock messages go to stack "Glaze Index" put "lowfire,midrange,highfire" into MyIndexFields repeat with x=1 to 3 put item x of MyIndexFields into myField repeat with i=1 to the number of lines of fld myField if char 1 of line i of fld myField is "+" then set cursor to busy delete char 1 of line i of fld myField set the foregroundColor (line i of fld myField) to "#000000" end if end repeat end repeat pop card unlock messages break case "Compare Glazes" open stack "Compare Glazes" show stack "Compare Glazes" break case "Compare UMFs" open stack "Compare Unity" show stack "Compare Unity" case "Sort by Name" sort by fld "name" break case "Sort by Cone" sort by fld "cone" break case "Sort by Color" sort by fld "color" break case "Sort by Firing" sort by fld "firing" break case "Send to Blender" open stack "QuadBlender" show stack "QuadBlender" break case "Send to Blender|Recipe A" open stack "RecipeA" show stack "RecipeA" send mouseup to btn "use current glaze" of stack "RecipeA" break case "Send to Blender|Recipe B" open stack "RecipeB" show stack "RecipeB" send mouseup to btn "use current glaze" of stack "RecipeB" break case "Send to Blender|Recipe C" open stack "RecipeC" show stack "RecipeC" send mouseup to btn "use current glaze" of stack "RecipeC" break case "Send to Blender|Recipe D" open stack "RecipeD" show stack "RecipeD" send mouseup to btn "use current glaze" of stack "RecipeD" break case "Send to Calculator" SendToGlazeCalculator break case "Send to Limits" SetGlazeLimits break end switch end menuPick /GlazesVCalculate/= New Batch (- Set Batch Size for Marked Cards Calculate Marked Cards Calculate All Cards (- Mar&k Card/K Mark ALL Cards Unmark Card/J Unmark ALL Cards (- Compare Glazes Compare UMFs - Sort by Name Sort by Cone Sort by Color Sort by Firing - Send to Blender Recipe A Recipe B Recipe C Recipe D Send to Calculator Send to LimitscREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 125,-1,172,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1290altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameGlazesicon0toolTiplayer135 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextHCalculate/= New Batch (- Set Batch Size for Marked Cards Calculate Marked Cards Calculate All Cards (- Mar&k Card/K Mark ALL Cards Unmark Card/J Unmark ALL Cards (- Compare Glazes - Sort by Name Sort by Cone Sort by Color Sort by Firing - Send to Blender Recipe A Recipe B Recipe C Recipe D Send to Calculator Send to Limits shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736466  HelpUF--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Help with HyperGlaze" open stack "HyperGlaze Help" show stack "HyperGlaze Help" break case "About HyperGlaze" open stack "HG Splash" show stack "HG Splash" break end switch end menuPick $Help*&Help with HyperGlaze - &About HyperGlazecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 172,-1,208,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1291altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameHelpicon0toolTiplayer136 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext)&Help with HyperGlaze - &About HyperGlaze shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088712736467 +4Lock-locked.jpg@? QXJFIFHHExifMM*bj(1r2iHHAdobe Photoshop CS Macintosh2005:02:27 14:21:06 &(.HHJFIFHH Adobe_CMAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?|:^W]nmspY=lW?&zڿ_Op.chen_sv:Uͳfjro;> <|?/??I&Photoshop 3.08BIM8BIM%F &Vڰw8BIM com.apple.print.PageFormat.PMHorizontalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMHorizontalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMOrientation com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMOrientation 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.subTicket.paper_info_ticket com.apple.print.PageFormat.PMAdjustedPageRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T22:20:14Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMAdjustedPaperRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T22:20:14Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMPaperName na-letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.PaperInfo.PMUnadjustedPageRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMUnadjustedPaperRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.ppd.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.ppd.PMPaperName US Letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PaperInfoTicket com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PageFormatTicket 8BIMxHH@Rg(HH(dh 8BIMHH8BIM&?8BIM x8BIM8BIM 8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM@@8BIM8BIMK Lock-locked nullboundsObjcRct1Top longLeftlongBtomlongRghtlong slicesVlLsObjcslicesliceIDlonggroupIDlongoriginenum ESliceOrigin autoGeneratedTypeenum ESliceTypeImg boundsObjcRct1Top longLeftlongBtomlongRghtlong urlTEXTnullTEXTMsgeTEXTaltTagTEXTcellTextIsHTMLboolcellTextTEXT horzAlignenumESliceHorzAligndefault vertAlignenumESliceVertAligndefault bgColorTypeenumESliceBGColorTypeNone topOutsetlong leftOutsetlong bottomOutsetlong rightOutsetlong8BIM( ?8BIM8BIM   JFIFHH Adobe_CMAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?|:^W]nmspY=lW?&zڿ_Op.chen_sv:Uͳfjro;> <|?/??I8BIM!SAdobe PhotoshopAdobe Photoshop CS8BIMhttp://ns.adobe.com/xap/1.0/ 1 10 14 1 72/1 72/1 2 2005-02-27T14:07:56-08:00 2005-02-27T14:21:06-08:00 2005-02-27T14:21:06-08:00 Adobe Photoshop CS Macintosh adobe:docid:photoshop:4fb76c80-8a5b-11d9-85d5-906edd3a2d18 image/jpeg XICC_PROFILE HLinomntrRGB XYZ  1acspMSFTIEC sRGB-HP cprtP3desclwtptbkptrXYZgXYZ,bXYZ@dmndTpdmddvuedLview$lumimeas $tech0 rTRC< gTRC< bTRC< textCopyright (c) 1998 Hewlett-Packard CompanydescsRGB IEC61966-2.1sRGB IEC61966-2.1XYZ QXYZ XYZ o8XYZ bXYZ $descIEC http://www.iec.chIEC http://www.iec.chdesc.IEC 61966-2.1 Default RGB colour space - sRGB.IEC 61966-2.1 Default RGB colour space - sRGBdesc,Reference Viewing Condition in IEC61966-2.1,Reference Viewing Condition in IEC61966-2.1view_. \XYZ L VPWmeassig CRT curv #(-27;@EJOTY^chmrw| %+28>ELRY`gnu| &/8AKT]gqz !-8COZfr~ -;HUcq~ +:IXgw'7HYj{+=Oat 2FZn  % : O d y  ' = T j " 9 Q i  * C \ u & @ Z t .Id %A^z &Ca~1Om&Ed#Cc'Ij4Vx&IlAe@e Ek*Qw;c*R{Gp@j>i  A l !!H!u!!!"'"U"""# #8#f###$$M$|$$% %8%h%%%&'&W&&&''I'z''( (?(q(())8)k))**5*h**++6+i++,,9,n,,- -A-v--..L.../$/Z///050l0011J1112*2c223 3F3334+4e4455M555676r667$7`7788P8899B999:6:t::;-;k;;<' >`>>?!?a??@#@d@@A)AjAAB0BrBBC:C}CDDGDDEEUEEF"FgFFG5G{GHHKHHIIcIIJ7J}JK KSKKL*LrLMMJMMN%NnNOOIOOP'PqPQQPQQR1R|RSS_SSTBTTU(UuUVV\VVWDWWX/X}XYYiYZZVZZ[E[[\5\\]']x]^^l^__a_``W``aOaabIbbcCccd@dde=eef=ffg=ggh?hhiCiijHjjkOkklWlmm`mnnknooxop+ppq:qqrKrss]sttptu(uuv>vvwVwxxnxy*yyzFz{{c{|!||}A}~~b~#G k͂0WGrׇ;iΉ3dʋ0cʍ1fΏ6n֑?zM _ɖ4 uL$h՛BdҞ@iءG&vVǥ8nRĩ7u\ЭD-u`ֲK³8%yhYѹJº;.! zpg_XQKFAǿ=ȼ:ɹ8ʷ6˶5̵5͵6ζ7ϸ9к<Ѿ?DINU\dlvۀ܊ݖޢ)߯6DScs 2F[p(@Xr4Pm8Ww)KmAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?|:^W]nmspY=lW?&zڿ_Op.chen_sv:Uͳfjro;> <|?/??I cREVGeneral revUniqueID 1109542985860+5Lock-unlocked.jpg@? Q4JFIFHHExifMM*bj(1r2iHHAdobe Photoshop CS Macintosh2005:02:27 14:19:58 &(.HHJFIFHH Adobe_CMAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?XnަǾޜگWW}6Q]w,'~pXmYmo.tm3~}7}?IO&Photoshop 3.08BIM%8BIM com.apple.print.PageFormat.PMHorizontalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMHorizontalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMOrientation com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMOrientation 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalRes com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalRes 72 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMVerticalScaling com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMVerticalScaling 1 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.subTicket.paper_info_ticket com.apple.print.PageFormat.PMAdjustedPageRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PageFormat.PMAdjustedPaperRect com.apple.print.ticket.creator com.apple.printingmanager com.apple.print.ticket.itemArray com.apple.print.PageFormat.PMAdjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMPaperName na-letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.PaperInfo.PMUnadjustedPageRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPageRect 0.0 0.0 734 576 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.PMUnadjustedPaperRect com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.PMUnadjustedPaperRect -18 -18 774 594 com.apple.print.ticket.client com.apple.printingmanager com.apple.print.ticket.modDate 2005-02-27T21:50:36Z com.apple.print.ticket.stateFlag 0 com.apple.print.PaperInfo.ppd.PMPaperName com.apple.print.ticket.creator com.apple.print.pm.PostScript com.apple.print.ticket.itemArray com.apple.print.PaperInfo.ppd.PMPaperName US Letter com.apple.print.ticket.client com.apple.print.pm.PostScript com.apple.print.ticket.modDate 2003-07-01T17:49:36Z com.apple.print.ticket.stateFlag 1 com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PaperInfoTicket com.apple.print.ticket.APIVersion 00.20 com.apple.print.ticket.privateLock com.apple.print.ticket.type com.apple.print.PageFormatTicket 8BIMxHH@Rg(HH(dh 8BIMHH8BIM&?8BIM x8BIM8BIM 8BIM 8BIM' 8BIMH/fflff/ff2Z5-8BIMp8BIM8BIM8BIM@@8BIM8BIM= ico  nullboundsObjcRct1Top longLeftlongBtomlongRghtlong slicesVlLsObjcslicesliceIDlonggroupIDlongoriginenum ESliceOrigin autoGeneratedTypeenum ESliceTypeImg boundsObjcRct1Top longLeftlongBtomlongRghtlong urlTEXTnullTEXTMsgeTEXTaltTagTEXTcellTextIsHTMLboolcellTextTEXT horzAlignenumESliceHorzAligndefault vertAlignenumESliceVertAligndefault bgColorTypeenumESliceBGColorTypeNone topOutsetlong leftOutsetlong bottomOutsetlong rightOutsetlong8BIM( ?8BIM8BIM   JFIFHH Adobe_CMAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?XnަǾޜگWW}6Q]w,'~pXmYmo.tm3~}7}?IO8BIM!SAdobe PhotoshopAdobe Photoshop CS8BIMhttp://ns.adobe.com/xap/1.0/ 1 10 14 1 72/1 72/1 2 2005-02-27T14:19:58-08:00 2005-02-27T14:19:58-08:00 2005-02-27T14:19:58-08:00 Adobe Photoshop CS Macintosh adobe:docid:photoshop:fd902f6c-8a5c-11d9-85d5-906edd3a2d18 image/jpeg XICC_PROFILE HLinomntrRGB XYZ  1acspMSFTIEC sRGB-HP cprtP3desclwtptbkptrXYZgXYZ,bXYZ@dmndTpdmddvuedLview$lumimeas $tech0 rTRC< gTRC< bTRC< textCopyright (c) 1998 Hewlett-Packard CompanydescsRGB IEC61966-2.1sRGB IEC61966-2.1XYZ QXYZ XYZ o8XYZ bXYZ $descIEC http://www.iec.chIEC http://www.iec.chdesc.IEC 61966-2.1 Default RGB colour space - sRGB.IEC 61966-2.1 Default RGB colour space - sRGBdesc,Reference Viewing Condition in IEC61966-2.1,Reference Viewing Condition in IEC61966-2.1view_. \XYZ L VPWmeassig CRT curv #(-27;@EJOTY^chmrw| %+28>ELRY`gnu| &/8AKT]gqz !-8COZfr~ -;HUcq~ +:IXgw'7HYj{+=Oat 2FZn  % : O d y  ' = T j " 9 Q i  * C \ u & @ Z t .Id %A^z &Ca~1Om&Ed#Cc'Ij4Vx&IlAe@e Ek*Qw;c*R{Gp@j>i  A l !!H!u!!!"'"U"""# #8#f###$$M$|$$% %8%h%%%&'&W&&&''I'z''( (?(q(())8)k))**5*h**++6+i++,,9,n,,- -A-v--..L.../$/Z///050l0011J1112*2c223 3F3334+4e4455M555676r667$7`7788P8899B999:6:t::;-;k;;<' >`>>?!?a??@#@d@@A)AjAAB0BrBBC:C}CDDGDDEEUEEF"FgFFG5G{GHHKHHIIcIIJ7J}JK KSKKL*LrLMMJMMN%NnNOOIOOP'PqPQQPQQR1R|RSS_SSTBTTU(UuUVV\VVWDWWX/X}XYYiYZZVZZ[E[[\5\\]']x]^^l^__a_``W``aOaabIbbcCccd@dde=eef=ffg=ggh?hhiCiijHjjkOkklWlmm`mnnknooxop+ppq:qqrKrss]sttptu(uuv>vvwVwxxnxy*yyzFz{{c{|!||}A}~~b~#G k͂0WGrׇ;iΉ3dʋ0cʍ1fΏ6n֑?zM _ɖ4 uL$h՛BdҞ@iءG&vVǥ8nRĩ7u\ЭD-u`ֲK³8%yhYѹJº;.! zpg_XQKFAǿ=ȼ:ɹ8ʷ6˶5̵5͵6ζ7ϸ9к<Ѿ?DINU\dlvۀ܊ݖޢ)߯6DScs 2F[p(@Xr4Pm8Ww)KmAdobed             "?   3!1AQa"q2B#$Rb34rC%Scs5&DTdE£t6UeuF'Vfv7GWgw5!1AQaq"2B#R3$brCScs4%&5DTdEU6teuFVfv'7GWgw ?XnަǾޜگWW}6Q]w,'~pXmYmo.tm3~}7}?IO cREVGeneral revUniqueID 1109543009380 Glaze Index" 1--2004 Richard Burkett -- all rights reserved worldwide --on shutdownRequest -- pass shutdownRequest --end shutdownRequest -- --on closeStackRequest -- answer "Save changes to the Glaze Index first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit closeStackRequest -- set cursor to watch -- save stack "Glaze Index" -- if the result is not empty then -- answer "The Glaze Index stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- pass closeStackRequest --end closeStackRequest on keydown myKey global gLastKeyDown put false into myFoundLine get the menuHistory of btn "whichIndex" if it is 1 then put "lowfire" into myField else if it is 2 then put "midrange" into myField else put "highfire" into myField if the selectedLine is empty or myKey is not gLastKeyDown then put 1 into myStartingLine else put (word 2 of the selectedLine)+1 into myStartingLine put myKey into gLastKeyDown if myKey is in "a,b,c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z,+,*" then repeat with i=myStartingLine to the number of lines of fld myField put first word of (line i of fld myField) into myWord if char 1 of myWord is "+" and myKey is not "+" then if char 2 of myWord is myKey then select line i of fld myField put true into myFoundLine exit repeat end if else if char 1 of myWord is myKey then select line i of fld myField put true into myFoundLine exit repeat end if end repeat if myFoundLine is false then -- try again from the top repeat with i=1 to the number of lines of fld myField put first word of (line i of fld myField) into myWord if char 1 of myWord is "+" and myKey is not "+" then if char 2 of myWord is myKey then select line i of fld myField exit repeat end if else if char 1 of myWord is myKey then select line i of fld myField exit repeat end if end repeat end if end if end keydown on openstack updateIndexNumbers if the platform is "MacOS" then put 510 into myMinHeight else -- if the platform is Win32 -- Windows with menus in window put 535 into myMinHeight end if revChangeWindowSize 340,myMinHeight put "highfire,midrange,lowfire" into myIndexes repeat with i=1 to 3 put item i of myIndexes into myIndex if the visible of fld myIndex is true then if the hilitedLine of fld myIndex is empty then set the hilitedLine of fld myIndex to 1 select line (the hilitedLine of fld myIndex) of fld myIndex end if end repeat end openstack on updateIndexNumbers put the number of lines of fld "Lowfire" into fld "numberOfLowfire" put the number of lines of fld "Midrange" into fld "numberOfMidrange" put the number of lines of fld "Highfire" into fld "numberOfHighfire" end updateIndexNumbers ̙T Glaze IndexTT ULucida GrandeWArial WArial WArial UArial UArial UArialGlazeIndexMenubarcREVTempMaster+windowManagerPlacefalsemenubarGlazeIndexMenubarlinkHiliteColorrect589,112,929,622 maxWidth340 cantAbortfalse patterns colors0,0,0 204,204,153 decorations"title,menu,minimize,maximize,closelinkVisitedColoriconicfalseshadowtrue cantDeletefalseid1031altId0 hcAddressingfalsestartUpIconicfalse windowShape0title Glaze Index linkColor textStylebold cantModifyfalseunderlineLinks maxHeight520styletopleveldestroyWindowfalse password liveresizingfalsescroll22passkey resizabletruename Glaze Indexicon0formatForPrintingfalse alwaysBuffertruevisibletruemetalfalse minWidth340 textSize12 destroyStackfalse textFontArial minHeight510 dynamicPathsfalse cREVGeneralcREVGeometryCachestackID1031 @TcREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,340,532name card id 1002 patterns defaultButtoncolors layer1 borderWidth2 cantDeletefalseid1002altId0 showBorderfalse textSize textFont textStyle cREVGeneralcREVGeometryCacheIDs108801509016110191088015090162102010880150901631021108920588751510301088015090164102210880150901651023108801509016610241087521834823100610884926384381029108752196140010111088440768314102710876606290451015108844075706610261088010089654101810882662420561025108844077378210281087660631849101610876605787931014108752194742310091087522202125101310876638073851017cREVGeometrycachetotal21order 1087522202125 lowfire!xon mouseup global gHGImageFolderLoc put the short name of me into MyListField put MyListField & "ID" into myField --put Clickline() into MyChoice put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard if the optionKey is down then if char 1 of line myLine of fld MyListField is "+" then lock screen push cd go to card ID myCard of stack "Glazes" unmark this card pop cd unlock screen delete char 1 of line myLine of fld myListField set the foregroundColor (line myLine of fld MyListField) to empty else lock screen push cd go to card ID myCard of stack "Glazes" mark this card pop cd unlock screen put "+" before line myLine of fld MyListField set the foregroundColor (line myLine of fld MyListField) to "#990000" end if else go to card id myCard of stack "Glazes" if the visible of stack "Glaze Picture" is true then put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" end if go to stack "Glaze Index" select line myLine of fld MyListField end if end mouseup on enterInField put the short name of me into MyListField put MyListField & "ID" into myField select line (item 1 of the hilitedLine of fld myListField) of fld myListField put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard go to card id myCard of stack "Glazes" go to stack "Glaze Index" end enterInField @Z4\cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight16rect 16,90,324,438multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid1006altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitestrue lockTexttruescroll0namelowfiretoolTipvGridfalse listBehaviortruelayer2visiblefalse cantSelectfalse borderWidth2margins8 htmlText

06 Clear C06

1 2 3 Clear C08 - 06

Algae Glaze C04

Alkaline Egyptian Blue C04

Alkaline Matt C04

Alkaline Matte C06, 05, 04

Alkaline Persian Blue C04

Alligator C08, 07, 06

Amber Clear rev. 2 C04 - 03

Amber Clear revised C04, 03

Amy's Frosty White C01, 1

Arbuckle Base Slip C04 - 03

Aventurine C04

Aventurine Purple C05 - 04

Ball Clay Terra Sigillata C04, 03, 02, 01, 1

Barium Blue C04

Base Clear C1

Base Glaze C04

Basic Crackle Clear Glaze C04

Batz Basic C04

Batz Clear C03

Batz Glaze C04

Beads C06, 05, 04

Bill's Basic C04

Black (low sheen) C06

Black C06

Black Gloss Glaze C1

Black Matt Glaze C1

Black oxide mix C08 - 06 - 6 - 10

Black Tar C04

Black Terra Sigillata C04

Blue Black Purple C08 - 06

Bone Effect C08, 07, 06

Brick Red C06 - 04

Bright Blue Stain Q C04

Bruce's Alkaline Blue C08, 07, 06

Buttery Yellow C04 - 03

Carbon C06, 05, 04

Carole's Perfect White C08 - 06

Cement Glaze C04

Chapin Opaque C04

Charcoal Stain C04

Chartreuse Moss C04

Chrises Clear C06

Clear (Soldner's) C08 - 06

Clear 1 C04

Clear 2 C04

Clear 3 C06

Clear 4 C06, 05, 04

Clear 5 C06, 05, 04

Clear 6 C06, 05, 04

Clear Amber C04, 03

Clear C03 - 01

Clear C04

Clear Crackle C06

Clear Crackle C08

Clear Glaze C015

Clear Lee's C04

Clear Opalescent C03 - 01

Clear Ron Meyers C01

Clear Transparent C04

Clear-Rob Forbes C05, 04, 03

Cloudy Satin C04

Cone 6 Engobe C06 - 6

Conrad Underglaze Pastel C06 - 6 - 10

Conrad Underglaze Pencil C06 - 6 - 10

Conrad Underglaze Watercolor C06 - 6 - 10

Copper Penny C08, 07, 06

Copper Sand C08, 07, 06

Crabb's Crawly C06

Crater Glaze C1

Craters C06, 05, 04

crusty rusty C08 - 06

Crusty Velvet Matt C08, 07, 06

Darby's Satin Semi-Gloss C04

David Parson's Wierd C04

Deb's Clear C04

Deep Alkaline Turquoise C04 - 03

Dick Leach Luster C1

Dove Gray Stain C04

Dry Flake C08, 07, 06

Dry Texture C06

Dry White Slip C08 - 07

E-3 Clear C04

Earthmother C06, 05, 04

Egyptian Blue Gloss C015

Emmett's White Base C04 - 03

Erickson's Peeling Paint C04

Fat White Raku glaze C07

Faux Celadon C08

Flamedrops C06, 05, 04

Foam C04

Frank's Brick Red C08 - 07 - 06

Frank's Red Trailing Glaze C08 - 07 - 06

Furry Glaze C06 - 05

G 76 C04

G-100 R C06

Gill's Blue C04

Glass Red C08, 07, 06

Gloss C06

Glossy Clear 2 C04

Glossy Clear 3 C04

Glossy Transparent 1 C04

Glossy Transparent 4 C04

Grey Texure C04

HIGBY BLUE raku C06, 05, 04

HIGBY BLUE RAKU modified C08 06

Hiroshi's Engobe C06 - 05 - 04

Horseley's Purple Blue C04

Hunter's Green 2 C06

Hunter's Green C06

Ian's Clear C05, 04, 03

Inglaze Lustre Base C07

Iron Matt C08, 07, 06

J's Graphite Metallic C05/04

J's Variation blue C05

Jacquie's Base C06

Joe's Raku Engobe C06

John Gill White Slip C04

Johnson Satin Matt C04

June's 100 Club C06

June's Blue Suede C011

June's Dry Alligator Red Rust C06

June's Dry Crawl C06

June's Dry Matt Crack C06

June's Turq. Lightning Bolt Crawl C06

K. Triplett's White Slip C04 - 6 - 7

Karls Killer Kiln Wash C010 - 10

Katrina's Excellent Black C04

Kelleigh's Black C01 - 1

Lee's 03 Clear C04 - 03

Lichen C06, 05, 04

Liner glaze - John Kantar C1

Lithium Copper Green C06

Lizard C06, 05, 04

Lizard Skin C06

Love Child C04

M.J. Base C04

Maiolica C05, 04, 03

Majolica - Unleaded GCC C04

Majolica - Vivika's C04, 03, 02

Majolica 1 C04 - 03

Majolica 2 C06, 05, 04

Majolica 2 frit C04

Majolica 3 C06, 05, 04

Majolica Alfred C04

Majolica Andersen C04 - 03

Majolica Arbuckle C04 - 03

Majolica Batz - rev. C04 - 03

Majolica Batz C04 - 03

Majolica C04 - 03

Majolica Matthias's C05

Majolica MJ/Andrea C04

Majolica Ric's 2 C04

Majolica Ric's C04

Majolica Ric's New C04

Majolica Richard's C04

Majolica Siebert C06, 05, 04, 03

Majolica Walter's C04 - 03

Majolica Wichita Doo-Dah C04 - 03

Matt Glaze C04

Matte C06

Moon C04

Moon C06, 05, 04

Mottled Brick Red Glaze C04 - 03

Mottled Green C04 - 03

Muted Turquoise C04 - 03

Natale Red C08, 07, 06

Neon Test Site #1 C04

Newbatz C04

No Boron C04

Noska Black Raku C08

NX Clear Buttery Gloss Glaze C07 - 06

Ocean Oil C06, 05, 04

Once Fire 1 c1 - 2

Once Fire 2 C1 - 2

Once Fire 4 C1 - 2

Once Fire 5 C1 - 2

Once Fire Glaze C1 - 2

Opaque Smooth Mat C04

Paul's Low Fire Satin Matt C06 - 03

Penn State White Crackle C08, 07, 06

Pete's E-3 Clear C04

Pete's Shiny Black C04

Piepenburg Patina - SDSU C08, 07, 06

Pink Raku C08 06

Pinnell's Lowfire C06?

Platinum Metallic C06 - 04

Raku Halo C08

Raku Semi-matt C017 - 06

Raku Silver Luster C06

Raku White C08?

RedArt Terra Sigillata C04

Reynold's Wrap C08, 07, 06

Reynold's Wrap revised C08, 07, 06

Reynolds Green Metal Patina C06 - 07

Rich Dark Blue C04 - 03

Rick's Raku C07 08 06

RISD Lithium Blue C04

Rob's Matte C04

Robbin's Egg Blue Raku C08, 07, 06

Robbin's Egg Blue Raku rev. C08, 07, 06

Robin Hopper's Black Stain C04 - 6 - 10

Robin Hopper's slip C04 - 12

Ron's Clear C01 - 1

Rosie's Base C04

S.H. Texture Crawl C06 - 04 - 1

Satin 1 C02

Satin Matt 1 C04

Satin Matt C06 - 04

Satin Matte 1 C04

Satin Matte 2 C04

Schmidt Lowfire Lichen C06

SDSU Crawl C06, 05, 04

SDSU Vitreous Engobe C08, 07, 06

Shiny Clear 1 C04

Shiny Clear 2 C04

Shiny Clear C04 - 03

Smooth Cream C03 - 01

Soldner Dry Engobe C08 - 06 - 04 - 5 -

Stain Colored Engobe 2 C06

Sun Set Sand C08, 07, 06

Sylvia Hyman C012 - 06 - 6 - 10

Sylvia Hyman C012 - 06 - 6 - 10

Terra Sigillata C04 - 10

Tolson C04

Translucent Violet Matt C02

Transparent Satin C04

Turquoise C07

Turquoise Matte C04

Tuscany Red variation C04

V.C. 5000 C04

V.C. Four C04

V.C. Low Fire Luster 2 C010 - 08 - 06 - 04

V.C. Low Fire Luster 5 C010 - 08 - 06 - 04

V.C. Majolica C04

V.C. Satin Majolica C04

V.C. Satin Stone C04

V.C. Soda Blue 1962 C04

V.C. Soft Matt C04

V.C. Soft Satin C04

V.C. Three C04

V.C. Two C04

V.C. Water Blue Revised C04

Varda's Blue Green C04

Very Lowfire Clear C020

Water Blue (revised) C04

White "G" Raku Slip C04

White Crackle C08 - 07 - 06

White Crawl C06

White Glaze C04

White Opaque C1

White terra sigillata C08 - 06 - 04 - 1 -

White Vitreous Engobe C06

WOM Maiolica C04

Woo Woo C08

Woody's Base A C04

Woody's Base B C04

Woody's Blue C04

Worthington's Clear III C07, 06, 05, 04, 03

Yellow Clear Glaze c04

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087521834823  ? C ? C Alkaline Egyptian Blue C04 Amber Clear rev. 2 C04 - 03 Batz Clear Amber C03 Batz Majolica Glaze C04 Beads C06, 05, 04 Majolica C04 - 03 Majolica Ric's New C04 No Boron C04 Pinnell's Lowfire C06 - 04 #Reynold's Wrap revised C08, 07, 06 (Robbin's Egg Blue Raku rev. C08, 07, 06 SDSU Crawl C06, 05, 04 Stain Colored Engobe C06 Sun Set Sand C08, 07, 06`@7[ Z  midrange!xon mouseup global gHGImageFolderLoc put the short name of me into MyListField put MyListField & "ID" into myField --put Clickline() into MyChoice put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard if the optionKey is down then if char 1 of line myLine of fld MyListField is "+" then lock screen push cd go to card ID myCard of stack "Glazes" unmark this card pop cd unlock screen delete char 1 of line myLine of fld myListField set the foregroundColor (line myLine of fld MyListField) to empty else lock screen push cd go to card ID myCard of stack "Glazes" mark this card pop cd unlock screen put "+" before line myLine of fld MyListField set the foregroundColor (line myLine of fld MyListField) to "#990000" end if else go to card id myCard of stack "Glazes" if the visible of stack "Glaze Picture" is true then put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" end if go to stack "Glaze Index" select line myLine of fld MyListField end if end mouseup on enterInField put the short name of me into MyListField put MyListField & "ID" into myField select line (item 1 of the hilitedLine of fld myListField) of fld myListField put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard go to card id myCard of stack "Glazes" go to stack "Glaze Index" end enterInField @Z4\cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight16rect 16,90,324,438multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid1009altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitestrue lockTexttruescroll0namemidrangetoolTipvGridfalse listBehaviortruelayer3visibletrue cantSelectfalse borderWidth2margins8 htmlText%

A.R.C. Matt C4

A7 C6

Albany Black C5 - 6

Albany Blue-Green C6

Alberta Glaze revised C6

Alfred Spodumene B.J. C6

Amanda's Turquoise C6

Amber Gloss Slip glaze C6 - 7 - 8

Andreas Bronze C2 - 3 - 4 - 5 - 6

Axner white C6 - 7

Baiz Orange C5 - 6

Ball Crawl C6

Barium Blue C6

Basic C5 - 6

Basic Engobe C6

Bill Grimm's Best Black C6

Black C6

Black Matt C5

Black Matte Glaze C4 - 5 - 6

Black Vitreous Engobe C6

Blue Navy Matte C6

Blue-Green Dark Semigloss C6

Blue-Grey Matt C6

Bobby Silverman Barium base C6

Bobby Silverman Strontium base C6

Bobby Silverman's 503R C6

Bobby Silverman's Matte C6

Boyd-Paulausky 1 C6

Boyd-Paulausky 2 C6

Boyd-Paulausky 3 C6

Boyd-Paulausky 4 C6

Boyd-Paulausky 5 C6

Boyd-Paulausky 6 C6

BRIGHT BLUE GREEN C 6

Bright Yellow C2 - 3 - 4 - 5

Bristol Glaze (delft) C7

Brown Magnesia Matt C6

Butter Texture Ash Glaze C6

Carlita Dry Matte C6

Carlita Matte C6

CC Base C6

CC Mustard C6

CC Soft Purple Blue C6

CC Specks C6

Celadon 4 C6

Chappel Boron Lithium C6

Chartreuse - Barium C6

Chartreuse - Strontium C6

Chris' Leather Spot C6

Chun Clear C6

Chun Purple - mid range C6, 7, 8

Clear (Huddleston) c5 - 6

Clear (Iain Begg) C5 - 6

Clear Ash C7 - 8

Clear Bright rev. C6

Clear c6 - 7

Clear C6

Clear c6

Clear Glaze (for pink) C6

Clear Glaze C6

Clear Gloss -- Gronborg c6

Clear Runny C7

Clear that doesn't craze C5 - 6

Clear Transparent C7 - 8

Clif Gilbert 1 C10?

Clif Gilbert 1 C10?

Colemanite Base c6

Cooper 404C C6

Copper Red Matte C5 - 6

Cream Breaking Red c6

Cream Matt C5 - 6

Cream Matt White C6

Creamy Orange C4 - 7

Crystal C6

Crystalize Black C6

D.K. 11 c5 - 6

D.K. 11 Revised C5 - 6

David Hewitt's Eggshell c6

Dixon Satin c5

Elegant Matt c6

Ellen's Holloween c5 - 6 - 7

Esmeralda's Clear c6

Expansion Test High C6

Expansion Test Low c6

Expansion Test Med-High c6

Expansion Test Med-Low c6

Expansion Test Medium c6

Fake Ash - Barium C6

Fake Ash - Strontium C6

Fake Ash C6

Fake Ash Rivulet 1 C6

Fat Cream (Brannum) c7

Ferguson Green C7

FF "A" c6

FF "B" C6

FF Base C6

G-200 Matt C5

Geo. Palovick MRM5 Red Matt C5 - 6

Gloss Black -- Kibler C6

Gloss Clear C5

Glossy C4

Glossy C5 - 6

Glossy Opaque 1 C6

Glossy Opaque 2 C6

Golden Fake Ash C6

Granny's Black Shorts C4 - 7

Green Blue Matte C6

Green Break C6

Green-Black (was Red-Gold) C6

GS Dolomite C5 - 8

GTB Clear C6

Gunmetal Black 2 C6 - 7 - 8

Hamada Barium C6

Hamada C6

Hamada Strontium C6

Heino Matt C6 - 7 - 8

Hokanson C4

Honey Amber C6

Jade Green Matt C5

JCVC Slate C7

Joel Myers C4

John Conrads Engobe C6

Julie's Water Blue C5

Justin Brady 1 C4 - 5 - 6 - 7 - 8

Justin Brady 2 C4 - 5 - 6 - 7 - 8

Justin Brady 3 C4 - 5 - 6 - 7 - 8

K-Choy Black C6

K-Choy White C6

K.S. HU 1 C6

K.S. HU 2 C6

K.S. HU 3 C6

K.S. HU 4 C6

K.S. HU 5 C6

K.S. HU 6 C6

K.S. HU 7 C6

KATE (the elder)iron red-orange C6

Kate the Elder's Red Orange C6

Kate the Younger's Clear C6

Kawaii Celadon B.J. C6

Kawaii Celadon Revised C5 - 6

Klinesville Gold (Jeff Dietrich) C6 - 7

Kranz C4

Kuentzel Metallic C6

L. A. Matt C6

L. A. Satin Matt white C5

Lana's Aqua Bronze C5 - 6

Lana's Red to Black glaze C6

Laura's Turquoise C6

Les Lawrence Bronze C6

Lichen Glaze C6

Light Brown Gloss C6

Linda Randazzo Alkaline C4

Lois Marcet C4 - 5

Lowfire Shino C6

LR Dolomite C7

LR Whiting Glaze C7

Lydahl 1 C5

Lydahl 3 C5

M.J. Brown C6

Mackersie B variation C6

Mackersie Gray Green C6

Mackersie Yellow Matte C6

Malachite revised C7

Marc Brackley's Matt Black C5 - 6

Mark Bell's Dry Lichen Glaze C6 - 7

Mary Barringer's White slip C6

Mary C's Buttery Matte C6

Mason Stain Mixture C5 - 6

Matt Base 5 C5 - 6

Matt black C6

MATT DARK BLUE GREEN C6

Matt purple/black C5

Matte Black C6

Matte White C6

Metallic Black C5 - 6

Metallic Green C6

Metallic Matt Black C6 - 9

Mexico Point Green C6

Michael Cho's Gunmetal Black C6 - 7 - 8

Midrange Drip C5 - 6

Midrange Majolica 96 C5 - 6

Midrange Majolica II C5 - 6

MidRange Majolica X C5 - 6

Mother of Pearl C7 - 9

Moyra Elliott's Purple Pink C6 - 7 - 8 - 9

Name 1 C5 - 6

Name 2 C5 - 6

Name 3 C5 - 6

Name 4 C5 - 6

NDVC Blue C6

NDVC C5 - 6

NI-LT C6

Nickel Pink C6

Nickel Purple C5 - 6

No. 98 C4 - 5 - 6

Oil Spot Glaze C6

Old Gold Albany C5 - 6

Orange Plum C6

P2004 Slip base C6

Patty's Black C6

Patty's Crystal Clear C5 - 7

Paul's Colemanite C6 - 7 - 8 - 9

Penland Butterscotch C6

Penland Polished Matt C6

Persimmon C6

Persimmon C6

Pete's Clear Liner C6

Pete's Green Matt C6 - 7

Phila Green C6

Phoenix c6 Trailing Glaze C6

Pink Crystal C7 - 8

Pink Icing C4 - 7

Pink? Glaze C4 - 5 - 6

Pinnell Green Strontium Matte C6

PL Matt C4

Polished Matt - Kate C6

Polished Matt - Rob's C6

Polished Matt C5 - 6

Polished Matt revised C5 - 6

Randy's Red Glaze C5 - 6

RB Saturated Iron C6

Red Chrome C6

Red Horse Slip C6

Red Purple Chrome C6

Reynolds Gold Metallic C6

Reynolds Gold Metallic C6

Rhodes Turquoise C2 - 3 - 4 - 5

Rhodes Turquoise C2 - 3 - 4 - 5

Rich Purple Glaze C6 - 7

Richard's Oil Spot Glaze C6

Rob's Mint Green Matte C6

Rob's Pinnell Matte Yellow C6

Robbie Mc 532A C4 - 5 - 6 - 7 - 8

Robbie Mc 533A C4 - 5 - 6 - 7 - 8

Rosie's White Crackle C6

Sandy's Bermuda Green C6

Sandy's Kona Clear Base C6

Satin Base (for pink) C6

Satin Base (for pink) rev. C6

Satin Base C6

Satin Base C6

Satin Matt 2 C4

Satin Matt 3 C4

Satin Matt 4 C5 - 6

Satin Matt Translucent C6

Satin Spodumene C6

Satin to Dry C7

Satin White Transparent C6

Satin White Transparent rev. C6

Schweiger Liner C6

SCVC 5 C5 - 6

Semi-vitreous Texture Slip C6

SG Dryish Stone Matt C5 - 6

Shaner Revision 1 C5 - 6

Shaner Revision 2 C5 - 6

Shiny to Matt C6

Shiny Transparent C2 - 3 - 4 - 5

Silky Black Matt C6

Speckled Blue C6

Speckled White Semigloss C6

Spotty Rutile C6 - 7 - 8

St. John's Black C6

Stephan's Barium Blue C6

Stephans Strontium C6

Stokes A C6 - 7 - 8 - 9

Stokes A-3 C6 - 7 - 8 - 9

Stokes C C6

Stokes C-2 C6 - 7 - 8 - 9

TAVC C5 - 6

Temmoku 1 C6

Teresa's BlueGreen Matte C6

Texture/Crawl - Lana C6

Texture/Crawl Glaze 2 C6

Texture/Crawl glaze C6

Toshiko Black C6

Toubes Blue-Green Matt C6

Translucent Base C5 - 6

Transparent 1 C5 - 6

Transparent 2 C5 - 6

Transparent 3 C5 - 6

Transparent 4 C5 - 6

Transparent 4 rev. C5 - 6

Transparent 4 rev.2 C5 - 6

Transparent 5 C5 - 6

Transparent 8 C5 - 6

Transparent Glossy 3 C5 - 6

Turquoise C6

Turquoise Matt C6

Tuscany Red C6

V.C. "61" Base C6

V.C. "62" Base C6

V.C. "63" Base C6

V.C. "71" Base C6

V.C. "71" Base C6

V.C. "72" Base C6

V.C. "D" Base C6

V.C. 1 C4 - 5 - 6

V.C. 2 C4 - 5 - 6

V.C. 2 C5 - 6

V.C. 3 C4 - 5 - 6

V.C. 3 C5 - 6

V.C. 4 C4 - 5 - 6

V.C. 4 C5 - 6

V.C. 5 - Clear C5 - 6

V.C. 5 C4 - 5 - 6

V.C. 5 revised C5 - 6

V.C. 5EM C6

V.C. 5SM C6

V.C. 6EMG C6

V.C. 6ESGB Alternate C6

V.C. 6ESGB Black C6

V.C. 7 C4 - 5 - 6

V.C. 71 Denim Blue C6

V.C. 8 C4 - 5 - 6

V.C. Good Color Satin Matt C5 - 6

V.C. Karen Weinkauf C4 - 5 - 6

V.C. Matte #3 C6

V.C. Med Temp 1 C5 - 6

V.C. Pam Fredericks C6 - 7 - 8 - 9

V.C. RYG Base C6

V.C. Satin Gloss C6

V.C. Soft White Matt C5 - 6

V.C. Speckled Red Brown C10?

V.C. Speckled Red Brown C10?

V.C. White Matt C6

Very Stable Clear c5 - 6

Vitreous Texture Engobe C6

Warm Tan C6

White Liner C6 - 7

White Matt C2 - 3 - 4 - 5

White Matt C6

White Slip Glaze C2 - 3 - 4 - 5

Woo Yellow C6

Wood Ash Look C6

Xavier's Amber Celadon C6

Xavier's Beige-Yellow C6

Xavier's Mottled C6

Xavier's Satin Base C6

Xavier's Satin Celadon C6

Xavier's Warm Jade Green C6

Yellow-Green C6

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087521947423  ACE Red C6 "Adraine Mota's White Base Slip C5 Aqua Bronze #1 C6 Aqua Bronze #2 C6 Aqua Bronze #3 C6 Aqua Bronze #4 C6 Aqua Bronze #5 C6 Bertha's Caribbiean Vacation C6 Black Gloss C4 - 5 - 6 - 7 Black Slip C6 Chun-Like Blue C6 Clear - no craze C5 - 6 Clear Bright rev. C6 Clear Glaze (for pink) C6 Cool Black C6 Crackle Glaze altered C5 Crackle Glaze C5 Crackle Glaze C5 Crystal #1 C6 Crystal #1.1 C6 Crystal #1.2 C6 Crystal #1.3 C6 Crystal #1.4 C6 Crystal #1.5 C6 Crystal #2 C6 Crystal #3 C6 Crystal #4 C6 Crystal #5 C6 Crystal Glaze altered C6 Crystal Glaze C6 Dark Jello Green C6 Denton altered C6 Denton C6 Earth Green C6 Elaine Johnson's Slip Base C5 Fake Ash Rivulet 1 C6 Gina's Perwinkle C6 Hamada Strontium C6 Honey Amber C6 Jade Green altered C6 Jade Green C6 Jarson's Blue Fish Scale C6 Jarvis Matt Green C6 Kiwi Green C6 Kranz C4 Kurt's Clear C6 L. A. Satin Matt white C5 $Lana's Bronze Aqua Glaze altered C6 Lana's Bronze Aqua Glaze C6 Lana's Lichen Glaze altered C6 Lana's Lichen Glaze C6 Lichen #1B C6 Lichen #1C C6 Lichen #1D C6 Lichen #1E C6 Lichen #2 C6 Lichen #3 C6 Lichen #4 C6 Lichen #5 C6 Mackersie Yellow Matte C6 Mark Bell's Lichen Glaze C6 Metallic Black alt 1 C6 Metallic Black alt 2 C6 Metallic Black alt 3 C6 Metallic Black alt10 C6 Metallic Black alt4 C6 Metallic Black alt5 C6 Metallic Black alt6 C6 Metallic Black alt7 C6 Metallic Black alt8 C6 Metallic Black alt9 C6 Metallic Black C6 Midrange Drip C5 - 6 Midrange Majolica 96 C5 - 6 New Tyler Amber C6 New White C6 Nordhoff Yellow altered C6 Nordhoff Yellow C6 "Opaque Semi Blue Gloss altered C5 Opaque Semi Blue Gloss C5 Orange Blue Crystal 1 C6 Orange Blue Crystal 2 C6 Orange Blue Crystal altered C5 Orange Blue Crystal C5 Oxblood C6 Peacock C5 Pete's Clear Liner C6 Pharsalia 1 C6 Pharsalia 10 C6 Pharsalia 2 C6 Pharsalia 3 C6 Pharsalia 4 C6 Pharsalia 5 C6 Pharsalia 6 C6 Pharsalia 7 C6 Pharsalia 8 C6 Pharsalia 9 C6 Pharsalia C6 Phoenix 2 C6 Polished Matt C5 - 6 Polished Matt revised C5 - 6 Residential C6 Rudy's Opal flat green C6 Rudy's Opal Light Blue C6 Satin Base (for pink) rev. C6 SDSU Texture Crawl Glaze C6 Spiffy Blue altered C6 Spiffy Blue C6 Stephans Strontium C6 $Strontium Matt Smooth Black no.6 C6 Texture/Crawl glaze C6 TMH 2 C6 TMH 4 altered C6 TMH 4 C6 Transparent 4 rev.2 C5 - 6 Transparent Green C6 Very Stable Clear c5 - 6 White Dragon Skin C6 `@7[ Z  highfire)x on mouseup global gHGImageFolderLoc put the short name of me into MyListField put MyListField & "ID" into myField --put Clickline() into MyChoice put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard if the optionKey is down then if char 1 of line myLine of fld MyListField is "+" then set cursor to watch lock screen push cd go to card ID myCard of stack "Glazes" unmark this card pop cd unlock screen delete char 1 of line myLine of fld myListField set the foregroundColor (line myLine of fld MyListField) to empty --"#000000" else set cursor to watch lock screen push cd go to card ID myCard of stack "Glazes" mark this card pop cd unlock screen set the cursor to hand put "+" before line myLine of fld MyListField set the foregroundColor (line myLine of fld MyListField) to "#990000" end if else set cursor to watch go to card id myCard of stack "Glazes" if the visible of stack "Glaze Picture" is true then put fld "JPEGLoc" into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" end if go to stack "Glaze Index" select line myLine of fld MyListField end if end mouseup on enterInField put the short name of me into MyListField put MyListField & "ID" into myField select line (item 1 of the hilitedLine of fld myListField) of fld myListField put the selectedLine into myChoice put word 2 of myChoice into MyLine put (line myLine of fld myField) into myCard go to card id myCard of stack "Glazes" go to stack "Glaze Index" end enterInField @Z4[cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight16rect 16,90,324,437multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid1011altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitestrue lockTexttruescroll0namehighfiretoolTipvGridfalse listBehaviortruelayer4visiblefalse cantSelectfalse borderWidth2margins8 htmlTextX6

#207.3 C8

1993 USU Tenmoku C10 - 11

1993 USU Tenmoku revised C10 - 11

202.2 C8

451 Blue - rev. C10

451 Blue C10

451 Blue rev. 2 C10

A.B.F. Butter C10

A.B.F. Meloy Stoney C10

A.B.F. Shaner C10

A.B.F. Tapioca C10

ABT Glaze C9-10

Albany Drip C10

Alfred "L" Revised C10

Alfred Celadon "A" C10

Alfred L Transparent C10

Alfred Revised Slip Glaze C10 ?

Amber Celadon 2 C10

Amber Celadon C9 - 10

Ancient Celadon C10

Andreson Matt rev2. C10

Andy Martin's 1 C9 - 10

Andy Martin's 2 C9 - 10

Andy Martin's Show Saver C10

Angelo Garzio's Iron Yellow C9 - 10

Annie's Violet C10

Apple Green Limestone C10

Ash Glaze, Clarkson C10

Barium blue C10

Barium Turquoise Matt C10

Bauer's Clear C10

Beading Glaze C10

Bell Yellow C8 - 9

Betty's White C10

Binn's Celadon C10

Binn's Clear C10

Blue Celadon C10 - 11

Blue Drip C10

Blue Matte X C10

Blue Satin Matte C9-10

Blue Showsaver C10

Blue Stain C10

Blue Stoney Matte C10

Boysenberry C10

Brannum's Blue C10

Brannum's Copper-Green to Blue C10

Brian Newman Temmoku C9 - 10

Bright Matt C9

Bright Stone Matt C9

Brilliant Color Base C10 ?

Brilliant Color Base C10 ?

Bringle Yellow C9 - 10

Brooke Base III C9

Bruce's Clear C8

Burkett's Black - rev 3 C8

Carbon Trapping Orange Shino C10 - 11

Celadon (SDSU 1999) C10

Celadon C10

Celadon C10R H House Revised C10

Celadon C10R Tom Coleman Rev. C10

Celedon 3 C9 - 10

Celedon 4 C9 - 10

Chamberlain C10 ?

Cherry Red C10

Chett's Chung Blue 53 C9 - 10

Chin Red C10

Choy Blue C9 - 10

Choy Blue Celadon - rev. C10

Choy Blue Celadon C10

Choy Clear C9 - 10

Choy Clear revised C9 - 10

Choy Clear revised C9 - 10

Choy Iron Blue C9 - 10

Chun - GCC C10

Chun Purple LSU 2661 C10

Clear C10

Clear C8 - 9 - 10

Coleman Apple Green C9 - 10

Coleman's #6 Turquoise Semi-Mat C10

Cooper's Purple C9 - 10

Copper Blue C10

Copper Blue C10

Copper Red Memmott C8 - 9 - 10

Copper Red Reduction C10

Copper Red/Green Matt C10

Copper/Orange Crystals C9

Coral red C10

Crackle Slip C10

Creamy Matt C10

Crystal Glaze #1 C10

Cushing Black C10

Cushing Black rev. C10

Cushing Yellow Matte C10

Dalton Ash Glaze C9 - 10

Dalton Celadon C9 - 10

Dalton Lung Chuan 1 C10

Dalton Lung Chuan 2 C10

Dalton Soft Brown C10

Dark Aquamarine Green C9

Dave's Clear C8 - 9 - 10

Dave's Clear revised C8 - 9 - 10

David Blumee Blue Celedon C10

David Leach C9 - 10 - 11

David Snair's Crystalline 1 C9

David Snair's Crystalline 2 C9

Davidson Red C10 - 11

Dick Leach C9

Dinner Set (Pottery Lab) C10

Doat Orange C9 - 10

Doat Orange-Revised C10 ?

Dolomite C9

Dolomite Tin Glaze C8 - 10

Elaine Coleman's H-Base Clear C10

Elaine Coleman's H-Base Clear Rev. C10

Elaine's Celadon Base C8 - 9 - 10 - 11

Elaine's Celadon Base rev1 C10

Elaine's Celadon Base rev2 C8 - 9 - 10 - 11

Emily Purple C10

Englobe, John's Favorite C10

Ethyl's Red C10

Eustes C9 - 10

Expansion Test Glaze 1-high C10

Expansion Test Glaze 10-low C10

Expansion Test Glaze 2-high C10

Expansion Test Glaze 3-med-high C10

Expansion Test Glaze 4-med-high C10

Expansion Test Glaze 5-med C10

Expansion Test Glaze 6-med C10

Expansion Test Glaze 7-med-low C10

Expansion Test Glaze 8-low C10

Expansion Test Glaze 9-low C10

Fake Ash (Katz) C10

Fake ash rivulet 2 C10

Fake Avery Flashing Slip #5 C8 - 9 - 10

Fake Avery Kaolin SDSU C 6 - 7 - 8 - 9 - 1

Fastbinder's White C10

Fat White to Orange Crackle Slip C10 - 11

Flaherty Albany Green C10

Flaherty Flat Black C9 - 10

Flat Matt Black C9 - 10

G456 Celadon C10

Gilbert White Liner C10

Glossy Amber C9 - 10

Glossy Black 1 C9 - 10

Glossy Black 2 C9

Glossy Black rev. C9 - 10

Glossy Clear 1 C9

Glossy Forest Green C9

Glossy Turquoise Blue C9

Glossy Violet C9

Glossy White Opaque C9 - 10

Gold Shino C10

Gold Shino rev. C10

Good Matt C10

Gowdy Ash C10

Gowdy Black-Brown C9 - 10

Gowdy C9 - 10

Gowdy Satin Matt C9 - 10

Gowdy Transparent C9 - 10

Graham Shino C10

Granatelli Grey C9 - 10

Grebanier Black Underglaze C10

Grebanier's Chun Blue, CIH-p C7 to 10

Grebanier's Chun Blue, CIH-pM C10

Grebanier's Clear C10

Grebanier's Clear II C10

Grebanier's Temmoku #14 C10

Grebanier's White Slip #6 C10

Green Satin Mat C10

Green-black matt - Brandeis C6, 7, 8, 9, 10

Green-black Matte C6 to 10

Green-black Matte C6 to 10

Gustin Shino C10

Gustin Shino C7 to 10

Gustin Shino C9 - 10

Guy Klass Crawling Satin C9 - 10

Hamada Green C10

Hamada Mat C10

Haney's White C9 - 10

Hawkins Red C9 - 10

Hay's Drippy C9 - 10

Hay's Drippy rev. C9 - 10

Hayes Drip Greenish C10

Haystack Orange C10

Heino Blue Matt C10

Hennessy Blue-Revised C9 - 10

Hippie White C9 - 10

Hirondelle Glaze C8

Ingerson C9 - 10

Interesting 1 C9 - 10

Interesting 2 C9 - 10

Interesting 3 C9 - 10

Interesting 4 C9 - 10

IP Black C8

Issi's Brown C9 - 10

Jane Ford White Crackle C9 - 10

Japanese Limestone C10

Jeff Oestreich Temoku C10

Jeff Oestreich's Shino C10

Jeremy's Green Shino C10

Jim Flaherty Albany Green C9 - 10

Jim Flaherty C9 - 10

Jo's Purple revised C10

Joanne's White Slip C9 - 10

Joe's Crawl #1 C10

Joe's Crawl #2 C10

Joining Slip (Nancy) C10

Joining Slip Glaze Colorants C10

Judy Cornell Moon Blue C10

Kaki C10

Kaki Glaze C9 to 10

Kaki, Hamada C8-11

Kaki, Leach C8-11

Karen Karnes C9 - 10

Kawaii Celadon C9 - 10

Kawaii Iron Blue C10

Keith Campbell's Oatmeal C10

Ketcham Iron Blue C9

Korean Celedon C9 - 10

Korman Yellow C9 - 10

KPB 87 Ash C10

Kuan Chun Blue C10

Kurt's Portland Cement Dry C9 - 10

Kyllikki Matt Revised C10

Kyllikki Salmenhaara C10 - 11 - 12

L.P. Mat rev. C10

L.P. Matt C9

Lab Fee Red C10

Lana's Black Engobe C6 - 7 - 8 - 9 - 10

Lana's Black Engobe revised C6 - 7 - 8 - 9 - 10

Lanman "Fake" Wood Ash C9 - 10

Lau Luster Shino C10

Laura Andreson Spotted Mat C10

Laura Andreson Spotted Matt rev. C9

Laura's Turquoise C10

Leach Clear C10

Leach Korean Celedon C7-9

Leach White C10

Leach White C7-10

Leach White Salt C10

Leon Bush Crystalline C9 - 10

Lewis Yellow C9 - 10 - 11

Light Blue Celedon (Elaine Coleman) C10

Lime Green Barium C9

Limestone Oribe C9 - 10

Lithium Wash C8 - 9 - 10

LP Mat - rev. C10

LP Mat 0range C10

LP Mat Blue C10

Lussier Celadon C10

M Glaze C10

Magnesium Cutter (MG-2) C9 - 10

Majolica (stoneware) C10

Malachite C10

Mamo Matt Revised C9 - 10

Mamo Satin Matt C9 - 10

Mamo Tan C9 - 10

Mamo Tan Matt C9 - 10

Mamo White Matt C9

Mandy's Alligator Skin C9 - 10

Mandy's Alligator Skin revised C9 - 10

Margarine C10

Marina's Bisque Engobe C10

Mark's Temmoku C9 - 10

Maryse Red C9 - 10

Mashiko Glaze C10

Mashiko Synthetic AK5 C10

Mason's Iron Red C9 - 10

Mat Black C10

Matt C9 - 10

Matt Rust Yellow C10

Matt Variation C8 - 9 - 10

Matt's Murder Glaze C10

MAUVE BLUE CRYSTAL C8

Mayan Blue revised C10

Mead-Shaner Red C10

Mean Green C10

Meloy Black C9 - 10

Meloy Clear C10

Meloy Matt C9

Merritt B C9 - 10 - 11

Merritt C C9 - 10 - 11

Metallic Black Glossy C6 - 7 - 8 - 9 - 10

MG-2 Purple C10

Midnight Blue C8

Name 5 C10

Nasisse Copper Red C9 - 10

Natron's Fake Ash #2 C10

Natron's Wood Ash #2 C10

Neff Orange C9 - 10

New Maryse Red 2 C10

New Maryse Red C9 - 10

Nickel Blue C6 - 7 - 8 - 9 - 10

Nickel Green Matt C10

Nigel Wood Clear C9 - 10

No. 22 Green C10

No. 3 C9 - 10

No. 5 C9 - 10

No. 9 C10

Nora's Cracked Ice C10

Noxema Blue C10

Nuka C9 to 10

Oestreich Slip C10

Oharata Red C9 - 10 - 11 - 12

Ohata Khaki C10

Ohatakaki C10

Orange Crawler (Cindy's) C9-11

Orange Crawler C10

Orange Red C10

Oribe Green C8 - 9

Oribe Green Glaze C9-11

Orielly White Satin Matt C9 - 10

Oswego Red Ash C10

Ox Blood Red C10

Pale Green Ash C9

Pat's Clear C6 - 7 - 8 - 9 - 10

Paul Davis Shino C9 - 10

PD Shino Crack #2 C10

PD Shino Crack C10

Peach Bloom (Nancy) C10

Peach Bloom II (Nancy) C10

PEACOCK BLUE C10

Peacock Blue Green C7 to 10

Penland Plum #2 C10

Penland Plum C10

Persimmon Glossy Blue C9 - 10

Pete's Copper Red C9 - 10 - 11

Pink Shino C9 - 10

Pinnell Strontium Matt Glaze C6 - 12

Plum Red C9 - 10

PM-5 Eggshell Mat C10

Porcelain Glaze C10 +?

Porcelain Slip (Nancy) C10

Powder Blue C10

Pumpkin C10

Pumpkin C10

Purple Glaze C10

Randall Red C10

Randy's Green - rev. C10

Randy's Green C10

Ray's Dry Base (base) C7, 8, 9

Red Blue Ash C10

Red Blue Ash rev. C10

Reitz 3-4-6-7 C10

Reitz C9 - 10

Reitz M-2 C10

Rhodes #27 C9 - 10

Rhodes #30 C10

Rhodes #32 C10

Rhodes Black Mountain C8 - 9 - 10

Rhodes Black Salt Revised C10

Rhodes Tea Dust C10

Rhodes Turquoise Magnesia Base C10

Richard's Drip C10

Rick Haynes C9 - 10

RJ No Craze Porcelain Glaze C10

Rob's Green C10

Rob's Green revised C10

Robineau Formula 1 C9 - 10

Robineau Formula 2 C9 - 10

Robineau Formula 3 C9 - 10

Robineau Formula 4 C9 - 10

Robineau Formula 5 C9 - 10

Rock Creek Soda Slip C10

Ron Burke Orange C10

Ron's Ole Black Magic Glaze C10

Roys Amber C10

Rust Stain C10

Ruth A Base - Clear Revised C9 - 10 - 11

Ruth A Base - Clear Revised C9 - 10 - 11

Ruth A Base C9 - 10 - 11

Rutile Blue 2 C10

Rutile Blue C10

Sanders Temmoku C9 to 10

Satin 12 C9 - 10

Satin Salt Liner C9, 10, 11, 12

Schulman White C9 - 10

Schwaab White C9 - 10

Scott's Rutile C10

SDSU Base slip 1994 C9 - 10

SDSU Base White Slip C9 - 10

SDSU SHINO 1991 C10

Seacrest Base C10

Secrest Celadon C9 - 10

Secrest Temmoku C9 - 10

Semi-Matt Glaze C10

Semi-Opaque C Glaze C10

SH Blue Ash C10

Shamo C9 - 10

Shaner Black C8 - 9 - 10 - 11 -

Shaner Gold C10

Shaner Oribe C10 - 11

Shaner Pumpkin C10

Shaner Red C10

Shaner Shino C10

Shaner Shino rev. 02 C10

Shaner Shino rev. 03 C10

Shaner Shino rev. 04 C10

Shaner Yellow C9 - 10

Shaner Yellow-Green C10

Shaner Yellow-Revised C10

Shaner's Clear C10

Shige's Black C10

Shino #4 C10

Shino (MacKenzie) C10 - 12

Shino - Basic C9 - 10

Shino - Boyd Eutectic transparent C9 - 10

Shino - Castle basic C9 - 10

Shino - Coleman #1 C9 - 10

Shino - Cornell Climax Red C9 - 10

Shino - Deboos 145 Apricot C9 - 10

Shino - Dickman sinter C9 - 10

Shino - Freer Sample1 C9 - 10

Shino - Freer Sample2 C9 - 10

Shino - George Washington U. #87 C9 - 10

Shino - Hank Murrow basic var. C9 - 10

Shino - Hybrid orange C9 - 10

Shino - Jefferson #1 C9 - 10

Shino - JR 1044 Shell C9 - 10

Shino - JR 1142-H Peach C9 - 10

Shino - JR 1210 Snowcap C9 - 10

Shino - JR 1522 Whitehot C9 - 10

Shino - JR 1634 Sinter Shino C9 - 10

Shino - JR 1735 Blaze C9 - 10

Shino - JR 1999 hybrid C9 - 10

Shino - JR 2021A Whitehot soda ash C9 - 10

Shino - MacKenzie's #2 C9 - 10

Shino - Malcolm Davis Carbon Trap C9 - 10

Shino - McKenzie (coffin-welty) C10

Shino - Rick's C9 - 10

Shino - Shafers C9 - 10

Shino - Shaner Sinter Shino C9 - 10

Shino - Wirt Original #1 C9 - 10

Shino - Wirt Original #2 C9 - 10

Shino -Kraus W C9 - 10

Shino C10

Shino, Shaner's C9-10

Shiny Variation 1 C8 - 9 - 10

Shiny Variation 2 C8 - 9 - 10

Silky Matt Pocelain glaze C8 - 9

Slate Blue C10

Slip Trailing Glaze (Nancy) C10

SNGN Stoney Blue C10

Soda Wash C9 - 10

Sperry Black C10

Sperry Green C10

Sperry White C10

Spit Out C10

Spodumene C9 - 10

Sprague's Copper Green C10

St. John's Blue C9 - 10 - 11 - 12

St. Johns Yellow C10

Staley's Red-Green C10

Staley's Turquoise C10

Stokes "A" Base C C10

Stokes "A" Base D C10

Stokes B C8 - 9

Stoney Matt C10

Stoney White C10

Swedish Glaze C10

T. Coleman Slip Trailing Glaze C10

Ted Randall Copper Red C9 - 10

Temmoku 2 C10

Temmoku 3 C9 - 10

Temmoku C10

Temmoku C10 - 11

Temmoku C10 - 11

Temple White C10

Tenmoku C8 - 10

Tenmoku, Hamada C8-10

Teriyama Stone C10

Tesha C10

Tichane's Blue Celadon C10

Tin Clear C10

TMNA C10

Tobacco Spit C9 - 10

Tom Coleman Copper Red C9 - 10

Tom Coleman's Copper Red C9 - 10

Tom Coleman's Iron Blue-Green Celado C9 - 11

Tomatoe Red C9 - 10

Toshiko Takaezu Copper Blue C10

Transparent Glaze #6-1 C9 to 10

Troy's Copper Red C10

Turner Blue C9 - 10

Turner Clear C9 - 10

Turner's Beauty C10

Turner's Black Matt C10

Turquoise C10

UCLA Red C10

V.C. 10 C9 - 10

V.C. 11 C9 - 10

V.C. 12 C9 - 10

V.C. 13 "Simple Satin " C9 - 10

V.C. 14 "Hard Rock Matt" C9 - 10

V.C. 15 C9 - 10

V.C. 2 C10

V.C. 20 C9 - 10

V.C. 4 "Wild Wonder" C9 - 10

V.C. 6 C10 ?

V.C. 7 C9 - 10

V.C. 8/83 (V.C. Rivulet) C9 - 10

V.C. Alfred Celadon Revised C9 - 10 - 11 - 12

V.C. Alfred Glaze "L" Revised C10

V.C. Amber Celadon C9 - 10

V.C. Another Shino C9 - 10

V.C. Apple Ash C9 - 10

V.C. BaAl Matt 110 C9 - 10

V.C. Barium Matt 100 C9 - 10

V.C. Base I C9 - 10

V.C. Base II C9 - 10

V.C. Base III C9 - 10

V.C. Base IV C9 - 10

V.C. BB C9 - 10

V.C. BC 1 C9 - 10

V.C. BL C9 - 10

V.C. Black A C10

V.C. Black B C10

V.C. Blue Celadon 1 C9 - 10

V.C. Blue Celadon 10 C9 - 10

V.C. Blue Celadon 11 C9 - 10

V.C. Blue Celadon 12 C9 - 10

V.C. Blue Celadon 2 C9 - 10

V.C. Blue Celadon 3 C9 - 10

V.C. Blue Celadon 4 C9 - 10

V.C. Blue Celadon 5 C9 - 10

V.C. Blue Celadon 6 C9 - 10

V.C. Blue Celadon 7 C9 - 10

V.C. Blue Celadon 8 C9 - 10

V.C. Blue Celadon 9 C9 - 10

V.C. BMI C9 - 10

V.C. Bristol Glaze C10

V.C. BS 1 C9 - 10

V.C. BS 10 C9 - 10

V.C. BS 11 C9 - 10

V.C. BS 12 C9 - 10

V.C. BS 14 C9 - 10

V.C. BS 15 C9 - 10

V.C. BS 2 C9 - 10

V.C. BS 3 C9 - 10

V.C. BS 5 C9 - 10

V.C. BS 6 C9 - 10

V.C. BS 7 C9 - 10

V.C. BS 8 C9 - 10

V.C. BS 9 C9 - 10

V.C. Colemanite Glossy C9 - 10

V.C. Copper Red 1 C9 - 10

V.C. Copper Red 2 C9 - 10

V.C. Copper Red 3 C9 - 10

V.C. Copper Red 4 C9 - 10

V.C. Copper Red 5 C9 - 10

V.C. Copper Red 6 C9 - 10

V.C. Copper Red 7 C9 - 10

V.C. Copper Red 8 C9 - 10

V.C. Crystalline A C10

V.C. Crystalline B C10

V.C. DI C9 - 10

V.C. Dry Stone Matt C9 - 10

V.C. Dry Texture 1 C10

V.C. Dry Texture 2 C10

V.C. Dry Texture 3 C10

V.C. Dry Texture 4 C10

V.C. Dry Texture 5 C10

V.C. Dry Texture 7 C10

V.C. Dry Texture 8 C10

V.C. FA 1 C9 - 10

V.C. FA 10 C9 - 10

V.C. FA 2 C9 - 10

V.C. FA 3 C9 - 10

V.C. FA 4 C9 - 10

V.C. FA 5 C9 - 10

V.C. FA 6 C9 - 10

V.C. FA 7 C9 - 10

V.C. FA 8 C9 - 10

V.C. FA 9 C9 - 10

V.C. FR C10

V.C. G Base Revised C10 ?

V.C. GKVC 1 C10

V.C. GKVC 2 C10

V.C. GKVC 3 C10

V.C. GKVC 4 C10

V.C. Glossy 1 C9 - 10

V.C. Glossy 2 C9 - 10

V.C. Glossy 3 C9 - 10

V.C. Glossy 4 C9 - 10

V.C. Glossy 5 C9 - 10

V.C. Glossy 6 C9 - 10

V.C. Glossy 7 C9 - 10

V.C. Glossy 8 C9 - 10

V.C. Glossy 9 C9 - 10

V.C. Good Base For Colors C9 - 10

V.C. Good Color Satin Matt C9 - 10

V.C. GWTB C9 - 10

V.C. H Chun Blue C10

V.C. High Lime Celadon 1 C9 - 10

V.C. High Lime Celadon 2 C9 - 10

V.C. High Lime Celadon 3 C9 - 10

V.C. High Temp 10 C9 - 10

V.C. High Temp 11 C9 - 10

V.C. High Temp 12 C9 - 10

V.C. High Temp 13 C9 - 10

V.C. High Temp 14 C9 - 10

V.C. High Temp 15 C9 - 10

V.C. High Temp 16 C9 - 10

V.C. High Temp 2 C9 - 10

V.C. High Temp 3 C9 - 10

V.C. High Temp 5 C9 - 10

V.C. High Temp 6 C9 - 10

V.C. High Temp 7 C9 - 10

V.C. High Temp 8 C9 - 10

V.C. High Temp 9 C9 - 10

V.C. High Temp1 C9 - 10

V.C. Ingerson Matt C9 - 10

V.C. IR-A C9 - 10

V.C. IR-B C9 - 10

V.C. IR-C C9 - 10

V.C. IR-D C9 - 10

V.C. IR-E C9 - 10

V.C. IR-F C9 - 10

V.C. IR-G C9 - 10

V.C. IR-H C9 - 10

V.C. IR-I C9 - 10

V.C. IRE (Dick Leach) C10

V.C. IRG C10

V.C. IRI C9 - 10

V.C. Iron Red Base A C9 - 10

V.C. Iron Red Base B C9 - 10

V.C. Iron Red Base C C9 - 10

V.C. Iron Red Base D C9 - 10

V.C. Iron Red Base E C9 - 10

V.C. Iron Red Base F C9 - 10

V.C. Iron Red Base G C9 - 10

V.C. Iron Red Base H C9 - 10

V.C. Iron Red Base I C9 - 10

V.C. Jelly C9 - 10

V.C. JW Red Plum C9 - 10 - 11

V.C. Kelly Blues 6 C10

V.C. Kelly Blues 7 C10

V.C. Kelly Copper Red C10

V.C. KK C9 - 10

V.C. Lung Chuan C9 - 10

V.C. Marcet C9 - 10

V.C. March C9 - 10

V.C. Matt 1952 C9 - 10

V.C. Matt C9 - 10

V.C. Matt Transparent C9 - 10

V.C. Matt White C9 - 10

V.C. May Markin C9 - 10

V.C. MC C9 - 10

V.C. Mixed Ash C9 - 10

V.C. Mottled C9 - 10

V.C. MT (Mamo Tessema) C9

V.C. Mutton Fat C9 - 10

V.C. NAME 1 C9 - 10

V.C. NAME 4 C9 - 10

V.C. NAME 5 C9 - 10

V.C. NAME 6 C9 - 10

V.C. NS C9 - 10

V.C. OGB C9 - 10

V.C. OGC C9 - 10

V.C. OGEB C9 - 10

V.C. OGT C9 - 10

V.C. OGW C9 - 10

V.C. OMB C9 - 10

V.C. OMW 3 C9 - 10

V.C. OMW 4 C9 - 10

V.C. Orange C9 - 10

V.C. OSMW 2 C9 - 10

V.C. OXB C9 - 10

V.C. Polished Marble C9 - 10

V.C. Red Yellow Matt C9 - 10

V.C. Red Yellow Matt-Rev C9 - 10

V.C. Revised Kyllikki Matt C9 - 10

V.C. Rich Color Base 1 C9 - 10

V.C. Rich Color Base 2 C9 - 10

V.C. Rich Color Base 3 C9 - 10

V.C. Rich Color Base 4 C9 - 10

V.C. Rich Color Base 5 C9 - 10

V.C. Rich Color Base 6 C9 - 10

V.C. Rich Color Base 7 C9 - 10

V.C. Rich Matt Blue C9 - 10

V.C. Rich Matt C9 - 10

V.C. Rikki Rowlands C9 - 10

V.C. Rivulet C9 - 10

V.C. RR C10

V.C. Satin Black Revised C9 - 10

V.C. Satin Doll Black C10

V.C. Satin Doll Black-Rev C9 - 10

V.C. Satin Matt 10 C9 - 10

V.C. Satin Opaque C9 - 10

V.C. Saturated Iron C9 - 10

V.C. Semi-Opaque Satin C9 - 10

V.C. Shamo C9 - 10

V.C. Shino 1 C9 - 10

V.C. Shino 2 C9 - 10

V.C. Shino 3 C9 - 10

V.C. Shino C9 - 10

V.C. Soda-Barium Matt C9 - 10

V.C. Spodumene Matt C9 - 10

V.C. Surface Texture 1 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 1 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 2 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 2 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 3 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 3 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 4 C6 - 7 - 8 - 9 - 10

V.C. Surface Texture 4 C6 - 7 - 8 - 9 - 10

V.C. TB 2 C9 - 10

V.C. Temmoku C9 - 10

V.C. Tomatoe Red C9 - 10

V.C. TS Spodumene C9 - 10

V.C. Victoria Green C9 - 10

V.C. White Satin Matt C9 - 10

V.C. WI C9 - 10

V.C. Yellow Matt C9 - 10

Val's Blue C10

Van Ever C9

VCT Matt C10

Vivika Heino Blue-Green Celadon C10

Vivika's Semi-matte C10

Voulkos Plum C10 ?

White (Mackinzie) C8, 9, 10

White Liner Glaze C10

White Luster C9 - 10

Willie Hillix Green C9 - 10

Wirt Shino C9 - 10

Wolf Copper Red C10

WOO BLUE BROWN C10

Woo Yellow C9 - 10

Yamagahara White C10

Yellow Crystal Matte C10

YELLOW DRIP C10

Yellow Salt C10 - 11

Yellow Tan C9 - 10

Zeller Blue C9 - 10

Zeller Blue Revised C9 - 10

Zelmer Glaze C10

Zelmer Trailing Glaze C10

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1087521961400  "Adriane Mota's Best Base Slip C10 Alfred L Transparent C10 Amber Celadon C9 - 10 Amber Celedon C10 Basic White Slip C10 Black Slip C9 Bronze Aqua Glaze Gloss 2 C10 Celadon - Blue C10 - 11 Celadon - SDSU 1999 C10 +Crawl Glaze C10 @#990000 Dan's Matte Green C10 Dark Abyss Blue C10 Deep Forest Green C10 Destiny Red C10 !Dobson's Speckled Desert C9 - 10 Emily Purple C10 (Fake Avery Flashing Slip #5 C8 - 9 - 10 Green Rock C10 Hay's Drippy rev. C9 - 10 Hippie White C9 - 10 Japanese Limestone C10 Kim Dickey's Pink Cream C10 Kurt's Black Slip C9 Kurt's Porcelain Slip C9 - 10 L.P. Mat rev. C10 Large Crystal Glaze C10 Laura's Tourquoise C10 Mean Green C10 Meloy Clear revised C9 - 10 New Maryse Red 2 C10 +nhhf01 C10 R @#990000 +nhhf02 C10 R @#990000 +nhhf03 C10 @#990000 No. 22 Green C10 Noxema Blue C10 Ohata Khaki C10 Pete's Copper Red C9 - 10 - 11 Phantom Red C10 Powder Blue C10 Randy's Green C10 Red Blue Ash C10 Reitz M-2 C10 Richard's Drip C10 +Round Texture Glaze C10 @#990000 Satin Doll Black - rev. C10 Seafoam Green C10 Shaner Shino C10 Shaner Shino rev. 02 C10 Shaner Shino rev03 C10 St. Johns Yellow C10 Stone Blue C10 Tan Rust C9 - 10 Wasteland Clear C10 Willie Hillix Green C9 - 10 Woo (Lewis) Yellow C10 Woo Blue Brown C10 Yellow Salt C10 - 11 Zelmer Trailing Glaze C10 `@7[ Y WhichIndex} on menupick myitem lock screen hide fld "midrange" hide fld "numberOfMidrange" hide fld "highfire" hide fld "numberOfhighfire" hide fld "Lowfire" hide fld "numberOfLowfire" show fld (myItem) show fld ("NumberOf" & myItem) if the hilitedLine of fld (myItem) is empty then set the hilitedLine of fld (myItem) to 1 select line (the hilitedLine of fld myItem) of fld myItem unlock screen end menupick 3BLowfire Midrange HighfirecREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 4,54,336,450 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1013altId0 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename WhichIndexicon0toolTiplayer1 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextLowfire Midrange Highfire shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize14 hiliteIcon0 disabledfalseautoArmfalse menuModetabbedfamily0 textFont helveticashowFocusBordertrue menuHistory2 cREVGeometry Master,movevDistancefalseMaster,expectedRect 10,8,388,388Master,scalebottomDistanceMaster,dontClipTextfalseMaster,movehDistancefalseMastertrueMaster,scalerightDistanceMaster,cardRanking0Master,scaleleftDistanceMaster,scaletopDistance cREVGeneral revUniqueID 1087522202125  lowfireID!h .cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 14,394,60,420multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1014altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name lowfireIDtoolTipvGridfalse listBehaviorfalselayer5visiblefalse cantSelectfalse borderWidth2margins8 htmlText H

9427

9428

9429

9430

9431

9432

9433

9434

9435

9436

9437

9438

9440

9439

9441

10703

9663

9442

9443

9444

9445

9446

9447

9448

9449

9452

9664

9665

9450

10700

9451

9453

9454

10708

9455

9456

9457

9458

9459

9460

9461

9462

10761

9463

9464

9465

9466

9467

9468

9469

9470

9471

9480

9481

9472

9473

9474

9475

9476

9477

9478

9479

9482

9483

9484

9485

9486

9487

9488

9489

9667

9490

9491

9492

9493

9494

9495

9496

9668

9497

9498

9499

9500

9501

9502

9503

9504

9505

9506

9507

9508

9509

9510

9511

9512

9513

9514

9515

9516

9517

9518

9519

9520

9521

10702

9523

9522

9524

10736

9525

9526

9527

9528

9529

9530

9531

9532

9533

9534

9535

9536

9537

9538

9539

9540

9541

10713

9542

10760

9543

9544

9545

9669

9546

9548

9547

10701

9549

9550

9551

9552

9553

9555

9554

9556

9557

9558

9559

9560

9561

9571

9562

9563

9564

9566

9565

9567

9568

9569

9570

9572

9573

10695

9574

9575

9576

9577

9578

10732

9579

9580

9581

9582

9583

9670

9671

9672

9673

9674

9584

9585

9586

9587

9588

9589

9590

9591

9592

9593

9594

9595

9596

9597

9599

9598

9600

9601

9602

9603

9604

9606

9605

9607

9608

9609

9610

10717

9611

9612

9613

9614

9615

9616

9617

9618

9619

9620

9621

9622

9623

9624

9625

9626

9966

9627

9628

9629

9630

9632

9631

10734

9633

9634

9635

9636

9637

9638

9639

9640

9641

9642

9643

9644

9645

9646

9647

9648

9649

9650

9651

9652

9678

9653

9654

9655

9656

9657

9658

9659

9660

9661

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087660578793  11192 11207 9430 9435 9445 9446 9447 9571 9565 9580 9591 9598 9605 9617 9624 9625   MidrangeID!h >0cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect62,394,110,420multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1015altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name MidrangeIDtoolTipvGridfalse listBehaviorfalselayer6visiblefalse cantSelectfalse borderWidth2margins8 htmlText7

9694

9695

9696

9697

10696

9698

10709

9699

9662

9700

9701

9702

9703

9705

9704

9706

9710

9707

9708

9709

10735

9711

9712

10741

10742

9713

10728

9714

9715

9716

9717

9718

9719

10749

9666

9680

9720

9721

10716

10715

9722

9723

9724

9725

9726

9727

10745

10746

10748

10752

9728

9729

9730

9681

9731

9738

9736

9737

9732

9733

9734

9682

9735

9683

10049

9425

9739

9740

9741

9742

9744

9743

9745

9746

9747

9749

9748

9750

9751

9752

9753

9754

9755

9756

9757

9758

9759

10743

10744

9761

9760

9684

9685

9762

9763

9764

9765

9766

9767

9768

9771

9772

9769

9770

10704

9773

10731

10697

9775

9777

9778

9779

10751

10758

10740

9780

9781

9782

9783

9686

9784

10711

9785

9786

9787

9788

9789

9790

9791

9792

9793

9794

9795

9796

9797

10739

10705

10757

9798

9799

9800

9801

10737

9802

9803

9804

9807

10710

9808

9809

9810

9811

9812

10720

9687

9688

9813

9814

9815

10721

10722

10719

9689

9816

9817

10712

9818

9819

9820

9821

10750

9822

9823

9824

9826

10718

9827

9828

9829

9830

9831

9832

9833

9690

9834

9835

9836

9837

9838

10729

9839

9840

9842

9843

9844

10726

9845

9846

10714

9848

9849

9850

10763

10738

9851

9852

10725

9853

9854

9855

9691

9856

9857

10730

9859

10754

10753

9861

9860

9862

9863

10706

9864

10707

10756

9865

9675

9866

9867

10727

10755

10759

9868

9869

9870

9871

9872

9874

9873

9875

9876

9877

9878

9879

9880

9881

9693

10698

10699

9882

9883

9884

9885

9886

9887

9888

9676

9889

9890

9891

9892

9893

10724

9894

9896

9895

9898

9897

9899

9900

10723

10762

9901

9902

9903

9904

9905

9906

9907

9908

9911

9910

9909

9912

9913

9914

9916

9915

10733

9917

9918

9919

10764

9920

9921

9922

9923

9924

9925

9926

9927

9928

9929

9930

9932

9931

9933

9934

9935

9936

9937

9938

10765

9939

9940

9941

10747

9942

9943

9944

9945

9946

10659

9426

9951

9952

9953

9954

9955

9677

9956

9679

9957

9958

9959

9960

9961

9962

9963

9964

9965

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087660629045  11197 11214 11130 11131 11132 11133 11134 11095 9773 11208 11188 9735 9731 9732 11205 11114 11093 11113 11135 11156 11158 11157 11159 11160 11136 11137 11138 11139 11116 11103 11147 11122 11111 11149 11212 9760 11099 10740 11189 11115 11105 11191 11193 11097 9801 11206 9803 11118 11102 11124 11100 11152 11153 11154 11155 11126 11127 11128 11129 10719 11101 11161 11162 11163 11170 11164 11165 11166 11167 11168 11169 11096 9830 9831 11106 11186 11121 11110 11120 11092 11150 11151 11117 11094 11190 11104 10725 11171 11178 11172 11173 11174 11175 11176 11179 11177 11180 11108 11107 9861 9860 11194 11210 11211 9873 11196 11119 11098 9894 11195 9902 11109 11123 11112 9909 11187 9952 11125   HighfireID!h p,cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect112,394,156,420multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1016altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name HighfireIDtoolTipvGridfalse listBehaviorfalselayer7visiblefalse cantSelectfalse borderWidth2margins8 htmlText%=

9973

9975

9974

9976

9977

9979

9978

9980

9981

9982

9983

9984

9985

9986

9987

9988

9989

9990

9991

9992

9993

9994

9995

9996

9997

9998

9999

10000

10001

10002

10003

10004

10005

10006

10007

10008

10009

10010

10011

10012

10013

10014

10015

10016

10017

10018

10019

10020

10021

10022

9424

10023

10024

10025

10026

10027

10028

10031

10029

10030

10032

10033

10034

10035

10036

10037

10040

10038

10039

10043

10041

10042

10044

10045

10046

10047

10048

10050

10051

10052

10053

10054

10055

10056

10057

10058

10059

10060

10061

10062

10064

10063

10065

10066

10067

10068

10069

10070

10071

10073

10072

10074

10075

10076

10077

10078

10079

10080

10082

10081

10084

10083

10086

10085

10089

10087

10088

10090

10091

10092

10093

10094

10095

10096

10097

10098

10099

10100

10101

10102

10103

10104

10105

10106

9967

10107

10108

10109

10110

10111

10112

10113

10114

10115

10116

10117

10118

10119

10120

10121

10122

10124

10123

10125

10126

10127

10130

10128

10129

10131

10132

10133

10134

10135

10137

10136

10138

10139

10140

9774

9776

9968

10141

10142

10143

10144

10145

10146

10147

10148

10150

10149

10151

10152

10153

10154

10155

10156

10157

10158

10159

10160

10161

10162

10163

10164

10165

10166

10167

10168

10169

10170

10171

10172

10173

10174

10175

10176

10177

10181

10178

10179

10180

10182

10183

10184

10185

10186

10187

10188

10189

10190

10191

10192

10193

10194

10195

10196

9806

9805

10197

10198

10199

10200

10201

10202

10203

10205

10206

10204

10207

10208

10209

10210

10211

10212

10213

10214

10215

10216

10217

10218

10219

10220

10221

10222

10224

10223

10225

10227

10226

10228

10229

10230

10231

10232

10233

10234

10235

10239

10236

10237

10238

10240

10241

10242

10243

10244

10245

10246

10247

10248

9825

10249

10250

10251

10252

10253

10254

10255

10256

10257

9841

10258

10259

10260

10261

10262

10263

10264

10265

10266

10267

10268

10269

10270

10271

10272

10273

10275

10274

10276

10277

10278

10279

9847

10280

10281

10282

10283

10284

10286

10285

10287

10288

10289

10290

10291

9858

10292

10293

10294

10295

10296

10297

10298

10299

10300

10301

10302

9692

10304

10303

10305

10307

10306

10308

10309

10310

10311

10312

10313

10314

10315

10316

10317

10319

10318

10320

10321

10322

10323

10324

10325

10326

10327

10328

10329

10330

10331

10332

10334

10333

10335

10336

10337

10338

10339

10340

10341

10342

10343

10344

10345

10346

10347

10348

10349

10350

10351

10352

10353

10354

10355

10359

10356

10357

10358

10362

10360

10361

10363

10364

10365

10366

10367

10368

10369

10370

10371

10372

10373

10374

10375

10376

10377

10378

10379

10380

10381

10382

10383

10384

10385

10386

10387

10388

10389

10390

10391

10392

10393

10394

10395

10396

10398

10397

10399

10400

10401

10402

10403

10404

10405

10406

10407

10408

10409

10410

10411

10412

10413

10414

10415

10416

10417

10418

10419

10420

10421

10422

10423

10424

10425

10428

10426

10427

10429

10431

10430

10432

10433

10434

10435

10436

10437

10438

10439

10440

10441

10442

10443

10444

10445

10446

10447

10448

10449

10450

10451

10452

10453

10454

10455

10456

10458

10457

10459

10460

10461

10462

10463

10464

10465

10466

10467

10468

10469

10470

10471

10472

10473

10474

10475

10476

10477

10478

10482

10479

10480

10481

10483

10484

10485

10486

10487

10488

10489

10490

10491

10492

10498

10493

10494

10495

10496

10497

10499

10500

10501

10502

10503

10504

10505

10506

10507

10508

10509

10510

10511

10512

10513

10514

10515

10516

10517

10518

10519

10520

10521

10522

10523

10524

10525

10527

10526

10528

10529

10530

10531

10532

10533

10534

10535

10536

10537

10538

10539

10540

10541

10542

10543

10544

10545

10546

10547

10548

10549

10550

10551

10552

10553

10554

10555

10556

10557

10558

10559

10560

10561

10562

10563

10564

10565

10566

10567

10568

10569

10570

10571

10572

10573

10574

10575

10576

10577

10578

10579

10580

10581

10582

10583

10584

10585

10586

10587

10588

10589

10590

10591

10592

10593

10594

10595

10596

10597

10598

10599

10600

10601

10602

10603

10604

10607

10605

10606

10608

10609

10610

10611

10612

10613

10614

10615

10616

10617

10618

10619

10620

10621

10622

10623

10624

10625

10626

10627

10628

10629

10630

10632

10631

10633

10634

10635

10636

10637

10638

10639

10640

10641

10642

10643

10644

10645

10646

10648

10647

10649

10650

10651

10652

10653

10654

10655

10656

10657

10658

10660

9947

9969

9948

9970

9949

9971

9950

9972

10661

10662

10663

10664

10665

10666

10667

10668

10669

10670

10671

10672

10673

10674

10675

10676

10677

10678

10679

10680

10681

10682

10683

10684

10685

10686

10687

10689

10688

10690

10691

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087660631849  11213 9988 9991 11201 11215 11209 11148 11091 11086 10004 11203 11182 11184 11141 11216 10090 10796 11185 10149 10155 10165 11204 11219 11218 10194 11181 11199 10243 10797 10256 11220 11221 11222 10260 10265 10269 10290 11183 10296 11202 10304 10306 10315 11142 10795 11198 10359 10356 10799 10413 11145 11217 11140 10678 11200 10681 10686 10691   Update Indexepon mouseup global gCalcAll lock screen lock messages go to stack "Glazes" push cd go to first card of stack "Glazes" put "Quick Calc" into CalcAll repeat the number of cards of stack "Glazes" set cursor to busy put char 1 to 36 of line 1 of fld "name" && fld "C" & char 1 to 18 of line 1 of fld "cone" into NewGlaze put the short id of this cd into NewID put line 1 of fld "Cone" into NewCone if (((word 1 of NewCone >7) or (last word of NewCone >9)) and char 1 of NewCone is not "0") then put newGlaze & return after HighfireGlazes put newID & return after HighfireIDs else if word 1 of NewCone >1 and char 1 of NewCone is not "0" then put newGlaze & return after MidrangeGlazes put newID & return after MidrangeIDs else put newGlaze & return after LowfireGlazes put newID & return after LowfireIDs end if if fld "indexMe" contains "true" then put empty into fld "indexMe" go next end repeat pop card put empty into CalcAll go to stack "Glaze Index" unlock screen unlock messages put HighfireGlazes into fld "highFire" put HighfireIDs into fld "highFireID" put MidrangeGlazes into fld "Midrange" put MidrangeIDs into fld "MidrangeID" put LowfireGlazes into fld "Lowfire" put LowfireIDs into fld "LowfireID" sortIndex "lowfire" sortIndex "midrange" sortIndex "highfire" updateIndexNumbers end mouseup on sortIndex WhichIndex put empty into sortGlazes put (WhichIndex & "ID")into WhichID repeat with i=1 to the number of lines of fld WhichIndex set cursor to busy put line i of fld WhichIndex & " " & line i of fld WhichID & return after sortGlazes end repeat sort lines of sortGlazes put empty into fld WhichIndex put empty into fld WhichID repeat with i=1 to the number of lines of sortGlazes set cursor to busy put last word of line i of sortGlazes into line i of fld WhichID delete last word of line i of sortGlazes put line i of sortGlazes into line i of fld WhichIndex end repeat end sortIndex d Update IndexcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect229,452,329,482 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1017altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel Update Index autoHilitetruestylestandard disabledIcon0 armBordertruename Update Indexicon0toolTiplayer8 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087663807385  NewGlazeNote@cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeightrect 8,446,212,476multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1018altId0autoTabfalse textStylehGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name NewGlazeNotetoolTipvGridfalse listBehaviorfalselayer9visibletrue cantSelectfalse borderWidth2margins8 htmlText$

* denotes a newly added glaze

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize disabledfalsefixedLineHeighttrue textFontvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088010089654  * denotes a newly added glazeGlazeIndexMenubarIcREVTempMaster# traversalOnfalse dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -3,-5,239,22 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1019altId0radioBehaviortrue textStylelockLocfalselabelnameGlazeIndexMenubartoolTiplayer10visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1088015090161FileU@[--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Open" if the platform is "MacOS" then answer file "Select the HyperGlaze stack to open:" of type "RSTK" else if the platform is "Win32" then answer file "Select the HyperGlaze stack to open:" with filter "Stack file,*.rev" end if if it is empty then exit menuPick open stack it show stack it break case "Close" close stack the topstack break case "Import|HyperGlaze file" send mouseup to btn "import Glaze File" of stack "Glazes"--hidden break case "Import|Insight file" send mouseup to btn "import Insight" of stack "Glazes"--hidden break case "Import|GlazeBase TEXT file" send mouseup to btn "import ASCII" of stack "Glazes"--hidden break case "Export|as HyperGlaze file" send saveAsGlazeFile to stack "Glazes" break case "Export|as Text file" send saveAsTextFile to stack "Glazes" break case "Export|as Insight RCP file" send saveInsight to stack "Glazes" break case "Export Marked Cards|as Text file" send saveMarkedTextGlazes to stack "Glazes" break case "Export Marked Cards|as HyperGlaze file" send saveMarkedGlazes to stack "Glazes" break case "Page Setup" answer printer break case "Print Card" go to stack "Glazes" if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches open printing with dialog if the result is not empty then exit menuPick print this card close printing break case "Print Marked Cards" go to stack "Glazes" if the number of marked cards of stack "Glazes" <=0 then answer "There are no marked glaze cards!" exit menuPick end if if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches open printing with dialog if the result is not empty then exit menuPick print marked cards close printing break case "Print Special|Glaze with Limit graph" go to stack "Glazes" if the showLines of fld "name" is true then send mouseup to btn "Show Lines" set printMargins to 36,18,18,41 -- 0.5,0.25,0.25,0.56 inches if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" open printing with dialog print this card push card go to stack "Glaze Limits" send mouseup to btn "Limits for Current Glaze" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" print this card pop card close printing break case "Print Special|Marked Glazes w Limit graph" go to stack "Glazes" if the number of marked cards of stack "Glazes" <=0 then answer "There are no marked glaze cards!" exit menuPick end if push card if the showLines of fld "name" is true then send mouseup to btn "Show Lines" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glazes")>350 then send mouseup to btn "bigSmallWindow" open printing with dialog repeat the number of marked cards go to next marked card print this card go to stack "Glaze Limits" send mouseup to btn "Limits for Current Glaze" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" if (the height of stack "Glaze Limits")>325 then send mouseup to btn "bigSmallWindow" print this card go to stack "Glazes" end repeat close printing pop card break case "Print Special|Marked Glazes as Labels 3.3x4" hide stack "Label Printing" open stack "Label Printing" send mouseup to btn "Print Glazes" of stack "Label Printing" break case "Print Special|Marked Glazes as Labels with Hazards" hide stack "Label GlazeHazards" open stack "Label GlazeHazards" send mouseup to btn "Print GlazeHazards" of stack "Label GlazeHazards" break case "Save" set cursor to busy save stack "Glazes" if the result is not empty then answer "The Glazes stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Index" if the result is not empty then answer "The Glaze Index stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Materials" if the result is not empty then answer "The Materials stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Materials Index" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "clays" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Clay Index" if the result is not empty then answer "The 'Glazes' stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Limits" if the result is not empty then answer "The Glaze Limits stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Glaze Calculator" if the result is not empty then answer "The Glaze Calculator stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Complex Search" if the result is not empty then answer "The Complex Search stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "QuadBlender" if the result is not empty then answer "The QuadBlender stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if set cursor to busy save stack "Bibliography" if the result is not empty then answer "The Bibliography stack could not be saved." & return & \ "The file may be locked or 'Read Only.'" & return &\ "Unlock the file and try again." & return & \ "If HyperGlaze is on a CD-ROM you will not be able to save." end if break case "Quit HyperGlaze" -- set the itemDelimiter to "." -- versions are of the form "x.y.z" -- if the platform is "MacOS" and item 1 of the systemVersion >= 10 then put true into myComputerIsOSX -- if not myComputerIsOSX then -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- set cursor to watch -- if it is "Save" then -- save stack "Glazes" -- if the result is not empty then -- answer "The Glazes stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Index" -- if the result is not empty then -- answer "The Glaze Index stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials" -- if the result is not empty then -- answer "The Materials stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "clays" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Clay Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Limits" -- if the result is not empty then -- answer "The Glaze Limits stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Calculator" -- if the result is not empty then -- answer "The Glaze Calculator stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Complex Search" -- if the result is not empty then -- answer "The Complex Search stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- end if quit -- end if break case "Quit" -- set the itemDelimiter to "." -- versions are of the form "x.y.z" -- if the platform is "MacOS" and item 1 of the systemVersion >= 10 then put true into myComputerIsOSX -- if not myComputerIsOSX then -- -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- set cursor to watch -- if it is "Save" then -- save stack "Glazes" -- if the result is not empty then -- answer "The Glazes stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Index" -- if the result is not empty then -- answer "The Glaze Index stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials" -- if the result is not empty then -- answer "The Materials stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Materials Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "clays" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Clay Index" -- if the result is not empty then -- answer "The 'Glazes' stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Limits" -- if the result is not empty then -- answer "The Glaze Limits stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Glaze Calculator" -- if the result is not empty then -- answer "The Glaze Calculator stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- save stack "Complex Search" -- if the result is not empty then -- answer "The Complex Search stack could not be saved." & return & \ -- "The file may be locked or 'Read Only.'" & return &\ -- "Unlock the file and try again." & return & \ -- "If HyperGlaze is on a CD-ROM you will not be able to save." -- end if -- end if quit -- end if break end switch end menuPick File&Open/0 &Close/W - &Save/S (- Import HyperGlaze file Insight file GlazeBase TEXT file Export as HyperGlaze file as Text file as Insight RCP file Export Marked Cards as HyperGlaze file as Text file - Page Setup &Print Card/P Print Marked Cards Print Special Glaze with Limit Graph Marked Glazes w Limit Graph Marked Glazes as Labels 3.3x4 Marked Glazes as Labels with Hazards (- &Quit/QcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 1,-1,31,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameFileicon0toolTiplayer11 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext&Open/0 &Close/W - &Save/S (- Import Export as HyperGlaze file as Text file Export Marked Cards as HyperGlaze file as Text file - Page Setup &Print Card/P Print Marked Cards Print Special Glaze with Limit Graph Marked Glazes w Limit Graph (- &Quit/Q shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088015090162 EditU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Undo" undo break case "Cut" cut break case "Copy" Copy break case "Copy Recipe as Text|Recipe Only" go to stack "Glazes" copyRecipeAsText "RecipeOnly" break case "Copy Recipe as Text|Include Comments" go to stack "Glazes" copyRecipeAsText "Comments" break case "Copy Recipe as Text|Include UMF" go to stack "Glazes" copyRecipeAsText "UMF" break case "Paste" if the clipboard is "text" then paste break case "Clear" --delete break case "New Card" go to stack "Glazes" create card break case "Duplicate Card" go to stack "Glazes" copy this card paste set clipboardData to empty put "True" into fld "indexMe" break case "Delete Card" answer "Delete this Glaze recipe permanently?" with "Delete" or "Cancel" if it is "Delete" then go to stack "Glazes" if (the number of cards of stack "Glazes")=1 then answer "This is the last card in the Glazes stack. It cannot be deleted." & return & "Make a new empty card first, then delete this card." exit menupick end if delete this card end if --add update index script break case "Delete Marked Cards" answer "Delete ALL Marked Glaze recipes permanently?" with "Delete" or "Cancel" if it is "Delete" then go to stack "Glazes" lock messages repeat the number of marked cards set cursor to busy go next marked card if (the number of cards of stack "Glazes")=1 then answer "This is the last card in the Glazes stack. It cannot be deleted." & return & "Make a new empty card first, then delete this card." exit repeat end if delete this card end repeat unlock messages --add update index script send mouseup to btn "update index" of stack "glaze index" end if break case "Delete ALL Glaze Recipes" send deleteALLCards to stack "Glazes" break case "Preferences" open stack "Preferences" break end switch end menuPick  EditCu&t/X &Copy/C Copy Recipe as Text Recipe Only Include Comments Include UMF &Paste/V Clea&r - &New Card/N &Duplicate Card/D (- D&elete Card/E Delete Marked Cards (- Delete ALL Glaze Recipes (- PreferencescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 31,-1,63,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1021altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameEditicon0toolTiplayer12 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextCu&t/X &Copy/C Copy Recipe as Text Recipe Only Include Comments Include UMF &Paste/V Clea&r - &New Card/N &Duplicate Card/D (- D&elete Card/E Delete Marked Cards (- Delete ALL Glaze Recipes (- Preferences shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088015090163 GoU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Go Back" go back break case "index" open stack "HyperGlaze" show stack "HyperGlaze" break case "Glazes" open stack pWhich show stack pWhich break case "Glaze Index" open stack pWhich show stack pWhich break case "Glaze Limits" open stack pWhich show stack pWhich break case "Glaze Calculator" open stack pWhich show stack pWhich break case "Clays" open stack pWhich show stack pWhich break case "Clay Index" open stack pWhich show stack pWhich break case "Materials" open stack pWhich show stack pWhich break case "Materials Index" open stack pWhich show stack pWhich break case "Unity Explained" open stack pWhich show stack pWhich break case "Bibliography" open stack pWhich show stack pWhich break case "QuadBlender" open stack pWhich show stack pWhich break case "Potter's Friend" open stack pWhich show stack pWhich break end switch end menuPick ?GoGo &Back/[ Go &Forward/] (- Index (- Glazes (Glaze Index (- Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography QuadBlender Potter's FriendcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 63,-1,90,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1022altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameGoicon0toolTiplayer13 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextGo &Back/[ Go &Forward/] (- Index (- Glazes (Glaze Index (- Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography QuadBlender Potter's Friend shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088015090164 FindU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich global gFindWord, gFindWhich switch pWhich case "Find" ask "What would you like to find?" with gFindWord titled "Find" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put empty into gFindWhich find string gFindWord if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found." break case "Find by Name" ask "Enter a glaze name to find:" with gFindWord titled "Find by Name" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Name" into gFindWhich find string it in fld "Name" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Name field." break case "Find by Cone" ask "Enter a cone number to find:" with gFindWord titled "Find by Cone" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Cone" into gFindWhich find whole it in fld "Cone" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Cone field." break case "Find by Color" ask "Enter a color to find:" with gFindWord titled "Find by Color" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Color" into gFindWhich find string it in fld "Color" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Color field." break case "Find by Surface" ask "Enter a surface to find:" with gFindWord titled "Find by Surface" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "surface" into gFindWhich find string it in fld "surface" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Surface field." break case "Find by Firing" ask "Enter a firing type to find:" & return & "(oxidation, reduction, soda, salt, wood, luster, raku, saggar)"\ with gFindWord titled "Find by Firing" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Firing" into gFindWhich find string it in fld "Firing" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Firing field." break case "Find in Comments" ask "Enter a comment phrase to find:" with gFindWord titled "Find in Comments" if it is empty then exit menuPick go to stack "Glazes" put it into gFindWord put "Comments" into gFindWhich find string it in fld "Comments" if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the Comments field." break case "Find Again" go to stack "Glazes" if gFindWhich is not empty then if gFindWhich is "Cone" then find whole gFindWord in fld gFindWhich if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the " & gFindWhich & " field." end if else find string gFindWord in fld gFindWhich if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found in the " & gFindWhich & " field." end if end if else find string gFindWord if the result is "not found" then answer "Sorry, '" & gFindWord & "' was not found." end if break case "Complex Search" open stack "Complex Search" break case "Find Matching Glazes" open stack "Match Glazes" show stack "Match Glazes" if fld "ExactPct" is empty then put 50 into fld "exactPct" break end switch end menuPick Z#Find&Find/F (- Find by Name Find by Cone Find by Color Find by Surface Find by Firing Find in Comments Find A&gain/G (- Complex Search Find Matching GlazescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 90,-1,125,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1023altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameFindicon0toolTiplayer14 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext&Find/F (- Find by Name Find by Cone Find by Color Find by Surface Find by Firing Find in Comments Find A&gain/G (- Complex Search Find Matching Glazes shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088015090165  Glaze IndexU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Update Index" send "mouseup" to btn "update Index" break case "Update Marked Cards" send mouseup to btn "Update Marked" break case "Mark Card" if the visible of fld "lowfire" is true then put "lowfire" into MyListField if the visible of fld "midrange" is true then put "midrange" into MyListField if the visible of fld "highfire" is true then put "highfire" into MyListField put the hilitedLine of fld myListField into mySelectedGlaze if mySelectedGlaze is empty then answer "Please select a glaze in the index first." exit menuPick end if --put the short name of fld (last word of mySelectedGlaze) into MyListField put MyListField & "ID" into myField --put myListField into myField --put the selectedLine into myChoice --put word 2 of myChoice into MyLine put item 1 of mySelectedGlaze into myLine put (line myLine of fld myField) into myCard if (char 1 of line myLine of fld MyListField) is "+" then answer "This card is already marked" else set cursor to watch lock screen push cd go to card ID myCard of stack "Glazes" mark this card pop cd unlock screen set the cursor to hand put "+" before line myLine of fld MyListField set the foregroundColor (line myLine of fld MyListField) to "#990000" select line myLine of fld myListField end if break case "Mark ALL Cards" go to stack "Glazes" Mark All Cards go to stack "Glaze Index" put "lowfire,midrange,highfire" into myIndexes repeat with i=1 to 3 put item i of myIndexes into myField repeat with x=1 to the number of lines of fld myField set cursor to busy if char 1 of line x of fld myField is not "+" then put "+" before line x of fld myField set the foregroundColor (line x of fld myField) to "#990000" end if end repeat end repeat break case "Unmark Card" if the visible of fld "lowfire" is true then put "lowfire" into MyListField if the visible of fld "midrange" is true then put "midrange" into MyListField if the visible of fld "highfire" is true then put "highfire" into MyListField put the hilitedLine of fld myListField into mySelectedGlaze if mySelectedGlaze is empty then answer "Please select a glaze in the index first." exit menuPick end if --put the short name of fld (last word of mySelectedGlaze) into MyListField put MyListField & "ID" into myField --put MyListField into myField --put the selectedLine into myChoice --put word 2 of myChoice into MyLine put mySelectedGlaze into myLine put (line myLine of fld myField) into myCard if char 1 of line myLine of fld MyListField is "+" then set cursor to watch lock screen push cd go to card ID myCard of stack "Glazes" unmark this card pop cd unlock screen delete char 1 of line myLine of fld myListField set the foregroundColor (line myLine of fld MyListField) to "#000000" select line myLine of fld myListField else answer "This card is not marked." end if break case "Unmark All Cards" push card go to stack "Glazes" unmark all cards pop card repeat with i=1 to the number of lines of fld "highFire" if char 1 of line i of fld "highFire" is "+" then set cursor to busy delete char 1 of line i of fld "highFire" set the foregroundColor (line i of fld "highFire") to "#000000" end if end repeat repeat with i=1 to the number of lines of fld "midrange" if char 1 of line i of fld "midrange" is "+" then set cursor to busy delete char 1 of line i of fld "midrange" set the foregroundColor (line i of fld "midrange") to "#000000" end if end repeat repeat with i=1 to the number of lines of fld "lowfire" if char 1 of line i of fld "lowfire" is "+" then set cursor to busy delete char 1 of line i of fld "lowfire" set the foregroundColor (line i of fld "lowfire") to "#000000" end if end repeat break case "Set Batch Size for Marked Cards" send "setBatchSizeMarked" to stack "Glazes" break case "Calculate Marked Cards" push card go to stack "Glazes" go to first marked card global gCalcAll put "Quick Calc" into gCalcAll repeat the number of marked cards send "mouseup" to btn "Calculate Glaze" go to next marked card end repeat put empty into gCalcAll pop card break case "Calculate All Cards" push card go to stack "Glazes" go to first card global gCalcAll put "Quick Calc" into gCalcAll repeat the number of cards send "mouseup" to btn "Calculate Glaze" go to next card end repeat put empty into gCalcAll pop card break end switch end menuPick }J Glaze IndexUpdate Index Update Marked Cards (- Mar&k Card/K Mark All Cards (- Unmark Card/J Unmark All Cards (- Set Batch Size for Marked Cards Calculate Marked Cards Calculate All CardscREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 125,-1,199,18 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1025altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruename Glaze Indexicon0toolTiplayer15 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextUpdate Index Update Marked Cards (- Mar&k Card/K Mark All Cards (- Unmark Card/J Unmark All Cards (- Set Batch Size for Marked Cards Calculate Marked Cards Calculate All Cards shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088266242056 breakPoints HelpU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Help with HyperGlaze" open stack "Help" break case "About HyperGlaze" open stack "HG Splash" break end switch end menuPick $Help*&Help with HyperGlaze - &About HyperGlazecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 199,-1,235,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1024altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylemenu disabledIcon0 armBordertruenameHelpicon0toolTiplayer16 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext)&Help with HyperGlaze - &About HyperGlaze shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088015090166  NumberOfMidrange"H P, cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect 282,80,326,92multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1026altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNumberOfMidrangetoolTipvGridfalse listBehaviorfalselayer17visibletrue cantSelectfalse borderWidth2margins4 htmlText

341

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088440757066  118 NumberOfHighfire*H N, cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect 284,78,328,90multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1027altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNumberOfHighfiretoolTipvGridfalse listBehaviorfalselayer18visiblefalse cantSelectfalse borderWidth2margins4 htmlText

737

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088440768314  58 NumberOfLowfire"H P, cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect 282,80,326,92multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1028altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNumberOfLowfiretoolTipvGridfalse listBehaviorfalselayer19visiblefalse cantSelectfalse borderWidth2margins4 htmlText

261

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088440773782  16Update MarkedEpon mouseup put "lowfire,midrange,highfire" into MyIndexFields repeat with x=1 to 3 put item x of MyIndexFields into myField repeat with i=1 to the number of lines of fld myField if char 1 of line i of fld myField is "+" then delete char 1 of line i of fld myField set the foregroundColor (line i of fld myField) to empty end if end repeat end repeat go to stack "Glazes" go next marked card repeat (the number of marked cards) put the id of this cd into myID get word 1 of fld "Cone" if it >6 and char 1 of it is not "0" then put "highfire" into myField else if it >2 and char 1 of it is not "0" then put "midrange" into myField else put "lowfire" into myField go to stack "Glaze Index" find empty find whole myID in fld (myField & "ID") put word 2 of the foundline into myLine if char 1 of line myLine of fld myField is not "+" then put "+" before char 1 of line myLine of fld myField set the foregroundColor (line myLine of fld myField) to "#990000" end if go back go next marked card end repeat end mouseup dcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect231,487,331,515 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors153,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1029altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruename Update Markedicon0toolTiplayer20 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088492638438  NewGlazeNote@,cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeightrect 8,462,212,506multipleHilitesfalse patterns colors153,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1030altId0autoTabfalse textStylehGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name NewGlazeNotetoolTipvGridfalse listBehaviorfalselayer21visibletrue cantSelectfalse borderWidth2margins8 htmlTextB

+ option/alt-click a name to mark

or unmark it

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize disabledfalsefixedLineHeighttrue textFontvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1089205887515  #+ option/alt-click a name to mark  or unmark itGlaze Calculatorb& GlassTEPrefDefault FluxTEPrefDefaultStabilizerTEPrefDefault3-- 1988-2004 Richard Burkett, All scripts -- All Rights Reserved Worldwide --on shutdownRequest -- pass shutdownRequest to top --end shutdownRequest on openstack if the platform is "MacOS" then put 365 into myMinHeight put 525 into myMaxHeight else -- for Windows with menus in window put 390 into myMinHeight put 550 into myMaxHeight end if if the icon of btn "bigSmallWindow" is not 201186 then revChangeWindowSize 518,myMinHeight else set the icon of btn "bigSmallWindow" to 201186 revChangeWindowSize 518,myMaxHeight end if global gSimplifyUMFCalc, gCalcTolerance if gSimplifyUMFCalc is empty then put the hilite of btn "Simplify UMF" into gSimplifyUMFCalc else set the hilite of btn "Simplify UMF" to gSimplifyUMFCalc if gCalcTolerance is empty then put fld "CalcTolerance" of cd "Calc Prefs" of stack "Preferences" into gCalcTolerance end openstack function stripReturns myText repeat the number of lines of myText put offset(return,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat repeat the number of lines of myText put offset(lineFeed,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat return myText end stripReturns function StripTabs myText repeat put offset(Tab,myText) into myTab if myTab >0 then put "" into char myTab of myText else exit repeat end repeat return myText end StripTabs -- on doMenu choice -- global HGfriendly, vernum -- if vernum is empty then put the last word of the short name of this stack into vernum -- if choice is in "Help Index,Main Index,Glaze Index,Clay Index,Glaze Calculator,Materials Index,Bibliography,Glaze Limits,Unity Explained" -- then -- set cursor to watch -- put true into HGfriendly -- else put false into HGfriendly -- if choice ="About HyperGlaze" -- then -- put true into HGfriendly -- go to stack ("HyperGlaze" && vernum) -- send mouseup to btn "About" -- else if choice ="Glaze Index" -- then go to cd "GlazeIndex" -- else if choice="Clay Index" -- then go to cd "!ClayIndex" -- else if choice="Glaze Calculator" -- then go to stack "Glaze Calculator IIx" -- else if choice="Glaze Limits" -- then go to cd 2 of stack "Glaze Calculator IIx" -- else if choice="Help Index" -- then go to stack "HyperGlaze IIx Help" -- else if choice="Materials Index" -- then go to cd "MaterialsIndex" of stack "Materials" -- else if choice="Main Index" -- then Go to cd "MainIndex" -- else if choice="Bibliography" -- then Go to stack "Bibliography" -- else if choice="Unity Explained" -- then Go to stack "Unity Explained" -- else if choice="Find" -- then findIt -- else if choice="Find By Cone" -- then findIt "Cone" -- else if choice="Find By Name" -- then findIt "Name" -- else if choice="Find By Color" -- then findIt "Color" -- else if choice="Find By Surface" -- then findIt "Surface" -- else if choice="Find By Firing" -- then findIt "Firing" -- else if choice="Find By Tested" -- then -- answer "Search for tested or untested glazes?" with "Tested" or\ -- "Untested" or "Cancel" -- if it is "Cancel" then exit doMenu -- if it is "Tested" -- then -- find "tested" in fld "Tested" -- put "find " & quote & "Tested" & quote & " in fld tested" -- hide message -- end if -- if it is "Untested" -- then -- find "untested" in fld "Tested" -- put "find " & quote & "Untested" & quote & " in fld tested" -- hide message -- end if -- else if choice is "Save a copy..." -- then -- if the cantmodify of this stack is false -- then send "domenu" && quote & "Save a copy..." & quote to HyperCard -- else answer "Sorry, this HyperGlaze stack is locked and can't be copied." -- else if choice is "New Stack..." -- then -- set lockmessages to true -- go to cd "MainIndex" -- send mouseup to btn id 91 -- set lockmessages to false -- else pass doMenu -- end doMenu --on FindIt LookWhere -- global MyQuery -- if lookWhere is "Tested" -- then put "by (un)tested" into lookwhere2 -- else put "by" && lookwhere into lookwhere2 -- if lookwhere is empty then put empty into lookWhere2 -- ask "What do you want to find " & lookWhere2 & "?" with MyQuery -- if it is empty then exit FindIt -- put it into myQuery -- push cd -- lock screen -- get the short name of this bg -- if it is "Glazes" or it is "Clays" -- then go next -- else go to first cd of bg "Glazes" -- if lookWhere is not empty -- then -- if lookwhere is "cone" -- then find word myQuery in fld LookWhere -- else find string myQuery in fld LookWhere -- if the result is not empty -- then -- play boing -- answer quote & myQuery & quote & " was not found in '" & lookwhere\ -- & "'." -- pop cd -- unlock screen -- exit FindIt -- end if -- if lookwhere is "cone" -- then put "Find word " & quote & myQuery & quote & " in fld " & lookWhere -- else put "Find String " & quote & myQuery & quote & " in fld " & lookWhere -- hide message -- else -- find string myQuery -- if the result is not empty -- then -- play boing -- answer quote & myQuery & quote & " was not found." -- pop cd -- unlock screen -- exit FindIt -- end if -- put "Find String " & quote & myQuery & quote -- hide message -- end if --end findIt --on doNewBatch -- global batchSize -- lock screen -- set cursor to busy -- put empty into newTotal -- put empty into fld "Batch" -- put empty into fld "Batch2" -- put cd fld "TotBatch" into Batchsize -- if batchsize >0 -- then -- if fld "lb/gm" is "gm" or fld "lb/gm" is "lb" -- then -- if batchsize>1000 then -- set numberformat to 0 -- else if batchsize>100 then -- set numberformat to 0.0 -- else set numberformat to 0.00 -- put GramBatch(Batchsize) into newTotal -- else put PoundBatch(Batchsize) into newTotal -- end if -- set the numberformat to 0.00 -- if batchsize is empty -- then put "0.00" into cd fld "totBatch" -- if newtotal >0 -- then -- put newTotal into cd fld "totBatch" -- else put Batchsize*1 into cd fld "totBatch" -- put empty into Batchsize -- unlock screen --end doNewBatch --on SetBatchSize -- if the short name of this cd is "GlazeIndex" -- then put "glazes" into myType -- else put "clays" into myType -- answer "Change the batch size on ALL " & mytype & " or just those on the Utilities List?" \ -- with "ALL" or "Utilities List" or "Cancel" -- if it is "cancel" then exit setBatchSize -- if it is "Utilities List" -- then put cd fld "IDPrintList" into MyList -- else put cd fld "IDindex1" & return & cd fld "IDindex2" & return &\ -- cd fld "IDindex3" into myList -- answer "Set the batch size in grams or pounds?" with "Grams" or "Pound/Oz"\ -- or "Pounds" -- put it into MyUnit -- if MyUnit is "Pounds" or MyUnit is "Pound/Oz" -- then -- put 20 into MyBatch -- else -- put 500 into myBatch -- end if -- ask "What batch size (in " & MyUnit & ") do you want?" with MyBatch -- if it is empty -- then exit setBatchSize -- else put it into MyBatch -- push cd -- set lockmessages to true -- lock screen -- lock recent -- repeat with i=1 to the number of lines of MyList -- set the cursor to watch -- if line i of MyList is empty then next repeat -- go to line i of MyList -- if MyUnit is "Pounds" -- then put "Lb" into fld "lb/gm" -- else if MyUnit is "Pound/Oz" -- then put "lb/oz" into fld "lb/gm" -- else put "Gm" into fld "lb/gm" -- put MyBatch into cd fld "totBatch" -- doNewBatch -- send mouseup to bg btn "Batch Cost" -- end repeat -- set lockmessages to false -- unlock screen -- unlock recent -- pop cd --end setBatchSize --Function PoundBatch batchsize -- put 0.00 into newTotal -- repeat with i = 1 to 14 -- put ((i*2)+4) into myfield -- if fld myfield is not empty -- then -- set numberformat to 0.00 -- put ((fld myfield)*batchsize)/100 into Temp -- add temp to newTotal -- if batchsize<15 -- then set numberformat to 0.0 -- else set numberformat to 0 -- if Batchsize >=150 -- then -- if temp<1 -- then set numberformat to 0.0 -- else set numberformat to 0 -- if i<11 -- then put Temp & " Lb" & return after fld "Batch" -- else put Temp & " Lb" & return after fld "Batch2" -- else -- if i<11 -- then -- if temp<1 -- then set numberformat to 0.0 -- else set numberformat to 0 -- if trunc(Temp)>0 -- then put trunc(Temp) & " Lb " into Pounds -- else put empty into Pounds -- put (Pounds &\ -- (Temp-(trunc(Temp)))*16 & "oz") & return after\ -- fld "Batch" -- else -- if temp<1 -- then set numberformat to 0.0 -- if trunc(Temp)>0 -- then put trunc(Temp) & " Lb " into Pounds -- else put empty into Pounds -- put (Pounds & (Temp-(trunc(Temp)))*16 & "oz") & \ -- return after fld "Batch2" -- end if -- end if -- end if -- put empty into temp -- end repeat --end PoundBatch --on doPercent -- lock screen -- set cursor to busy -- set numberformat to 0.00 -- put FindPercent()+1 into whichField -- set the numberformat to 0 -- if whichField =25 -- then -- set the location of cd fld "totals" to 130,223 -- set the location of cd fld "TotAmt" to 198,223 -- set the location of cd fld "TotBatch" to 260,223 -- else -- repeat with i=1 to 3 -- put item 2 of the location of fld whichField into y -- put item 1 of the location of cd fld i into x -- set the location of cd fld i to x,y -- end repeat -- end if -- put "Totals" into cd fld "totals" -- unlock screen --end doPercent on FindSelectedWord global selectedWord,myResult put empty into firstCard set lockscreen to true set lockmessages to true find string SelectedWord in fld 1 if the result is not empty then put "not found" into MyResult exit FindSelectedWord else put the number of this cd into firstcard if selectedword contains fld 1 then set lockscreen to false set lockmessages to false exit FindSelectedWord end if go next repeat until selectedWord contains fld 1 find string SelectedWord in fld 1 if the number of this cd is firstCard then put "not found" into myResult exit repeat end if end repeat set lockscreen to false set lockmessages to false end FindSelectedWord function ClickLine return(trunc(((scroll of the target)+(item two of the clickloc)- (item two of the rect of the target)) div the textheight of the target) + one) end ClickLine on findIndexName Global SelectedWord repeat 3 times delete last char of selectedWord end repeat if last char of selectedWord is "C" then delete last char of selectedWord if last char of selectedWord is " " then delete last char of selectedWord find string selectedWord in fld 1 put "find string " & quote & selectedWord & quote & " in fld 1" hide message end findIndexName on MakeHyperGlazeFile MyFilename set cursor to 4 repeat with i=1 to 45 if fld i is empty or the sharedText of fld i is true then write quote & quote & Tab to file MyFilename else write fld i & tab to file MyFilename end if end repeat repeat with i=1 to 3 write cd fld i & tab to file MyFilename end repeat repeat with i=1 to 3 put loc of cd fld i into totlocation write totlocation & tab to file MyFilename end repeat if fld "ColorPatch" is empty then write quote & quote & tab to file MyFilename else Write fld "ColorPatch" & Tab to file MyFilename if fld "Cost" is empty then write quote & quote & tab to file MyFilename else Write fld "Cost" & Tab to file MyFilename if the short name of this bg is "Glazes" then if fld "GlazeType" is empty then write quote & quote & tab to file MyFilename else Write fld "GlazeType" & Tab to file MyFilename write numToChar(30) to file MyFilename end MakeHyperGlazeFile on PrintIt if the hilite of bg btn "Comments" is true then if the short name of this bg is "Clays" then send mouseup to bg btn "Analysis" else send mouseup to bg btn "Unity Formula" end if if the short name of this bg is "Glazes" then if the visible of fld "PercentAnalysis" is true then send mouseup to fld "percentAnalysis" end if show fld "printComments" if the visible of fld "backdrop" is true then click at loc of fld "BackDrop" put "COMMENTS: " & stripReturns(fld "comments") into fld "printComments" if fld "hazards" is not empty then put Return & "HEALTH HAZARDS: " & stripReturns(fld "hazards") after fld\ "printComments" -- if variant()>=2.2 then -- does not work with HC2.4? -- put checkForPlayer() into isPlayer -- else put checkForOldPlayer() into isPlayer -- if isPlayer then open printing -- else open printing with dialog if the result is not empty then exit PrintIt print cd close printing put empty into fld "printComments" hide fld "printComments" end printIt on MakeTextFile includeAnalysis, makeHTML, AmountFirst, includeBatch, includePct Global MyFilename, bkgndName if AmountFirst is empty or AmountFirst is "AmountFirst" then put false into AmountFirst if includeBatch is empty or includeBatch is "includeBatch" then put false into includeBatch if includePct is empty or includePct is "includePct" then answer "Save with only Percentage or include Batch recipe?" with "Cancel" or "Batch" or "Percent" if it is "Cancel" then exit MakeTextFile if it is "Batch" then put true into includeBatch put false into includePct else put true into includePct end if end if if makeHTML is empty then put false into makeHTML if makeHTML then put comma into tabChar put numToChar(11) into returnChar write quote & (fld "GlazeName") & quote & comma & quote & fld "cone" & quote & comma \ & quote & fld "color" & quote & comma &\ quote & fld "surface" & quote & comma \ & quote & fld "tested" & quote & comma \ & quote & fld "firing" & quote & comma\ & quote & fld "date" & quote & comma \ & quote & fld "GlazeType" & quote & comma \ & quote & fld "ThermalExpansion" & quote & comma \ to file MyFilename -- removed html formatting from the export script, now done in FileMaker Pro. -- write "" & returnChar & " " to file MyFilename -- write "" & line 1 of fld "GlazeName" & "" & returnChar & "" & returnChar & "" & "" & returnChar to file MyFilename else put tab into tabChar put return into returnChar put false into makeHTML end if put the short name of this bg into bkgndName set cursor to busy if not makeHTML then write "Glaze name: " & line 1 of fld "GlazeName" & returnChar & "Cone: " & line 1 of fld 2 &\ returnChar to file MyFilename write "Color: " & line 1 of fld "Color" & returnChar & "Testing: " & fld "Tested" &\ returnChar to file MyFilename if BkgndName is "Glazes" then write "Surface texture: " & line 1 of fld "surface" & returnChar to file MyFilename else write "Uses: " & line 1 of fld "surface" & returnChar to file MyFilename write "Firing: " & fld "firing" to file MyFilename if BkgndName is "Glazes" then write returnChar & "Glaze type: " & fld "GlazeType"\ to file MyFilename end if if makeHTML then write quote to file MyFilename else if AmountFirst then if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Batch" & returnChar to file MyFilename else write returnChar & returnChar & "Recipe:" & tabChar & "Percentage by weight" & returnChar to file MyFilename else if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & tabChar & "Batch" & \ returnChar to file MyFilename else write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & \ returnChar to file MyFilename end if repeat with i=1 to 10 if fld ((i*2)+3) is empty then exit repeat if amountFirst then if includeBatch then put the number of chars of cd fld 3 into addSpaces else put the number of chars of cd fld 2 into addSpaces if IncludeBatch then put line i of fld "Batch" into myAmount else put line 1 of fld ((i*2)+4) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if makeHTML then if AmountFirst then write myAmount & tab &\ line 1 of fld ((i*2)+3) & returnChar to file MyFilename else write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & returnChar to file MyFilename end if else if AmountFirst then write myAmount & tab &\ line 1 of fld ((i*2)+3) &\ returnChar to file MyFilename else if includeBatch then write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & tab & line i of fld "Batch" & returnChar to file MyFilename else write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & returnChar to file MyFilename end if end if end repeat if makeHTML then if amountFirst then write cd fld 2 & " %" & " Totals:" & returnChar to file MyFilename else write "Totals:" & tab & cd fld 2 & " %" & returnChar to file MyFilename else if AmountFirst then if includeBatch then write cd fld 3 & tab & fld "lb/gm" && "Total Batch" & returnChar to file MyFilename else write cd fld 2 & tab & "%" & "Total" & tab & returnChar to file MyFilename else if includeBatch then write cd fld 2 & tab & "%" & "Total" & tab & cd fld 3 & tab & fld "lb/gm" && "Total Batch" & returnChar to file MyFilename else write "Totals:" & tab & cd fld 2 & " %" & tab & returnChar to file MyFilename end if if fld 25 is not empty then write returnChar & "Also add:" & returnChar to file MyFilename repeat with i=1 to 4 if fld ((i*2)+23) is empty then exit repeat if AmountFirst then if includeBatch then put line i of fld "batch2" into myAmount else put line 1 of fld ((i*2)+24) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if makeHTML then if amountFirst then write myAmount & tab & line 1 of fld ((i*2)+23) & returnChar to file MyFilename else write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) \ & returnChar to file MyFilename else if amountFirst then write myAmount & tab & line 1 of fld ((i*2)+23) & returnChar to file MyFilename else if includeBatch then write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) & tab & line i of fld "batch2" & returnChar to file MyFilename else write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) & returnChar to file MyFilename end if end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if fld "Comments" is not empty then put fld "comments" into myComments write returnChar & "Comments:" & returnChar to file MyFilename repeat get offset(quote,myComments) if it>0 then put empty into char it of myComments else exit repeat end repeat repeat with i=1 to the number of lines of myComments write line i of myComments & returnChar to file MyFilename end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if fld "Hazards" is not empty then write returnChar & "Possible Health Hazards:" & returnChar to file MyFilename repeat with i=1 to the number of lines of fld "Hazards" write line i of fld "Hazards" & returnChar to file MyFilename end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if includeAnalysis is true then if bkgndName is "Glazes" then write returnChar & "Unity Formula for " & (fld "Name") & ":" & returnChar to file MyFilename put "K2O ,Na2O,CaO ,MgO ,Li2O,BaO ,PbO ,ZnO ,CuO ,CoO ,NiO ,SrO " into ROItems put "Al2O3,B2O3 ,Fe2O3,P2O5 ,Sb2O3,Cr2O3,V2O5" into R2O3Items put "SiO2 ,TiO2 ,ZrO2 ,SnO2 ,MnO2 ,F ,Si:Al Ratio" into RO2Items put empty into myAnalysis put empty into myRO put empty into myRO2 put empty into myR2O3 repeat with i=1 to 12 if line i of fld "R2O" is not empty then put line i of fld "R2O" && item i of ROitems \ & return after myRO if line i of fld "RO2" is not empty then put tab & line i of fld "RO2" && item i of RO2Items \ & return after myRO2 if line i of fld "R2O3" is not empty then put tab & line i of fld "R2O3" && item i of R2O3Items \ & return after myR2O3 end repeat repeat with i=1 to 12 if line i of MyRO is not empty or line i of MyRO2 is not empty\ or line i of MyR2O3 is not empty then put line i of myRO & line i of MyR2O3 & \ line i of MyRO2 & returnChar after myAnalysis else next repeat end repeat write myAnalysis to file MyFilename if fld "PercentAnalysis" is empty then send mouseup to bg btn "Percent Analysis" write returnChar & "Percentage Analysis for " & (fld "Name") & ":" & returnChar to file MyFilename repeat with i=2 to the number of lines of fld "PercentAnalysis" write line i of fld "PercentAnalysis" & returnChar to file MyFilename end repeat if makeHTML then write quote & comma to file MyFilename end if else put "SiO2,Al2O3,Fe2O3,TiO2,K2O,Na2O,Ca2O,MgO,Li2O,P2O5,MnO,S,F2,L.O.I" into OxideItems write returnChar & "Analysis for " & (fld "Name") & ":" & returnChar to file MyFilename repeat with i=1 to 14 if line i of fld "Analysis">0 then write tab & line i of fld "Analysis" && "%" &&\ item i of OxideItems & returnChar to file MyFilename end repeat end if end if -- write "Estimated thermalExpansion =" && fld "thermalExpansion" & "x10-7" & returnChar to file MyFilename -- if makeHTML then write "" & returnchar & "" & quote & return to file MyFilename if makeHTML then write return to file MyFilename if not makeHTML then write return & return to file MyFilename end MakeTextFile on importInsight MyFilename if there is a bg btn "Import Insight" then send ("importInsight" && quote & MyFilename & quote) to bg btn "Import Insight" -- hidden button else answer "Go to any Glaze or Clay card to import an Insight recipe." end importInsight on saveInsight howMany if there is a bg btn "save Insight" then send "saveInsight" && howMany to bg btn "Save Insight" -- hidden button else answer "Go to any Glaze or Clay card to save an Insight recipe." end saveInsight function stripSpaces myText -- 1990 R. Burkett current 11/10/90 repeat with i= 1 to the number of lines of myText repeat if last char of item 1 of line i of myText is " " then delete last char of item 1 of line i of myText else exit repeat end repeat repeat if first char of item 1 of line i of myText is " " then delete first char of item 1 of line i of myText else exit repeat end repeat end repeat repeat put offset(" ",mytext) into doubleSpaces if doubleSpaces > 0 then delete char doubleSpaces of myText else exit repeat end repeat return myText end stripSpaces on SendToGlazes -- makes a new glaze card and stores the recipe if fld "amounts" is empty then answer "Please calculate this glaze first before saving it in the Glazes stack!" exit sendToGlazes end if resetUMFcalc FindPercentRecipe put fld "cone" into myCone put fld "GlazeName" into myGlazeName put fld "Ingredients" into myIngredients put fld "Amounts" into myAmounts put fld "ColorList" into myColorIngreds put fld "ColorAmts" into myColorAmts go to stack "Glazes" create card put myGlazeName into fld "name" put myCone into fld "Cone" repeat with i=1 to 14 put line i of myIngredients into myLine if the last char of myLine is return then delete last char of myLine if myLine is not empty then put myLine into fld ("Ingredient" & i) put line i of myAmounts into fld ("Amount" & i) else put i into HowManyIngreds exit repeat end if end repeat if HowManyIngreds<=10 then repeat with i=1 to 4 put line i of myColorIngreds into fld ("Ingredient" & (i+10)) put line i of myColorAmts into fld ("Amount" & (i+10)) end repeat else put "There were more than 10 ingredients in the new recipe. Additional colorants are here:" & return after fld "Comments" repeat with i=1 to 4 put line i of myColorIngreds && line i of myColorAmts & return after fld "comments" end repeat end if end SendToGlazes on resetUMFcalc repeat with i=1 to the number of lines of fld "R2O" set the textColor of line i of fld "R2O" to "black" end repeat repeat with i=1 to the number of lines of fld "R2O3" set the textColor of line i of fld "R2O3" to "black" end repeat repeat with i=1 to the number of lines of fld "RO2" set the textColor of line i of fld "RO2" to "black" end repeat end resetUMFcalc on SendToLimits Answer "Erase current glaze analysis in Glaze Limits?" & return & "This glaze analysis will replace it." with "Cancel" or "Erase" if it is "Cancel" then exit SendToLimits put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb,B,Al,P,Si" into MyOxideList put fld "cone" into myCone put fld "GlazeName" into myGlazeName put empty into myAnalysis repeat with i=1 to 13 put fld (item i of MyOxideList) & return after myAnalysis end repeat go to stack "Glaze Limits" show stack "Glaze Limits" put myGlazeName into cd fld "Name" put myCone into cd fld "cone" repeat with i=1 to 13 if line i of MyAnalysis>0 then put line i of myAnalysis into cd fld (item i of myOxideList) else put "0.00" into cd fld (item i of myOxideList) end repeat send closefield to cd fld "B" send closefield to cd fld "Al" send closefield to cd fld "P" send closefield to cd fld "Si" send doThermalExpansion to stack "Glaze Calculator" -- adjustGraph end SendToLimits on BlendGlaze put empty into myAmts put empty into myIngreds answer "Send this recipe to Blender as glaze 'A' or 'B'?" with "Cancel" or "Glaze A" or "Glaze B" if it is "Cancel" then exit BlendGlaze put it into whichGlaze answer "Include colorants in blend?" with "Cancel" or "Base Glaze" or "Include Color" if it is "Cancel" then exit BlendGlaze put it into myRecipe put fld 1 into GlazeName repeat with i=1 to 10 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat if myRecipe is "Include Color" then repeat with i=11 to 14 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat end if push card lock screen lock recent lock messages go to card "GlazeBlender" of stack "Potter's Friend" if whichGlaze is "Glaze A" then put GlazeName into cd fld 1 repeat with i= 1 to 14 set cursor to busy put ((i*2)) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat else put GlazeName into cd fld 30 repeat with i= 1 to 14 set cursor to busy put ((i*2)+29) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat end if pop card unlock screen unlock recent unlock messages answer "'" & fld 1 && "' sent to Glaze Blender." end BlendGlaze on SetGlazeColor set cursor to watch put field "GlazeName" into GlazeName put field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if field K>.1 then put "KNa " after GlazeType end if else if field K+field Na>.1 then put "KNa " after GlazeType end if if field Pb>0 then put "Pb " after GlazeType if field Ca>.5 then put "Ca " after GlazeType if field B>.1 then put "B " after GlazeType if field Mg>.15 then put "Mg " after GlazeType if field Ba>.15 then put "Ba " after GlazeType if field Li>.05 then put "Li " after GlazeType if field Zn>.1 then put "Zn " after GlazeType else if field Zn>.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end SetGlazeColor on calcGlaze set cursor to watch Global calcAll, restart, UnityToBatch,skipIt,IngredientList,theOxides global verNum, FromFormula,whichLine,MyResult,firstemptyLine,myMaterial global myGlaze, combineKNa, gSimplifyUMFCalc, gCalcTolerance put empty into myGlaze put empty into calcAll put empty into restart put false into skipIt put empty into myResult put empty into whichLine put empty into fromFormula set numberFormat to "0.0000" put true into UnityToBatch hide message get line 1 of fld "ingredients" if it is empty then --lock screen --push card put empty into UnityToBatch put empty into fromFormula -- go to stack "Materials Index" -- put 1 into whichLine -- unlock screen put "You must enter at least one ingredient for the recipe before calculating." exit CalcGlaze end if if fld "amounts" is empty -- find out if this is a good unity formula then lock screen send mouseup to bkgnd button "TotalFlux" -- if fld "fluxTotal" >1.01 -- then -- answer "Too much flux. RO column must total 1." with "OK" -- select line 1 of fld "fluxTotal" -- exit calcGlaze -- end if -- if fld "fluxTotal" <0.99 -- then -- answer "Not enough flux. RO column must total 1." with "OK" -- select line 1 of fld "fluxTotal" -- exit calcGlaze -- end if set numberFormat to 0.000 put empty into fld "R2O" put empty into fld "R2O3" put empty into fld "RO2" put CalcSetUp() into myGlaze put empty into fld "Amounts" -- repeat with x=1 to 14 -- put return after fld "amounts" -- end repeat show fld "R2O" show fld "R2O3" show fld "RO2" unlock screen else put line 1 to 12 of fld "R2O" & return into myGlaze put line 1 to 7 of fld "R2O3" & return after myGlaze put fld "RO2" & return after myGlaze put BlankToZero(myGlaze) into myGlaze end if if the hilite of button "combined K & Na" is true then put True into CombineKNa else put false into combineKNa --Find first ingredient name with no amount put 0 into FirstEmptyLine put MakeIngredientList() into NewIngredientList put empty into useAmount repeat with x=trunc(FirstEmptyLine)+1 to 14 set numberformat to 0 put "quantity" & x into myUseField set numberFormat to 0.000 if line 1 of fld myUseField is not empty then if (line 1 of fld myUseField)>1 then repeat until (line 1 of fld myUseField)<=1 put "USE must be less than 1" into fld "talkBack" play boing ask "Enter a decimal equal to or less than 1.0" with "1.0" if it is empty then exit calcGlaze put it & return after UseAmount put it into line 1 of fld myUseField end repeat else put line 1 of fld myUseField & return after UseAmount end if else put 1 & return after UseAmount end repeat if newIngredientList is not IngredientList -- and newIngredientList is not empty then put empty into TheOxides -- holds all oxide info for all ingredients put newIngredientList into IngredientList -- repeat with i=1 to 26 -- initialize variable -- put "0.0" & return after theOxides -- end repeat put "Now getting materials analyses" into fld talkBack set lockscreen to true -- set lockmessages to true set lockrecent to true push card go to stack "Materials" --go to materials stack index to find materials if the result is not empty then answer "Please use the latest version of Materials." exit calcGlaze end if set cursor to busy put empty into theOxides put FindOxideAmountsX (IngredientList,theOxides) into TheOxides pop card else put true into Skipit if MyResult is not empty then -- play boing put myMaterial & " was not found! Check spelling." into fld "talkBack" send mouseup to bkgnd button flasher put false into unityToBatch unlock screen set lockmessages to false set lockrecent to false exit calcGlaze else set lockscreen to false set lockmessages to false set lockrecent to false end if if skipit is true ------------- then put "Calculating amounts" into field "TalkBack" set the numberformat to 0.000 CalculateMaterialX theOxides,IngredientList,myGlaze,firstEmptyLine,combineKNa,UseAmount checkCalcErrors combineKNa end if ------------------ -- if the result is not empty -- then put "Material not needed!" if skipIt is not true then -- lock screen -- push card put "Add another ingredient & choose calculate." into fld "Talkback" --go to stack "Materials Index" put whichLine+1 into whichLine --unlock screen --put "Click the name of the ingredient you want to add to the recipe." else put false into unityToBatch if the short name of this Stack is "Glaze Calculator" then put "Add another ingredient & choose calculate." into fld "talkback" put false into skipIt put false into FromFormula put empty into myMaterial put empty into myResult put empty into firstemptyLine -- if there is a menu "Glaze Calculator" then enable menuitem 9 of menu "Glaze Calculator" end calcGlaze on checkCalcErrors combineKNa put empty into ExcessAmt if combineKNa then put "KNaO,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList else put "Na2O,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into StabList put "SiO2,TiO2,ZrO2,SnO2,MnO2" into GlassList get fld "R2O" repeat with i=1 to 11 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of FluxList & ", " after ExcessAmt end repeat get fld "R2O3" repeat with i=1 to 7 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of StabList & ", " after ExcessAmt end repeat get fld "RO2" repeat with i=1 to 6 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of GlassList & ", " after ExcessAmt end repeat if ExcessAmt is not empty then answer "WARNING:" & return & "Your calculation has added too much of these oxides: " & return & " " & ExcessAmt & return & "Check your ingredients, then choose 'Clear Amounts' and calculate again." end if end CheckCalcErrors on SaveGlazeCard if fld "amounts" is empty then answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." exit saveGlazeCard end if if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe global verNum,transfer,HGFriendly set cursor to watch put empty into transfer put field GlazeName & "," into transfer repeat with i=1 to 14 put line i of field ingredients & "," after transfer put line i of field amounts & "," after transfer end repeat put Field "Cone" after Transfer answer file "Where is the HyperGlaze stack where you want to save this glaze?"-- of type stack if the result is not empty then exit saveGlazeCard put it into myStack put true into HGFriendly go to stack myStack put false into HGFriendly put the short name of this stack into myStack go to card 1 of background "Glazes" of stack myStack if the result is not empty or the short name of this bkgnd is not "glazes" then play boing answer "This is not a HyperGlaze stack with glaze recipe cards! You can't store glazes here." exit saveGlazeCard end if send "domenu" && quote & "New Card" & quote to this card put item 1 of transfer into field "name" put last item of transfer into field "Cone" repeat with i=2 to 29 put item i of transfer into field (i+3) end repeat put the short date into field "date" tabkey end SaveGlazeCard on UndoCalc global Whichline if whichLine is empty then put "Can't Undo!" into field TalkBack play boing send mouseup to bkgnd button "flasher" exit UndoCalc end if if whichline is empty then play boing put "Nothing to undo!" into field talkBack set the hilite of bkgnd button flasher to true set the hilite of bkgnd button flasher to false wait 2 seconds put empty into field talkBack exit UndoCalc end if Answer "Undo the last ingredient calculation?" with "YES!" or \ "Cancel" if it is "Cancel" then exit UndoCalc if it is "YES!" then subtract line whichLine of field amounts from field "TotAmt" put empty into line whichLine of field amounts put field "R2OII" into field "R2O" put field "R2O3II" into field "R2O3" put field "RO2II" into field "RO2" -- if there is a menu "Glaze Calculator" then disable menuitem 9 of menu "Glaze Calculator" end if end UndoCalc on FindPercentRecipe --converts the calculated glaze from a rough batch to percentage recipe --adds together any multiple duplicate items on the list of ingredients put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr,Al,B,Fe,P,Sb,Cr,V,Si,Ti,Zr,Sn,Mn,F" into OxideItems put "K2O,Na2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO,Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5,SiO2,TiO2,ZrO2,SnO2,MnO2,F" into myOxideSymbols if the label of btn "Percent" is "%" then answer "Percentage already calculated!" & return & "Choose 'Clear Amounts' to recalculate." exit FindPercentRecipe end if if line 1 of field "amounts" is empty or line 1 of field "amounts" is 0 then answer "Please calculate the glaze first." & return & "Choose Calculate from the 'Glaze Calculator' menu" & return & "or click the 'Calculate' button." exit FindPercentRecipe end if set the label of btn "Percent" to "%" put false into NeedOxides put empty into myNeededOxides get fld "R2O" repeat with i=1 to 11 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides put (item i of myOxideSymbols) & ", " after myNeededOxides end if end repeat get fld "R2O3" repeat with i=1 to 7 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides put (item (i+12) of myOxideSymbols) & ", " after myNeededOxides end if end repeat get fld "RO2" repeat with i=1 to 6 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides put (item (i+19) of myOxideSymbols) & ", " after myNeededOxides end if end repeat if NeedOxides then if the last char of myNeededOxides is " " then delete last char of myNeededOxides if the last char of myNeededOxides is "," then delete last char of myNeededOxides answer "WARNING:" & return & "You still have these major oxide amounts that are not being supplied by your recipe:" & \ return & " " & myNeededOxides & return & " You should choose additional ingredient(s) and 'Calculate' before continuing." with "Continue" or "Stop" if it is "Stop" then exit FindPercentRecipe end if put "Choose 'Clear Amounts' before adding another material." into field "talkback" set cursor to busy set numberformat to 0.00 put empty into total put empty into newtotal put field "ingredients" into TempIngredients repeat with i=14 down to 1 put false into SkipIngred if line i of field "ingredients" is empty then next repeat repeat with x=1 to (i-1) if line i of field "ingredients" is line x of TempIngredients then add line i of field "amounts" to line x of field "amounts" delete line i of field "amounts" delete line i of field "ingredients" put true into SkipIngred exit repeat end if end repeat if SkipIngred is false then add line i of field "amounts" to total end repeat repeat with i=1 to 14 if line i of field "amounts" is not empty and line i of \ field "amounts" is not 0 then put ((line i of field "amounts")/total)*100 into line i \ of field "amounts" add line i of field "amounts" to newTotal else exit repeat end repeat put newTotal into field "totAmt" set numberFormat to 0.000 repeat with i=1 to 12 put (field (item i of OxideItems))- line i of fld "R2O" into temp if temp>0 then put temp into line i of fld "R2O" else put empty into line i of fld "R2O" end repeat -- put field "Sr"-line 12 of fld "R2O" into temp -- if temp>0 -- then put temp into line 12 of fld "R2O" -- else put empty into line 12 of fld "R2O" repeat with i=1 to 7 put (fld (item (i+12) of OxideItems))- line i of fld "R2O3" into temp if temp>0 then put temp into line i of fld "R2O3" else put empty into line i of fld "R2O3" end repeat repeat with i=1 to 6 put (fld (item (i+19) of OxideItems))- line i of fld "RO2" into temp if temp>0 then put temp into line i of fld "RO2" else put empty into line i of fld "RO2" end repeat -- if there is a menu "Glaze Calculator" then -- disable menuitem 1 of menu "Glaze Calculator" -- disable menuitem 2 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if put "StopCalc" into line 2 of fld "Totals" end FindPercentRecipe on ClearUnity put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr,Al,B,Fe,P,Sb,Cr,V,Si,Ti,Zr,Sn,Mn,F" into myOxideList repeat with i=1 to 25 set the cursor to busy put empty into fld (item i of myOxideList) end repeat put empty into cd fld "TempKNa" put empty into fld "FluxTotal" put empty into card fld "TempKNa" put empty into fld "Sr" put empty into fld "thermalExpansion" if the visible of fld "RO2" is true then hide fld "R2O" hide fld "R2O3" hide fld "RO2" put empty into fld R2O put empty into fld R2O3 put empty into fld RO2 end if end clearUnity on ClearRecipe global WhichField hide field "R2O" hide field "R2O3" hide field "RO2" repeat with i=2 to 4 put empty into field i end repeat put empty into field R2O put empty into field R2O3 put empty into field RO2 clearUSE put empty into field "Cone" put "Click 'Calculate' to begin glaze calculations." into field \ talkBack put 0 into field "TotAmt" put empty into whichField put empty into line 2 of fld "Totals" put empty into fld "GlazeName" clearIngredients end clearRecipe on clearIngredients put empty into fld "Ingredients" put empty into fld "colorList" put empty into fld "colorAmts" end clearIngredients on ClearAmounts global WhichField put empty into field 4 put empty into field R2O put empty into field R2O3 put empty into field RO2 hide field "R2O" hide field "R2O3" hide field "RO2" put "Click 'Calculate' to begin glaze calculations." into field \ talkBack put 0.00 into field "TotAmt" put empty into whichField -- if there is a menu "Glaze Calculator" then -- enable menuitem 1 of menu "Glaze Calculator" -- enable menuitem 2 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if put empty into line 2 of fld "Totals" end ClearAmounts on clearUSE repeat with i=1 to 14 put "Quantity" & i into myField put empty into fld myField end repeat end clearUSE --on MakeTextFile -- if fld "amounts" is empty then -- answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." -- exit MakeTextFile -- end if -- put char 1 to 27 of fld "GlazeName" into fileName -- ask file "Save this recipe as a TEXT file:" with FileName & ".txt" -- if the result is not empty then exit makeTextFile -- put it into FileName -- if fld "GlazeName" is empty then put filename into fld "GlazeName" -- open file fileName -- --do the procedure to create a text file for a word processor -- set cursor to watch -- write "Glaze name: " & field "GlazeName" & return to file fileName -- write "Cone: " & fld "Cone" & return to file filename -- write "Recipe: " & tab & "Amount" & return to file fileName -- if round(field "totAmt")>100.1 or round(field "totAmt")<99.9 -- then FindPercentRecipe -- repeat with i=1 to 14 -- if line i of field ingredients is empty then exit repeat -- write line i of field "ingredients" & tab &\ -- line i of field "amounts" & return to file fileName -- end repeat -- write "Total: " & tab & field "totAmt" & return to file fileName -- write return & "Comments: " & return to file fileName -- write "Molecular Formula: " & return to file fileName -- put empty into myAnalysis -- put empty into myRO -- put empty into myRO2 -- put empty into myR2O3 -- if the hilite of button "Combined K & Na" is true -- then put "KNa0, ,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems -- else put "K20,Na2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems -- put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into R2O3Items -- put "SiO2,TiO2,ZrO2,SnO2,MnO2,F,Si:Al Ratio" into RO2Items -- repeat with i=1 to 12 -- if line i of fld "R2O" is not empty -- then put tab & line i of fld "R2O" && item i of ROitems \ -- & return after myRO -- if line i of fld "RO2" is not empty -- then put tab & line i of fld "RO2" && item i of RO2Items \ -- & return after myRO2 -- if line i of fld "R2O3" is not empty -- then put tab & line i of fld "R2O3" && item i of R2O3Items \ -- & return after myR2O3 -- end repeat -- repeat with i=1 to 12 -- if line i of MyRO is not empty or line i of MyRO2 is not empty\ -- or line i of MyR2O3 is not empty -- then -- put line i of myRO & tab & line i of MyR2O3 & tab &\ -- line i of MyRO2 & return after myAnalysis -- else next repeat -- end repeat -- write myAnalysis to file filename -- close file fileName --end MakeTextFile --on makeHyperGlazeFile -- if fld "amounts" is empty then -- answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." -- exit makeHyperGlazeFile -- end if -- if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe -- if fld "GlazeName" is empty then -- put "New Glaze.HGII" into fileName -- else put char 1 to 27 of fld "GlazeName" & ".HGII" into fileName -- put createHGFile (FileName,"GLAZ") into fileName -- if fileName is empty then exit makeHyperGlazeFile -- put empty into myRecipe -- open file FileName -- put fld "GlazeName" & tab & fld "Cone" & tab & tab & tab into myRecipe -- repeat with i=1 to the number of lines of fld "amounts" -- put line i of fld "Ingredients" & tab & line i of fld "amounts" & tab after myRecipe -- end repeat -- put numToChar(30) after myRecipe -- write myRecipe to file fileName -- close file FileName --end makeHyperGlazeFile --on PrintIt --if the short name of bkgnd button id 112 is "hide lines" --then send mouseup to bkgnd button id 112 --hide field TalkBack --show field printComments --doMenu "Print Card" --hide field printComments --show field TalkBack --send mouseup to bkgnd button id 112 --end printIt function FindOxideAmountsX ingredientList, theOxides -- 1990-1993 Richard Burkett -- this is an experimental version 12/23/93 for the Glaze Calculator global SkipIt, FromFormula,myResult,myMaterial put empty into theOxides repeat with i=1 to 14 if line i of IngredientList is empty then exit repeat put line i of IngredientList into myMaterial put true into skipIt put true into FromFormula find empty put empty into firstCard find whole myMaterial in field "Material" if the result is not empty then put "not found" into MyResult exit repeat else if myMaterial contains field "Material" then put empty into myResult else put the ID of this card into firstcard go next repeat until myMaterial contains field "Material" find whole myMaterial in field "Material" if the ID of this card is firstCard then put "not found" into myResult exit repeat end if end repeat end if if MyResult is not empty then exit repeat get line 1 of fld "CompiledAnalysis" put it & return after theOxides end repeat repeat with y=1 to the number of lines of theOxides repeat with x=1 to the number of items of line y of theOxides get item x of line i of theOxides if it is empty or it is "NAN(255)" then put "0.00" into item x of line i of theOxides end repeat end repeat global TempOxides put theOxides into TempOxides return theOxides end FindOxideAmountsX on CalculateMaterialX theOxides,IngredientList,myGlaze,firstEmptyLine,combineKNa,useAmount global myMaterial -- 1990-1993 Richard Burkett -- this is an experimental version for the Glaze Calculator 12/23/93 put theOxides into myOxides repeat with i=1 to the number of lines of IngredientList set numberformat to 0 put (i+firstEmptyLine) into CurrentLine set numberformat to 0.000 if line i of IngredientList is empty then exit repeat put line i of IngredientList into myMaterial -- put "Now calculating" & return & myMaterial into fld "talkBack" -- findOxideAmounts put ",,,,,,,,,,,,,,,,,,,,,,,," into bigAmt put 0 into KNaTemp put 0 into temp put 0 into tempAmt put 0 into amount put 0 into howMuch put 0 into oxideAmount if CombineKNa then put (item 1 of line i of myOxides)+( item 2 of line i of myOxides) into KNaTemp if KNaTemp>0 then put (line 1 of myGlaze)/KNaTemp into item 1 of BigAmt else put "9999" into item 1 of BigAmt end if if (item 1 of bigAmt)<=0 then put "9999" into item 1 of bigAmt put "9999" into item 2 of bigAmt else if (item 1 of line i of myOxides)>0 then put (line 1 of myGlaze)/(item 1 of line i of myOxides) into item 1 of BigAmt else put "9999" into item 1 of BigAmt if (item 1 of bigAmt)<=0 then put "9999" into item 1 of bigAmt if (item 2 of line i of myOxides)>0 then put (line 2 of myGlaze)/(item 2 of line i of myOxides) into item 2 of BigAmt else put "9999" into item 2 of BigAmt if (item 2 of bigAmt)<=0 then put "9999" & "," into item 2 of bigAmt end if repeat with x=3 to 25 put item x of line i of myOxides into temp if temp>0 then put (line x of myGlaze) into myGlazeAmount put (myGlazeAmount)/temp into item x of bigAmt else put "9999" into item x of bigAmt if (item x of bigAmt)<=0 then put "9999" into item x of bigAmt end repeat -- end findOxideAmounts put (min(BigAmt)) into amount if amount is "9999" --do ingredient not needed routine then -- play boing put myMaterial & " not needed!" into fld "talkBack" send mouseup to bkgnd button "flasher" select line CurrentLine of fld "ingredients" put (i-1) into whichLine put false into unityToBatch exit CalculateMaterialX end if --save flds for undo later put fld "R2O" into fld "R2OII" --save fields for undo put fld "R2O3" into fld "R2O3II" put fld "RO2" into fld "RO2II" --check for how much ingredient to add towards satisfying --the unity formula put (line i of UseAmount) into howmuch put (amount*howMuch) into OxideAmt put (((item 26 of line i of myOxides))*OxideAmt) into tempAmt put tempAmt into line CurrentLine of fld "amounts" add tempAmt to fld "TotAmt" -- CalcGlaze put 0 into myOxideItem if combineKNa is true then put (line 1 of myGlaze) -(((item 1 of line i of myOxides)+(item 2 of line i of myOxides))*oxideAmt) into temp if temp<>0 then put temp into line 1 of myGlaze else put 0 into line 1 of myGlaze else put (line 1 of myGlaze) -((item 1 of line i of myOxides)*oxideAmt) into temp if temp<>0 then put temp into line 1 of myGlaze else put 0 into line 1 of myGlaze put (line 2 of myGlaze) -((item 2 of line i of myOxides)*oxideAmt) into temp if temp<>0 then put temp into line 2 of myGlaze else put 0 into line 2 of myGlaze end if repeat with x=3 to 25 put (item x of line i of myOxides) into MyOxideItem put (line x of myGlaze) -(MyOxideItem*oxideAmt) into temp if temp<>0 then put temp into line x of myGlaze else put 0 into line x of myGlaze end repeat put empty into theGlaze repeat with x=1 to 25 if (line x of myGlaze) <>0 then put line x of myGlaze & return after theGlaze else put return after theGlaze end repeat put line 1 to 12 of theGlaze into fld "R2O" put line 13 to 19 of theGlaze into fld "R2O3" put line 20 to 25 of theGlaze into fld "RO2" --end calcGlaze end repeat end calculateMaterialX function calcSetUp -- 1990-2004 Richard Burkett --new version for Glaze Calculator 1/20/91 -- recompiled 9/1995, modified in August 2004 global gSimplifyUMFCalc, gCalcTolerance put empty into myR2O put empty into myR2O3 put empty into myRO2 put 0 into myField put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr,Al,B,Fe,P,Sb,Cr,V,Si,Ti,Zr,Sn,Mn,F" into OxideItems if gSimplifyUMFCalc is true then repeat with i=1 to 12 get fld (item i of OxideItems) if it is empty or it<=gCalcTolerance then put return after myR2O else put fld (item i of OxideItems) & return after myR2O end repeat repeat with i=13 to 19 get fld (item i of OxideItems) if it is empty or it<=gCalcTolerance then put return after myR2O3 else put fld (item i of OxideItems) & return after myR2O3 end repeat repeat with i=20 to 25 get fld (item i of OxideItems) if it is empty or it<=gCalcTolerance then put return after myRO2 else put fld (item i of OxideItems) & return after myRO2 end repeat else repeat with i=1 to 12 if fld (item i of OxideItems) is empty then put return after myR2O else put fld (item i of OxideItems) & return after myR2O end repeat repeat with i=13 to 19 if fld (item i of OxideItems) is empty then put return after myR2O3 else put fld (item i of OxideItems) & return after myR2O3 end repeat repeat with i=20 to 25 if fld (item i of OxideItems) is empty then put return after myRO2 else put fld (item i of OxideItems) & return after myRO2 end repeat end if put myR2O into fld "R2O" put myR2O3 into fld "R2O3" put myRO2 into fld "RO2" put myR2O into myGlaze put myR2O3 after myGlaze put myRO2 after myGlaze put BlankToZero(myGlaze) into MyGlaze return myGlaze end calcSetUp function makeIngredientList -- 1990 Richard Burkett -- this is the current version 4/21/90 -- recompiled 9/1995 -- glaze calculator version global whichLine, fromFormula, unityToBatch,firstEmptyLine put empty into IngredientList repeat with i=1 to 14 --assemble list of ingredients if line i of fld "ingredients" is empty -- if no ingredient available, go to Materials Index then put i-1 into WhichLine put false into fromFormula put true into UnityToBatch exit repeat else if line i of fld "amounts" is empty then put line i of fld "ingredients" & return after IngredientList else add 1 to FirstEmptyLine if i=14 then unlock screen put "No more room for ingredients!" into fld talkBack play boing send mouseup to bkgnd button flasher put false into unityToBatch exit makeIngredientList end if next repeat end if end if end repeat repeat with i= 1 to the number of lines of ingredientList repeat until last char of line i of ingredientList is not " " delete last char of line i of ingredientList end repeat repeat until first char of line i of ingredientList is not " " delete first char of line i of ingredientList end repeat end repeat repeat put offset(" ",ingredientList) into doubleSpaces if doubleSpaces > 0 then delete char doubleSpaces of ingredientList else exit repeat end repeat return ingredientList end makeIngredientList function BlankToZero myList -- 1990 Richard Burkett repeat with x=1 to the number of lines of myList if line x of myList is empty then put "0.0" into line x of myList end repeat return myList end BlankToZero on idle if the foundfield contains "bkgnd field 44" and the hilite of btn "Materials in inventory" is true then send mouseup to btn "materials in inventory" pass idle end idle -- on doMenu choice -- if choice="Calculate" -- then CalcGlaze -- else if choice="Glaze Calculator" -- then answer "You are already on the Glaze Calculator card." -- else if choice="Help" -- then show card field "CalcHelp" -- else if choice="Thermal Expansion" -- then doThermalExpansion -- else if choice="Materials in Inventory" -- then send mouseup to btn "Materials in Inventory" -- else if choice="Combine K & Na" -- then -- if the visible of field "RO2" is true -- then -- answer "Please clear all calculations before changing Combined KNa." & return\ -- & " Use the 'Clear Amounts' menu choice." -- else -- get the hilite of button "Combined K & Na" -- if it is true then -- set the checkMark of last menuitem of menu "Glaze Calculator" to false -- send mouseup to button "Combined K & Na" -- else -- set the checkMark of last menuitem of menu "Glaze Calculator" to true -- send mouseup to button "Combined K & Na" -- end if -- end if -- else if choice="Set Limits" -- then SetLimits -- else if choice="Set Color" -- then answer "Sorry, this color feature is not yet implemented." -- else if choice="Batch to Percent" -- then -- answer "Are you done adding materials?" & return & "(Choose 'Clear Amounts' to add more materials or restart calculations.)" with \ -- "Yes" or "Cancel" -- if it is "cancel" then exit doMenu -- FindPercentRecipe -- else if choice="Percent Analysis" -- then PercentageAnalysis -- else if choice="Clear Amounts" -- then clearAmounts -- else if choice="Clear All" -- then -- answer "Clear the entire recipe and unity formula?" with "OK" or "Cancel" -- if it is "Cancel" then exit doMenu -- clearAmounts -- clearRecipe -- clearUnity -- else if choice="Clear Unity" -- then clearUnity -- else if choice="Clear Ingredients" -- then clearRecipe -- else if choice="Undo last Calc" -- then UndoCalc -- else if choice="Save as Glaze Card" -- then SaveGlazeCard -- else if choice="Save as Text" -- then makeTextFile -- else if choice="Save as Glaze File" -- then MakeHyperGlazeFile -- else if choice is "New Card" --trap new card -- then -- if the short name of this stack is "Glaze Calculator" -- then -- play boing -- answer "You can't make new cards in this stack! Use the 'Save as Glaze Card' menu choice to make a glaze card." -- else pass doMenu -- else pass doMenu -- end doMenu -- on opencard -- if the visible of fld "ingredInfo" is true -- then hide fld "IngredInfo" -- if the hilite of btn "Materials in Inventory" is true -- then send mouseup to btn "Materials in Inventory" -- if there is a menu "Glaze Calculator" then delete menu "glaze calculator" -- if there is a menu "Glaze Limits" then delete menu "glaze Limits" -- if there is a menu "Limits" then delete menu "Limits" -- put "Calculate,Batch to Percent,Percent Analysis,Thermal Expansion,Materials in Inventory,-,Clear All,"\ -- & "-,Undo Last Calc,Clear Amounts,Clear Unity,Clear Ingredients,-,Save as Glaze Card,"\ -- & "Save as Text,Save as Glaze File,-,Set Limits,-,Combine K & Na" into myMenu -- create menu "Glaze Calculator" -- put myMenu into menu "Glaze Calculator" -- set the commandChar of menuitem 1 of menu "Glaze Calculator" to "A" -- if line 2 of fld "Totals" contains "StopCalc" -- then -- disable menuitem 1 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if -- get the visible of fld "Na" -- if it is true -- then -- set the checkMark of last menuItem of menu "Glaze Calculator" to false -- else -- set the checkMark of last menuItem of menu "Glaze Calculator" to true -- end if -- pass opencard -- end opencard -- on closecard -- if there is a menu "Glaze Calculator" then delete menu "glaze calculator" -- pass closecard -- end closecard on getGlazeColor set cursor to watch put field "GlazeName" into GlazeName put field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if field "K">.1 then put "KNa " after GlazeType end if else if field "K"+field "Na">.1 then put "KNa " after GlazeType end if if field "Pb">0 then put "Pb " after GlazeType if field "Ca">.5 then put "Ca " after GlazeType if field "B">.1 then put "B " after GlazeType if field "Mg">.15 then put "Mg " after GlazeType if field "Ba">.15 then put "Ba " after GlazeType if field "Li">.05 then put "Li " after GlazeType if field "Zn">.1 then put "Zn " after GlazeType else if field "Zn">.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end getGlazeColor on doThermalExpansion put empty into mySurface send mouseup to bg btn "Si/Al" if fld "Si/Al" < 5 then put "Matte" into mySurface end if if fld "F" >.005or fld "Li" >0.005 or fld "Sr" >0.005 or mySurface is "Matte" then show btn "TEWarning" else hide btn "TEWarning" end if -- if calcProblems is not empty then -- answer "This formula contains " & calcProblems & "." & return & " Thermal expansion calculations are not accurate."\ -- && "The thermal expansion should be lower with increasing amounts, but large amounts may have an unpredictable effect."\ -- with "Don't Calc" or "Calculate" -- if it is "Don't Calc" then -- put empty into fld "ThermalExpansion" -- exit doThermalExpansion -- end if -- end if set cursor to busy -- repeat with i=9 to 19 -- put field i & return after Fluxes -- end repeat put fld "K" & return after Fluxes put fld "Na" & return after Fluxes put fld "Ca" & return after Fluxes put fld "Mg" & return after Fluxes put fld "Li" & return after Fluxes put fld "Ba" & return after Fluxes put fld "PB" & return after Fluxes put fld "Zn" & return after Fluxes put fld "Cu" & return after Fluxes put fld "Co" & return after Fluxes put fld "Ni" & return after Fluxes put fld "Sr" & return after Fluxes put fld "Al" & return after Stabilizers put fld "B" & return after Stabilizers put fld "Fe" & return after Stabilizers put fld "P" & return after Stabilizers put fld "Sb" & return after Stabilizers put fld "Cr" & return after Stabilizers put fld "V" & return after Stabilizers put fld "Si" & return after GlassFormers put fld "Ti" & return after GlassFormers put fld "Zr" & return after GlassFormers put fld "Sn" & return after GlassFormers put fld "Mn" & return after GlassFormers put fld "F" & return after GlassFormers -- put field "Sr" & return after Fluxes -- repeat with i=20 to 26 -- put field i & return after Stabilizers -- end repeat -- repeat with i=27 to 32 -- put field i & return after GlassFormers -- end repeat set numberformat to 0.00 put theThermExpansion2(Fluxes,Stabilizers,GlassFormers) into fld "ThermalExpansion" --XFCN end doThermalExpansion on percentageAnalysis set cursor to watch put empty into tot put field "K"*94.192 into Kx add Kx to tot put field "Na"*61.98 into Nax add Nax to tot put field "Ca"*56.08 into Cax add Cax to tot put field "Ba"*153.36 into Bax add Bax to tot put field "Mg"*40.32 into Mgx add Mgx to tot put field "B"*69.44 into Bx add Bx to tot put field "Li"*29.88 into Lix add Lix to tot put field "Zn"*81.38 into Znx add Znx to tot put field "Pb"*223.21 into Pbx add Pbx to tot put field "Co"*74.94 into Cox add Cox to tot put field "Cu"*79.54 into Cux add Cux to tot put field "Ni"*74.69 into Nix add Nix to tot put field "Sr"*103.62 into Srx add Srx to Tot put field "Fe"*159.68 into Fex add Fex to Tot --put field "FeO"*71.85 into FeOx --add FeOx to Tot put field "Si"*60.06 into Siz --can't be Six because "Six is a number! add Siz to Tot put field "Al"*101.94 into Alx add Alx to Tot put field "P"*141.6 into Px add Px to Tot put field "Ti"*79.9 into Tix add Tix to Tot --put field "LOI"*18.016 into LOIx --add LOIx to Tot --LOI is assumed to be water in most clay minerals put field F*18.998 into Fx add Fx to Tot --put field S*80.06 into Sx --add Sx to Tot put field "Sn"*150.69 into Snx add Snx to Tot put field "Zr"*123.22 into Zrx add Zrx to Tot put field "Sb"*291.52 into Sbx add Sbx to Tot put field "Cr"*152.02 into Crx add Crx to Tot put field "Mn"*86.93 into Mnx add Mnx to Tot put field "V"*181.9 into Vx add Vx to Tot put tot/100 into Tot set numberformat to 0.00 if Siz >0 then put Siz/Tot & " % SiO2 " & return after myPercentages if Alx >0 then put Alx/Tot & " % Al2O3" & return after myPercentages if the visible of field "Na" is false then if Kx >0 then put Kx/Tot & " % KNaO " & return after myPercentages end if else if Kx >0 then put Kx/Tot & " % K2O " & return after myPercentages if Nax >0 then put Nax/Tot & " % Na2O " & return after myPercentages end if if Mgx >0 then put Mgx/Tot & " % MgO " & return after myPercentages if Cax >0 then put Cax/Tot & " % CaO " & return after myPercentages if Srx >0 then put Srx/Tot & " % SrO " & return after myPercentages if Lix >0 then put Lix/Tot & " % Li2O " & return after myPercentages if Bax >0 then put Bax/Tot & " % BaO " & return after myPercentages if Pbx >0 then put Pbx/Tot & " % PbO " & return after myPercentages if Znx>0 then put Znx/Tot & " % ZnO " & return after myPercentages if Bx >0 then put Bx/Tot & " % B2O3 " & return after myPercentages if Px>0 then put Px/Tot & " % P2O5 " & return after myPercentages if Fex >0 then put Fex/Tot & " % Fe2O3" & return after myPercentages --if FeOx >0 --then put FeOx/Tot & " % FeO" & return after myPercentages if Mnx >0 then put Mnx/Tot & " % MnO " & return after myPercentages if Tix >0 then put Tix/Tot & " % TiO2 " & return after myPercentages if Snx >0 then put Snx/Tot & " % SnO2 " & return after myPercentages if Zrx >0 then put Zrx/Tot & " % ZrO2 " & return after myPercentages if Vx >0 then put Vx/Tot & " % V2O5 " & return after myPercentages if Cox >0 then put Cox/Tot & " % CoO " & return after myPercentages if Cux >0 then put Cux/Tot & " % CuO " & return after myPercentages if Crx >0 then put Crx/Tot & " % Cr2O3 " & return after myPercentages if Sbx >0 then put Sbx/Tot & " % Sb2O3 " & return after myPercentages if Nix >0 then put Nix/Tot & " % NiO " & return after myPercentages --if Sx >0 --then put Sx/Tot & " % SO3 " & return after myPercentages if Fx >0 then put Fx/Tot & " % F " & return after myPercentages --if LOIx >0 --then put LOIx/Tot & " % L.O.I " & return after myPercentages put myPercentages into field "percentAnalysis" end percentageAnalysis on setLimits if the short name of this card is not "Calculator" then exit setLimits global myFlux if the hilite of btn "combined K & Na" is true then put true into KNaButton else put false into KNaButton set cursor to watch put fld "GlazeName" into cd fld "Name" of cd "limits" of stack "Glaze Limits" put fld "cone" into cd fld "cone" of cd "limits" of stack "Glaze Limits" put fld "Al" into cd fld "Al" of cd "Limits" of stack "Glaze Limits" put fld "Si" into cd fld "Si" of cd "Limits" of stack "Glaze Limits" put fld "B" into cd fld "B" of cd "Limits" of stack "Glaze Limits" put fld "P" into cd fld "P" of cd "Limits" of stack "Glaze Limits" put fld "K" into cd fld "K" of cd "Limits" of stack "Glaze Limits" put fld "Na" into cd fld "Na" of cd "Limits" of stack "Glaze Limits" put fld "Ca" into cd fld "Ca" of cd "Limits" of stack "Glaze Limits" put fld "Ba" into cd fld "Ba" of cd "Limits" of stack "Glaze Limits" put fld "Mg" into cd fld "Mg" of cd "Limits" of stack "Glaze Limits" put fld "Li" into cd fld "Li" of cd "Limits" of stack "Glaze Limits" put fld "Zn" into cd fld "Zn" of cd "Limits" of stack "Glaze Limits" put fld "Pb" into cd fld "Pb" of cd "Limits" of stack "Glaze Limits" put fld "Sr" into cd fld "Sr" of cd "limits" of stack "Glaze Limits" put cd fld "tempKNa" into cd fld "tempKNa" of cd "Limits" of stack "Glaze Limits" if fld "Al" >0 then set numberformat to 0.0 put fld "Si"/field "Al" into cd fld "Al/Si Ratio" of cd "limits" of stack "Glaze Limits" else put empty into cd fld "Al/Si Ratio" of cd "limits" of stack "Glaze Limits" end if set lockmessages to false go to card "limits" of stack "Glaze Limits" put empty into MyFlux if KNaButton is true then set the hilite of btn "combined K & Na" of card "limits" of stack "Glaze Limits" to true hide cd fld "Na" of cd "limits" of stack "Glaze Limits" hide btn "Na" of cd "limits" of stack "Glaze Limits" hide bkgnd btn "Na" of cd "limits" of stack "Glaze Limits" else set the hilite of btn "combined K & Na" of cd "limits" of stack "Glaze Limits" to false show cd fld "Na" of cd "limits" of stack "Glaze Limits" show btn "Na" of cd "limits" of stack "Glaze Limits" show bkgnd btn "Na" of cd "limits" of stack "Glaze Limits" end if if cd fld "P" is empty then put "0.0" into cd fld "P" send "adjustAmounts" to cd "Limits" of stack "Glaze Limits" get rect of btn "Si" put round(200 - 5*(cd fld "Si")) into item 2 of it -- SiHeight set the rect of btn "Si" to it get rect of btn "Al" put round(200 - 50*(cd fld "Al")) into item 2 of it -- AlHeight set the rect of btn "Al" to it get rect of btn "B" put round(200 - 50*(cd fld "B")) into item 2 of it -- BHeight set the rect of btn "B" to it get rect of btn "P" put round(200 - 100*(cd fld "P")) into item 2 of it -- PHeight set the rect of btn "P" to it set lockmessages to false send "setGlazeLimits" to cd "Limits" of stack "Glaze Limits" end setLimits on checkFritTE -- builds a table of thermal expansions for imported materials global myMaterialsAnalysis put empty into MyThermalExpansions answer file "Materials file of frits to open?" of type "GLAZ" if the result is not empty then exit checkFritTE put it into myFile open file myFile read from file myFile until tab if "version 2" is not in it then close file myFile exit CheckFritTE end if -- lock screen set lockmessages to true repeat set cursor to busy put empty into fluxes put empty into stabilizers put empty into glassformers read from file myFile until "" if it is empty then exit repeat put it into myMaterialsAnalysis put getMyAmount() into FritName put FritName & tab after MyThermalExpansions put FritName into field "GlazeName" put getMyAmount() into fld "K" put getMyAmount() into fld "Na" put getMyAmount() into fld "Ca" put getMyAmount() into fld "Mg" put getMyAmount() into fld "Al" put getMyAmount() into fld "B" put fld "B" & " B2O3" & tab after MyThermalExpansions put getMyAmount() into fld "Si" put getMyAmount() into fld "Zn" put getMyAmount() into fld "Ba" put getMyAmount() into fld "Li" put getMyAmount() into fld "Pb" put getMyAmount() into fld "Fe" put getMyAmount() into fld "P" put getMyAmount() into fld "Ti" put getMyAmount() into fld "Co" put getMyAmount() into fld "Cu" put getMyAmount() into fld "Sr" put getMyAmount() into fld "Mn" put getMyAmount() into fld "Sb" put getMyAmount() into fld "V" put getMyAmount() into fld "Zr" put getMyAmount() into fld "F" put getMyAmount() into temp put getMyAmount() into fld "Ni" put getMyAmount() into temp put getMyAmount() into fld "Cr" put getMyAmount() into temp put getMyAmount() into fld "Sn" repeat 7 put getMyAmount() into temp end repeat put line 1 of getMyAmount() & tab after myThermalExpansions set the numberFormat to 0.0 repeat with i=9 to 19 put field i & return after Fluxes end repeat put field "Sr" & return after Fluxes repeat with i=20 to 26 put field i & return after Stabilizers end repeat repeat with i=27 to 32 put field i & return after GlassFormers end repeat set numberformat to 0.00 put theThermExpansion(Fluxes,Stabilizers,GlassFormers) \ & tab & theThermExpansion2(Fluxes,Stabilizers,GlassFormers) & return after myThermalExpansions end repeat close file MyFile ask file "Save this file as:" with "Thermal Ex. Data" if the result is not empty then exit checkFritTE put it into myFile open file myFile write "All expansion coefficients x 10-7 C" & return &\ "Frit name Actual 1 2" & return &\ myThermalExpansions to file myFile close file myFile put empty into myMaterialsAnalysis end checkFritTE function getMyAmount global myMaterialsAnalysis put offset(tab, myMaterialsAnalysis) into myChar if myChar=0 then exit getMyAmount put char 1 to myChar of myMaterialsAnalysis into myChunk delete char 1 to myChar of myMaterialsAnalysis if last char of myChunk is tab then delete last char of myChunk if myChunk is empty then put 0.00 into myChunk return myChunk end getMyAmount function theThermExpansion2 Fluxes,Stabilizers,GlassFormers -- 1990-1992 Richard Burkett -- This one works! 6/24/92 Script for Glaze Cards and the Glaze Calculator. put 0.000 into TotSum put 0.000 into TExp put "0,0,0,0,0,0,0,0,0,0,0,0,0,0,0" into myFlux put "0,0,0,0,0,0,0,0,0" into myStabilizer put "0,0,0,0,0,0,0,0,0" into myGlass put 0.000 into myMolWt put 0.000 into temp put 0.000 into myTemp put empty into CoeffTE put empty into mystring put Fluxes into myFlux put Stabilizers into myStabilizer put GlassFormers into myGlass repeat with i=1 to 12 if line i of myFlux is empty then put "0.00" into line i of myFlux end repeat repeat with i=1 to 7 if line i of myStabilizer is empty then put "0.00" into line i of myStabilizer end repeat repeat with i=1 to 6 if line i of myGlass is empty then put "0.00" into line i of myGlass end repeat put "94.192,61.98,56.08,40.32,39.88,153.36, 223.21,81.38,79.54,74.94,74.69,103.62"\ into FluxWts repeat with i=1 to 12 put line i of myFlux into myString put myString^1 into myTemp put (item i of FluxWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of MyFlux end repeat put "101.94,69.64,159.694,141.6, 291.52,152.02,181.9" into StabWts repeat with i=1 to 7 put line i of myStabilizer into myString put myString^1 into myTemp put (item i of StabWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myStabilizer end repeat put "60.06,79.9,123.22,150.69,86.93,18.998" into GlassWts repeat with i=1 to 6 put line i of myGlass into myString put myString^1 into myTemp put (item i of GlassWts)^1 into MyMolWt put myTemp*myMolWt into temp add temp to TotSum put temp into line i of myGlass end repeat put the fluxTEpref of stack "Glaze Calculator" into myFluxCoeffs if myFluxCoeffs is "default" or myFluxCoeffs is empty then put "3.3,3.9,1.5, 0.3,2.0,1.3, 0.8,1.0,2.2, 4.4,4.0,1.372" into FluxCoeffs else put myFluxCoeffs into fluxCoeffs repeat with i=1 to 12 put line i of MyFlux into myString put (myString)^1 into myTemp put (item i of FluxCoeffs)^1 into CoeffTE add (myTemp/TotSum)*CoeffTE to TExp end repeat put the StabilizerTEPref of stack "Glaze Calculator" into myStabilizerCoeffs if myStabilizerCoeffs is "default" or myStabilizerCoeffs is empty then put "0.61,0.29, 4.0,2.0, 3.6, 5.1" into StabCoeffs else put myStabilizerCoeffs into StabCoeffs repeat with i=1 to 6 if i=2 then put line i of MyStabilizer into myString put myString^1 into myTemp put myTemp/TotSum into pctBoron put (item i of StabCoeffs)^1 into CoeffTE if pctBoron<=0.12 then add PctBoron*(-1.98) to TExp else add PctBoron*0.29 to TExp else put line i of MyStabilizer into myString put myString^1 into myTemp put (item i of StabCoeffs)^1 into CoeffTE add myTemp/TotSum*CoeffTE to TExp end if end repeat put the GlassTEPref of stack "Glaze Calculator" into myGlassCoeffs if myGlassCoeffs is "default" or myGlassCoeffs is empty then put "0.37,1.5,0.7,2.0,2.2" into GlassCoeffs else put myGlassCoeffs into GlassCoeffs repeat with i=1 to 5 put line i of MyGlass into myString put myString^1 into myTemp put (item i of GlassCoeffs)^1 into CoeffTE add myTemp/TotSum*CoeffTE to TExp end repeat put TExp*10 into TExp return TExp end theThermExpansion2 Glaze Calculatorm / U helvetica U helvetica W helvetica U helveticaW helvetica W helveticaW helveticaW helvetica W helvetica W helvetica @W helvetica PW helvetica W helvetica @U helvetica U helvetica AW helvetica ULucida GrandeU helvetica UArialUArial UArialUArial W helvetica @W helvetica PW helvetica W helvetica @U helvetica U helvetica AW helveticaUArial WCourier WArial WArialUArial WArialU helveticaWArial UArial WArial WArial W helvetica WArial W helvetica WArial U helvetica UArial UArialGlazeCalcMenubarcREVTempMaster+windowManagerPlacefalsemenubarGlazeCalcMenubarlinkHiliteColorrect168,89,686,614 maxWidth518 cantAbortfalse patterns colors decorationsdefaultlinkVisitedColoriconicfalseshadowtrue cantDeletefalseid6751altId0 hcAddressingtruestartUpIconicfalse windowShape0titleGlaze Calculator linkColor textStyleplain cantModifyfalseunderlineLinks maxHeight525styletopleveldestroyWindowfalse password liveresizingfalsescroll0passkey resizabletruenameGlaze Calculatoricon201186formatForPrintingfalse alwaysBufferfalsevisibletruemetalfalse minWidth518 textSize12 destroyStackfalse textFontArial minHeight365 dynamicPathstruecREVGeometryCachestackID6789 cREVGeneral$ Calculator Pon opencard global gSimplifyUMFCalc if gSimplifyUMFCalc is true then set the hilite of btn "simplify UMF" to gSimplifyUMFCalc else set the hilite of btn "Simplify UMF" to false end opencard &cREVTempMastermarkfalse dontSearchtruethreeDtruerect 0,0,518,548name Calculator patterns defaultButtoncolors layer1 borderWidth2 cantDeletefalseid3620altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs108795661040166951088538825273670210893879616066717108938796160767181092782074885677310927821498846782108941591027067481093812469123678510886600113536709108768454567166891088659266463670510894158993136745108865935510667061089415875211673910894158824946741109278011776767541089415903035674610927813285406765109278041495067621089415917685675010927820777966774110983545882567881087841339037658710878413390386588108784133903965901092776761748675210878413390416592108866028675867121087841339042659310878413390436594108941587798067401087841339044659510878413390456596108784133904665971088660062755671010927820852126776109278148247267691087841339047659810878413390496600108784133905066011087841339051660210878413390526603108784133905366041087931063501669210878413390546605108784133905566061087841339056660710878413390576608110983534621667891087841339058660910927821385226780108784133905966101087841339060661110878413390616612108784133906266131087841339063661410938123913956784108784133906466151087937368550669310878413390656616108784133906666171087841339067661810880311371446696108865991641067071087841339068661910880311371456697108784133907066211087841339069662010880311371466698108784133907166221088031137147669910878413390726623108803113714867001087841339073662410880311371496701108865908448267031087841339074662510878413390756626108784133907666271087841339077662810878413390786629108784133908066311087841339079663010878413390816632108784133908266331087841339083663410894158962646744108784133908466351087841339085663610878413390866637108941589207467431087841339087663810894159062686747108784133908866391092780138204675910878413391006651108784133909066411087841339089664010879301838586691108784133910166521087841339091664210878413391026654108784133909266431087841339103665510878413390936644109278014832467611087841339104665610878413390946645108784133910566571087841339095664610878413390966647108784133910666581092780133594675810878413390976648108784133910766591092781809044677110878413390986649108784133910866601089415871126673810927821301756778108784133909966501087841339109666110878413391106662108793997487666941089389662218672310878413391116663108784133911366661087841339114666710878413391156668108784133911666691087841339117667010878413391186671109278012098067551087841339119667210878413391206664109278012350267561092781442393676610927820814156775109278012665167571092782134084677910886600860256711109278122302867631092780144820676010928816464436783108865913232067041087937207435322710879372074376417108793720743864181087937207440642210879372074416423108938907701167221088659940894670810894159143836749108793720744464261087937207445642710879372074476430108793720744964321092782116957677710886612579536713109278130495267641092781622157677010894158862786742109278011348067531092782144925678110900101315226751109278195536067721092781448172676710886613654876714cREVGeometrycacheorder total168 cREVGeneral1_4375  #%&'(.2689:BCk`abcdefghijlmnoqrstuvwxyz{|}~Combined K & Na\on mouseUp set cursor to watch set the numberformat to 0.000 if the hilite of me is true then lock screen set the hilite of me to false put item 1 of card field "TempKNa"+item 2 of card field "TempKNa"\ into KNaChange get field "K" if it is not KNaChange and KNaChange <>0 then put (item 1 of card field "TempKNa")*it/KNaChange into\ item 1 of card field "TempKNa" put (item 2 of card field "TempKNa")*it/KNaChange into\ item 2 of card field "TempKNa" end if put item 1 of cd field "tempKNa" into field "Na" put item 2 of cd field "tempKNa" into field "K" put empty into cd field "tempKNa" show field "Na" hide button "KNaO" hide button "KNaO2" unlock screen if char 1 to 2 of line 15 of menu "Glaze Calculator" is "!c" then delete char 1 to 2 of line 15 of menu "Glaze Calculator" end if else hide field "Na" set the hilite of me to true show button "KNaO" show button "KNaO2" put field "Na" & "," & field "K" into cd field "tempKNa" put field "Na"+field "K" into Temp if temp>0 then put temp into field "K" put empty into field "Na" if char 1 to 2 of line 15 of menu "Glaze Calculator" is not "!c" then put "!c" before line 15 of menu "Glaze Calculator" end if end if end mouseUp LACa&lculate/= (- Clear Amounts (- Clear Ingredients Clear Unity Clear ALL Clear USE column (- Convert to Percentage (- Send Recipe to Glazes Send Analysis to Limits (- !cCombine K and NacREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect252,332,401,349 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id6417altId65 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestylecheckbox disabledIcon0 armBorderfalsenameCombined K & Naicon0toolTiplayer107 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstextCa&lculate/= (- Clear Amounts (- Clear Ingredients Clear Unity Clear ALL Clear USE column (- Convert to Percentage (- Send Recipe to Glazes Send Analysis to Limits (- !cCombine K and Na shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087937207437  ConeTempxon mouseup hide me end mouseup{xE:cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight16rect379,287,499,356multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6418altId58autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameConeTemptoolTipvGridfalse listBehaviorfalselayer108visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087937207438 $ 792 804 838 852 884 894 905 923 955 984 999 1046 1060 1101 1120 1137 1154 1162 1168 1186 1196 1222 1240 1263 1280 1305 1315 1326 1346 1366   `@ CKNaO2@A_ Uon mouseUp find string "Potassium & Sodium Oxide:" in field "materials" end mouseUp 60DcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 310,48,341,64 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6422altId68 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameKNaO2icon0toolTiplayer109 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087937207440 KNaO@_ on mouseUp if the optionKey is down then send mouseup to button "Combined K & Na" else find string "Potassium & Sodium Oxides:" in field "materials" end mouseUp 336( CcREVTempMaster; traversalOnfalseinksrcCopythreeDfalse hiliteBorderfalserect 308,40,340,53 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors153,0,51 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6423altId67 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameKNaOicon0toolTiplayer110 accelTextvisibletrue cantSelectfalse borderWidth1 menuLines5margins1opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087937207441 TempKNaaHwoBcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect375,367,510,387multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6426altId66autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameTempKNatoolTipvGridfalse listBehaviorfalselayer111visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087937207444 $   DeBugFld!h M#HcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight12rect333,414,482,449multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6427altId72autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameDeBugFldtoolTipvGridfalse listBehaviorfalselayer112visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087937207445 $  `@! MaterialsInventoryix on mouseup if the optionKey is not down then put line (word 2 of clickLine()) of me into Ingredient if ingredient is empty then exit mouseup if ingredient contains ":" then exit mouseup put empty into whichline repeat with i=1 to 14 if line i of field "ingredients" is empty then put i into whichLine exit repeat end if end repeat if whichLine is not empty then put ingredient into line whichLine of field "ingredients" else put "No more room for ingredients." into field "TalkBack" play boing end if else put Line (word 2 of clickLine()) of cd fld "materialsInventory" into myIngredient if myIngredient is empty then exit mouseup if myIngredient contains ":" then exit mouseup find whole myIngredient in fld "IngredInfo" if the result is "not found" -- or "ingredientInfo" is not in the foundField then myIngredientNotFound myIngredient else get (line (word 2 of the foundline) of fld "IngredInfo") if char 1 to (offset(" -",it)-1) of it is not myIngredient then put it into firstFoundLine repeat find whole myIngredient in fld "IngredInfo" if the result is "not found" \ or (line (word 2 of the foundline) of fld "IngredInfo") is firstFoundLine then answer myIngredientNotFound myIngredient exit repeat else if char 1 to (offset(" -",(line (word 2 of the foundline) of fld "IngredInfo"))-1) of (line (word 2 of the foundline) of fld "IngredInfo") is not myIngredient then next repeat else answer (line (word 2 of the foundline) of fld "IngredInfo") exit repeat end if end if end repeat else answer it end if end if end mouseup on myIngredientNotFound myIngredient answer "Sorry, no further information is available for " & myIngredient & "." & return &\ "Do you want to look at the Materials card for more information on this ingredient?" with "More Info" or "Cancel" if it is "Cancel" then exit myIngredientNotFound if it is "More Info" then push card lock screen global HGfriendly put true into HGfriendly go to stack "Materials" if the result is not empty then put empty into HGfriendly exit myIngredientNotFound end if put empty into HGfriendly find whole myIngredient in fld "material" if the result is not empty then go to cd "MaterialIndex" end if end myIngredientNotFound function ClickLine return (trunc(((scroll of the target)+(item two of the clickloc)- (item two of the rect of the target)) div the textheight of the target) + one) end ClickLine )click to add material to ingredient listPcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight16rect270,410,514,542multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6430altId80autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameMaterialsInventorytoolTip(click to add material to ingredient listvGridfalse listBehaviortruelayer113visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087937207447 $ A. P. Green Fireclay Albany Slip Alumina Alumina Hydrate Ball Clay Hyplas Barium Carbonate Barnard Clay Bentonite Black Iron Oxide Bone Ash Borax Calcined Kaolin Calcium chloride Calspar K Calspar N Chrome Oxide Cobalt Carbonate Cobalt Oxide Copper Carbonate Copper Oxide Cornish Stone (UK) Cornwall Stone Cryolite Custer Feldspar Dolomite Dolomite (Theoretical) EPK Epsom Salt Feldspar FFF Ferro Frit 3110 FFF Feldspar Flint Flint (325m) Fluorspar Frit P-25 Frit P-283 Frit P-311 Frit P-54 Frit P-609 Frit P-626 G-200 Feldspar G200 Feldspar Gerstley Borate Granular Ilmenite Granular Manganese Dioxide Greenstripe Fireclay Grolleg Kaolin Ione Grain Iron Chromate Jordan Clay Lead bisilicate (UK) Lepidolite Lincoln Fireclay Lithium Carbonate Magnatite Magnesite Magnesium Carbonate Manganese Carbonate Manganese Dioxide Mullite Nepheline Syenite Nickel Carbonate Nickel Oxide OM-4 Ball Clay Opax Pearl Ash Pemco Frit P-609 Petalite Plaster Plastic Vitrox Portland Cement Primas FA-200 Soda Feldspar Primas Soda Feldspar Pyrax Pyrax HS Red Copper Oxide Red Horse Clay Red Iron Oxide RedArt Clay Rutile Silica Sand 30m Silica Sand 60m Silica Sand 90m Silicon Carbide Silicon Carbide 60m Silicon Carbide FFF Soda Ash Sodium Bicarbonate Spodumene Spodumene (Australian) Strontium Carbonate Superpax Talc !Tennessee #1-SGP Ball Clay 1989 Tin Oxide Titanium Dioxide Trisodium Phosphate Volcanic Ash Whiting Wollastonite (theoretical) XX Sagger Clay Yellow Ochre Zinc Oxide Zirconium Silicate Zircopax   `@  Update ListE fon mouseUp set cursor to busy push card lock screen set lockmessages to true set lockrecent to true go to stack "Materials" if the result is not empty then exit mouseup go first repeat the number of cds of stack "materials" set cursor to busy if fld "inInventory" contains "X" then put fld "Material" & return after theInventory end if go next end repeat --put fld "Materials" into theInventory pop card sort lines of theInventory put theInventory into cd fld "MaterialsInventory" unlock screen set lockmessages to false set lockrecent to false end mouseUp  ERcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect428,522,497,538 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6432altId82 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruename Update Listicon0toolTiplayer114 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087937207449  RLimitFormulasi 8-- Script of Bkgnd "LimitFormulas" 6/26/92 1992 Richard Burkett on ImportLimits if fld "name" is not in fld "InstalledLimits2" then answer "Do you want to install (save) the current limit formula before replacing it?" with "No" or "Install" if it is "install" then send "installGraph" & quote & "NoDialog" & quote to card "limitFormulas" answer File "Where is the '.LIMIT' file that you want to open?" of type "TEXT" if the result is not empty then exit ImportLimits set numberformat to 0.00 put it into myLimitsFile open file myLimitsFile set the cursor to watch read from file myLimitsFile until tab if it is empty or "HGLimitFormula" is not in it then answer "Sorry, that was not a HyperGlaze Limit Formula." close file myLimitsFile exit ImportLimits end if read from file myLimitsFile until tab if it is empty then close file myLimitsFile exit ImportLimits end if -- put return after fld "installedLimits" delete last char of it if Offset(",",it)<>0 then repeat until Offset(",",it)=0 ask "The name of a limit formula may not contain a comma. Please rename this formula." end repeat end if repeat until char 1 of it is not " " if char 1 of it is " " then delete char 1 of it end repeat -- put it & "," after fld "installedLimits" put it into fld "Name" read from file myLimitsFile until tab if it is empty then close file myLimitsFile exit ImportLimits end if delete last char of it -- put it & "," after fld "installedLimits" put it into fld "Cone" read from file myLimitsFile until tab if it is empty then close file myLimitsFile exit ImportLimits end if delete last char of it -- put it & "," after fld "installedLimits" put it into fld "Surface" repeat with i=4 to 16 set the cursor to busy read from file myLimitsFile until tab if it is empty then exit repeat delete last char of it put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if upperLimit=LowerLimit and upperLimit>0 then add 0.01 to upperLimit -- put it & "," after fld "installedLimits" put the rect of bg btn i into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn i to MyButtonRect end repeat close file myLimitsFile -- set the scroll of fld "installedLimits" to the textHeight of \ -- fld "installedLimits"*the number of lines of fld "installedLimits" -- put empty into fld "installedLimits2" -- repeat with i=1 to the number of lines of fld "installedLimits" -- get line i of fld "installedLimits" -- put item 1 of it && "" & item 2 of it & return after fld "installedLimits2" -- end repeat -- select last line of fld "installedLimits2" end ImportLimitsB D5???????? 8?s8?? ~~? ??? ? ?????? ?? ?? ? ?? ? ?? ? ????? ???? ???? ???? ???? ???? ?? ?? ? ?  ? ? ?? ? ??? "~??x?~?<|f0>030366;6p3s36s3cc3c3c0cy3c33c0;3`c3`3c30`s36f6367c7630<30|c0 8p8 0 ` ` ` @!d ?9c` @ f``1c9rc,9w1g0-ٹ1l` ` TR! JRJBJ)H%$9` 0:ҒJ^bzBD)x%$ 8pJTR)JPBJ)@%$@ 9c rg91'0%$  @3`1?H O"0HO@@@@ DŽ#>" UPV* "    'V  0" pHHUPV*    @ "   'V    "  A B  B  UP*B B B  A @ " `      V     " ""#UPƇ* @ @  @  @"   @  `@@ @V  @ @"  @ @@UPƇ* 8" @D@D@DGDGD@D#8?1??s>??s???x<?p?y p8?|?pxp8|xpq8?   `< ``~?`?`~n?``?pff?`3p9f`v`30='`o``<o8p?68p?7?8??38?>|0`x`pp8pp?8>ppp܂?8?p̂ x<xplp|p<8p?8x<8p ? 8p;? <p3>|  6 ><`8>`88< `` @ @ @   8`80 EvagQ#Vb㘻1p  DDĂ2HEQ)$Y$A B" E Q1(PQB 94" EJ/ЂQBh D" EJ)(QB DL"HMD)1$Q$28`20 5aD#Qbd$ @  +X$dC#,$d $$ $ (QBD%B(R(QBE%B/(QBD%B(L$D $$ $  D$dA# ²???????? 8?s8?? ~~? ??? ? ?????? ?? ?? ? ?? ? ?? ? ????? ???? ???? ???? ???? ???? ?? ?? ? ?  ? ? ?? ? ??? "~??x?~?<|f0>030366;6p3s36s3cc3c3c0cy3c33c0;3`c3`3c30`s36f6367c7630<30|c0 8p8 0 ` ` ` @!d ?9c` @ f``1c9rc,9w1g0-ٹ1l` ` TR! JRJBJ)H%$9` 0:ҒJ^bzBD)x%$ 8pJTR)JPBJ)@%$@ 9c rg91'0%$  @3`1?H O"0HO@@@@ DŽ#>" UPV* "    'V  0" pHHUPV*    @ "   'V    "  A B  B  UP*B B B  A @ " `      V     " ""#UPƇ* @ @  @  @"   @  `@@ @V  @ @"  @ @@UPƇ* 8" @D@D@DGDGD@D#8?1??s>??s???x<?p?y p8?|?pxp8|xpq8?   `< ``~?`?`~n?``?pff?`3p9f`v`30='`o``<o8p?68p?7?8??38?>|0`x`pp8pp?8>ppp܂?8?p̂ x<xplp|p<8p?8x<8p ? 8p;? <p3>|  6 ><`8>`88< `` @ @ @   8`80 EvagQ#Vb㘻1p  DDĂ2HEQ)$Y$A B" E Q1(PQB 94" EJ/ЂQBh D" EJ)(QB DL"HMD)1$Q$28`20 5aD#Qbd$ @  +X$dC#,$d $$ $ (QBD%B(R(QBE%B/(QBD%B(L$D $$ $  D$dA# ²homeC on mouseUp go home end mouseUp 6#!N NextC on mouseUp go next end mouseUp H6t PrevC on mouseUp go prev end mouseUp )6F InstalledLimitsx oon mouseup put word two of the clickline into whichLine put whichline into fld "CurrentLine" if the optionKey is down then answer "Are you sure you want to delete the limit formula for" && item 1 of line whichLine of me\ && "" &item 2 of line whichLine of me & "?" with "Delete" or "Cancel" if it is "Delete" then delete line whichLine of me end if else select line whichLine of me get item 1 of line whichline of me if it is not empty then put it into fld "Name" get item 2 of line whichline of me if it is not empty then put it into fld "Cone" get item 3 of line whichline of me if it is not empty then put it into fld "Surface" repeat with i=4 to 15 set the cursor to busy get item i of line whichline of me put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if (upperLimit=LowerLimit or upperLimit-lowerLimit<.02) and upperLimit>0 then add .02 to upperLimit subtract .01 from lowerLimit end if put the rect of bg btn i into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn i to MyButtonRect end repeat select line whichLine of me end if end mouseupvC aAKA o' NaA oA LiA o\$  CaA ow0  BaA o  SrA o  MgA o  ZnA o BA o5 AlA oT  SiA o  PbA o  Name )h=> Cone )h>?  CurrentLineh? Surface )h>Z  conenumbers(0 InstalledLimits2 x -- Script of bg fld "InstalledLimits2" 1992-1993 Richard Burkett on mouseup put word two of the clickline into whichLine put whichline into fld "CurrentLine" if the optionKey is down then answer "Are you sure you want to delete the limit formula for" && item 1 of line whichLine of me\ & "?" with "Delete" or "Cancel" if it is "Delete" then get last word of line whichLine of me -- put it && word 1 of item 1 of line whichLine of fld "InstalledLimits" if it is last word of item 1 of line whichLine of fld "InstalledLimits" then delete line whichLine of me delete line whichLine of fld "installedLimits" if the last char of me is return then delete last char of me if the last char of fld "installedLimits" is return then delete last char of fld "installedLimits" end if end if else if fld "name" is not in fld "InstalledLimits2" then answer "Do you want to install (save) the currently shown limit formula before replacing it?" with "No" or "Install" if it is "install" then installGraph "NoDialog" select line whichLine of me put item 4 to 16 of line whichLine of fld "installedLimits" into fld "CurrentLimit" get item 1 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Name" get item 2 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Cone" get item 3 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Surface" repeat with i=4 to 16 set the cursor to busy get item i of line whichline of fld "installedLimits" put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if (upperLimit=LowerLimit or upperLimit-lowerLimit<.02) and upperLimit>0 then add .02 to upperLimit subtract .01 from lowerLimit end if put the rect of bg btn i into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn i to MyButtonRect end repeat select line whichLine of me end if end mouseupC `A  CurrentLimit PA o  limitsi"/on SetGlazeColor set cursor to watch put card field "Name" into GlazeName put card field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if card field K>.1 then put "KNa " after GlazeType end if else if card field K+ card field Na>.1 then put "KNa " after GlazeType end if if card field "Pb">0 then put "Pb " after GlazeType if card field "Ca">.5 then put "Ca " after GlazeType if card field "B">.1 then put "B " after GlazeType if card field "Mg">.15 then put "Mg " after GlazeType if card field "Ba">.15 then put "Ba " after GlazeType if card field "Li">.05 then put "Li " after GlazeType if card field "Zn">.1 then put "Zn " after GlazeType else if card field "Zn">.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end setGlazeColor on setGlazeLimits put empty into fld "LimitName" if the visible of cd fld "GlazeAnalysis?" of cd "Limits" is true then send mouseup to btn "Done" set the cursor to watch hide message global DoLimits get word 1 of cd fld "cone" of cd "Limits" if it contains "-" then put char 1 to offset("-", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if it contains "," then put char 1 to offset(",", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if the last char of theTemp is not in "1,2,3,4,5,6,7,8,9,0" then delete last char of theTemp if TheTemp is empty then play boing Ask "Enter a cone number between 016 and 14." if it is empty then exit setGlazeLimits put it into TheTemp put it into card field "Cone" of cd "Limits" end if find word theTemp in fld "coneNumbers" of cd "Limits" if the result is "not found" then play boing answer "Sorry, this cone is outside the allowed range. Use only cones 016 to 14." select line 1 of cd fld "Cone" exit setGlazeLimits end if put word 2 of the foundline into whichLine put line whichLine of field "coneTemp" of cd "limits" into theTemp put last word of fld "GlazeTemp" into ForC put theTemp & " C" into fld "GlazeTemp" of cd "limits" if ForC is "F" then send mouseup to fld "GlazeTemp" -- end temperature determination if the icon of bkgnd button "no lead" of cd "limits" is 30913\ and TheTemp<1200 --leadless glaze specified then put true into LeadFree else put false into LeadFree end if if the short name of bkgnd button id 15 of cd "limits" is "Matte" then put true into MatteGlaze else put false into MatteGlaze set the name of bg btn id 15 of cd "limits" to "Glossy" end if put -43.0417+(0.1401*TheTemp)-(0.00014915*(TheTemp^2))+\ .000000053846*(TheTemp^3) into TheAmount if MatteGlaze then put .75*theAmount into theAmount --put theAmount put the rect of bkgnd button "Si" into MyButton set numberFormat to 0 if not leadFree and theTemp <1200 then put 1.5*theAmount into theAmount put round(200 - 2*theAmount) into item 4 of myButton put round(200 - 5.6*theAmount) into item 2 of myButton set the rect of bkgnd button "Si" to myButton -- put (.55774-(0.001385*TheTemp)+(0.00000100023*(TheTemp^2)))\ -- into TheAmount put -0.39465+0.0035439*TheTemp-0.0000055647*TheTemp^2\ +0.0000000027765*theTemp^3 into TheAmount if MatteGlaze then put 1.4*theAmount into theAmount put the rect of bkgnd button "Al" into MyButton put round(200 - 8*theAmount) into item 4 of myButton put round(200 - 35*theAmount) into item 2 of myButton set the rect of bkgnd button "Al" to myButton put the rect of bkgnd button "B" into MyButton if leadFree then put -185.11+(0.69674*TheTemp)-0.00094958*theTemp^2\ +0.00000056191*TheTemp^3-0.00000000012261*theTemp^4 into TheAmount else put 3.2449-(0.0059252*TheTemp)+0.0000048528*theTemp^2\ -0.0000000016162*TheTemp^3 into TheAmount end if if the short name of bkgnd button id 15 is "Matte" then put .5*theAmount into theAmount put round(200 - 50*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "B" to myButton set the rect of bg btn "P" to "387,200,406,200" -- phosphorus, P2O3 put (1.6861-(0.00114*TheTemp)) into TheAmount if MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "K" into MyButton if leadFree then put theAmount*1.4 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.15*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "K" to myButton put (1.6861-(0.00114*TheTemp)) into TheAmount if MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "Na" into MyButton if leadFree then put theAmount*1.4 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.15*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "Na" to myButton put 1.0334-.000667*theTemp into theAmount put the rect of bkgnd button "Li" into MyButton if not MatteGlaze then put round(200 - 100*1.15*theAmount) into item 2 of myButton else put round(200 - 100*.8*theAmount) into item 2 of myButton end if if leadFree and theTemp<1200 then put round(200 - 100*1.3*theAmount) into item 2 of myButton set the rect of bkgnd button "Li" to myButton put (1.0456-(.0026156*TheTemp)+(0.0000018245*(TheTemp^2)))\ into TheAmount put the rect of bkgnd button "Ca" into MyButton if leadFree then put theAmount*1.6 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Ca" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put (.091071-(0.00044524*TheTemp)+(0.0000005238116*TheTemp^2))\ into TheAmount end if if not MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "Mg" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Mg" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put 1.3*(.090171-(.00044524*TheTemp)+(0.00000052381*(TheTemp^2)))\ into TheAmount end if if not MatteGlaze then put .35*theAmount into theAmount put the rect of bkgnd button "Ba" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Ba" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put 1.3*(.090171-(.00044524*TheTemp)+(0.00000052381*(TheTemp^2)))\ into TheAmount end if if not MatteGlaze then put .35*theAmount into theAmount put the rect of bkgnd button "Sr" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Sr" to myButton if theTemp<950 then put 0 into theAmount else put (-.28375+(0.00024167*TheTemp)+(0.00000016667*(TheTemp^2)))\ into TheAmount end if if leadFree then put 1.25*theAmount into theAmount if matteGlaze then put 1.5*theAmount into theAmount else put 0.75*theAmount into theAmount end if put the rect of bkgnd button "Zn" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Zn" to myButton if LeadFree then put the rect of bg button "Pb" into TempRect put 200 into item 2 of TempRect put 201 into item 4 of TempRect set the rect of bkgnd button "Pb" to TempRect else if TheTemp<1200 then put (8.8928-(.026617*TheTemp)+(0.000030527*(TheTemp^2)))-\ .000000011987*(TheTemp^3) into TheAmount if MatteGlaze then put .5*theAmount into theAmount if 1.05*theAmount>=1 then put 1.000 into HighAmount put the rect of bkgnd button "Pb" into MyButton put round(200 - 100*(.4*theAmount)) into item 4 of myButton put 100 into item 2 of myButton set the rect of bkgnd button "Pb" to myButton else put the rect of bkgnd button "Pb" into MyButton put round(200 - 100*(.05*theAmount)) into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Pb" to myButton end if else put the rect of bg btn "Pb" into myRect put 200 into item 2 of myRect put 201 into item 4 of myRect set the rect of bkgnd button "Pb" to myRect end if end if if not MatteGlaze then put "Suggested Si/Al Ratio: greater than 8 :1"\ into field "SuggestedSi" else put "Suggested Si/Al Ratio: less than 5 :1" \ into field "SuggestedSi" end if end setGlazeLimits -- on doMenu choice -- if choice is "New Card" --trap new card -- then -- if the short name of this stack is "Glaze Calculator" -- then -- play boing -- put "No new cards in this stack!" -- else pass doMenu -- else pass doMenu -- end doMenu E* D;~?~|>~?~|>x~??~? !9xCD~??~?? 2b(D DB D 0~?? ~>B"(D@EY)ZL ~? ~>B!qAL|@ "LTA8<)<)S* "ALD@ "LRAP (} }0J)"yDx DA!$EE4J)<EEȀ x  A C @ @ @ @ @ A A       8p8 0 ` ` ` @!d ?9c` @ f``1c9rc,9w1g0-ٹ1l` ` TR! JRJBJ)H%$9` 0:ҒJ^bzBD)x%$ 8pJTR)JPBJ)@%$@ 9c rg91'0%$  @3`1?H O"0HO@@@@ DŽ#>" UPV* "    'V  0" pHHUPV*    @ "   'V    "  A B  B  UP*B B B  A @ " `      V     " ""#UPƇ* @ @  @  @"   @  `@@ @V  @ @"  @ @@UPƇ* 8" @D@D@DGDGD@D#8 `0 ?1??s<??s?~?x<?~p? p8??pxp8|xpq8  0`|x`pp 8>ppp܂?8ppp̂?8?pl x<x|p8p<p?8x<8p̎ ? 8p; ? < p3> 6<|`>8>`88< ``@b"" "B "B""D"aD"a3 9I8d@@@  @@@ ,qc70qp3;.s %*JBXH XII)$% JBPtxI`Iy)#%* JBPD@JPIA) $IsD0q&0 8@ D  !18E$d8ř ȳ88s,;f `IHE$R !$A%$) @$$$!IHE$RǤ!"$/0$$$!IHE$R$D!$A%%)($$$!189LaDę ȓ$&p# $$b~?~|>~?~|>x~??~? !9xCD~??~?? 2b(D DB D 0~?? ~>B"(D@EY)ZL ~? ~>B!qAL|@ "LTA8<)<)S* "ALD@ "LRAP (} }0J)"yDx DA!$EE4J)<EEȀ x  A C @ @ @ @ @ A A       8p8 0 ` ` ` @!d ?9c` @ f``1c9rc,9w1g0-ٹ1l` ` TR! JRJBJ)H%$9` 0:ҒJ^bzBD)x%$ 8pJTR)JPBJ)@%$@ 9c rg91'0%$  @3`1?H O"0HO@@@@ DŽ#>" UPV* "    'V  0" pHHUPV*    @ "   'V    "  A B  B  UP*B B B  A @ " `      V     " ""#UPƇ* @ @  @  @"   @  `@@ @V  @ @"  @ @@UPƇ* 8" @D@D@DGDGD@D#8 `0 ?1??s<??s?~?x<?~p? p8??pxp8|xpq8  0`|x`pp 8>ppp܂?8ppp̂?8?pl x<x|p8p<p?8x<8p̎ ? 8p; ? < p3> 6<|`>8>`88< ``@b"" "B "B""D"aD"a3 9I8d@@@  @@@ ,qc70qp3;.s %*JBXH XII)$% JBPtxI`Iy)#%* JBPD@JPIA) $IsD0q&0 8@ D  !18E$d8ř ȳ88s,;f `IHE$R !$A%$) @$$$!IHE$RǤ!"$/0$$$!IHE$R$D!$A%%)($$$!189LaDę ȓ$&p# $$bhomeC ;on mouseUp visual effect scroll right go home end mouseUp 6#!N GlossyEpon mouseUp if the short name of me is "Glossy" then set the name of me to "Matte" put empty into cd fld "ThermalExpan" setGlazeLimits else set the name of me to "Glossy" if cd fld "Li" <0.01 and cd fld "Sr"<.01 then doThermalExpansion setGlazeLimits end if select line 1 of card field "al/si ratio" end mouseUp -- ScriptEdit Prefs:Monaco,9,47,24,297,514,236,236,50 &:R KA o&h@ NaAoAh@ LiA o\5 CaA ow BaA o SrA o MgA o  ZnA o  BA o2uD AlA oS  SiA o   ConeNumbers!X'--on mouseup -- hide me --end mouseup=.   SuggestedSi h #Y!  ConeTempxon mouseup hide me end mouseup>xB" a@LimitsA'on mouseUp setGlazeLimits end mouseUp /= $ PrevC on mouseUp go prev end mouseUp )6%F NextC Yon mouseUp if the optionKey is down then go next else go to cd "Calculator" end mouseUp H6&t No LeadC  on mouseUp if the optionKey is down then set the visible of cd fld "Pb?" to not visible of cd fld "Pb?" if the visible of cd fld "Pb?" is true then set the hilite of me to true else set the hilite of me to false else get the icon of me if it is 30913 -- "Black X" then set the icon of me to 10553 -- "noIcon" set the locktext of cd fld "Pb" to false setglazelimits else set the icon of me to 30913 -- "Black X" set the locktext of cd fld "Pb" to true setglazelimits end if end if end mouseUp 0'x  CombineKNaAbon mouseUp if the optionKey is down then set the visible of cd fld "KNaLi?" to not visible of\ cd fld "KNaLi?" set the visible of cd fld "KNaLi?Header" to not visible of\ cd fld "KNaLi?Header" else doMenu "Combine K & Na" end if if the visible of cd fld "KNaLi?" is false then set the hilite of me to false else set the hilite of me to true end mouseUp "2/(  GlazeTemp  on mouseup set numberFormat to 0 get last word of me if it is "C" then put (((word 1 of me)*(9/5))+32) && "F" into me if it is "F" then put (((word 1 of me)-32)*(5/9)) && "C" into me end mouseupJ9 )PbA o-   LimitName'.  KNaButtonLoch#/PA o0  Glaze Calci  (cREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -2,-2,518,550 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletetrue vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid3227altId0radioBehaviortrue textStylelockLocfalselabelname Glaze CalctoolTiplayer6visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1087937207435 previousC Don mouseUp visual effect wipe left go to previous card end mouseUp 9$@cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect445,313,475,342 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6587altId36 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenamepreviousicon320toolTiplayer7 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339037 nextC Aon mouseUp visual effect wipe right go to next card end mouseUp 9%AcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect477,313,505,342 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6588altId37 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenamenexticon321toolTiplayer8 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339038 TitleAIcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight18rect 2,2,218,21multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6590altId73autoTabtrue textStyle bold,italichGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTitletoolTipvGridfalse listBehaviorfalselayer9visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize14 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339039 $   Ingredients -H@cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 6,62,162,288multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6592altId140autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name IngredientstoolTipvGridfalse listBehaviorfalselayer10visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339041 $ G-200 Feldspar Colemanite Whiting Kaolin  amountsMXon mouseup answer "Amounts are calcuated here, not entered." & return & return &\ "(To enter a glaze with batch amounts, " & Return &\ "go back to the Glaze stack and choose" & return & \ " 'New Card' in the Edit menu.)" end mouseup @@cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect163,62,227,292multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6593altId141autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameamountstoolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339042 $ 86.42 13.29 5.54 -5.25   HideTalkBackAon mouseUp set visible of Field TalkBack to false set visible of background button HideTalkBack to false put empty into field 71 end mouseUp !cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect14,251,509,284 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6594altId179 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename HideTalkBackicon0toolTiplayer12 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339043 BaE   cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect288,206,307,219 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6595altId216 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameBaicon0toolTiplayer13 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339044 Date a #cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 35,4,258,20multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6596altId234autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameDatetoolTipvGridfalse listBehaviorfalselayer14visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339045 $  CI cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 226,2,239,21multipleHilitesfalse patterns colors255,255,255 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6597altId240autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameCtoolTipvGridfalse listBehaviorfalselayer15visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339046 $  PrintCommentsAX 1on mouseup hide field printComments end mouseup AcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,280,515,345multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6598altId248autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name PrintCommentstoolTipvGridfalse listBehaviorfalselayer16visiblefalse cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339047 $   TalkBack+h j:cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect264,286,370,344multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6600altId253autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTalkBacktoolTipvGridfalse listBehaviorfalselayer17visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339049 $ 7Choose 'Clear Amounts' before adding another material.  K mX 8 on closefield set cursor to watch get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield &+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 270,38,313,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6601altId255autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameKtoolTipvGridfalse listBehaviorfalselayer18visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339050 $ 0.352  Na mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield 1+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 269,49,312,62multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6602altId256autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNatoolTipvGridfalse listBehaviorfalselayer19visiblefalse cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339051 $ 0.151  Ca mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield >+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 270,62,313,75multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6603altId257autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCatoolTipvGridfalse listBehaviorfalselayer20visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339052 $ 0.489  Mg mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield J+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 270,74,313,87multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6604altId258autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameMgtoolTipvGridfalse listBehaviorfalselayer21visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339053 $ 0.008  Li mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield V+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 270,86,313,99multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6605altId259autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameLitoolTipvGridfalse listBehaviorfalselayer22visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339054 $  Ba mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield b+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,98,313,111multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6606altId260autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBatoolTipvGridfalse listBehaviorfalselayer23visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339055 $  Pb mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield n+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,110,313,123multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6607altId261autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0namePbtoolTipvGridfalse listBehaviorfalselayer24visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339056 $  Zn mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield z+ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,122,313,135multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6608altId262autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameZntoolTipvGridfalse listBehaviorfalselayer25visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339057 $  Cu mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield + DcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,134,313,147multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6609altId324autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCutoolTipvGridfalse listBehaviorfalselayer26visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339058 $  Co mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield + McREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,146,313,159multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6610altId333autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCotoolTipvGridfalse listBehaviorfalselayer27visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339059 $  Ni mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield + NcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,158,313,171multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6611altId334autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNitoolTipvGridfalse listBehaviorfalselayer28visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339060 $  B mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield Z2. cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 346,50,392,63multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6613altId264autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBtoolTipvGridfalse listBehaviorfalselayer29visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339062 $ 0.329  Fe mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield Z>.  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 346,62,392,75multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6614altId265autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameFetoolTipvGridfalse listBehaviorfalselayer30visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339063 $ 0.002  P mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ZJ.  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 346,74,392,87multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6615altId266autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0namePtoolTipvGridfalse listBehaviorfalselayer31visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339064 $ 0.000  Sb mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ZV. EcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 346,86,392,99multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6616altId325autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSbtoolTipvGridfalse listBehaviorfalselayer32visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339065 $  Cr mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield Zb. FcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect346,98,392,111multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6617altId326autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCrtoolTipvGridfalse listBehaviorfalselayer33visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339066 $  V mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield Zn. KcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect346,110,392,123multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6618altId331autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameVtoolTipvGridfalse listBehaviorfalselayer34visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339067 $  flasherA on mouseUp repeat 3 times set the hilite of bkgnd button "flasher" to true set the hilite of bkgnd button "flasher" to false end repeat end mouseUp n>cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect258,284,368,346 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6621altId271 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameflashericon0toolTiplayer35 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339070 Si/AlMH l&LcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect425,110,463,125multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6626altId332autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameSi/AltoolTipvGridfalse listBehaviorfalselayer36visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339075 $ 5.7   Quantity1 l( ffCAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect 226,65,254,80multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6629altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity1toolTipvGridfalse listBehaviorfalselayer37visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339078 $  TotalsMH t"/BcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect116,287,163,309multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6630altId322autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTotalstoolTipvGridfalse listBehaviorfalselayer38visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339079 $ Total StopCalc  TotAmtMH !ACcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect162,287,227,309multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6631altId323autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameTotAmttoolTipvGridfalse listBehaviorfalselayer39visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339080 $ 100.00  R2OIIA:ZcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect284,283,342,303multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6632altId346autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2OIItoolTipvGridfalse listBehaviorfalselayer40visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339081 $ 0.001  R2O3IIa+<[cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect280,299,340,319multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6633altId347autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameR2O3IItoolTipvGridfalse listBehaviorfalselayer41visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339082 $ 0.072 -0.001  RO2IIA99\cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect287,313,344,341multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6634altId348autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameRO2IItoolTipvGridfalse listBehaviorfalselayer42visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339083 $ 0.144 0.001  K?A &on mouseUp if the optionKey is down then send mouseup to button "Combined K & Na" else if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Potassium Oxide:" in field "materials" end if end mouseUp 9' hcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 313,39,339,52 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6635altId360 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameK?icon0toolTiplayer43 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339084 Na?A *on mouseUp if the optionKey is down then send mouseup to button "Combined K & Na" else if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "sodium oxide: NaO" in field "materials" end if end mouseUp 93 jcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 313,51,341,64 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6636altId362 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameNa?icon0toolTiplayer44 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339085 Ca?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Calcium Oxide:" in field "materials" end mouseUp 9? kcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 313,63,339,76 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6637altId363 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameCa?icon0toolTiplayer45 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339086 Mg?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Magnesium Oxide:" in field "materials" end mouseUp 9K lcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 313,75,339,88 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6638altId364 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameMg?icon0toolTiplayer46 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339087 Li?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Lithium Oxide:" in field "materials" end mouseUp 9W mcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,87,339,100 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6639altId365 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameLi?icon0toolTiplayer47 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339088 Ba?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Barium Oxide:" in field "materials" end mouseUp 9c ncREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,99,339,112 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6640altId366 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameBa?icon0toolTiplayer48 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339089 Pb?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Lead Oxide:" in field "materials" end mouseUp 9o ocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,111,339,124 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6641altId367 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenamePb?icon0toolTiplayer49 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339090 Zn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Zinc Oxide:" in field "materials" end mouseUp 9{ pcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,123,339,136 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6642altId368 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameZn?icon0toolTiplayer50 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339091 Cu?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Copper Oxide:" in field "materials" end mouseUp 9 qcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,135,339,148 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6643altId369 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameCu?icon0toolTiplayer51 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339092 Co?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Cobalt Oxide:" in field "materials" end mouseUp 9 rcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,147,339,160 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6644altId370 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameCo?icon0toolTiplayer52 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339093 Ni?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Nickel Oxide:" in field "materials" end mouseUp 9 scREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect313,159,339,172 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6645altId371 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameNi?icon0toolTiplayer53 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339094 Al?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Alumina:" in field "materials" end mouseUp '# tcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 391,39,426,52 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6646altId372 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameAl?icon0toolTiplayer54 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339095 B?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Boron" in field "materials" end mouseUp 3# ucREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 391,51,426,64 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6647altId373 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameB?icon0toolTiplayer55 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339096 Fe?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Iron Oxide:" in field "materials" end mouseUp ?# vcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 391,63,426,76 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6648altId374 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameFe?icon0toolTiplayer56 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339097 P?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Phosphorus Pentoxide:" in field "materials" end mouseUp K# wcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 391,75,426,88 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6649altId375 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameP?icon0toolTiplayer57 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339098 Sb?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Antimony Oxide:" in field "materials" end mouseUp W# xcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect391,87,426,100 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6650altId376 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSb?icon0toolTiplayer58 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339099 Cr?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Chromium Oxide:" in field "materials" end mouseUp c# ycREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect391,99,426,112 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6651altId377 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameCr?icon0toolTiplayer59 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339100  ConeNumbers!X(--on mouseup -- hide me --end mouseup [cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect416,275,507,289multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6652altId390autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name ConeNumberstoolTipvGridfalse listBehaviorfalselayer60visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339101 $  V?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Vanadium Pentoxide:" in field "materials" end mouseUp o# zcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect391,111,426,124 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6654altId378 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameV?icon0toolTiplayer61 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339102 Si?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Silica:" in field "materials" end mouseUp '$ {cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 474,39,510,52 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6655altId379 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSi?icon0toolTiplayer62 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339103 Ti?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Titanium Dioxide:" in field "materials" end mouseUp 3# |cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 475,51,510,64 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6656altId380 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameTi?icon0toolTiplayer63 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339104 Zr?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Zirconium Oxide" in field "materials" end mouseUp ?$ }cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 474,63,510,76 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6657altId381 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameZr?icon0toolTiplayer64 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339105 Sn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Tin Oxide:" in field "materials" end mouseUp K$ ~cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 474,75,510,88 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6658altId382 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSn?icon0toolTiplayer65 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339106 Mn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Manganese Dioxide:" in field "materials" end mouseUp W$ cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect474,87,510,100 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6659altId383 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameMn?icon0toolTiplayer66 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339107 F?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Fluorine:" in field "materials" end mouseUp c$ cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect474,99,510,112 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6660altId384 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameF?icon0toolTiplayer67 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339108  FluxTotal H 2cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 263,22,313,36multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6661altId385autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name FluxTotaltoolTipvGridfalse listBehaviorfalselayer68visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339109 $ 1.000  Si/Alon mouseUp set numberformat to 0.0 if fld "Al" >0 then put (field "Si")/(field "Al") into field "Si/Al" else put empty into fld "Si/Al" end if end mouseUp pO cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect426,112,505,125 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6662altId393 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameSi/Alicon0toolTiplayer69 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins2opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339110  TotalFluxA on mouseUp set cursor to watch set numberformat to 0.000 put (fld "K" + fld "Na" + fld "Ca" + fld "Mg" + fld "Li" + fld "Ba"\ + fld "Pb" + fld "Zn" + fld "Co" + fld "Cu" + fld "Ni" +fld "Sr") into FluxError if FluxError>1.0011 then --set the textstyle of field "fluxTotal" to Bold,italic put fluxError into Field "FluxTotal" select line 1 of field "FluxTotal" else if FluxError<.998 then --set the textstyle of field "fluxTotal" to Bold,italic put fluxError into Field "FluxTotal" select line 1 of field "FluxTotal" else put fluxError into Field "FluxTotal" --set the textstyle of field "fluxTotal" to plain end if end mouseUp `cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 269,23,365,39 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6663altId386 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename TotalFluxicon0toolTiplayer70 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339111  Cone kX$g--on closefield -- send mouseup to bkgnd button "limit form u las" --pass closefield --end closefield @cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight18rect 212,33,257,55multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6666altId387autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameConetoolTipvGridfalse listBehaviorfalselayer71visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize14 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339113 $ 6   PercentAnalysis-x -on mouseup percentageAnalysis end mouseup wcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect374,164,510,374multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6667altId395autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namePercentAnalysistoolTipvGridfalse listBehaviorfalselayer72visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339114 $ 57.61 % SiO2 17.28 % Al2O3 8.91 % K2O 2.51 % Na2O 0.09 % MgO 7.37 % CaO 6.14 % B2O3 0.09 % Fe2O3 0.02 % TiO2   Sr?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find empty find string "Strontium oxide:" in field "materials" end mouseUp : cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect314,170,340,183 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6668altId419 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSr?icon0toolTiplayer73 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087841339115  Sr mX !on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat percentageAnalysis end closefield + cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect270,170,313,183multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6669altId420autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSrtoolTipvGridfalse listBehaviorfalselayer74visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339116 $  R2OMX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseup Black(3cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect261,40,312,188multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6670altId275autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2OtoolTipvGridfalse listBehaviorfalselayer75visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339117 $ 0.351 @black 0.151 @black 0.488 @black 0.006 @black @black @black @black @black @black @black @black  ThermalExpansionm -on mouseup doThermalExpansion end mouseup jh4calculates estimated thermal expansion for this UMFcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect428,128,466,144multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6671altId421autoTabtrue textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameThermalExpansiontoolTip3calculates estimated thermal expansion for this UMFvGridfalse listBehaviorfalselayer76visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339118 $ 7.03   IngredInfo!hHecREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight16rect25,401,353,502multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6672altId422autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name IngredInfotoolTipvGridfalse listBehaviorfalselayer77visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339119 $ Clay - stabilizer. Include 5-10% raw clay (usually kaolin) in glazes. Adds alumina to glaze to stiffen the melt and helps to keep the raw glaze in suspension. Use of more than 10-15% may cause crawling in many glazes.   Kaolin - Raw Clay - stabilizer. Include 5-10% raw clay in glazes. Adds alumina to glaze to stiffen the melt and helps to keep the raw glaze in suspension. Use of more than 10-15% may cause crawling in many glazes.   Ball Clay - Raw Clay - stabilizer. Include 5-10% raw clay in glazes. Adds alumina to glaze to stiffen the melt and helps to keep the raw glaze in suspension. Use of more than 7-10% Ball clay may cause crawling in many glazes. " " EPK - Raw Clay - stabilizer. Include 5-10% raw clay in glazes. Adds alumina to glaze to stiffen the melt and helps to keep the raw glaze in suspension. Use of more than 10-15% may cause crawling in many glazes.   Georgia Kaolin - Raw Clay - stabilizer. Include 5-10% raw clay in glazes. Adds alumina to glaze to stiffen the melt and helps to keep the raw glaze in suspension. Use of more than 10-20% may cause crawling in many glazes. Less plastic than EPK. ' ' Calcined Kaolin - Clay - stabilizer. Non-plastic source of clay. Adds alumina to glaze to stiffen the melt. Substitute for raw clay when large amounts of clay are needed. Will not contribute to crawling like raw, plastic clay. $ $ Alumina - Stabilizer. Very refractory. Provides pure alumina to glaze. Not often used in glazes as it does not enter the glaze melt as easily or as evenly as clay.   Alumina Hydrate - Stabilizer. Very refractory. Provides pure alumina to glaze. Not often used in glazes as it does not enter the glaze melt as easily or as evenly as clay.   Feldspar - Hi temp flux. Most useful in stoneware glazes, where it may make up most of the glaze. Most feldspars provide sodium, potassium, alumina, and silica to the melt, along with traces of other fluxes.   Potash Feldspar - Hi temp flux. Most useful in stoneware glazes, where it may make up most of the glaze. Provides primarily potassium, alumina, and silica to the melt, along with potassium and small amounts of calcium.   Soda Feldspar - Hi temp flux. Most useful in stoneware glazes, where it may make up most of the glaze. Provides primarily sodium, alumina, and silica to the melt, along with potassium and traces of calcium. Lower melting than Potash feldspar.   Nepheline Syenite - Hi-mid temp flux. Most useful in stoneware glazes, where it may make up most of the glaze. Provides primarily sodium, alumina, and silica to the melt, along with potassium and traces of calcium. Lower melting than Soda spar. % % Strontium Carbonate - Flux. Useful as a non-toxic substitute for Barium, but expensive. Similar to barium, but not identical. Affects on glaze color and surface falls between Calcium and Barium.   Frit - Flux. Useful to get large amounts of flux into a lowfire glaze. Minimizes the glaze surface problems associated with many raw materials. Use at least 5% clay with frits to aid adhesion to the ware and keep glaze in suspension.  Barium Carbonate - TOXIC - Flux. Useful to produce beautiful mat glazes and intense colors. Forms a very fluid melt with Boron, but otherwise may cause mat surface. Do not use in glazes for food use - especially below cone 8-10.  xBone ash - Hi temp flux. Useful source of Phosphorous. Use of large amounts may mat glazes, especially lowfire glazes.  _ Dolomite - Hi temp flux. Dolomite is useful to make smooth mat glazes, especially with high alumina in glaze. Adds little fluxing power in lowfire glazes - large amounts will cause underfired mats.   Gerstley borate - Strong flux. Useful at all temperatures, but frequently used as a major ingredient in raku glazes. May cause glaze flocculation.  t Colemanite - Flux. Similar to Gerstley Borate, but slightly stronger flux. May cause glaze problems such as glazes falling off during firing.  { Borax - Strong Flux. Somewhat soluble. Often used in raku glazes. Small amounts (2-5%) may aid adhesion of slips to bisque surface.  o Fluorspar - Flux. Helps early melting in glazes, but releases Fluorine, a toxic gas, during firing which can cause glaze defects of crater glazes.   Cryolite - Flux. Helps early melting in glazes, but releases Fluorine, a toxic gas, during firing which can cause glaze defects of crater glazes.   Lepidolite - Flux. Feldspar-like material that adds both Lithium (lowers thermal expansion & helps reduce crazing) and Fluorine to the glaze. Fluorine helps early melting in glazes, but is a toxic gas and is released during firing.   Spodumene - Hi-temp flux. Adds Lithium which, in moderate amounts, helps reduce crazing by lowering thermal expansion. Similar to feldspars, but with Lithium as the primary flux.   Petalite - Flux. Adds Lithium which, in moderate amounts, helps reduce crazing by lowering thermal expansion. Similar to feldspars, but with Lithium as the primary flux and substantially more silica than spodumene.   Lithium Carbonate - Strong Flux. Alkaline flux which has a strong affect on color. In small amounts Lithium will reduce crazing. In large amounts it may contribute to crazing and induce mat surfaces.  Talc - Flux. Useful source of Magnesium for magnesia mat glazes and provides silica as well. Always use non-asbestiform talc to minimize health risks.  Magnesium carbonate - Hi temp flux. VERY HIGH SHRINKAGE if the light, fluffy variety is used. Will cause glaze crawling in moderate to large amounts. Useful for intentional crawl glazes. # # ~Whiting - Flux. Used at all temperatures, and a major ingredient of stoneware glazes. Very large amounts may cause mat glaze.  n Wollastonite - Flux. Useful source of both Calcium and silica. As it contains no carbonates (which burn out during firing), it may be good substitute for whiting in some situations, particularly blue celadons.   Pearl Ash - Flux. Soluble and very caustic material - HANDLE CAREFULLY. Useful to add large amounts of Potassium to a glaze, especially when making frits. Use a high-Potassium frit instead, if possible.   Soda Ash - Flux. Soluble and very caustic material - HANDLE CAREFULLY. Useful to add large amounts of Sodium to a glaze, especially when making frits. Use a high-Sodium frit instead, if possible. Small amounts will deflocculate clays & slips.   Flint - Glass former. A necessary part of most glazes and is often supplied by other ingredients (frits, feldspars, clays). Increasing the amount of silica adds hardness to glazes and reduces crazing. Too much causes shivering and/or devitrification.   Zinc oxide - Flux. Most useful as flux above about 06. May help reduce crazing by reducing thermal expansion. Large amounts may opacify glaze. May have a strong effect on certain colors (e.g. turns Chrome brown). Used in large amounts in crystal glazes.   Tin oxide - Opacifier. Usually used in amounts of 5-10% for white opaque glazes. Use 1-2% in copper reds. Used with Chrome for Chrome-Tin pinks. As Zirconium opacifiers are cheaper, they are often used instead when only opacity is needed.   zRutile - Colorant. Used to produce tans and golden yellows and oranges. Source of Titanium dioxide for crystal formation.  g Titanium dioxide - Opacifier. Yellowish, creamy white as an opacifier. Use in amounts of 5-15%. May induce crystal growth, especially in high Zinc glazes.  } YOpax - Opacifier. Use in amounts of 10-25% for complete opacity. Cheaper than Tin oxide.  G ]Zircopax - Opacifier. Use in amounts of 10-25% for complete opacity. Cheaper than Tin oxide.  G ^Ultrox - - Opacifier. Use in amounts of 10-25% for complete opacity. Cheaper than Tin oxide.  G `Superpax - - Opacifier. Use in amounts of 10-25% for complete opacity. Cheaper than Tin oxide.   `@Pc!icREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect 2,406,272,546 patterns showNamefalsecolors hScroll0backgroundBehaviorfalse cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid6689altId0radioBehaviortrue textStylelockLocfalselabelname group id 6689toolTiplayer78visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1087684545671  Materialsix on mouseup if the optionKey is not down then --put word 2 of clickLine() into myLine put the selectedLine into myChoice put word 2 of myChoice into MyLine put item 1 of line myLine of fld "Materials" into Ingredient delete char 1 of ingredient if ingredient is empty then exit mouseup if ingredient contains ":" then exit mouseup put empty into whichline repeat with i=1 to 14 if line i of field "ingredients" is empty then put i into whichLine exit repeat end if end repeat if whichLine is not empty then put ingredient into line whichLine of field "ingredients" else put "No more room for ingredients." into field "TalkBack" play boing end if else --put word 2 of clickLine() into myLine put the selectedLine into myChoice put word 2 of myChoice into MyLine put item 1 of line myLine of fld "Materials" into myIngredient delete char 1 of myIngredient if myIngredient is empty then exit mouseup if myIngredient contains ":" then exit mouseup find empty find whole myIngredient in fld "IngredInfo" -- hidden field with info on materials if the result is "not found" -- or "ingredientInfo" is not in the foundField then answer "Sorry, no further information is available for " & myIngredient & "." else get (line (word 2 of the foundline) of fld "IngredInfo") if char 1 to (offset(" -",it)-1) of it is not myIngredient then put it into firstFoundLine repeat find whole myIngredient in fld "IngredInfo" if the result is "not found" \ or (line (word 2 of the foundline) of fld "IngredInfo") is firstFoundLine then answer "Sorry, no further information is available for " & myIngredient & "." exit repeat else if char 1 to (offset(" -",(line (word 2 of the foundline) of fld "IngredInfo"))-1) of (line (word 2 of the foundline) of fld "IngredInfo") is not myIngredient then next repeat else answer (line (word 2 of the foundline) of fld "IngredInfo") exit repeat end if end if end repeat else answer it end if end if end mouseup function ClickLine return (trunc(((scroll of the target)+(item two of the clickloc)- (item two of the rect of the target)) div the textheight of the target) + one) end ClickLine  Nclick to add material to ingredient list - option/ALT click for material info*cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth12 textHeight16rect 6,410,268,542multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6664altId298autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name MaterialstoolTipMclick to add material to ingredient list - option/ALT click for material infovGridfalse listBehaviortruelayer79visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339120 $ Alumina: Al2O3 - Stabilizer @*Red @+Red        **Kaolin, (or any clay) Al2O3 2SiO22H2O        # $ ' ( *EPK,    *Georgia Kaolin,      *Calcined Kaolin,     -Ball Clay,  (-Feldspar, (all types) R2OAl2O36SiO2         % & -Frits: (most contain alumina)  -Alumina, Al2O3       -Alumina Hydrate, Al2O33H2O        $-Cryolite, Na3AlF6 used as flux      %-Lepidolite, LiFKFAl2O33SiO2      # -Lithospar,  -Petalite, Li2OAl2O38SiO2         "-Pyrophyllite, Al2O34SiO2H2O           -Spodumene, Li2OAl2O34SiO2          Antimony Oxide: Sb2O3 @*Red @+Red     -Antimony Oxide, Sb2O3 TOXIC         -Naples Yellow stain,   Barium Oxide: BaO - Flux @*Red @+Red   *Barium Carbonate, BaCO3 TOXIC       *-Frit P-626, (a Pemco frit) Ba-Na-B-Al-Si ) )-Frit 3289, (a Ferro frit) Ba-Na-B-Al-Si ( $-Frit 3247, (a Ferro frit) Ba-Al-Si #  $Boron or Boric Oxide: B2O3 - Flux @*Red @+Red @*Red @+Red      *Borax, Na2O2B2O310H2O            -Colemanite, 2CaO3B2O35H2O        **Gerstley Borate, (similar to Colemanite)      *Ferro Frit 3124,  *Ferro Frit 3134,  *Ferro Frit 3110, alkaline frit  *Ferro Frit 3195,  --Other Frits: (many, not all, contain Boron) ,  Calcium Oxide: CaO - Flux @*Red @+Red   *Bone Ash, Ca3(PO3)2            *Dolomite, CaCO3MgCO3       *Whiting, CaCO3     *Wollastonite, CaSiO2     -Fluorspar, CaF2   -Colemanite, 2CaO3B2O35H2O        *-Gerstley Borate, (similar to Colemanite) ) ,-Frits: (some, but not all contain calcium) + (-Calcium Zirconium Silicate: opacifier ' )-Clay, (usually traces)+Al2O32SiO22H2O      " # & ' (-Feldspar, (most contain small amounts) '  (Chromium Oxide: Cr2O3 - Colorant @*Red @+Red @Red      (*Chromium Oxide, (Chromic Oxide) Cr2O3    $ % & -Potassium Dichromate, TOXIC   -Iron Chromate, TOXIC   &NOTE: all chromates are carcenogenic. % 

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize14 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087931063501 $ Metallic Black / ColorList -H3BcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 8,306,164,372multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6703altId140autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name ColorListtoolTipvGridfalse listBehaviorfalselayer81visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088659084482 $ Copper Carbonate Magganese Carbonate Colbalt Carbonate  0 ColorAmts -H3@BcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect162,306,226,372multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6704altId140autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name ColorAmtstoolTipvGridfalse listBehaviorfalselayer82visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088659132320 $ 4.00 4.00 2.00  Al mX  on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat send mouseup to bkgnd Button "si/al" end closefield Z&. cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 346,38,392,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6612altId263autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAltoolTipvGridfalse listBehaviorfalselayer83visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339061 $ 0.631  Si mX  on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat send mouseup to bkgnd Button "si/al" end closefield &.  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 430,38,476,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6619altId267autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSitoolTipvGridfalse listBehaviorfalselayer84visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339068 $ 3.571  Ti mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield 2.  cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 430,50,476,63multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6620altId268autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameTitoolTipvGridfalse listBehaviorfalselayer85visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339069 $ 0.001  Zr mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield ?. GcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 430,63,476,76multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6622altId327autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameZrtoolTipvGridfalse listBehaviorfalselayer86visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339071 $  Sn mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield J. HcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 430,74,476,87multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6623altId328autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSntoolTipvGridfalse listBehaviorfalselayer87visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339072 $  Mn mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield V. IcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 430,86,476,99multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6624altId329autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameMntoolTipvGridfalse listBehaviorfalselayer88visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339073 $  F mX on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield b. JcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect430,98,476,111multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6625altId330autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameFtoolTipvGridfalse listBehaviorfalselayer89visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339074 $  RO2MX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseup Black(2IcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect426,40,476,113multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6628altId287autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameRO2toolTipvGridfalse listBehaviorfalselayer90visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339077 $ 3.282 @black @black @black @black @black  =Materials in Inventorye --on mouseUp -- set cursor to watch -- if the hilite of me is false -- then -- lock screen -- set the showname of me to true -- set the style of me to opaque -- set the hilite of me to true -- show cd fld "MaterialsInventory" -- show btn "update List" -- else -- lock screen -- set the showname of me to false -- set the style of me to transparent -- set the hilite of me to false -- hide cd fld "MaterialsInventory" -- hide btn "update List" -- end if --end mouseUp Bclick on any ingredient in this list and it will be entered aboveQMaterials in InventorycREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect270,390,514,410 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6717altId81 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameMaterials in Inventoryicon0toolTipAclick on any ingredient in this list and it will be entered abovelayer91 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089387961606 >FindE --on mouseUp -- find empty -- ask "What do material you want to find in the Inventory list below?" -- if it is empty then exit mouseup -- find string it in cd field "materialsInventory" -- if the result is not empty then select the foundline --end mouseUp on mouseUp global gCalculatorFindString if gCalculatorFindString is not empty then put gCalculatorFindString into FindWhat else put empty into FindWhat ask "What do material you want to find in the Materials in Inventory list below?" with FindWhat if it is empty then exit mouseup else put it into gCalculatorFindString find string it in cd field "materialsInventory" if the result is not empty then answer "'" & it & "' was not found." end if end mouseUp 0&finds an ingredient in the list below+cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect465,390,513,410 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6718altId299 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameFindicon0toolTip%finds an ingredient in the list belowlayer92 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089387961607 R2O3MX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseup BlackX(1WcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect344,40,393,127multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6627altId283autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2O3toolTipvGridfalse listBehaviorfalselayer93visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1087841339076 $ 0.490 @black 0.330 @black 0.001 @black @black @black @black  R Quantity2 l( ffSAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect 226,81,254,96multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6738altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity2toolTipvGridfalse listBehaviorfalselayer94visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415871126 $  S Quantity3 l( ffcAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,97,254,112multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6739altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity3toolTipvGridfalse listBehaviorfalselayer95visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415875211 $  T Quantity4 l( ffsAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,113,254,128multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6740altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity4toolTipvGridfalse listBehaviorfalselayer96visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415877980 $ -1  U Quantity5 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,129,254,144multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6741altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity5toolTipvGridfalse listBehaviorfalselayer97visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415882494 $  V Quantity6 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,145,254,160multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6742altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity6toolTipvGridfalse listBehaviorfalselayer98visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415886278 $  W Quantity7 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,161,254,176multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6743altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity7toolTipvGridfalse listBehaviorfalselayer99visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415892074 $  X Quantity8 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,177,254,192multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6744altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity8toolTipvGridfalse listBehaviorfalselayer100visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415896264 $  Y Quantity9 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,193,254,208multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6745altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity9toolTipvGridfalse listBehaviorfalselayer101visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415899313 $  Z Quantity10 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,209,254,224multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6746altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity10toolTipvGridfalse listBehaviorfalselayer102visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415903035 $  [ Quantity11 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,225,254,240multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6747altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity11toolTipvGridfalse listBehaviorfalselayer103visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415906268 $  \ Quantity12 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,241,254,256multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6748altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity12toolTipvGridfalse listBehaviorfalselayer104visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415910270 $  ] Quantity13 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,257,254,272multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6749altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity13toolTipvGridfalse listBehaviorfalselayer105visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415914383 $  ^ Quantity14 l( ffAcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect226,273,254,288multipleHilitesfalse patterns colors 204,204,204 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6750altId321autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Quantity14toolTipvGridfalse listBehaviorfalselayer106visibletrue cantSelectfalse borderWidth1margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089415917685 $   HC Iconsi U@ calculator D  000000N00)0/0000/0 00 00 0/00 00)0)00p 000000N00)0/0000/0 00 00 0/00 00)0)00ptHG Next Arrow D@ ?  /((N(((((((((((((((((((((/???  /((N(((((((((((((((((((((/??FHG Prev Arrow D` ?  /((N(((8(x((((((((((((x(8((((/???  /((N(((8(x((((((((((((x(8((((/??)9NoIcon D xNoLead D `p08  80p``p08  80p`  `p08  80p``p08  80p` N White Home D f4p`> 0c À` !ssccf4p`> 0c À` !ssccA4Tiny Up Arrow D A5tiny down arrow D Good Question D @f@OH'H'H'H?'Hx<'H'I'C㏇GO_O?GCI'H'H'H

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1087937368550 $ X10-6/C    &Calcmx on mouseup set the visible of stack "materials" to false if the hilite of btn "Graph UMF" is true then send mouseup to btn "Graph UMF" if the label of btn "Percent" is "%" then answer "This glaze has been calculated to a percentage recipe." & return & "Please click 'Clear Amts' to recalculate or add ingredients." exit mouseup end if calcglaze formatUMFcalc end mouseup on formatUMFcalc repeat with i=1 to the number of lines of fld "R2O" if char 1 of line i of fld "R2O" is "-" then set the textColor of line i of fld "R2O" to "red" end if end repeat repeat with i=1 to the number of lines of fld "R2O3" if char 1 of line i of fld "R2O3" is "-" then set the textColor of line i of fld "R2O3" to "red" end if end repeat repeat with i=1 to the number of lines of fld "RO2" if char 1 of line i of fld "RO2" is "-" then set the textColor of line i of fld "RO2" to "red" end if end repeat end formatUMFcalc \%click to calculate this glaze recipe CalculatecREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect264,192,368,224 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6694altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameCalcicon0toolTip$click to calculate this glaze recipelayer117 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaulttrue menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087939974876 ' Clear AmtsEp'on mouseup clearAmounts put empty into fld "amounts" set the label of btn "Percent" to "Wt." resetUMFcalc end mouseup on resetUMFcalc set the textColor of fld "R2O" to "Black" set the textColor of fld "R2O3" to "Black" set the textColor of fld "RO2" to "Black" end resetUMFcalc \Eclears the calculated recipe amounts, but leaves UMF and ingredientscREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect264,229,368,253 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6695altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruename Clear Amtsicon0toolTipDclears the calculated recipe amounts, but leaves UMF and ingredientslayer118 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1087956610401 (GlazeCalcMenubarI cREVTempMaster# traversalOnfalse dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -3,-5,239,23 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid6696altId0radioBehaviortrue textStyleboldlockLocfalselabelnameGlazeCalcMenubartoolTiplayer119visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize12 disabledfalse textFontArialvScroll0hilitedButton0 cREVGeneral revUniqueID 1088031137144)FileUr--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Open" answer file "Select the HyperGlaze stack to open:" of type "RSTK" if it is empty then exit menuPick open stack it show stack it break case "Close" close stack the topstack break case "Save" set the cursor to watch save stack "Glazes" save stack "Glaze Index" save stack "Materials" save stack "Materials Index" save stack "clays" save stack "clay Index" save stack "Glaze Limits" save stack "Glaze Calculator" break case "Import" send mouseup to btn "import Glaze File" --hidden break case "Export" saveAsGlazeFile break case "Page Setup" answer printer break case "Print Card" open printing with dialog print this card close printing break case "Quit" -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- if it is "Save" then -- set the cursor to watch -- save stack "Glazes" -- save stack "Glaze Index" -- save stack "Materials" -- save stack "Materials Index" -- save stack "clays" -- save stack "clay Index" -- save stack "Glaze Limits" -- save stack "Glaze Calculator" -- end if quit break end switch end menuPick  FileB&Open/0 &Close/W - &Save/S (- Page Setup &Print Card/P (- &Quit/QcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 1,-1,33,19 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6697altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameFileicon0toolTiplayer120 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextA&Open/0 &Close/W - &Save/S (- Page Setup &Print Card/P (- &Quit/Q shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088031137145 *EditU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Undo" undo break case "Cut" cut break case "Copy" Copy break case "Paste" if the clipboard is "text" then paste break case "Clear" delete break case "New Card" create card break case "Delete Card" answer "Delete this Glaze recipe permantly?" with "Delete" or "Cancel" if it is "Delete" then delete this card break case "Duplicate Card" copy card paste card break case "Preferences" open stack "Preferences" break end switch end menuPick !!Edit7Undo/Z (- Cu&t/X &Copy/C &Paste/V Clea&r - PreferencescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 33,-1,66,19 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6698altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameEditicon0toolTiplayer121 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext6Undo/Z (- Cu&t/X &Copy/C &Paste/V Clea&r - Preferences shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088031137146 +GoU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Go Back" go back break case "Go Forward" go forward break case "index" open stack "HyperGlaze" show stack "HyperGlaze" break case "Glazes" open stack pWhich show stack pWhich break case "Glaze Index" open stack pWhich show stack pWhich break case "Glaze Limits" open stack pWhich show stack pWhich break case "Glaze Calculator" open stack pWhich show stack pWhich break case "Clays" open stack pWhich show stack pWhich break case "Clay Index" open stack pWhich show stack pWhich break case "Materials" open stack pWhich show stack pWhich break case "Materials Index" open stack pWhich show stack pWhich break case "Unity Explained" open stack pWhich show stack pWhich break case "Bibliography" open stack pWhich show stack pWhich break case "QuadBlender" open stack pWhich show stack pWhich break case "Potter's Friend" open stack pWhich show stack pWhich break end switch end menuPick BGoGo &Back/[ Go &Forward/] (- Index (- Glazes Glaze Index (- Glaze Limits (Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography (- Bibliography Unity Explained QuadBlender Potter's FriendcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 66,-1,94,19 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6699altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameGoicon0toolTiplayer122 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextGo &Back/[ Go &Forward/] (- Index (- Glazes Glaze Index (- Glaze Limits (Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Unity Explained Bibliography (- Bibliography Unity Explained QuadBlender Potter's Friend shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088031137147 ,Glaze CalculatorU--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Calculate" send mouseup to btn "calc" break case "Clear Amounts" clearAmounts put empty into fld "amounts" break case "Clear Ingredients" ClearIngredients break case "Clear Unity" ClearUnity break case "Clear ALL" ClearRecipe break case "Clear USE column" clearUSE break case "Convert to Percentage" FindPercentRecipe break case "Send Recipe to Glazes" SendToGlazes break case "Send Analysis to Limits" SendToLimits break case "Combine K and Na" send mouseup to btn "Combined K & Na" break end switch end menuPick ^gGlaze CalculatorCa&lculate/= (- Clear Amounts (- Clear Ingredients Clear Unity Clear ALL Clear USE column (- Convert to Percentage (- Send Recipe to Glazes Send Analysis to Limits (- Combine K and NacREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 94,-1,197,19 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6700altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameGlaze Calculatoricon0toolTiplayer123 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines14margins4opaquetrue accelModstextCa&lculate/= (- Clear Amounts (- Clear Ingredients Clear Unity Clear ALL Clear USE column (- Convert to Percentage (- Send Recipe to Glazes Send Analysis to Limits (- !cCombine K and Na shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088031137148 -HelpUF--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Help with HyperGlaze" open stack "HyperGlaze Help" show stack "HyperGlaze Help" break case "About HyperGlaze" open stack "HG Splash" Show Stack "HG Splash" break end switch end menuPick &Help*&Help with HyperGlaze - &About HyperGlazecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 197,-1,235,19 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6701altId0 labelWidth0 accelKey armedIcon0 textStylelockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameHelpicon0toolTiplayer124 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext)&Help with HyperGlaze - &About HyperGlaze shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088031137149 .Percent% |on mouseup if the label of me is "Wt." then FindPercentRecipe --set the label of me to "%" end if end mouseup $"%click to convert to percentage batch%cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect220,288,254,312 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6702altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelWt. autoHilitetruestyle transparent disabledIcon0 armBordertruenamePercenticon0toolTip$click to convert to percentage batchlayer125 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088538825273 2 Graphic 1KF %p'z'cREVTempMaster, traversalOnfalseinksrcCopythreeDtrue startAngle0rect12,294,124,298angle0filledtrue patterns showNamefalsecolors arcAngle360 dontResizefalse startArrowfalsepoints14,296 122,296id6706 markerDrawnfalse arrowSize3altId0 markerFilledfalsemarkerLineSize1 textStylelockLocfalse roundRadius15labelstyleline endArrowfalse markerPointsdashesname Graphic 1toolTip lineSize2 polySides4layer127visibletrue cantSelectfalse borderWidth2margins4 roundEndstrueopaquetrue showBorderfalse textSize disabledfalse textFontshowFocusBordertrue cREVGeneral revUniqueID 1088659355106 6Label4  80amounts are calculatedcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 166,56,214,70multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6710altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel4toolTipamounts are calculatedvGridfalse listBehaviorfalselayer128visibletrue cantSelectfalse borderWidth2margins2 htmlText

Amount:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088660062755 Amount: 8Label2  ff7@cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect224,310,244,374multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6712altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel2toolTipvGridfalse listBehaviorfalselayer129visibletrue cantSelectfalse borderWidth2margins2 htmlText#

%

%

%

%

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088660286758 % % % %9Percentage AnalysisE -on mouseup percentageAnalysis end mouseup w+percentage analysis for this unity formulacREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect374,147,510,165 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6713altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenamePercentage Analysisicon0toolTip*percentage analysis for this unity formulalayer130 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088661257953 :% BatchEpon mouseup resetUMFcalc FindPercentRecipe end mouseup on resetUMFcalc repeat with i=1 to the number of lines of fld "R2O" set the textColor of line i of fld "R2O" to "black" end repeat repeat with i=1 to the number of lines of fld "R2O3" set the textColor of line i of fld "R2O3" to "black" end repeat repeat with i=1 to the number of lines of fld "RO2" set the textColor of line i of fld "RO2" to "black" end repeat end resetUMFcalc \Hcalculates a percentage batch after all unity calculations are finishedcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect264,258,368,282 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6714altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruename% Batchicon0toolTipGcalculates a percentage batch after all unity calculations are finishedlayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088661365487 5Label4 H ff 8b4type the ingredients to use in the calculation herecREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 12,56,84,70multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6709altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel4toolTip3type the ingredients to use in the calculation herevGridfalse listBehaviorfalselayer5visibletrue cantSelectfalse borderWidth2margins2 htmlText

Ingredient list:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088660011353 INGREDIENT LIST: 7 USELabel  ff8Flimits amount of a material added - must be a decimal between 0 and 1cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 228,56,258,70multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6711altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel5toolTip:limits amount of a material added -must be between 0 and 1vGridfalse listBehaviorfalselayer4visibletrue cantSelectfalse borderWidth2margins2 htmlText

USE:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088660086025 USE: 3Label1 H ffHcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,26,78,40multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6707altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel1toolTipvGridfalse listBehaviorfalselayer3visibletrue cantSelectfalse borderWidth2margins2 htmlText

Glaze name:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088659916410 Glaze name: 4Label3 H ff(cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 212,26,252,40multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6708altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel3toolTipvGridfalse listBehaviorfalselayer2visibletrue cantSelectfalse borderWidth2margins2 htmlText

Cone:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088659940894 Cone:Bsourceseo  -click on any material below to add to recipeSources of Ceramic Oxides: cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 4,390,268,410 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6722altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelSources of Ceramic Oxides: autoHilitetruestyle rectangle disabledIcon0 armBordertruenamesourcesicon0toolTip,click on any material below to add to recipelayer132 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089389077011 CbigSmallWindowCon mouseup if the platform is "MacOS" then put 365 into myMinHeight put 525 into myMaxHeight else -- for Windows with menus in window put 390 into myMinHeight put 550 into myMaxHeight end if if the icon of me is 201186 then set the icon of me to 200951 revChangeWindowSize 518,myMinHeight else set the icon of me to 201186 revChangeWindowSize 518,myMaxHeight end if end mouseup t &click to show or hide materials listscREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 2,372,28,384 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6723altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle transparent disabledIcon0 armBordertruenamebigSmallWindowicon201186toolTip%click to show or hide materials listslayer133 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089389662218 _bkgnd image id 2114 DC tPNG  IHDRC{FgAMA=-fPLTEٟtRNS0J IDATx휁vD{W[CSK=ݞE[N-җoۻVf`XS>, /HPeUy5gVAIJ|ڟ",:՘-+Csbyg.O#]?(29+-iaPFYkʜb%*@ xeN Lxڟ"} )@x!pby uiڶ %dX(@T❂ \NTF/Sz^PT= ^CM\%)7m[ -To`%9Z/UE/⾰lF(@1ڡQsp P~ZU}\!"Qd puUKh*z GCLuv:#'(> \N[ T_)?G(ax DCSWʓs ePCFgHo% &zWJ^Ix 0W^ HʒKAZxv+egm]_3Ev vHeiT<^@SQ ^h7up@)4@ }2*: ]k]>X T`̪(QZa/,ƪGSObG#*0@ÒH^@#fgītP-:7ѩb*p}?G>@NF;p[R @aVPlݺ:k PBV>XE# pT~YY[xU;#6T  2'ܟGι}}߯=՟g艝U0* lld%yn7%VO@Ϭ Kr #BHkݛx}y7:P4Xdvn7b, 2XV L/%Ub 7:HE6T?\k@*A=7Q b@P20e;Xq{SnCR@f3g{b/\I`kpY:$@q;7kG}Az)HF#bݷ?a K@p5)^gJTFx@ kj#:Re{.XX+9@YRPe(V+RQlVZWO&d4'Vj={i A{)fz1h 4,)܏TtX~1"P\f 9=?Ia]>O:͌>ENdTs p TN//* ^4^z 20m` s֪衝o^zQg#+DC+YTQJnC=Ѫ{(TQ19oQEP)L oթ~*@9UϷ/UTBѯgU\m=8@oKl?S-.*(D{ѿ'vSzV'0 D(ѳ:Ma8*,zVxzZ`zXg~=(Vhʤ3XR`[t4L:S#M( LU/`fEKw~}^Q\HOr!轝m뿟=}f;Eߏnˑ+6G[:+G4Oxw>lejG@Pl׽^и PTK<$9` Eoxj' #CЃ+4eҙNg e%0iά5e۽۽۽۽@^/͙u⍠fV@_3D\I ̮20/3Mv$yxxxWhXtN*b Is 2\ӎ\ + HS&*u4f9U??*| X ]aYiJGiʤ35鸥۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽۽=w\`.0 s\`.0 s\`.0 s\`.0 s\`.0 s\`.0 s\`.0 ss`5 IENDB`cREVTempMaster traversalOnfalsepalindromeFramesfalse repeatCount0inksrcCopysize2950threeDtrue blendLevel50rect 2,22,514,345angle0namebkgnd image id 2114hotSpot1,1 fileNamecolorstoolTip alwaysBufferfalselayer1 dontDitherfalsevisibletrue cantSelectfalse borderWidth2opaquetrueyHot1id6751 currentFrame1altId0 showBorderfalse disabledfalsexHot1 frameCount0 constantMaskfalseshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1090010131522`CaAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~A$}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092776761748 aMgAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9M}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092780113480 bLiAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9Y}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092780117767 cBaAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9e}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092780120980 dPbAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9q}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092780123502 eZnAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9}}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092780126651 fCuAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092780133594 gCoAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092780138204 hNiAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092780144820 iSrAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~9}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092780148324 j Graph UMF`E & on mouseUp set cursor to watch set hilite of me to not hilite of me put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr" into RO put "Al,B,Fe,P,Sb,Cr,V" into R2O3 put "Si,Ti,Zr,Sn,Mn,F" into RO2 if the hilite of me is true then --hide fld "R2O" --hide fld "R2O3" --hide fld "RO2" show btn "UMFHide1" show btn "UMFHide2" show btn "UMFHide3" --show btn "MatGloss" repeat with i=1 to 12 show btn (item i of RO) graph (fld (item i of RO)),item i of RO end repeat repeat with i=1 to 7 show btn (item i of R2O3) graph (fld (item i of R2O3)),item i of R2O3 end repeat repeat with i=1 to 6 show btn (item i of RO2) graph (fld (item i of RO2)),item i of RO2 end repeat show btn "SiRatio" put fld "Al" into myAl if myAl>0 then graph (fld "Si"/myAl),"SiRatio" else graph 0,"SiRatio" else repeat with i=1 to 12 hide btn (item i of RO) end repeat hide btn "Sr" repeat with i=1 to 7 hide btn (item i of R2O3) end repeat repeat with i=1 to 6 hide btn (item i of RO2) end repeat hide btn "SiRatio" hide btn "UMFHide1" hide btn "UMFHide2" hide btn "UMFHide3" -- hide btn "matGloss" -- show fld "R2O" -- show fld "R2O3" -- show fld "RO2" end if end mouseUp on adjustGraph set cursor to watch put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr" into RO put "Al,B,Fe,P,Sb,Cr,V" into R2O3 put "Si,Ti,Zr,Sn,Mn,F" into RO2 repeat with i=1 to 12 graph (fld (item i of RO)),(item i of RO) end repeat repeat with i=1 to 7 graph (fld (item i of R2O3)),(item i of R2O3) end repeat repeat with i=1 to 6 graph (fld (item i of RO2)),(item i of RO2) end repeat put fld "Al" into myAl if myAl>0 then graph (fld "Si"/myAl),"SiRatio" else graph 0,"SiRatio" end adjustGraph on graph what,where send ("AdjustBar " & what) to btn where end graph =#shows unity formula as a bar graphcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 446,81,522,95 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors141,3,3 187,231,229 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1073altId133 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruename Graph UMFicon0toolTip"shows unity formula as a bar graphlayer106 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092780414950 k UMFHide1`AG)1 cREVGeneral revUniqueID 1092781223028 l UMFHide2`AGX*/T cREVGeneral revUniqueID 1092781304952 m UMFHide3`AG)/T cREVGeneral revUniqueID 1092781328540 nNaAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~95}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092781442393 oKAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 260 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 313 into minHt put 50 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2~~,* }cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092781448172 qAlA[on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1.5 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2z)}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092781482472 rBA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 3 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 23333ffffff5}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092781622157 sSiAYon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 7 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2333333ffff33) }cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092781809044 tFeA[on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33A}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092781955360 uPA[on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33M}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092782074885 vSbA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33Y}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092782077796 wCrA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33e}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092782081415 xVA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 345 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 393 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33q}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092782085212 yTiA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff335}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092782116957 zZrAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33A}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092782130175 {SnAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33M}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092782134084 |MnAZon adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33Y}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092782138522 }FA\on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 1 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2ff3333ffff33f}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect345,129,346,137armFillfalse patterns visitedIcon0colors 189,0,0 254,2,0 126,0,0 showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitefalselabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBordertrueicon0nameCatoolTip accelTextlayer42 borderWidth2 cantSelectfalsevisiblefalse menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092782144925 ~SiRatioA]on adjustBar newPct put the short name of me into myBtn -- Set these parameters to be specific to your needs, same as above put 428 into maxHt -- these are the max/min pixel locations of the TOP of the graph bar put 476 into minHt put 48 into totHt -- total pixel height of bar graph put 16 into MaxCount -- this is the maximum amount the graph will register in whatever units --end parameters put the right of cd btn myBtn into MyBase put the top of cd btn myBtn into myTop put the right of cd btn myBtn into myRight put the bottom of cd btn mybtn into myBottom put myBase-((newPct/MaxCount)*totHt) into myHeight put round(myHeight) into myHeight if myHeightminHt then put minHt into myHeight set the rectangle of cd btn myBtn to myHeight,myTop,myRight,myBottom end adjustBar 2̙ffs}cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect345,129,346,137 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 189,0,0 254,2,0 126,0,0 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId125 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer42 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1092782149884  Simplify UMF`E & on mouseUp global gSimplifyUMFCalc send mouseup to btn "SimplifyUMF" of cd "Calc Prefs" of stack "Preferences" if gSimplifyUMFCalc is true then set the hilite of me to true else set the hilite of me to false end mouseUp wK0.002 and field "Li" >0.002 then put "Lithium oxide & Strontium oxide" into CalcProblems else if field "Li" >0.002 then put "Lithium oxide" into CalcProblems if field Sr >0.002 then put "Strontium oxide" into CalcProblems end if if calcProblems is not empty then put "This formula contains " & calcProblems & "." & return & "Thermal expansion calculations are not accurate."\ & return & "The thermal expansion should be lower with increasing" & return & "amounts, but large amounts may have an unpredictable effect." & return\ into TEdialog end if send mouseup to bg btn "Si/Al" if fld "Si/Al" < 5 then put "This glaze has a low Si/Al ratio and will probably have a MATTE surface," & return & \ "and thermal expansion calculations will not be accurate." after TEdialog end if answer TEdialog end mouseup [z,estimated thermal expansion is not accurate cREVGeneral revUniqueID 1093812391395 animatedexclamation1.gif@:200954GIF89a3f3333f333ff3fffff3f3f̙3f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙333333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffffff3fffffff3fff̙ffff3fffff3f̙3333f33̙3ff3ffff̙f3f̙3f̙̙3f̙3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3f(((444@@@LLLXXXdddppp|||𠠤! NETSCAPE2.0!,i H*\tZΛ%v[8H4RA%9&ʙ/MN ̘{FП@DTCJ*ëX҄!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,u H*\tZ--7WvR#Bv)2ĒQR2$A*k(sĚ{sϣYF4:q(ўMidҕիXftȵW߉K컀!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,i H*\tZΛ%v[8H4RA%9&ʙ/MN ̘{FП@DTCJ*ëX҄!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,u H*\tZ--7WvR#Bv)2ĒQR2$A*k(sĚ{sϣYF4:q(ўMidҕիXftȵW߉K컀; cREVGeneral revUniqueID 1093812469123 1Label2 H ff(vcolorants are not calculatedcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 4,298,122,312multipleHilitesfalse patterns colors102,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6705altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel2toolTipcolorants are not calculatedvGridfalse listBehaviorfalselayer126visibletrue cantSelectfalse borderWidth2margins2 htmlText

Colorants in this glaze:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088659266463 Colorants in this glaze:i8 cREVGeneral revUniqueID 1109835458825FindE on mouseUp global gCalculatorFindString if gCalculatorFindString is not empty then put gCalculatorFindString into FindWhat else put empty into FindWhat ask "What do material you want to find in the Sources of Ceramic Oxides list below?" with FindWhat if it is empty then exit mouseup else put it into gCalculatorFindString find string it in field "materials" if the result is not empty then answer "'" & it & "' was not found." end if end mouseUp 0&finds an ingredient in the list below+cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect465,390,513,410 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6718altId299 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameFindicon0toolTip%finds an ingredient in the list belowlayer92 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1109835346216 Compare Glazes3 on openstack if the platform is "MacOS" then put 420 into myMinHeight else -- if the platform is Win32 -- Windows with menus in window put 445 into myMinHeight end if revChangeWindowSize 340,myMinHeight end openstack TCompare GlazesTTWArial UArialUArial W helvetica U helvetica UArial WArial WArial WArial ULucida GrandeW helvetica UArialW helvetica W helveticaWArial WLucida GrandecREVTempMaster+windowManagerPlacefalsemenubarlinkHiliteColorrect627,173,967,593 maxWidth340 cantAbortfalse patterns colors decorations)title,menu,minimize,maximize,close,systemlinkVisitedColoriconicfalseshadowtrue cantDeletefalseid1027altId0 hcAddressingfalsestartUpIconicfalse windowShape0titleCompare Glazes linkColor textStyle cantModifyfalseunderlineLinks maxHeight420styletopleveldestroyWindowfalse password liveresizingfalsescroll0passkey resizabletruenameCompare Glazesicon0formatForPrintingfalse alwaysBuffertruevisibletruemetalfalse minWidth340 textSize destroyStackfalse textFont minHeight400 dynamicPathsfalsecREVGeometryCachestackID1027 cREVGeneral @TcREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,340,420name card id 1002 patterns defaultButtoncolors layer1 borderWidth2 cantDeletefalseid1002altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs108891524662410271088915079004102510889042550381012108890694613010201088904281636101310889040523181007108890450521710151088904858045101610889048580461017108890507242010191088904255013101110889040285721006108890433086510141088912104904102210889152174891026108891274176510241088903956047100410889041759361008108890417593710091088904175938101010889039402411003108891214891010231088912028015102110889039807191005cREVGeometryCacheorder total24i VcREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -4,10,338,416 patterns showNamefalsecolors hScroll0backgroundBehaviorfalse cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1024altId0radioBehaviortrue textStylelockLocfalselabelname group id 1024toolTiplayer1visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton0 cREVGeneral revUniqueID 1088912741765 NameiXon closefield put stripSpaces(fld 1) into fld 1 put stripReturns(fld 1) into fld 1 pass closefield end closefield on openfield click at 300,48 end openfield @DcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 0,14,324,44multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1003altId1autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNametoolTipvGridfalse listBehaviorfalselayer2visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088903940241  Bright Blue Green  IngredientsmH @.cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,46,168,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name IngredientstoolTipvGridfalse listBehaviorfalselayer3visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088903956047  Nepheline Syenite Barium carbonate AmountsmH @.HcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,46,236,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1005altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameAmountstoolTipvGridfalse listBehaviorfalselayer4visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088903980719  50.00 50.00 coneiXon closefield set cursor to watch put AddSpaces(fld "Cone") into fld "Cone" pass closefield end closefield function addSpaces myText put false into CheckNext repeat with i= the number of chars of myText down to 1 get char i of myText -- if it is not in "a0123456789,- " -- then answer "Please use only numbers (0-9) and ',' or '-' in the cone field" if checkNext then if it is not " " then put " " after char i of myText put false into CheckNext if it is "-" then if char i+1 of myText is not " " then put " " after char i of myText put true into checkNext end if if it is "," then if char i+1 of myText is not " " then put " " after char i of myText end if end repeat return myText end addSpaces@0RB-cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect244,48,326,114multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1006altId45autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameconetoolTipvGridfalse listBehaviorfalselayer5visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904028572   6 label H @&& cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 234,38,272,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1007altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer6visibletrue cantSelectfalse borderWidth2margins6 htmlText

Cone:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904052318 Cone: R2OX  @*%cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect 3,260,45,412multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1008altId37autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2OtoolTipvGridfalse listBehaviorfalselayer7visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904175936  0.067 0.217 0.017 0.003 0.696 R2O3l  @H*V&cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect72,260,114,346multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1009altId38autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameR2O3toolTipvGridfalse listBehaviorfalselayer8visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904175937  0.313 0.001 RO2l  @*V'cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight12rect145,260,187,346multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1010altId39autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameRO2toolTipvGridfalse listBehaviorfalselayer9visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904175938  1.386 4.4:1  ColorantsmH @:cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,178,168,236multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1011altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorantstoolTipvGridfalse listBehaviorfalselayer10visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904255013  Bentonite Copper Carb  ColorAmtsmH @H<cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,178,236,238multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1012altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorAmtstoolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904255038  3.00 1.50 PercentAnalysish@_cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight15rect238,134,333,380multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1013altId148autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namePercentAnalysistoolTipvGridfalse listBehaviorfalselayer12visibletrue cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904281636   34.27 % SiO2    13.14 % Al2O3      2.60 % K2O     5.54 % Na2O     0.39 % CaO  0.05 % MgO  43.95 % BaO  0.07 % Fe2O3     CloseEwkon mouseup set cursor to watch save stack "Compare Glazes" close stack "Compare Glazes" end mouseup  >cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect266,390,328,410 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1014altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameCloseicon0toolTiplayer13 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088904330865  ROLabels  @!-cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 33,264,78,406multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1015altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameROLabelstoolTipvGridfalse listBehaviorfalselayer14visibletrue cantSelectfalse borderWidth2margins8 htmlText

K2O

Na2O

CaO

MgO

Li2O

BaO

PbO

ZnO

CuO

CoO

NiO

SrO

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904505217 K2O    Na2O    CaO MgO Li2O    BaO PbO ZnO CuO CoO NiO SrO  R2O3Labels  @e3_cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect101,264,152,359multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1016altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0name R2O3LabelstoolTipvGridfalse listBehaviorfalselayer15visibletrue cantSelectfalse borderWidth2margins8 htmlText-

Al2O3

B2O3

Fe2O3

P2O3

Sb2O3

Cr2O3

V2O5

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904858045 Al2O3     B2O3     Fe2O3     P2O3     Sb2O3     Cr2O3     V2O5      RO2Labels  @=^cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect173,264,234,358multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1017altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0name RO2LabelstoolTipvGridfalse listBehaviorfalselayer16visibletrue cantSelectfalse borderWidth2margins8 htmlText

SiO2

TiO2

ZrO2

SnO2

MnO2

F

Si:Al Ratio

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088904858046 SiO2   TiO2   ZrO2   SnO2   MnO2   F Si:Al RatioUnity Molecular Formula (UMF)o  cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect12,248,230,263 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1019altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameUnity Molecular Formula (UMF)icon0toolTiplayer17 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins2opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088905072420 Get Current GlazeExjon mouseup global gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeName,gGlazeCone,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion if gGlazeName is empty then send makeGlazeGlobals to stack "Glazes" put gGlazeName into fld "name" put gIngredList into fld "Ingredients" put gColorList into fld "colorants" put gIngredAmounts into fld "Amounts" put gColorAmts into fld "colorAmts" put gGlazeCone into fld "Cone" put gR2O into fld "R2O" put gR2O3 into fld "r2o3" put gRO2 into fld "ro2" put gThermExpansion into fld "thermalExpansion" put gPercent into fld "PercentAnalysis" formatPercentageAnalysis end mouseup on formatPercentageAnalysis -- formats chemical subscripts of oxides repeat with i=1 to the number of lines of fld "percentAnalysis" get offset ("2", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("3", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("5", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if end repeat end formatPercentageAnalysis R|cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect82,380,228,404 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameGet Current Glazeicon0toolTiplayer18 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize11 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont Lucida GrandeshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088906946130 label H @4cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,166,58,180multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1021altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer19visibletrue cantSelectfalse borderWidth2margins6 htmlText

Also add:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088912028015 Also add: label H @&BcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,38,68,52multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1022altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer20visibletrue cantSelectfalse borderWidth2margins6 htmlText

Ingredients:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088912104904 Ingredients: label H @tfcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect232,116,334,132multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1023altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer21visibletrue cantSelectfalse borderWidth2margins6 htmlText

Percent Analysis:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088912148910 Percent Analysis: label H @ hcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect12,231,116,246multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1026altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer22visibletrue cantSelectfalse borderWidth2margins6 htmlText

Thermal Expansion:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088915217489 Thermal Expansion: label  @NcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect146,228,224,248multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1027altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer23visibletrue cantSelectfalse borderWidth2margins6 htmlTextm

x 10-6 deg. C

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088915246624 x 10-6 deg. C      ThermalExpansion, @s$cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect115,231,151,247multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1025altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameThermalExpansiontoolTipvGridfalse listBehaviorfalselayer24visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1088915079004  10.89 X Glaze Limits-- 1988-2004 Richard Burkett, All scripts -- All Rights Reserved Worldwide --on shutdownRequest -- pass shutdownRequest to top --end shutdownRequest on openstack go to first card if the visible of btn "done" is true then send mouseup to button "done" -- then adjust the size of the window if the platform is "MacOS" then put 315 into myMinHeight put 388 into myMaxHeight else -- for Windows with menus in window put 340 into myMinHeight put 413 into myMaxHeight end if if the icon of btn "bigSmallWindow" is not 201186 then revChangeWindowSize 518,myMinHeight else set the icon of btn "bigSmallWindow" to 201186 revChangeWindowSize 518,myMaxHeight end if end openstack on SendToGlazeCalculator Answer "Erase current glaze analysis in the Glaze Calculator?" & return & "This glaze analysis will replace it." with "Cancel" or "Erase" if it is "Cancel" then exit SendToGlazeCalculator put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb,B,Al,P,Si" into MyOxideList put cd fld "cone" into myCone put cd fld "Name" into myGlazeName put empty into myAnalysis if the visible of btn "Na" is false then send mouseup to btn "Combined K & Na" repeat with i=1 to 13 put cd fld (item i of MyOxideList) & return after myAnalysis end repeat go to stack "Glaze Calculator" show stack "Glaze Calculator" send mouseup to btn "Clear Amts" put myGlazeName into fld "GlazeName" put myCone into fld "cone" if the visible of btn "KNaO" then send mouseup to button "Combined K & Na" repeat with i=1 to 13 if line i of MyAnalysis>0 then put line i of myAnalysis into fld (item i of myOxideList) else put empty into fld (item i of myOxideList) end repeat send doThermalExpansion to stack "Glaze Calculator" end SendToGlazeCalculator function stripReturns myText repeat the number of lines of myText put offset(return,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat repeat the number of lines of myText put offset(lineFeed,myText) into myReturn if myReturn >0 then put " " into char myReturn of myText else exit repeat end repeat return myText end stripReturns function StripTabs myText repeat put offset(Tab,myText) into myTab if myTab >0 then put "" into char myTab of myText else exit repeat end repeat return myText end StripTabs on startup global Mylevel put the userlevel into myLevel go to cd "title" global verNum put "IIx" into verNum set the userlevel to 2 show menubar pass startup end startup -- on doMenu choice -- global HGfriendly, vernum -- if vernum is empty then put the last word of the short name of this stack into vernum -- if choice is in "Help Index,Main Index,Glaze Index,Clay Index,Glaze Calculator,Materials Index,Bibliography,Glaze Limits,Unity Explained" -- then -- set cursor to watch -- put true into HGfriendly -- else put false into HGfriendly -- if choice ="About HyperGlaze" -- then -- put true into HGfriendly -- go to stack ("HyperGlaze" && vernum) -- send mouseup to btn "About" -- else if choice ="Glaze Index" -- then go to cd "GlazeIndex" -- else if choice="Clay Index" -- then go to cd "!ClayIndex" -- else if choice="Glaze Calculator" -- then go to stack "Glaze Calculator IIx" -- else if choice="Glaze Limits" -- then go to cd 2 of stack "Glaze Calculator IIx" -- else if choice="Help Index" -- then go to stack "HyperGlaze IIx Help" -- else if choice="Materials Index" -- then go to cd "MaterialsIndex" of stack "Materials" -- else if choice="Main Index" -- then Go to cd "MainIndex" -- else if choice="Bibliography" -- then Go to stack "Bibliography" -- else if choice="Unity Explained" -- then Go to stack "Unity Explained" -- else if choice="Find" -- then findIt -- else if choice="Find By Cone" -- then findIt "Cone" -- else if choice="Find By Name" -- then findIt "Name" -- else if choice="Find By Color" -- then findIt "Color" -- else if choice="Find By Surface" -- then findIt "Surface" -- else if choice="Find By Firing" -- then findIt "Firing" -- else if choice="Find By Tested" -- then -- answer "Search for tested or untested glazes?" with "Tested" or\ -- "Untested" or "Cancel" -- if it is "Cancel" then exit doMenu -- if it is "Tested" -- then -- find "tested" in fld "Tested" -- put "find " & quote & "Tested" & quote & " in fld tested" -- hide message -- end if -- if it is "Untested" -- then -- find "untested" in fld "Tested" -- put "find " & quote & "Untested" & quote & " in fld tested" -- hide message -- end if -- else if choice is "Save a copy..." -- then -- if the cantmodify of this stack is false -- then send "domenu" && quote & "Save a copy..." & quote to HyperCard -- else answer "Sorry, this HyperGlaze stack is locked and can't be copied." -- else if choice is "New Stack..." -- then -- set lockmessages to true -- go to cd "MainIndex" -- send mouseup to btn id 91 -- set lockmessages to false -- else pass doMenu -- end doMenu on FindIt LookWhere global MyQuery if lookWhere is "Tested" then put "by (un)tested" into lookwhere2 else put "by" && lookwhere into lookwhere2 if lookwhere is empty then put empty into lookWhere2 ask "What do you want to find " & lookWhere2 & "?" with MyQuery if it is empty then exit FindIt put it into myQuery push cd lock screen get the short name of this bg if it is "Glazes" or it is "Clays" then go next else go to first cd of bg "Glazes" if lookWhere is not empty then if lookwhere is "cone" then find word myQuery in fld LookWhere else find string myQuery in fld LookWhere if the result is not empty then play boing answer quote & myQuery & quote & " was not found in '" & lookwhere\ & "'." pop cd unlock screen exit FindIt end if if lookwhere is "cone" then put "Find word " & quote & myQuery & quote & " in fld " & lookWhere else put "Find String " & quote & myQuery & quote & " in fld " & lookWhere hide message else find string myQuery if the result is not empty then play boing answer quote & myQuery & quote & " was not found." pop cd unlock screen exit FindIt end if put "Find String " & quote & myQuery & quote hide message end if end findIt on doNewBatch global batchSize lock screen set cursor to "calculating" put empty into newTotal put empty into fld "Batch" put empty into fld "Batch2" put cd fld "TotBatch" into Batchsize if batchsize >0 then if fld "lb/gm" is "gm" or fld "lb/gm" is "lb" then if batchsize>1000 then set numberformat to 0 else if batchsize>100 then set numberformat to 0.0 else set numberformat to 0.00 put GramBatch(Batchsize) into newTotal else put PoundBatch(Batchsize) into newTotal end if set the numberformat to 0.00 if batchsize is empty then put "0.00" into cd fld "totBatch" if newtotal >0 then put newTotal into cd fld "totBatch" else put Batchsize*1 into cd fld "totBatch" put empty into Batchsize unlock screen end doNewBatch on SetBatchSize if the short name of this cd is "GlazeIndex" then put "glazes" into myType else put "clays" into myType answer "Change the batch size on ALL " & mytype & " or just those on the Utilities List?" \ with "ALL" or "Utilities List" or "Cancel" if it is "cancel" then exit setBatchSize if it is "Utilities List" then put cd fld "IDPrintList" into MyList else put cd fld "IDindex1" & return & cd fld "IDindex2" & return &\ cd fld "IDindex3" into myList answer "Set the batch size in grams or pounds?" with "Grams" or "Pound/Oz"\ or "Pounds" put it into MyUnit if MyUnit is "Pounds" or MyUnit is "Pound/Oz" then put 20 into MyBatch else put 500 into myBatch end if ask "What batch size (in " & MyUnit & ") do you want?" with MyBatch if it is empty then exit setBatchSize else put it into MyBatch push cd set lockmessages to true lock screen lock recent repeat with i=1 to the number of lines of MyList set the cursor to watch if line i of MyList is empty then next repeat go to line i of MyList if MyUnit is "Pounds" then put "Lb" into fld "lb/gm" else if MyUnit is "Pound/Oz" then put "lb/oz" into fld "lb/gm" else put "Gm" into fld "lb/gm" put MyBatch into cd fld "totBatch" doNewBatch send mouseup to bg btn "Batch Cost" end repeat set lockmessages to false unlock screen unlock recent pop cd end setBatchSize Function PoundBatch batchsize put 0.00 into newTotal repeat with i = 1 to 14 put ((i*2)+4) into myfield if fld myfield is not empty then set numberformat to 0.00 put ((fld myfield)*batchsize)/100 into Temp add temp to newTotal if batchsize<15 then set numberformat to 0.0 else set numberformat to 0 if Batchsize >=150 then if temp<1 then set numberformat to 0.0 else set numberformat to 0 if i<11 then put Temp & " Lb" & return after fld "Batch" else put Temp & " Lb" & return after fld "Batch2" else if i<11 then if temp<1 then set numberformat to 0.0 else set numberformat to 0 if trunc(Temp)>0 then put trunc(Temp) & " Lb " into Pounds else put empty into Pounds put (Pounds &\ (Temp-(trunc(Temp)))*16 & "oz") & return after\ fld "Batch" else if temp<1 then set numberformat to 0.0 if trunc(Temp)>0 then put trunc(Temp) & " Lb " into Pounds else put empty into Pounds put (Pounds & (Temp-(trunc(Temp)))*16 & "oz") & \ return after fld "Batch2" end if end if end if put empty into temp end repeat end PoundBatch on doPercent lock screen set cursor to "calculating" set numberformat to 0.00 put FindPercent()+1 into whichField set the numberformat to 0 if whichField =25 then set the location of cd fld "totals" to 130,223 set the location of cd fld "TotAmt" to 198,223 set the location of cd fld "TotBatch" to 260,223 else repeat with i=1 to 3 put item 2 of the location of fld whichField into y put item 1 of the location of cd fld i into x set the location of cd fld i to x,y end repeat end if put "Totals" into cd fld "totals" unlock screen end doPercent on FindSelectedWord global selectedWord,myResult put empty into firstCard set lockscreen to true set lockmessages to true find string SelectedWord in fld 1 if the result is not empty then put "not found" into MyResult exit FindSelectedWord else put the number of this cd into firstcard if selectedword contains fld 1 then set lockscreen to false set lockmessages to false exit FindSelectedWord end if go next repeat until selectedWord contains fld 1 find string SelectedWord in fld 1 if the number of this cd is firstCard then put "not found" into myResult exit repeat end if end repeat set lockscreen to false set lockmessages to false end FindSelectedWord function ClickLine return(trunc(((scroll of the target) \ +(item two of the clickloc) \ - (item two of the rect of the target)) \ div the textheight of the target) + one) end ClickLine on findIndexName Global SelectedWord repeat 3 times delete last char of selectedWord end repeat if last char of selectedWord is "C" then delete last char of selectedWord if last char of selectedWord is " " then delete last char of selectedWord find string selectedWord in fld 1 put "find string " & quote & selectedWord & quote & " in fld 1" hide message end findIndexName on MakeHyperGlazeFile MyFilename set cursor to 4 repeat with i=1 to 45 if fld i is empty or the sharedText of fld i is true then write quote & quote & Tab to file MyFilename else write fld i & tab to file MyFilename end if end repeat repeat with i=1 to 3 write cd fld i & tab to file MyFilename end repeat repeat with i=1 to 3 put loc of cd fld i into totlocation write totlocation & tab to file MyFilename end repeat if fld "ColorPatch" is empty then write quote & quote & tab to file MyFilename else Write fld "ColorPatch" & Tab to file MyFilename if fld "Cost" is empty then write quote & quote & tab to file MyFilename else Write fld "Cost" & Tab to file MyFilename if the short name of this bg is "Glazes" then if fld "GlazeType" is empty then write quote & quote & tab to file MyFilename else Write fld "GlazeType" & Tab to file MyFilename write numToChar(30) to file MyFilename end MakeHyperGlazeFile on PrintIt if the hilite of bg btn "Comments" is true then if the short name of this bg is "Clays" then send mouseup to bg btn "Analysis" else send mouseup to bg btn "Unity Formula" end if if the short name of this bg is "Glazes" then if the visible of fld "PercentAnalysis" is true then send mouseup to fld "percentAnalysis" end if show fld "printComments" if the visible of fld "backdrop" is true then click at loc of fld "BackDrop" put "COMMENTS: " & stripReturns(fld "comments") into fld "printComments" if fld "hazards" is not empty then put Return & "HEALTH HAZARDS: " & stripReturns(fld "hazards") after fld\ "printComments" -- if variant()>=2.2 then -- does not work with HC2.4? -- put checkForPlayer() into isPlayer -- else put checkForOldPlayer() into isPlayer -- if isPlayer then open printing -- else open printing with dialog if the result is not empty then exit PrintIt print cd close printing put empty into fld "printComments" hide fld "printComments" end printIt function checkForPlayer put false into isPlayer if the environment contains "Player" then put true into isPlayer return isPlayer end CheckForPlayer function checkForOldPlayer put false into isPlayer if variant() contains "Player" then put true into isPlayer return isPlayer end CheckForOldPlayer on MakeTextFile includeAnalysis, makeHTML, AmountFirst, includeBatch, includePct Global MyFilename, bkgndName if AmountFirst is empty or AmountFirst is "AmountFirst" then put false into AmountFirst if includeBatch is empty or includeBatch is "includeBatch" then put false into includeBatch if includePct is empty or includePct is "includePct" then answer "Save with only Percentage or include Batch recipe?" with "Cancel" or "Batch" or "Percent" if it is "Cancel" then exit MakeTextFile if it is "Batch" then put true into includeBatch put false into includePct else put true into includePct end if end if if makeHTML is empty then put false into makeHTML if makeHTML then put comma into tabChar put numToChar(11) into returnChar write quote & fld 1 & quote & comma & quote & fld "cone" & quote & comma \ & quote & fld "color" & quote & comma &\ quote & fld "surface" & quote & comma \ & quote & fld "tested" & quote & comma \ & quote & fld "firing" & quote & comma\ & quote & fld "date" & quote & comma \ & quote & fld "GlazeType" & quote & comma \ & quote & fld "ThermalExpansion" & quote & comma \ to file MyFilename -- removed html formatting from the export script, now done in FileMaker Pro. -- write "" & returnChar & " " to file MyFilename -- write "" & line 1 of fld 1 & "" & returnChar & "" & returnChar & "" & "" & returnChar to file MyFilename else put tab into tabChar put return into returnChar put false into makeHTML end if put the short name of this bg into bkgndName set cursor to busy if not makeHTML then write "Glaze name: " & line 1 of fld 1 & returnChar & "Cone: " & line 1 of fld 2 &\ returnChar to file MyFilename write "Color: " & line 1 of fld "Color" & returnChar & "Testing: " & fld "Tested" &\ returnChar to file MyFilename if BkgndName is "Glazes" then write "Surface texture: " & line 1 of fld "surface" & returnChar to file MyFilename else write "Uses: " & line 1 of fld "surface" & returnChar to file MyFilename write "Firing: " & fld "firing" to file MyFilename if BkgndName is "Glazes" then write returnChar & "Glaze type: " & fld "GlazeType"\ to file MyFilename end if if makeHTML then write quote to file MyFilename else if AmountFirst then if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Batch" & returnChar to file MyFilename else write returnChar & returnChar & "Recipe:" & tabChar & "Percentage by weight" & returnChar to file MyFilename else if includeBatch then write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & tabChar & "Batch" & \ returnChar to file MyFilename else write returnChar & returnChar & "Recipe:" & tabChar & "Percent" & \ returnChar to file MyFilename end if repeat with i=1 to 10 if fld ((i*2)+3) is empty then exit repeat if amountFirst then if includeBatch then put the number of chars of cd fld 3 into addSpaces else put the number of chars of cd fld 2 into addSpaces if IncludeBatch then put line i of fld "Batch" into myAmount else put line 1 of fld ((i*2)+4) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if makeHTML then if AmountFirst then write myAmount & tab &\ line 1 of fld ((i*2)+3) & returnChar to file MyFilename else write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & returnChar to file MyFilename end if else if AmountFirst then write myAmount & tab &\ line 1 of fld ((i*2)+3) &\ returnChar to file MyFilename else if includeBatch then write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & tab & line i of fld "Batch" & returnChar to file MyFilename else write line 1 of fld ((i*2)+3) & tab &\ line 1 of fld ((i*2)+4) & returnChar to file MyFilename end if end if end repeat if makeHTML then if amountFirst then write cd fld 2 & " %" & " Totals:" & returnChar to file MyFilename else write "Totals:" & tab & cd fld 2 & " %" & returnChar to file MyFilename else if AmountFirst then if includeBatch then write cd fld 3 & tab & fld "lb/gm" && "Total Batch" & returnChar to file MyFilename else write cd fld 2 & tab & "%" & "Total" & tab & returnChar to file MyFilename else if includeBatch then write cd fld 2 & tab & "%" & "Total" & tab & cd fld 3 & tab & fld "lb/gm" && "Total Batch" & returnChar to file MyFilename else write "Totals:" & tab & cd fld 2 & " %" & tab & returnChar to file MyFilename end if if fld 25 is not empty then write returnChar & "Also add:" & returnChar to file MyFilename repeat with i=1 to 4 if fld ((i*2)+23) is empty then exit repeat if AmountFirst then if includeBatch then put line i of fld "batch2" into myAmount else put line 1 of fld ((i*2)+24) into myAmount repeat addSpaces if the number of chars of myAmount < addSpaces then put space before myAmount else exit repeat end repeat end if if makeHTML then if amountFirst then write myAmount & tab & line 1 of fld ((i*2)+23) & returnChar to file MyFilename else write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) \ & returnChar to file MyFilename else if amountFirst then write myAmount & tab & line 1 of fld ((i*2)+23) & returnChar to file MyFilename else if includeBatch then write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) & tab & line i of fld "batch2" & returnChar to file MyFilename else write line 1 of fld ((i*2)+23) & tab & line 1 of fld ((i*2)+24) & returnChar to file MyFilename end if end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if fld "Comments" is not empty then put fld "comments" into myComments write returnChar & "Comments:" & returnChar to file MyFilename repeat get offset(quote,myComments) if it>0 then put empty into char it of myComments else exit repeat end repeat repeat with i=1 to the number of lines of myComments write line i of myComments & returnChar to file MyFilename end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if fld "Hazards" is not empty then write returnChar & "Possible Health Hazards:" & returnChar to file MyFilename repeat with i=1 to the number of lines of fld "Hazards" write line i of fld "Hazards" & returnChar to file MyFilename end repeat end if if makeHTML then write quote & comma & quote to file MyFilename if includeAnalysis is true then if bkgndName is "Glazes" then write returnChar & "Unity Formula for " & fld 1 & ":" & returnChar to file MyFilename put "K2O ,Na2O,CaO ,MgO ,Li2O,BaO ,PbO ,ZnO ,CuO ,CoO ,NiO ,SrO "\ into ROItems put "Al2O3,B2O3 ,Fe2O3,P2O5 ,Sb2O3,Cr2O3,V2O5" into R2O3Items put "SiO2 ,TiO2 ,ZrO2 ,SnO2 ,MnO2 ,F ,Si:Al Ratio" into RO2Items put empty into myAnalysis put empty into myRO put empty into myRO2 put empty into myR2O3 repeat with i=1 to 12 if line i of fld "R2O" is not empty then put line i of fld "R2O" && item i of ROitems \ & return after myRO if line i of fld "RO2" is not empty then put tab & line i of fld "RO2" && item i of RO2Items \ & return after myRO2 if line i of fld "R2O3" is not empty then put tab & line i of fld "R2O3" && item i of R2O3Items \ & return after myR2O3 end repeat repeat with i=1 to 12 if line i of MyRO is not empty or line i of MyRO2 is not empty\ or line i of MyR2O3 is not empty then put line i of myRO & line i of MyR2O3 & \ line i of MyRO2 & returnChar after myAnalysis else next repeat end repeat write myAnalysis to file MyFilename if fld "PercentAnalysis" is empty then send mouseup to bg btn "Percent Analysis" write returnChar & "Percentage Analysis for " & fld 1 & ":" & returnChar to file MyFilename repeat with i=2 to the number of lines of fld "PercentAnalysis" write line i of fld "PercentAnalysis" & returnChar to file MyFilename end repeat if makeHTML then write quote & comma to file MyFilename end if else put "SiO2,Al2O3,Fe2O3,TiO2,K2O,Na2O,Ca2O,MgO,Li2O,P2O5,MnO,S,F2,L.O.I" into OxideItems write returnChar & "Analysis for " & fld 1 & ":" & returnChar to file MyFilename repeat with i=1 to 14 if line i of fld "Analysis">0 then write tab & line i of fld "Analysis" && "%" &&\ item i of OxideItems & returnChar to file MyFilename end repeat end if end if -- write "Estimated thermalExpansion =" && fld "thermalExpansion" & "x10-7" & returnChar to file MyFilename -- if makeHTML then write "" & returnchar & "" & quote & return to file MyFilename if makeHTML then write return to file MyFilename if not makeHTML then write return & return to file MyFilename end MakeTextFile on importInsight myMyFilename if there is a bg btn "Import Insight" then send ("importInsight" && quote & myMyFilename & quote) to bg btn "Import Insight" -- hidden button else answer "Go to any Glaze or Clay card to import an Insight recipe." end importInsight on saveInsight howMany if there is a bg btn "save Insight" then send "saveInsight" && howMany to bg btn "Save Insight" -- hidden button else answer "Go to any Glaze or Clay card to save an Insight recipe." end saveInsight function stripSpaces myText -- 1990 R. Burkett current 11/10/90 repeat with i= 1 to the number of lines of myText repeat if last char of item 1 of line i of myText is " " then delete last char of item 1 of line i of myText else exit repeat end repeat repeat if first char of item 1 of line i of myText is " " then delete first char of item 1 of line i of myText else exit repeat end repeat end repeat repeat put offset(" ",mytext) into doubleSpaces if doubleSpaces > 0 then delete char doubleSpaces of myText else exit repeat end repeat return myText end stripSpaces on SendGlaze CardKind set cursor to watch put empty into myGlaze put empty into myCdFlds repeat with i=1 to the number of flds if the short name of fld i is "Comments" then put fld i into myComments put tab after myGlaze next repeat else put fld i & tab after myGlaze end repeat repeat with i=1 to the number of cd flds put cd fld i & tab after myCdFlds end repeat put the loc of cd fld "TotAmt" into AmtLoc put the loc of cd fld "TotBatch" into BatchLoc put the loc of cd fld "Totals" into TotLoc answer file "Select the HyperGlaze stack to save a copy of this glaze:" of type "STAK" if the result is not empty then exit sendGlaze lock screen go to stack it if there is no bg "Glazes" then answer "Sorry, the stack you chose was not the right kind to store glaze recipes. You must choose a copy of HyperGlaze." go back exit sendGlaze end if go to first cd of bg CardKind unlock screen if the result is not empty then answer "Sorry, this is not a HyperGlaze stack." unlock screen exit sendGlaze end if doMenu "New Card" if the result is not empty then exit sendGlaze repeat with i=1 to the number of flds put offset(tab,myGlaze) into endChar get char 1 to endChar of myGlaze delete last char of it put it into fld i delete char 1 to endChar of myGlaze end repeat put myComments into fld "Comments" repeat with i=1 to the number of cd flds put offset(tab,myCdFlds) into endChar get char 1 to endChar of myCdFlds delete last char of it put it into cd fld i delete char 1 to endChar of myCdFlds end repeat set the loc of cd fld "TotAmt" to AmtLoc set the loc of cd fld "TotBatch" to BatchLoc set the loc of cd fld "Totals" to TotLoc put "True" into fld "IndexMe" end SendGlaze on BlendGlaze put empty into myAmts put empty into myIngreds answer "Send this recipe to Blender as glaze 'A' or 'B'?" with "Cancel" or "Glaze A" or "Glaze B" if it is "Cancel" then exit BlendGlaze put it into whichGlaze answer "Include colorants in blend?" with "Cancel" or "Base Glaze" or "Include Color" if it is "Cancel" then exit BlendGlaze put it into myRecipe put fld 1 into GlazeName repeat with i=1 to 10 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat if myRecipe is "Include Color" then repeat with i=11 to 14 set cursor to busy put ((i*2)+3) into myFld if fld myFld is empty then exit repeat put fld myFld & return after myIngreds put fld (myFld+1) & return after myAmts end repeat end if push card lock screen lock recent lock messages go to card "GlazeBlender" of stack "Potter's Friend" if whichGlaze is "Glaze A" then put GlazeName into cd fld 1 repeat with i= 1 to 14 set cursor to busy put ((i*2)) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat else put GlazeName into cd fld 30 repeat with i= 1 to 14 set cursor to busy put ((i*2)+29) into myFld put line i of myIngreds into cd fld myFld put line i of myAmts into cd fld (myFld+1) end repeat end if pop card unlock screen unlock recent unlock messages answer "'" & fld 1 && "' sent to Glaze Blender." end BlendGlaze on SetGlazeColor set cursor to watch put card field "Name" into GlazeName put card field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if card field K>.1 then put "KNa " after GlazeType end if else if card field K+ card field Na>.1 then put "KNa " after GlazeType end if if card field "Pb">0 then put "Pb " after GlazeType if card field "Ca">.5 then put "Ca " after GlazeType if card field "B">.1 then put "B " after GlazeType if card field "Mg">.15 then put "Mg " after GlazeType if card field "Ba">.15 then put "Ba " after GlazeType if card field "Li">.05 then put "Li " after GlazeType if card field "Zn">.1 then put "Zn " after GlazeType else if card field "Zn">.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end setGlazeColor on setGlazeLimits put empty into fld "LimitName" if the visible of cd fld "GlazeAnalysis?" of cd "Limits" is true then send mouseup to btn "Done" set the cursor to watch hide message global DoLimits get word 1 of cd fld "cone" of cd "Limits" if it contains "-" then put char 1 to offset("-", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if it contains "," then put char 1 to offset(",", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if the last char of theTemp is not in "1,2,3,4,5,6,7,8,9,0" then delete last char of theTemp if TheTemp is empty then play boing Ask "Enter a cone number between 016 and 14." if it is empty then exit setGlazeLimits put it into TheTemp put it into card field "Cone" of cd "Limits" end if find empty find word theTemp in fld "coneNumbers" of cd "Limits" if the result is "not found" then play boing answer "Sorry, this cone (" & theTemp & ") is outside the allowed range. Use only cones 016 to 14." select line 1 of cd fld "Cone" exit setGlazeLimits end if put word 2 of the foundline into whichLine put line whichLine of field "coneTemp" of cd "limits" into theTemp put last word of fld "GlazeTemp" into ForC put theTemp & " C" into fld "GlazeTemp" of cd "limits" if ForC is "F" then send mouseup to fld "GlazeTemp" -- end temperature determination if the icon of bkgnd button "no lead" of cd "limits" is 30913\ and TheTemp<1200 --leadless glaze specified then put true into LeadFree else put false into LeadFree end if if the short name of bkgnd button id 15 of cd "limits" is "Matte" then put true into MatteGlaze else put false into MatteGlaze set the name of bg btn id 15 of cd "limits" to "Glossy" end if put -43.0417+(0.1401*TheTemp)-(0.00014915*(TheTemp^2))+\ .000000053846*(TheTemp^3) into TheAmount if MatteGlaze then put .75*theAmount into theAmount --put theAmount put the rect of bkgnd button "Si" into MyButton set numberFormat to 0 if not leadFree and theTemp <1200 then put 1.5*theAmount into theAmount put round(200 - 2*theAmount) into item 4 of myButton put round(200 - 5.6*theAmount) into item 2 of myButton set the rect of bkgnd button "Si" to myButton -- put (.55774-(0.001385*TheTemp)+(0.00000100023*(TheTemp^2)))\ -- into TheAmount put -0.39465+0.0035439*TheTemp-0.0000055647*TheTemp^2\ +0.0000000027765*theTemp^3 into TheAmount if MatteGlaze then put 1.4*theAmount into theAmount put the rect of bkgnd button "Al" into MyButton put round(200 - 8*theAmount) into item 4 of myButton put round(200 - 35*theAmount) into item 2 of myButton set the rect of bkgnd button "Al" to myButton put the rect of bkgnd button "B" into MyButton if leadFree then put -185.11+(0.69674*TheTemp)-0.00094958*theTemp^2\ +0.00000056191*TheTemp^3-0.00000000012261*theTemp^4 into TheAmount else put 3.2449-(0.0059252*TheTemp)+0.0000048528*theTemp^2\ -0.0000000016162*TheTemp^3 into TheAmount end if if the short name of bkgnd button id 15 is "Matte" then put .5*theAmount into theAmount put round(200 - 50*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "B" to myButton set the rect of bg btn "P" to "387,200,406,200" -- phosphorus, P2O3 put (1.6861-(0.00114*TheTemp)) into TheAmount if MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "K" into MyButton if leadFree then put theAmount*1.4 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.15*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "K" to myButton put (1.6861-(0.00114*TheTemp)) into TheAmount if MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "Na" into MyButton if leadFree then put theAmount*1.4 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.15*theAmount) into item 2 of myButton if item 2 of myButton<100 then put 100 into item 2 of myButton set the rect of bkgnd button "Na" to myButton put 1.0334-.000667*theTemp into theAmount put the rect of bkgnd button "Li" into MyButton if not MatteGlaze then put round(200 - 100*1.15*theAmount) into item 2 of myButton else put round(200 - 100*.8*theAmount) into item 2 of myButton end if if leadFree and theTemp<1200 then put round(200 - 100*1.3*theAmount) into item 2 of myButton set the rect of bkgnd button "Li" to myButton put (1.0456-(.0026156*TheTemp)+(0.0000018245*(TheTemp^2)))\ into TheAmount put the rect of bkgnd button "Ca" into MyButton if leadFree then put theAmount*1.6 into theAmount put round(200 - 100*(.4*theAmount)) into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Ca" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put (.091071-(0.00044524*TheTemp)+(0.0000005238116*TheTemp^2))\ into TheAmount end if if not MatteGlaze then put .5*theAmount into theAmount put the rect of bkgnd button "Mg" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Mg" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put 1.3*(.090171-(.00044524*TheTemp)+(0.00000052381*(TheTemp^2)))\ into TheAmount end if if not MatteGlaze then put .35*theAmount into theAmount put the rect of bkgnd button "Ba" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Ba" to myButton if theTemp<950 and not MatteGlaze then put 0 into theAmount else put 1.3*(.090171-(.00044524*TheTemp)+(0.00000052381*(TheTemp^2)))\ into TheAmount end if if not MatteGlaze then put .35*theAmount into theAmount put the rect of bkgnd button "Sr" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Sr" to myButton if theTemp<950 then put 0 into theAmount else put (-.28375+(0.00024167*TheTemp)+(0.00000016667*(TheTemp^2)))\ into TheAmount end if if leadFree then put 1.25*theAmount into theAmount if matteGlaze then put 1.5*theAmount into theAmount else put 0.75*theAmount into theAmount end if put the rect of bkgnd button "Zn" into MyButton put 200 into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Zn" to myButton if LeadFree then put the rect of bg button "Pb" into TempRect put 200 into item 2 of TempRect put 201 into item 4 of TempRect set the rect of bkgnd button "Pb" to TempRect else if TheTemp<1200 then put (8.8928-(.026617*TheTemp)+(0.000030527*(TheTemp^2)))-\ .000000011987*(TheTemp^3) into TheAmount if MatteGlaze then put .5*theAmount into theAmount if 1.05*theAmount>=1 then put 1.000 into HighAmount put the rect of bkgnd button "Pb" into MyButton put round(200 - 100*(.4*theAmount)) into item 4 of myButton put 100 into item 2 of myButton set the rect of bkgnd button "Pb" to myButton else put the rect of bkgnd button "Pb" into MyButton put round(200 - 100*(.05*theAmount)) into item 4 of myButton put round(200 - 100*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Pb" to myButton end if else put the rect of bg btn "Pb" into myRect put 200 into item 2 of myRect put 201 into item 4 of myRect set the rect of bkgnd button "Pb" to myRect end if end if if not MatteGlaze then put "Suggested Si/Al Ratio: greater than 8 :1"\ into field "SuggestedSi" else put "Suggested Si/Al Ratio: less than 5 :1" \ into field "SuggestedSi" end if end setGlazeLimits -- on doMenu choice -- if choice is "New Card" --trap new card -- then -- if the short name of this stack is "Glaze Calculator" -- then -- play boing -- put "No new cards in this stack!" -- else pass doMenu -- else pass doMenu -- end doMenu n GlassTEPrefDefault editMenutrue FluxTEPrefDefaultStabilizerTEPrefDefault Glaze Limits, U helvetica U helvetica W helvetica U helveticaW helvetica W helveticaW helveticaW helvetica W helvetica W helvetica @W helvetica PW helvetica W helvetica @U helvetica U helvetica AW helvetica UArial UArial ULucida GrandeWArialUArial WArial UArialUArial WArialUArialWArial UArial UArial WArialUArialGlazeLimitsMenubarcREVTempMaster+windowManagerPlacefalsemenubarGlazeLimitsMenubarlinkHiliteColorrect190,152,708,540 maxWidth518 cantAbortfalse patterns colors decorationsdefaultlinkVisitedColoriconicfalseshadowtrue cantDeletefalseid6718altId0 hcAddressingtruestartUpIconicfalse windowShape0title Glaze Limits linkColor textStyleplain cantModifyfalseunderlineLinks maxHeight450styletopleveldestroyWindowfalse password liveresizingfalsescroll0passkey resizabletruename Glaze Limitsicon200951formatForPrintingfalse alwaysBufferfalsevisibletruemetalfalse minWidth518 textSize12 destroyStackfalse textFontArial minHeight300 dynamicPathstruecREVGeometryCachestackID6744 cREVGeneral Limits PEon updateCustomLimits put fld "InstalledLimits2" of cd "LimitFormulas" into myLimitFormulas put "None" & return into btn "Custom Limits" repeat with i = 1 to the number of lines of myLimitFormulas put item 1 of line i of myLimitFormulas into LimitName if LimitName is not empty then get item 2 of line i of myLimitFormulas put it && LimitName & return after btn "Custom Limits" -- with menuMessage ("InstallLimit" && i) end if if i>60 then exit repeat end repeat end updateCustomLimits on clearData answer "Do you really want to clear all data?" \ with "OK" or "Cancel" if it is "Cancel" then exit clearData global MyFlux put empty into myFlux repeat with i=1 to the number of card fields set the cursor to busy if the short name of card field i is "limitHelp" then next repeat if the short name of card field i contains "?" then next repeat put 0 into card field i end repeat set the hilite of button "combined K & Na" to false adjustAmounts send closefield to cd fld "P" send closefield to cd fld "B" send closefield to cd fld "Al" send closefield to cd fld "Si" put empty into card field "ThermalExpan" end clearData on doThermalExpansion global CalcAll -- put the ticks into start set the cursor to busy put empty into CalcProblems set numberFormat to 0.00 repeat with i=1 to 12 if cd field i is empty then put 0 into cd field i end repeat put TExpansion() into card field "thermalExpan" end doThermalExpansion on AdjustAmounts set the cursor to watch global MyFlux set numberformat to 0.00 put empty into fluxTotal put empty into newTotal if myFlux is not empty then put (1-card field MyFlux) into FluxAdjust else put 1 into FluxAdjust put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb" into myFluxList repeat with i=1 to 9 if the short name of card field (item i of myFluxList) is not myFlux then add card field (item i of myFluxList) to fluxTotal end if end repeat put 40 into ButtonLeft put 55 into ButtonRight if fluxTotal>0 then repeat with i=1 to 9 if the short name of card field (item i of myFluxList) is not myFlux then put round(200-(100*(card field (item i of myFluxList)/fluxTotal)*FluxAdjust))into x set the rect of button i to buttonLeft,x,ButtonRight,210 put 2-(.01*x) into card field (item i of myFluxList) add card field (item i of myFluxList) to newTotal end if add 27 to buttonLeft add 27 to ButtonRight end repeat else repeat with i=1 to 9 if the short name of card field (item i of myFluxList) is not myFlux then put round(200-(100*card field i))into x set the rect of button i to buttonLeft,x,ButtonRight,210 put 2-(.01*x) into card field (item i of myFluxList) add card field (item i of myFluxList) to newTotal end if add 27 to buttonLeft add 27 to ButtonRight end repeat end if if myFlux is not empty then put newTotal+card field myFlux into card field "TotalFlux" else put newTotal into card field "TotalFlux" end if doThermalExpansion if the short name of bkgnd button id 15 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" percentageAnalysis end AdjustAmounts on GetGlazeColor set cursor to watch put card field "Name" into GlazeName put card field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if card field K>.1 then put "KNa " after GlazeType end if else if card field "K"+ card field Na>.1 then put "KNa " after GlazeType end if if card field "Pb">0 then put "Pb " after GlazeType if card field "Ca">.5 then put "Ca " after GlazeType if card field "B">.1 then put "B " after GlazeType if card field "Mg">.15 then put "Mg " after GlazeType if card field "Ba">.15 then put "Ba " after GlazeType if card field "Li">.05 then put "Li " after GlazeType if card field "Zn">.1 then put "Zn " after GlazeType else if card field "Zn">.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end GetGlazeColor on percentageAnalysis set cursor to watch put empty into tot if the visible of cd fld "Na" is true then put cd fld "K"*94.192 into Kx add Kx to tot put cd fld "Na"*61.98 into Nax add Nax to tot else put (item 2 of cd fld "TempKNa")*94.192 into Kx add Kx to tot put (item 1 of cd fld "TempKNa")*61.98 into Nax add Nax to tot end if put cd fld "Ca"*56.08 into Cax add Cax to tot put cd fld "Sr"*103.619 into Srx add Srx to tot put cd fld "Ba"*153.36 into Bax add Bax to tot put cd fld "Mg"*40.32 into Mgx add Mgx to tot put cd fld "B"*69.44 into Bx add Bx to tot put cd fld "Li"*29.88 into Lix add Lix to tot put cd fld "Zn"*81.38 into Znx add Znx to tot put cd fld "Pb"*223.21 into Pbx add Pbx to tot put cd fld "P"*141.6 into Px add Px to tot put cd fld "Si"*60.06 into Siz --can't be Six because "Six is a number! add Siz to Tot put cd fld "Al"*101.94 into Alx add Alx to Tot put tot/100 into Tot set numberformat to 0.00 if Siz >0 then put Siz/Tot into cd fld "pctSi" else put empty into cd fld "pctSi" if Alx >0 then put Alx/Tot into cd fld "pctAl" else put empty into cd fld "pctAl" if Bx >0 then put Bx/Tot into cd fld "pctB" else put empty into cd fld "pctB" if Px >0 then put Px/Tot into cd fld "pctP" else put empty into cd fld "pctP" if the visible of cd fld "Na" is false then if (Kx+Nax) >0 then put (Kx+Nax)/Tot into cd fld "pctK" else put empty into cd fld "pctK" else if Kx >0 then put Kx/Tot into cd fld "pctK" else put empty into cd fld "pctK" if Nax >0 then put Nax/Tot into cd fld "pctNa" else put empty into cd fld "pctNa" end if if Lix >0 then put Lix/Tot into cd fld "pctLi" else put empty into cd fld "pctLi" if Cax >0 then put Cax/Tot into cd fld "pctCa" else put empty into cd fld "pctCa" if Srx >0 then put Srx/Tot into cd fld "pctSr" else put empty into cd fld "pctSr" if Bax >0 then put Bax/Tot into cd fld "pctBa" else put empty into cd fld "pctBa" if Mgx >0 then put Mgx/Tot into cd fld "pctMg" else put empty into cd fld "pctMg" if Znx>0 then put Znx/Tot into cd fld "pctZn" else put empty into cd fld "pctZn" if Pbx >0 then put Pbx/Tot into cd fld "pctPb" else put empty into cd fld "pctPb" end percentageAnalysis on installLimit WhichLine global myCustomLimit put fld "InstalledLimits" of cd "LimitFormulas" into myLimits get item 1 of line whichline of myLimits if it is not empty then put "Limits for: " & it into fld "LimitName" get item 2 of line whichline of myLimits if it is not empty then put it into cd fld "Cone" get item 3 of line whichline of myLimits if it is not empty then set the name of bg btn id 15 to it else set the name of bg btn id 15 to "Glossy" put "X,X,X,K,Na,Li,Ca,Ba,Sr,Mg,Zn,B,Al,Si" into myOxideList repeat with i=4 to 14 set the cursor to busy get item i of line whichline of myLimits put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if (upperLimit=LowerLimit or upperLimit-lowerLimit<.02) and upperLimit>0 then add .02 to upperLimit subtract .01 from lowerLimit end if put the rect of bg btn (item i of myOxideList) into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn (item i of myOxideList) to MyButtonRect end repeat get item 15 of line whichline of myLimits put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit put the rect of bg btn "Pb" into myButtonRect put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect set the rect of bg btn "Pb" to MyButtonRect get item 16 of line whichline of myLimits put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit put the rect of bg btn "P" into myButtonRect put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect set the rect of bg btn "P" to MyButtonRect -- combine K & Na limits if necessary if the hilite of btn "combined K & Na" is true then set numberformat to 0 put the top of bg btn "Na" into NaTop put bottom of bg btn "Na" into NaBottom put top of bg btn "K" into KTop put bottom of bg btn "K" into KBottom put the rect of bg btn "K" & return & the rect of bg btn "Na" into fld "KNaButtonLoc" put NaBottom-NaTop into NaHeight put KBottom-KTop into KHeight if NaBottomOldCone then put "0" before newCone if char 1 of OldCone is "0" and cd fld "B"<=0 then answer "Sorry, you can't automatically adjust this lowfire glaze as it has no Boron (B2O3)." & return &\ "Future versions of the Glaze Calculator may allow this type of calculation." exit altercone end if if NewCone is "015" then answer "Sorry, you can't automatically adjust this glaze to a cone lower than 014." exit altercone end if if NewCone>14 then answer "Sorry, you can't automatically adjust this glaze to a cone higher than 14." exit altercone end if set numberFormat to 0.000000 put (3.9686 + 0.11269*newCone + 0.033698*newCone^2 + 0.0029235*newCone^3)/(3.9686 + 0.11269*oldCone + 0.033698*oldCone^2 + 0.0029235*oldCone^3) into coneRatio set numberformat to 0.00 if char 1 of newCone is "0" then put cd fld "Si"/coneRatio into cd fld "Si" put cd fld "Al"/coneRatio into cd fld "Al" if cd fld "B">0 then put (cd fld "B")*coneRatio into cd fld "B" send setButtonHeight to cd fld "B" end if else put coneRatio*cd fld "Si" into cd fld "Si" put coneRatio*cd fld "Al" into cd fld "Al" if cd fld "B">0 then put (cd fld "B")/coneRatio into cd fld "B" send setButtonHeight to cd fld "B" end if end if set numberformat to 0 put newCone into cd fld "Cone" setGlazeLimits send setButtonHeight to cd fld "Al" send setButtonHeight to cd fld "Si" -- adjustAmounts end alterCone on checkFritTE -- builds a table of thermal expansions for imported materials global myMaterialsAnalysis put empty into MyThermalExpansions answer file "Materials file of frits to open?" of type "GLAZ" if the result is not empty then exit checkFritTE put it into myFile lock screen set lockmessages to true open file myFile read from file myFile until tab put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb,B,Al,Si" into fldNames repeat set cursor to busy read from file myFile until "" if it is empty then exit repeat put it into myMaterialsAnalysis put getMyAmount() & tab after MyThermalExpansions put getMyAmount() into cd fld "K" put getMyAmount() into cd fld "Na" put getMyAmount() into cd fld "Ca" put getMyAmount() into cd fld "Mg" put getMyAmount() into cd fld "Al" put getMyAmount() into cd fld "B" put getMyAmount() into cd fld "Si" put getMyAmount() into cd fld "Zn" put getMyAmount() into cd fld "Ba" put getMyAmount() into cd fld "Li" put getMyAmount() into cd fld "Pb" repeat 5 put getMyAmount() into temp end repeat put getMyAmount() into cd fld "Sr" set the numberFormat to 0.0 put TExpansion() & tab & TExpansion2() & return after myThermalExpansions end repeat close file MyFile ask file "Save this file as:" with "Thermal Ex. Data" if the result is not empty then exit checkFritTE put it into myFile open file myFile write "All expansion coefficients x 10-7 C" & return & myThermalExpansions to file myFile close file myFile put empty into myMaterialsAnalysis end checkFritTE function getMyAmount global myMaterialsAnalysis put offset(tab, myMaterialsAnalysis) into myChar if myChar=0 then exit getMyAmount put char 1 to myChar of myMaterialsAnalysis into myChunk delete char 1 to myChar of myMaterialsAnalysis if last char of myChunk is tab then delete last char of myChunk if myChunk is empty then put 0.00 into myChunk return myChunk end getMyAmount Function TExpansion -- 1990-1993 Richard Burkett -- this is the current version 1/8/93 glaze calculator put 0.00 into TotSum put 0.00 into ThermalExpansion put (card field "K")*94.192 into tempK add tempK to TotSum put (card field "Na")*61.98 into tempNa add tempNa to TotSum put (card field "Ca")*56.08 into tempCa add tempCa to TotSum put (card field "Mg")*40.32 into tempMg add tempMg to TotSum put (card field "Li")*39.88 into tempLi add tempLi to TotSum put (card field "Ba")*153.36 into tempBa add tempBa to TotSum put (card field "Sr")*103.62 into tempSr add tempSr to TotSum put (card field "Pb")*223.21 into tempPb add tempPb to TotSum put (card field "Zn")*81.38 into tempZn add tempZn to TotSum put (card field "Al")*101.94 into tempAl add tempAl to TotSum put (card field "B")*69.64 into tempB add tempB to TotSum put (card field "P")*141.6 into tempP add tempP to TotSum put (card field "Si")*60.06 into tempSi add tempSi to TotSum put "K,Na,Ca,Mg,Li,Ba,Pb,Zn,Cu,Co,Ni,Sr" into myFluxOxides put the fluxTEpref of stack "Glaze Limits" into myFluxCoeffs if myFluxCoeffs is "default" or myFluxCoeffs is empty then put "3.3,3.9,1.5, 0.3,2.0,1.3, 0.8,1.0,2.2, 4.4,4.0,1.372" into FluxCoeffs else put myFluxCoeffs into fluxCoeffs add (TempK/TotSum)*(item 1 of fluxCoeffs) to ThermalExpansion add (tempNa/TotSum)*(item 2 of fluxCoeffs) to ThermalExpansion add (tempCa/TotSum)*(item 3 of fluxCoeffs) to ThermalExpansion add (tempMg/TotSum)*(item 4 of fluxCoeffs) to ThermalExpansion add (tempLi/TotSum)*(item 5 of fluxCoeffs) to ThermalExpansion add (tempBa/TotSum)*(item 6 of fluxCoeffs) to ThermalExpansion add (tempPb/TotSum)*(item 7 of fluxCoeffs) to ThermalExpansion add (tempZn/TotSum)*(item 8 of fluxCoeffs) to ThermalExpansion add (tempSr/TotSum)*(item 12 of fluxCoeffs) to ThermalExpansion put "Al,B,Fe,P,Sb,Cr,V" into myStabOxides put the StabilizerTEPref of stack "Glaze Limits" into myStabilizerCoeffs if myStabilizerCoeffs is "default" or myStabilizerCoeffs is empty then put "0.61,0.29, 4.0,2.0, 3.6, 5.1" into StabCoeffs else put myStabilizerCoeffs into StabCoeffs add (tempAl/TotSum)*(item 1 of stabCoeffs) to ThermalExpansion --add (tempB/TotSum)*(item 2 of stabCoeffs) to ThermalExpansion add (tempP/TotSum)*(item 4 of stabCoeffs) to ThermalExpansion put tempB/TotSum into PctBoron -- experimental version compensates for varying Boron in glaze if PctBoron<=0.12 -- try this sometime with 12% as the cut0ff point then add ((PctBoron)*(-1.98)) to ThermalExpansion else add ((PctBoron)*0.29) to ThermalExpansion -- higher thermal expansion over 12% put "Si,Ti,Zr,Sn,Mn,F" into myGlassOxides put the GlassTEPref of stack "Glaze Limits" into myGlassCoeffs if myGlassCoeffs is "default" or myGlassCoeffs is empty then put "0.37,1.5,0.7,2.0,2.2" into GlassCoeffs else put myGlassCoeffs into GlassCoeffs add (tempSi/TotSum)*(item 1 of GlassCoeffs) to ThermalExpansion put thermalExpansion*10.00 into thermalExpansion return thermalExpansion end TExpansion cREVTempMastermarkfalse dontSearchtruethreeDtruerect 0,0,518,411nameLimits patterns defaultButtoncolors layer1 borderWidth2 cantDeletefalseid2751altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs10928835290546723109288493437667341089387302875671410928849339806727109288344040567221092883301824672010928849340866729110961553457767431092884934429673510886095316336712108984088185339781089840881854413810898408818556562108984088185665631089840881857656410898408818586565108984088185965661089840881860656710898408818616568108984088186265691089840881863657010898408818646571108984088186565721089840881866657310898408818676574108984088186865751092884934149673010898408818706577108984088186965761089840881871658010898408818726581108984088187365821089840881874658310898408818756584108984088187665851089840881877658610898408818782375108984088187964331089840881880643410898408818816435108984088188264361089840881883643710898408818846438108984088188564391089840881886644010898408818876441108984088188864421089840881889644310898408818906444108984088190064541089840881891644510898408819016455109288493448567361089840881892644610898408819026456108984088189364471089840881903645710898408818946448108984088189564491089840881905645911096156163166744108984088189664501089840881906646010898408818976451108984088190764611089840881898645210898408818996453108984088190964631089840881910646410886094473626709108984088191164651089840881912646610898408819136467108984088191464681089840881915646910898408819166470108984088191764711089840881918647210898408819206474108984088191964731089840881921647510898408819226477108984088192364781089840881924647910898408819256480108984088192664811089840881927648210898408819286483109288493420867311089840881930648510898408819296484108984088193164861089840881932648710898408819336488108984088193464891089840881935649010898408819366491109288321478567191089840881937649210898408819386493108984088194064951089840881939649410898408819416496108984088194264971089840881943649810898408819446499108984088194565001089840881946650110898408819476502109288493381467241089840881948650310898408819506505108984088194965041089840881951650610898408819526507108984088195365081089840881954650910898408819556510108984088195665111087937703070669010898408819576512108984088195865131089840881959651410898408819606515108984088196165161089840881962651710898408819636518108984088196465191089840881965652010898408819676522108984088196867021089840881970670410898408819696703108984088197167051089840881972670610898408819736707109288493426667321088027455304669810886095133336711109288510991367371088025128702669710928849338706725109288340718067211092884934317673310928849339246726108860949254867101093792632985674010928849340366728108846976799167001087854763011668910929324666056739cREVGeometryCachetotal151order  cREVGeneral5X687" GW!"#$%&'()*+,-./0123456789;<=?@ABCDEFGHIJKMNOPQRSTUVWXY^_aefgijkortvx!A@BC)*,Z\z].[:?DEFGHIJKLMNOPQmnlqpsu`wdhcbSTLimitFormulas P-- Script of card "LimitFormulas" 1992-2004 Richard Burkett on sortLimitName put fld "installedLimits" into AllLimits repeat with i=1 to the number of lines of AllLimits set cursor to busy put line i of AllLimits into myGlaze put item 2 of myGlaze into myCone get the number of chars of myCone if it=1 or char 1 of myCone is "0" then put "0" before myCone put myCone & " " before line i of AllLimits end repeat sort lines of AllLimits repeat with i=1 to the number of lines of AllLimits delete word 1 of line i of AllLimits end repeat repeat until first line of AllLimits is not empty if first line of AllLimits is empty then delete first line of AllLimits end repeat put empty into fld "installedLimits2" repeat with i=1 to the number of lines of AllLimits get line i of AllLimits put "C" & item 2 of it & " - " & item 1 of it & return after fld "installedLimits2" end repeat put AllLimits into fld "installedLimits" put empty into fld "CurrentLine" end sortLimitName on installGraph WithMessage if the number of lines of fld "installedLimits">59 then answer "No more room for custom limit formulas. You have the maximum 60 custom limits installed." exit installGraph end if set cursor to watch put ("C" & fld "cone" & " - " & fld "name") into myCurrentLimit if myCurrentLimit is in fld "InstalledLimits2" then repeat until fld "name" is not in fld "InstalledLimits2" ask "Sorry. There is already a limit formula '" & myCurrentLimit & "'." & \ return & "Please rename this limit formula." with fld "name" if it is empty then exit installGraph else put it into fld "Name" put "noDialog" into withMessage end if end repeat end if if WithMessage is empty then answer "Add limit formula shown as '" & fld "name" & "'?" with "Cancel" or "Install" if it is cancel then exit installGraph end if set cursor to watch lock screen repeat until last char of fld "installedLimits" is not return if last char of fld "installedLimits" is return then delete last char of fld "installedLimits" if last char of fld "installedLimits2" is return then delete last char of fld "installedLimits2" end repeat put return & fld "name" & "," & fld "Cone" & ","\ & fld "surface" & "," after fld "installedLimits" put ",,,K,Na,Li,Ca,Ba,Sr,Mg,Zn,B,Al,Si,Pb,P,," into myOxides repeat with i=4 to 11 get the bottom of bg btn (item i of myOxides) put 2-(it*.01) & " " after fld "installedLimits" get the top of bg btn (item i of myOxides) if it = bottom of bg btn (item i of myOxides) then put "0.00" & "," after fld "installedLimits" else put 2-(it*.01) & "," after fld "installedLimits" end repeat repeat with i=12 to 13 -- B & Al get the bottom of bg btn (item i of myOxides) put 4-(it*.02) & " " after fld "installedLimits" get the top of bg btn (item i of myOxides) put 4-(it*.02) & "," after fld "installedLimits" end repeat get the bottom of bg btn "Si" -- Si put 40-(it*.2) & " " after fld "installedLimits" get the top of bg btn "Si" put 40-(it*.2) & "," after fld "installedLimits" get the bottom of bg btn "Pb" -- Pb put 2-(it*.01) & " " after fld "installedLimits" get the top of bg btn "Pb" put 2-(it*.01) & "," after fld "installedLimits" get the bottom of bg btn "P" -- P put 2-(it*.01) & " " after fld "installedLimits" get the top of bg btn "P" put 2-(it*.01) & "," after fld "installedLimits" -- set the scroll of fld "installedLimits" to the textHeight of \ -- fld "installedLimits"*the number of lines of fld "installedLimits" put empty into fld "installedLimits2" put fld "installedLimits" into AllLimits put empty into fld "installedLimits2" repeat with i=1 to the number of lines of AllLimits get line i of AllLimits put "C" & item 2 of it & " - " & item 1 of it & return after fld "installedLimits2" end repeat if last char of fld "installedLimits" is return then delete last char of fld "installedLimits" if last char of fld "installedLimits2" is return then delete last char of fld "installedLimits2" select last line of fld "installedLimits2" unlock screen end installGraph on SaveLimitGraph if fld "Name" is empty then put "Unnamed.LIMIT" into fileName else put "C" & fld "cone" && char 1 to 22 of fld "Name" & ".LIMIT" into fileName ask File "Save the limit graph shown as:" with fileName if the result is not empty then exit saveLimitGraph put it into fileName put "HGLimitFormula" & tab into myLimit put fld "name" & tab & fld "Cone" & tab\ & fld "surface" & tab after myLimit put ",,,K,Na,Li,Ca,Ba,Sr,Mg,Zn,B,Al,Si,Pb,P,," into myOxides repeat with i=4 to 11 get the bottom of bg btn (item i of myOxides) put 2-(it*.01) & " " after myLimit get the top of bg btn (item i of myOxides) if it = bottom of bg btn (item i of myOxides) then put "0.00" & tab after myLimit else put 2-(it*.01) & tab after myLimit end repeat repeat with i=12 to 13 -- B & Al get the bottom of bg btn (item i of myOxides) put 4-(it*.02) & " " after myLimit get the top of bg btn (item i of myOxides) put 4-(it*.02) & tab after myLimit end repeat get the bottom of bg btn "Si" -- Si put 40-(it*.2) & " " after myLimit get the top of bg btn "Si" put 40-(it*.2) & tab after myLimit get the bottom of bg btn "Pb" -- Pb put 2-(it*.01) & " " after myLimit get the top of bg btn "Pb" put 2-(it*.01) & tab after myLimit get the bottom of bg btn "P" -- P put 2-(it*.01) & " " after myLimit get the top of bg btn "P" put 2-(it*.01) & tab after myLimit open file FileName write myLimit to file filename close file filename end saveLimitGraph cREVTempMastermarkfalse dontSearchtruethreeDtruerect 0,0,518,411name LimitFormulas patterns defaultButtoncolors 255,255,204 layer2 borderWidth2 cantDeletefalseid5604altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs.10906201881936556109062018820365281090620188194655710906201882046529109062018819565581090620188205653010906201881966559109062018820665311090620188207653210906201881976560108853817356667081090620188208653310906201881986523109062018821065351090620188209653410906201881996524108984088196867021089840881970670410898408819696703108984088197167051089840881972670610898408819736707108974116091867161090620188174289810906201881756062109061955850067181090620188176653910906201881776540109062018817865411090620188179654210906201881806543109062018818165441090620188182654510906201881836546109062018818465471090620188185654810906201881866549109062018818765501090620188188655110906201881906553109062018818965521090620188200652510906201881916554109062018820165261090620188192655510906201882026527cREVGeometryCacheorder total46 cREVGeneral R{|}~.4<> !KkX on closefield global OldKamount setButtonHeight if the visible of button "Na" is false then put card field "K"/OldKamount into myFactor set the numberFormat to 0.0000 put item 1 of cd fld "tempKNa"*myFactor into item 1 of cd fld "tempKNa" put item 2 of cd fld "tempKNa"*myFactor into item 2 of cd fld "tempKNa" end if end closefield on setButtonHeight global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit setButtonHeight else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end setButtonHeight on openfield global OldKamount put line 1 of me into OldKamount end openfield# cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 31,210,62,225multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6433altId13autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameKtoolTipvGridfalse listBehaviorfalselayer28visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881879 0.06 "NakX won closefield setButtonHeight end closefield on setButtonHeight global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit setButtonHeight else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end setButtonHeight ;cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 59,210,87,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6434altId23autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNatoolTipvGridfalse listBehaviorfalselayer29visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881880 0.19 #LikX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldXcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect88,210,116,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6435altId24autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameLitoolTipvGridfalse listBehaviorfalselayer30visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881881 0.00 $CakX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldscREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect115,210,143,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6436altId25autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCatoolTipvGridfalse listBehaviorfalselayer31visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881882 0.06 %BakX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect142,210,170,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6437altId26autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBatoolTipvGridfalse listBehaviorfalselayer32visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881883 0.00 &SrkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect169,210,197,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6438altId27autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSrtoolTipvGridfalse listBehaviorfalselayer33visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881884 0.53 'MgkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect196,210,224,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6439altId28autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameMgtoolTipvGridfalse listBehaviorfalselayer34visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881885 0.01 (ZnkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect223,210,252,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6440altId29autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameZntoolTipvGridfalse listBehaviorfalselayer35visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881886 0.00 )PbKX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefieldcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect251,210,279,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6441altId132autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namePbtoolTipvGridfalse listBehaviorfalselayer36visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881887 0.00 *KA &on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts if the visible of button "Na" is false then if OldAmount <>0 then put card field myflux/OldAmount into myFactor else put 1 into myFactor set the numberFormat to 0.00 put item 1 of cd fld "tempKNa"*myFactor into item 1 of cd fld "tempKNa" put item 2 of cd fld "tempKNa"*myFactor into item 2 of cd fld "tempKNa" end if end mousedown -- ScriptEdit Prefs:Monaco,9,47,24,308,541,553,553,50 2(cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 40,169,55,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6442altId7 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameKicon0toolTiplayer37 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881888 +NaA }on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,47,24,197,434,0,657,50 2CcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 67,186,82,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6443altId14 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameNaicon0toolTiplayer38 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881889 ,LiA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,65,18,361,489,657,657,50 2^ cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect94,200,109,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6444altId15 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameLiicon0toolTiplayer39 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881890 -CaA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,65,18,215,434,657,657,50 2ycREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect121,199,136,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6445altId16 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer40 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881891 .BaA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,65,18,215,434,657,657,50 2 cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect148,146,163,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6446altId17 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBaicon0toolTiplayer41 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881892 /SrA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown 2?cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect175,200,190,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6447altId18 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSricon0toolTiplayer42 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881893 0MgA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,65,18,215,434,657,657,50 2 cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect202,200,217,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6448altId19 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameMgicon0toolTiplayer43 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881894 1ZnA Gon mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown 2 cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect229,200,244,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6449altId20 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameZnicon0toolTiplayer44 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881895 2PbA on mousedown Global myFlux put the short name of me into MyFlux put cd field myflux into oldAmount put the mouseV into OldMouseLoc put the rect of me into myRect put item 2 of the rect of me into myHeight repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of myRect set the rect of me to myRect put 2-(myHeight*.01) into card field MyFlux end if end repeat AdjustAmounts end mousedown -- ScriptEdit Prefs:Monaco,9,65,18,305,455,657,657,50 2 cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect256,200,271,210 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6450altId131 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePbicon0toolTiplayer45 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881896 3SiA on mousedown if the optionKey is down then checkAmount (the short name of me) else put empty into NewAmount put the mouseV into OldMouseLoc put item 2 of the rect of me into myHeight put the rect of me into myRect repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then put true into NewAmount add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of MyRect set the rect of me to MyRect put 40-(myHeight*.2) into card field "Si" end if end repeat if newAmount is True then if the hilite of btn "link ratio" is true then get card field "Al/Si Ratio" if it >0 then set numberFormat to 0.00 put card field "Si"/it into card field "Al" set numberformat to 0 put round(200 - 50*(card field "Si"/it)) into AlHeight put the rect of btn "Al" into AlRect put AlHeight into item 2 of AlRect set the rect of button "Al" to AlRect end if else set numberformat to 0.0 put cd fld "Si"/cd fld "Al" into card field "Al/Si Ratio" end if doThermalExpansion if the short name of bkgnd button id 15 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" put empty into NewAmount end if end if percentageAnalysis end mousedown on checkAmount myOxide put item 2 of rect of btn myOxide into myAmt put item 2 of rect of bg btn myoxide into UpperLimit put item 4 of rect of bg btn myoxide into LowerLimit if myAmt LowerLimit then answer "Silica too low - may be dry, non-glassy." end checkAmount 2-cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect458,165,474,211 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6451altId1 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSiicon0toolTiplayer46 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881897 4AlA ton mousedown if the optionKey is down then checkAmount (the short name of me) else put empty into NewAmount put the mouseV into OldMouseLoc put item 2 of the rect of me into myHeight put the rect of me into myRect repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then put true into newAmount add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of MyRect set the rect of me to MyRect put 4-(myHeight*.02) into card field "Al" end if end repeat if newAmount is True then if the hilite of btn "link ratio" is true then get cd fld "Al/Si Ratio" if it >0 then put it*cd fld "Al" into cd fld "Si" put round(200 - 5*(it*card field "Al")) into SiHeight put the rect of btn "Si" into SiRect put SiHeight into item 2 of SiRect set the rect of button "Si" to SiRect end if else set numberformat to 0.0 put cd fld "Si"/cd fld "Al" into card field "Al/Si Ratio" end if doThermalExpansion if the short name of bkgnd button id 15 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" percentageAnalysis put empty into NewAmount end if end if end mousedown on checkAmount myOxide put item 2 of rect of btn myOxide into myAmt put item 2 of rect of bg btn myoxide into UpperLimit put item 4 of rect of bg btn myoxide into LowerLimit if myAmt LowerLimit then answer "Alumina too low - glaze may run." end checkAmount 2V3cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect342,168,359,212 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6452altId3 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameAlicon0toolTiplayer47 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881898 5AlkX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "Al" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>2 then repeat until it>=0 and it<=2 ask "Amounts must be between 0 and 2." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 put round(200 - 50*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeightM"cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect333,210,367,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6453altId4autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAltoolTipvGridfalse listBehaviorfalselayer48visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881899 0.78 6ConeUpC  0on mouseup answer "Raise the firing temperature of this glaze by one cone?"\ & return & "(Changes larger than one or two cones are less likely to be successful.)"\ & return & return & "This feature is highly experimental." & return & "Test all glazes carefully!"\ with "Cancel" or "Okay" if it is "Cancel" then exit mouseup get fld "limitName" if it is not empty then delete word 1 to 2 of it answer "You are currently using the custom limit formula '" & it &\ "'. Changing the limit cone will revert to using a generic limit formula."\ with "Cancel" or "Okay" if it is "Cancel" then exit mouseup end if get word 1 of cd fld "cone" of cd "Limits" if it contains "-" then put char 1 to offset("-", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if the last char of theTemp is not in "1,2,3,4,5,6,7,8,9,0" then delete last char of theTemp if theTemp is 1 and char 1 of theTemp is "0" then delete char 1 of theTemp else if char 1 of theTemp is "0" then subtract one from theTemp else add 1 to theTemp end if altercone theTemp end mouseUp; A4cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 240,61,256,74 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6454altId137 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameConeUpicon16692toolTiplayer49 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881900 7SikX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "Si" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>20 then repeat until it>=0 and it<=20 ask "Amounts must be between 0 and 20." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 put round(200 - 5*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeight&cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect442,210,480,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6455altId6autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSitoolTipvGridfalse listBehaviorfalselayer50visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881901 6.80 8 ConeDownC  2on mouseup answer "Lower the firing temperature of this glaze by one cone?"\ & return & "(Changes larger than one or two cones are less likely to be successful.)"\ & return & return & "This feature is highly experimental." & return & "Test all glazes carefully!"\ with "Cancel" or "Okay" if it is "Cancel" then exit mouseup get fld "limitName" if it is not empty then delete word 1 to 2 of it answer "You are currently using the custom limit formula '" & it &\ "'. Changing the limit cone will revert to using a generic limit formula."\ with "Cancel" or "Okay" if it is "Cancel" then exit mouseup end if get word 1 of cd fld "cone" of cd "Limits" if it contains "-" then put char 1 to offset("-", it) of it into TheTemp delete last char of theTemp else put it into TheTemp end if if the last char of theTemp is not in "1,2,3,4,5,6,7,8,9,0" then delete last char of theTemp if theTemp is 1 and char 1 of theTemp is not "0" then put "0" before theTemp else if char 1 of theTemp is "0" then add 1 to theTemp else subtract one from theTemp end if altercone theTemp end mouseUpB A5cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 240,68,256,79 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6456altId138 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameConeDownicon16693toolTiplayer51 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881902 9 Link Ratioe  Don mouseUp set the hilite of me to not the hilite of me end mouseUpT`Link Si:Al RatiocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect422,337,510,360 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors 0,0,0 hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id6457altId136 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestylecheckbox disabledIcon0 armBorderfalsename Link Ratioicon0toolTiplayer52 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize10 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881903 ;Al?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp R6ScREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect337,224,361,278 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6459altId83 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameAl?icon0toolTiplayer54 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881905 <Si?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp /TcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect453,223,474,270 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6460altId84 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSi?icon0toolTiplayer55 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881906 =BkX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "B" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>2 then repeat until it>=0 and it<=2 ask "Amounts must be between 0 and 2." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 set numberformat to 0 put round(200 - 50*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeight +"cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect299,210,333,224multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6461altId31autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBtoolTipvGridfalse listBehaviorfalselayer56visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881907 0.03 ? TotalFluxKh  $cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,210,33,223multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6463altId36autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name TotalFluxtoolTipvGridfalse listBehaviorfalselayer58visibletrue cantSelectfalse borderWidth2margins5 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881909 1.00 @Name iH6%cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 4,48,240,78multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6464altId37autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNametoolTipvGridfalse listBehaviorfalselayer59visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881910 Bronze Aqua Glaze Gloss 2 ACone kX'on closefield global startingCone get me if it is not startingCone then setGlazeLimits end closefield on mouseenter global startingCone put me into startingCone end mouseenter on mouseleave global startingCone get me if it is not startingCone then setGlazeLimits end mouseleave 3375&cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 254,56,311,75multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6465altId38autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameConetoolTipvGridfalse listBehaviorfalselayer60visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881911 10 BBA on mousedown put empty into NewAmount put the mouseV into OldMouseLoc put item 2 of the rect of me into myHeight put the rect of me into myRect repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then put true into NewAmount add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of MyRect set the rect of me to myRect put 4-(myHeight*.02) into card field "B" end if end repeat if newAmount is True then doThermalExpansion if the short name of bkgnd button id 15 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" put empty into NewAmount percentageAnalysis end if end mousedown 24 (cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect308,200,324,211 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6466altId40 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBicon0toolTiplayer61 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881912 CSet Glaze LimitsEon mouseUp set the cursor to watch hide message global DoLimits get word 1 of card field "cone" if it is empty then play boing Ask "Enter a cone number between 016 and 14." if it is empty then exit mouseup put it into card field "Cone" end if put it into TheTemp find word theTemp in field "coneNumbers" if the result is "not found" then play boing put "Sorry, not a cone number I know. Use only cones 016 to 14." exit mouseup end if put word 2 of the foundline into whichLine put line whichLine of card field "coneTemp" into theTemp put -43.0417+(0.1401*TheTemp)-(0.00014915*(TheTemp^2))+\ .000000053846*(TheTemp^3) into TheAmount if the short name of bkgnd button id 15 is "Matte" then put .75*theAmount into theAmount --put theamount put the rect of bkgnd button "Si" into MyButton put round(200 - 5*(.5*theAmount)) into item 4 of myButton put round(200 - 5*theAmount) into item 2 of myButton set the rect of bkgnd button "Si" to myButton put (.55774-(0.001385*TheTemp)+(0.00000100023*(TheTemp^2)))\ into TheAmount if the short name of bkgnd button id 15 is "Matte" then put 1.5*theAmount into theAmount put the rect of bkgnd button "Al" into MyButton put round(200 - 50*(.5*theAmount)) into item 4 of myButton put round(200 - 50*theAmount) into item 2 of myButton set the rect of bkgnd button "Al" to myButton put 1.6861-(0.00114*TheTemp) into TheAmount if the short name of bkgnd button id 15 is "Matte" then put .5*theAmount into theAmount put the rect of bkgnd button "B" into MyButton put round(200 - 50*(.25*theAmount)) into item 4 of myButton put round(200 - 50*1.6*theAmount) into item 2 of myButton set the rect of bkgnd button "B" to myButton put (1.6861-(0.00114*TheTemp)) into TheAmount if the short name of bkgnd button id 15 is "Matte" then put .5*theAmount into theAmount put the rect of bkgnd button "K" into MyButton put round(200 - 50*(.4*theAmount)) into item 4 of myButton put round(200 - 50*1.15*theAmount) into item 2 of myButton set the rect of bkgnd button "K" to myButton put (1.6861-(0.00114*TheTemp)) into TheAmount if the short name of bkgnd button id 15 is "Matte" then put .5*theAmount into theAmount put the rect of bkgnd button "Na" into MyButton put round(200 - 50*(.4*theAmount)) into item 4 of myButton put round(200 - 50*1.15*theAmount) into item 2 of myButton set the rect of bkgnd button "Na" to myButton put (1.0456-(.0026156*TheTemp)+(0.0000018245*(TheTemp^2)))\ into TheAmount put the rect of bkgnd button "Ca" into MyButton put round(200 - 50*(.4*theAmount)) into item 4 of myButton put round(200 - 50*1.5*theAmount) into item 2 of myButton set the rect of bkgnd button "Ca" to myButton if theTemp<950 and the short name of bkgnd button id 15 is not "Matte" then put 0 into theAmount else put (.091071-(0.00044524*TheTemp)+(0.0000005238116*TheTemp^2))\ into TheAmount if the short name of bkgnd button id 15 is "Matte" then put 2*theAmount into theAmount put the rect of bkgnd button "Mg" into MyButton put round(200 - 50*(.05*theAmount)) into item 4 of myButton put round(200 - 50*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Mg" to myButton if theTemp<950 and the short name of bkgnd button id 15 is not "Matte" then put 0 into theAmount else put (.090171-(.00044524*TheTemp)+(0.00000052381*(TheTemp^2)))\ into TheAmount if the short name of bkgnd button id 15 is "Matte" then put 2*theAmount into theAmount put the rect of bkgnd button "Ba" into MyButton put round(200 - 50*(.05*theAmount)) into item 4 of myButton put round(200 - 50*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Ba" to myButton if theTemp<950 then put 0 into theAmount else put (-.28375+(0.00024167*TheTemp)+(0.00000016667*(TheTemp^2)))\ into TheAmount put the rect of bkgnd button "Zn" into MyButton put round(200 - 50*(.05*theAmount)) into item 4 of myButton put round(200 - 50*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Zn" to myButton if TheTemp<1200 then put (8.8928-(.026617*TheTemp)+(0.000030527*(TheTemp^2)))-\ .000000011987*(TheTemp^3) into TheAmount if 1.05*theAmount>=1 then put 1.000 into HighAmount put the rect of bkgnd button "Pb" into MyButton put round(200 - 50*(.4*theAmount)) into item 4 of myButton put 150 into item 2 of myButton set the rect of bkgnd button "Pb" to myButton else put the rect of bkgnd button "Pb" into MyButton put round(200 - 50*(.05*theAmount)) into item 4 of myButton put round(200 - 50*1.05*theAmount) into item 2 of myButton set the rect of bkgnd button "Pb" to myButton end if else set the rect of bkgnd button "Pb" to 248,200,272,201 if the short name of bkgnd button id 15 is "Glossy" then put "Suggested Al/Si Ratio: 1: 8 or larger"\ into field "SuggestedSi" else put "Suggested Al/Si Ratio: less than 1: 8" \ into field "SuggestedSi" --this is the end of the script --end if end mouseUp ~:w)cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 382,58,501,80 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6467altId41 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameSet Glaze Limitsicon0toolTiplayer62 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881913 D ConeTemp?xon mouseup hide me end mouseupcxB-cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight16rect 99,20,219,342multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6468altId45autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ConeTemp?toolTipvGridfalse listBehaviorfalselayer63visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881914 016,792 015,804 014,838 013,852 012,884 011,894 010,905 09,923 08,955 07,984 06,999 05,1046 04,1060 03,1101 02,1120 01,1137 1,1154 2,1162 3,1168 4,1186 5,1196 6,1222 7,1240 8,1263 9,1280 10,1305 11,1315 12,1326 13,1346 14,1366  a@@ E ThermalExpanMXon closefield global startingCone get me if it is not startingCone then setGlazeLimits end closefield on mouseenter global startingCone put me into startingCone end mouseenter on mouseleave global startingCone get me if it is not startingCone then setGlazeLimits end mouseleave<1/cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 412,60,461,77multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6469altId47autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ThermalExpantoolTipvGridfalse listBehaviorfalselayer64visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881915 7.94 F ThermExpan@?+on mouseUp doThermalExpansion end mouseUp :h0cREVTempMaster; traversalOnfalseinksrcCopythreeDfalse hiliteBordertruerect 408,58,512,78 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitefalseshadowfalse textAligncenterarmedfalsemenuMouseButton1id6470altId48 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruename ThermExpanicon0toolTiplayer65 accelTextvisibletrue cantSelectfalse borderWidth1 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881916 GCombined K & NaE on mouseUp if the hilite of me is false then set the hilite of me to true hide card field "Na" hide button "Na" hide bkgnd button "Na" hide cd fld "pctNa" put cd fld "Na" & "," & cd fld "K" into cd field "tempKNa" add card fld "Na" to Card fld "K" -- new 4/25/92 if fld "LimitName" is not empty then set numberformat to 0 put the top of bg btn "Na" into NaTop put bottom of bg btn "Na" into NaBottom put top of bg btn "K" into KTop put bottom of bg btn "K" into KBottom put the rect of bg btn "K" & return & the rect of bg btn "Na" into fld "KNaButtonLoc" put NaBottom-NaTop into NaHeight put KBottom-KTop into KHeight if NaBottom

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881919 J LimitHelpA on mouseup hide me end mouseup1s9cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,49,377,275multipleHilitesfalse patterns colors shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6474altId57autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name LimitHelptoolTipvGridfalse listBehaviorfalselayer69visiblefalse cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881920 ? Quick Glaze Limit Help D (also see the manual and the Help stack) To set the oxide amounts, simply click on of the white bars on the graph and hold the mouse button down while you move the mouse. You may also type the amount you want into the text field for any oxide. /To set the glaze limits, enter a cone number in the cone field, then click the "Surface" button to change between glossy and matte. For glaze limits for specific types of glazes choose a custom limit formula from the Glaze Limits menu. Surface type will be set automatically with custom limit formulas. When the glaze is the way you want it, choose "Send Unity to Calculator" from the Glaze Calculator menu to transfer the unity formula to the calculator, then choose "calculate." > click to hide K hideRatio@A_Con mouseUp hide me send mouseup to button "hideTitle" end mouseUp <P@cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect177,316,513,343 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6475altId64 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename hideRatioicon0toolTiplayer70 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881921 M HideButtons@A_Con mouseUp hide me send mouseup to button "hideTitle" end mouseUp 4#?cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 0,308,188,343 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6477altId63 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename HideButtonsicon0toolTiplayer71 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881922 NLi?A Eon mouseUp if the optionKey is down then set the visible of cd fld "KNaLi?" to not visible of\ cd fld "KNaLi?" set the visible of cd fld "KNaLi?Header" to not visible of\ cd fld "KNaLi?Header" end if if the visible of cd fld "KNaLi?" is false then set the hilite of me to false else set the hilite of me to true end mouseUp Z0LcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect89,223,112,268 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6478altId76 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameLi?icon0toolTiplayer72 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881923 OCa?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp v-McREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect119,223,140,268 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6479altId77 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameCa?icon0toolTiplayer73 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881924 PBa?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp -NcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect147,223,168,268 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6480altId78 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameBa?icon0toolTiplayer74 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881925 QMg?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp 4OcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect198,223,221,275 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6481altId79 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameMg?icon0toolTiplayer75 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881926 RZn?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp /QcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect226,223,248,270 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6482altId81 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameZn?icon0toolTiplayer76 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881927 SB?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp 54RcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect306,223,327,275 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6483altId82 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameB?icon0toolTiplayer77 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881928 TSr?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp +cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect170,223,193,266 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6484altId133 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameSr?icon0toolTiplayer78 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881929 UPb?A on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader else send mouseup to bg btn "no lead" if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp .wcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect254,223,276,269 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6485altId119 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenamePb?icon0toolTiplayer79 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881930 VAnalyze Glaze@Ey--1989-2004 Richard Burkett - all rights reserved worldwide on mouseUp set the cursor to watch set numberFormat to 0.00 put empty into myAnalysis if char 1 of cd fld "cone" is "0" then put "Lo" into HiLo else put "Hi" into HiLo put "Dominant oxides in this glaze: " into DominantOxides put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb,B,Al,Si" into theOxides repeat with i=1 to the number of items of theOxides put item i of theOxides into myOxide if the visible of btn myOxide is true then put item 2 of rect of bg btn myOxide into highAmt put item 4 of rect of bg btn myOxide into lowAmt put .4*(LowAmt-HighAmt)+highAmt into MidAmt if item 2 of rect of btn myOxidelowAmt then put line i of cd fld (HiLo & "Fire-?") & return after myAnalysis if item 2 of rect of btn myOxide0 then put "," & myOxide after dominantOxides end if end repeat if item 2 of DominantOxides is "K" then put "KNa" into item 2 of \ DominantOxides if item 3 of DominantOxides is "KNa" then delete item 3 of \ DominantOxides if line 1 of cd fld "Ba">0 and line 1 of cd fld "B">0 and the short name of bg btn id 15 is "Matte" then put "* Barium and Boron both present - it is unlikely that the glaze will be matte and it may be quite fluid."\ & return before myAnalysis if line 1 of cd fld "Sr">0 and line 1 of cd fld "B">0 and the short name of bg btn id 15 is "Matte" then put "* Strontium and Boron both present - it is unlikely that the glaze will be matte and it may be quite fluid."\ & return before myAnalysis if myAnalysis contains "Silica: too low" \ and myAnalysis contains "Alumina: too low" then put "* Flux amounts are too high in this glaze, add more Silica and Alumina."\ & return before myAnalysis set numberFormat to 0.0 put cd fld "SI"/cd fld "Al" into SiAlRatio if SiAlRatio<5.0 -- and the short name of bg btn id 15 is not "Matte" then put "* Silica/Alumina Ratio is " & SiAlRatio & ":1" & return &\ "As the Silica:Alumina Ratio is less than 5 to 1 the glaze will "\ & "probably be matte unless large amounts of Boron are present."\ & return before myAnalysis if SiAlRatio>5.0 and SiAlRatio<8.0 then put "* Silica/Alumina Ratio is " & SiAlRatio & ":1" & return &\ "As the Silica:Alumina Ratio is greater than 5 to 1, but less than "\ & "8 to 1, the glaze will "\ & "probably be satin or glossy, but not matte unless excessive amounts "\ & "of Calcium, Lithium, Magnesium, Barium or Zinc are present."\ & return before myAnalysis if SiAlRatio>8.0 then put "* Silica/Alumina Ratio is " & SiAlRatio & ":1" & return &\ "As the Silica:Alumina Ratio is greater than 8 to 1 the glaze will"\ & " probably be glossy unless very large amounts of Calcium, "\ & "Lithium, Magnesium, Barium or Zinc are present."\ & return before myAnalysis if cd fld "ThermalExpan"<6.0 and cd fld "ThermalExpan" is not empty then put "* WARNING: Thermal expansion is very low. This glaze may shiver on most stoneware clays."\ & " Remove Silica, Zinc, or Magnesium or ADD Sodium or Potasium to raise the thermal expansion." & return before myAnalysis else if cd fld "ThermalExpan"<6.5 and cd fld "ThermalExpan" is not empty then put "* WARNING: Thermal expansion is low. This glaze may shiver on many stoneware clays."\ & " Remove Silica, Zinc, or Magnesium or ADD Sodium or Potasium to raise the thermal expansion."\ & return before myAnalysis if cd fld "ThermalExpan">7.8 then put "* Thermal expansion too high. Glaze is likely to craze on most stoneware clays."\ & " Add Silica, Zinc, or Lithium to lower the thermal expansion." & return before myAnalysis else if cd fld "ThermalExpan">7.3 then put "* Thermal expansion slightly high. This glaze may craze on many stoneware clays."\ & " Add Silica, Zinc, or Lithium to lower the thermal expansion." & return before myAnalysis if cd fld "ThermalExpan">6.5 and cd fld "ThermalExpan"<7.3 then put "Thermal expansion is about right to not craze on typical clay bodies. Underfired (porous) clays will still be likely to craze." & return before myAnalysis end if if cd fld "Pb">0 and cd fld "Si"<>0 then put (cd fld "TotalFlux"+ cd fld "Al")/cd fld "Si" into MellorsRatio -- put mellorsRatio if MellorsRatio >0.5 then put "* WARNING: This glaze is likely to be an unsafe Lead glaze, as the Silica content is too low."\ & return before myAnalysis end if if DominantOxides contains "Ba," and DominantOxides contains "B," and\ "Al," is not in DominantOxides then put "* WARNING: This glaze contains large amounts of both Barium"\ & " and Boron and may be quite runny unless sufficient amounts of "\ & "Alumina are present." & return before myAnalysis if myAnalysis is empty then put "* This should be a stable, average glaze." & return\ after myAnalysis delete char offset(",",DominantOxides) of DominantOxides put DominantOxides & return before MyAnalysis put empty into theCause if the short name of bg btn id 15 contains "Mat" then put "is matte" into TheCause else if cd fld "Li">.01 then put "contains Lithium" into theCause else if cd fld "Sr">0.01 then put "contains Strontium" into theCause if cd fld "ThermalExpan" is empty then if theCause is empty then put "Thermal expansion not currently calculated." & return before myAnalysis else put "Glaze " & theCause & ". Thermal Expansion is not accurate."\ & return before myAnalysis else if theCause is not empty then put "Glaze " & theCause & ". Thermal Expansion as calculated is not likely to be accurate."\ & return before myAnalysis end if put "GLAZE ANALYSIS INFORMATION:" & return before myAnalysis put myAnalysis into cd fld "GlazeAnalysis?" set the scroll of cd fld "GlazeAnalysis?" to 0 lock screen show cd fld "GlazeAnalysis?" show btn "Print Analysis" show btn "Save Analysis" show btn "AnalysisBackDrop" show btn "Done" if the platform is "MacOS" then put 388 into myMaxHeight else -- for Windows with menus in window put 413 into myMaxHeight end if set the icon of btn "bigSmallWindow" to 201186 revChangeWindowSize 518,myMaxHeight unlock screen end mouseUp q_cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 396,3,509,24 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6486altId95 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle roundrect disabledIcon0 armBorderfalsename Analyze Glazeicon0toolTiplayer80 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881931 W HiFire+?ah ,K`cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight12rect 0,44,513,119multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6487altId96autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameHiFire+?toolTipvGridfalse listBehaviorfalselayer81visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881932 f Potassium/Sodium oxides: quite high - glaze will probably be runny unless sufficient Silica and Alumina are present. There is a strong likelyhood of substantial crazing - substitute some Lithium for KNaO to improve glaze fit. Colorants will give intense, alkaline colors, but keep Alumina low for the most intense color. Copper will give turquoise blues. e Potassium/Sodium oxides: quite high - glaze will probably be runny unless sufficient Silica and Alumina are present. There is a strong likelyhood of substantial crazing - substitute some Lithium for KNaO to improve glaze fit. Colorants will give intense, alkaline colors, but keep Alumina low for the most intense color. Copper will give turquoise blues.  Lithium oxide: very high - glaze will probably be runny and may shiver due to low thermal expansion. However, some flowing mattes are made with extremely high amounts Lithium. Colorants will give intense, alkaline colors. Copper will give turquoise blues.  Calcium oxide: very high - glaze will possibly be somewhat matte and runny in high fire glazes where it is a strong flux. Rarely Calcium may be the only flux used at temperatures above 8-9. Calcium is a moderately active flux at mid-range temperatures. 0 Barium oxide: quite high - glaze will probably be quite matte if boron is not present. Colorants will give intense colors similar to alkaline oxides. Copper will give turquoise blues. There is a strong likelihood of Barium release in high Barium glazes, especially at mid-range temperatures and below.  Strontium oxide: quite high - glaze will probably be fluid and somewhat matte if boron is not present. Colorants will give fairly intense colors similar. # Magnesium oxide: very high - glaze will probably be satin matte to quite matte. Colors will be somewhat subdued. Cobalt will give purple instead of blue. Iron will tend toward the yellow/green. Large amounts of Magnesium carbonate are often used in crawl glazes (around 0.8 moles of MgO).  Zinc oxide: quite high - glaze will probably be opaque and somewhat matte. High Zinc content (above 0.6) is necessary in some types of crystal glazes along with sizable amounts of Titanium and low Alumina content. Y Lead oxide: too high - glaze will probably be quite runny. DO NOT USE LEAD ABOVE 5-6. ` Boron oxide: too high - glaze will probably be quite runny. Glazes may have a broken texture. I Alumina: too high - glaze will probably be matte and may be quite dry. [ Silica: too high - glaze may be devitrified, and may shiver or cause shattering of ware.  a@-I X HiFire-?ah vKacREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight12rect 0,118,513,193multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6488altId97autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameHiFire-?toolTipvGridfalse listBehaviorfalselayer82visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881933  Potassium/Sodium oxides: low - glaze may not melt as fluidly as desired unless other strong fluxes (such as Sodium, Calcium, or Boron) are also used.  Potassium/Sodium oxides: low - glaze may not melt as fluidly as desired unless other strong fluxes (such as Potassium, Calcium, or Boron) are also used. g Lithium oxide: low - adding Lithium in small amounts (within limits) will reduce chances of crazing.  Calcium oxide: quite low - calcium is a useful flux in most high-fire glazes and adds hardness to the fired glaze. Glazes low in calcium and high in alkalies may be somewhat softer and scratch easily.  Barium oxide:  Strontium oxide:  Magnesium oxide: F Zinc oxide: quite low - adding zinc will lessen chances of crazing. * Lead oxide: DO NOT USE LEAD ABOVE 5-6.  Boron oxide:  Alumina: too low - glaze will probably be quite fluid and may foster crystal formation. Alumina should be low in Copper Red glazes and almost absent in crystal glazes. H Silica: too low - glaze will probably be crazed badly and may be dry.  a@wIY magicButtonA on mouseUp if the optionKey is down and the shiftKey is down and the userlevel is 5 then set the visible of cd fld "HiFire+?" to not visible of \ cd fld "HiFire+?" set the visible of cd fld "HiFire-?" to visible of \ cd fld "HiFire+?" set the visible of cd fld "LoFire+?" to visible of \ cd fld "HiFire+?" set the visible of cd fld "LoFire-?" to visible of \ cd fld "HiFire+?" set the visible of btn "Analyze Glaze" to visible of \ cd fld "HiFire+?" end if end mouseUp  bcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 0,0,18,13 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6489altId98 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename magicButtonicon0toolTiplayer83 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881934 ^ LoFire+?ah LgcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight12rect 0,193,513,269multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6494altId103autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameLoFire+?toolTipvGridfalse listBehaviorfalselayer84visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881939  Potassium/Sodium oxides: quite high - glaze will probably be runny unless sufficient Silica and Alumina are present. There is a strong likelyhood of substantial crazing - substitute some Lithium for KNaO to improve glaze fit. Colorants will give intense, alkaline colors, but keep Alumina low for the most intense color. Copper will give turquoise blues. Glaze may be soft and easily scratched, especially if also high in boron.  Potassium/Sodium oxides: quite high - glaze will probably be runny unless sufficient Silica and Alumina are present. There is a strong likelyhood of substantial crazing - substitute some Lithium for KNaO to improve glaze fit. Colorants will give intense, alkaline colors, but keep Alumina low for the most intense color. Copper will give turquoise blues. Glaze may be soft and easily scratched, especially if also high in boron.  Lithium oxide: very high - glaze will probably be runny and may shiver due to low thermal expansion. Some flowing mattes are made with extremely high Lithium. Colorants will give intense, alkaline colors. Copper will give turquoise blues.  Calcium oxide: very high - glaze is likely to be matte or satin as Calcium is not very active as a flux at low temperatures.  Barium oxide: quite high - glaze will probably be quite matte if boron is not present. Colorants will give intense colors similar to alkaline oxides. Copper will give turquoise blues.  Strontium oxide: quite high - glaze will probably be quite matte if boron is not present. Colorants will give intense colors similar to alkaline oxides.  Magnesium oxide: very high - glaze will probably be quite matte. Colors will be somewhat subdued. Cobalt will give purple instead of blue. Iron will tend toward the yellow/green. Large amounts of Magnesium carbonate are often used in crawl glazes (around 0.8 moles of MgO). L Zinc oxide: quite high - glaze will probably be opaque and fairly matte. > Lead oxide: very high - glaze will probably be quite runny.  Boron oxide: very high - glaze will probably be quite runny. Glazes may have a broken texture. Clear glazes may have the distinctive bluish milkiness associated with Boron. Glaze may be soft and easily scratched, especially if high in alkalies.  Alumina: too high - glaze will probably be quite dry and matte. Lowfire glazes are fairly easily matted with large amounts of Alumina, but the resulting mattes are usually quite dry and underfired looking. [ Silica: too high - glaze may be devitrified, and may shiver or cause shattering of ware.  a@J _ LoFire-?ah  KicREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight12rect 0,268,513,343multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6495altId105autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameLoFire-?toolTipvGridfalse listBehaviorfalselayer85visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881940  Potassium/Sodium oxides: low - glaze may not melt as fluidly as desired unless other strong fluxes (such as Sodium, Lead, or Boron) are also used.  Potassium/Sodium oxides: low - glaze may not melt as fluidly as desired unless other strong fluxes (such as Potassium, Lead, or Boron) are also used. g Lithium oxide: low - adding Lithium in small amounts (within limits) will reduce chances of crazing. k Calcium oxide: quite low - calcium is a useful flux in most glazes and adds hardness to the fired glaze.  Barium oxide:  Strontium oxide:  Magnesium oxide: F Zinc oxide: quite low - adding zinc will lessen chances of crazing. Y Lead oxide: Most very-lowfire glazes require a little lead to help them melt properly. T Boron oxide: Boron is a very useful lowfire flux, especially in Lead-free glazes.  Alumina: too low - glaze will probably be quite fluid and may foster crystal formation. Alumina should be nearly absent in crystal glazes and quite low in some special types of low-fire glazes such as reds.  Silica: too low - glaze will probably be crazed badly and may be dry unless Boron replaces it as the major glassformer. Such glazes are usually soft and easily scratched, as Silica adds hardness.  a@ I a Pb?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup6{cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 2,63,249,92multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6497altId123autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Pb?HeadertoolTipvGridfalse listBehaviorfalselayer87visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881942 Lead oxide - Pb e Al?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup6cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 6,54,391,83multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6501altId127autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Al?HeadertoolTipvGridfalse listBehaviorfalselayer91visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881946 #Alumina - Aluminum Oxide - Al2O3 fPA on mousedown put empty into NewAmount put the mouseV into OldMouseLoc put item 2 of the rect of me into myHeight put the rect of me into MyRect repeat until the mouse is not down get the mouseV if it is not OldMouseLoc then put true into NewAmount add (it-OldMouseLoc) to myHeight put it into OldMouseLoc if myHeight<100 then put 100 into myHeight if myHeight>200 then put 200 into myHeight put myHeight into item 2 of MyRect set the rect of me to MyRect put 2-(myHeight*.01) into card field "P" end if end repeat if newAmount is True then doThermalExpansion if the short name of bkgnd button id 15 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" put empty into NewAmount percentageAnalysis end if end mousedown -- 2-(myHeight*.01) 2 cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect389,200,405,211 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors( 197,225,220 214,224,209 167,187,181 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6502altId139 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePicon0toolTiplayer92 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881947 gPkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield~ cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect382,210,410,223multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6503altId142autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0namePtoolTipvGridfalse listBehaviorfalselayer93visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881948 0.00 i P?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup;KcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 10,50,341,79multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6505altId144autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameP?HeadertoolTipvGridfalse listBehaviorfalselayer95visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881950 !Phosporus pentoxide - P205 jP?A |on mouseUp put the short name of me into myName put myName & "Header" into myHeader if the optionKey is down then set the visible of cd fld myName to not visible of\ cd fld myName set the visible of cd fld myHeader to not visible of\ cd fld myHeader end if if the visible of cd fld myName is false then set the hilite of me to false else set the hilite of me to true end mouseUp /cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect384,225,405,272 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6506altId145 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameP?icon0toolTiplayer96 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881951 k Ca?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseupdXqcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect152,100,496,128multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6507altId113autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Ca?HeadertoolTipvGridfalse listBehaviorfalselayer97visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881952 Calcium Oxide - CaO o Sr?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup@1cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 199,64,504,92multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6511altId135autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Sr?HeadertoolTipvGridfalse listBehaviorfalselayer101visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881956 Strontium Oxide - SrO r Ba?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup@HrcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 183,64,511,92multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6514altId114autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Ba?HeadertoolTipvGridfalse listBehaviorfalselayer104visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881959 Barium oxide - BaO t Mg?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup@$tcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 219,64,511,93multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6516altId116autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Mg?HeadertoolTipvGridfalse listBehaviorfalselayer106visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881961 Magnesium oxide - MgO v Zn?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseupH vcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect248,72,513,101multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6518altId118autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Zn?HeadertoolTipvGridfalse listBehaviorfalselayer108visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881963 Zinc oxide - ZnO x Si?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseupe7NcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 101,55,435,84multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6520altId129autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name Si?HeadertoolTipvGridfalse listBehaviorfalselayer110visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881965 Silica - Silicon oxide - SiO2 { LimitSetKA on mouseDown get the short name of me delete char 1 to 8 of it put it into myButton get the rect of bg btn myButton if the optionKey is down then put 200 into item 2 of it put 201 into item 4 of it set the rect of bg btn myButton to it exit mouseDown end if put the top of me into maxTop put the bottom of me into maxBottom repeat until the mouse is up if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVdi cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 62,100,89,205 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6524altId11 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsename LimitSetNaicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188198 } LimitSetLiA on mouseDown get the short name of me delete char 1 to 8 of it put it into myButton get the rect of bg btn myButton if the optionKey is down then put 200 into item 2 of it put 201 into item 4 of it set the rect of bg btn myButton to it exit mouseDown end if put the top of me into maxTop put the bottom of me into maxBottom repeat until the mouse is up if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseV=200 and item 2 of it>=199 and item 4 of it>=200 then put 200 into item 2 of it put 201 into item 4 of it set the rect of bg btn myButton to it else if the mouseVmaxTop then put the mouseV into item 2 of it else put 100 into item 2 of it set the rect of bg btn myButton to it else if the mouseV0 then repeat until Offset(",",it)=0 ask "The name of a limit formula may not contain a comma. Please rename this formula." end repeat end if repeat until char 1 of it is not " " if char 1 of it is " " then delete char 1 of it end repeat -- put it & "," after fld "installedLimits" put it into fld "Name" read from file myLimitsFile until tab if it is empty then close file myLimitsFile exit ImportLimits end if delete last char of it -- put it & "," after fld "installedLimits" put it into fld "Cone" read from file myLimitsFile until tab if it is empty then close file myLimitsFile exit ImportLimits end if delete last char of it -- put it & "," after fld "installedLimits" put it into fld "Surface" put ",,,K,Na,Li,Ca,Ba,Sr,Mg,Zn,B,Al,Si,Pb,P,," into myOxides repeat with i=4 to 16 set the cursor to busy read from file myLimitsFile until tab if it is empty then exit repeat delete last char of it put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if upperLimit=LowerLimit and upperLimit>0 then add 0.01 to upperLimit -- put it & "," after fld "installedLimits" if item i of myOxides is empty then next repeat put the rect of bg btn (item i of myOxides) into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn (item i of myOxides) to MyButtonRect end repeat close file myLimitsFile -- set the scroll of fld "installedLimits" to the textHeight of \ -- fld "installedLimits"*the number of lines of fld "installedLimits" -- put empty into fld "installedLimits2" -- repeat with i=1 to the number of lines of fld "installedLimits" -- get line i of fld "installedLimits" -- put item 1 of it && "" & item 2 of it & return after fld "installedLimits2" -- end repeat -- select last line of fld "installedLimits2" end ImportLimits cREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -4,25,516,411 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid2898altId0radioBehaviortrue textStylelockLocfalselabelname LimitFormulastoolTiplayer131visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton2 cREVGeneral revUniqueID 1090620188173 D5PNG  IHDR5KgAMA=-fPLTEٟtRNS0JIDATxv8 D_zߎ["[|懶Q͕+sZi_](*W7KpPKDH~z  `Iz,Kjnp]M ;@{U7R=1Rgs<U.i93\8N RuzSEU֟<]SU=npM9- chb+o!Z1@4I/Q6tծ1SKbx,ᠫ ۄ]=:2fCuU̶IZ @cr.]Sp(N$ J)L0թ=053+AU:Ispmۄݪ܆4zV͔ƦNWG cՂ[xFF3Ӻc* HvV16m]5etmJAlvH2y5uTr^@Ð?ڪ-Gu7};8'&dPSf,ћYf͆|c`m@fi/6DT` 1dX' (G&?#0s=W@D8KK~$R9W @p}QY;F>,\ @piVtÝ@< x$Gw)IZ эSͷo;~oFondWP.U7Bd3 c hvBoN`a|y\^tKL:#7afM}'0b*&* ɮ9@QMlQ @EҪwgfHFUg}?HK- \>GKQ !ZN`x'wthgzVvdtV%#0*Ve)gkҝ#T!*n'@'R=WPD$P@L4I)ܻCm>L@>&u>G 4O1/@TesKDwڝ@ OFOs_УV`? L\G-7{4 '`t?;R :nMn9iStÑBOת Qb1%ðȦ'{UzU@)20ۆޡwN~'QX  DmGZ ьz h۽{u3+r+5 ubEAj|cPvחo#'y=  7Ǵ, axLѳng>׋ CF&g ^6w;iVU<91$ z0 Q^B>jfGnC>*ЩD?z/H#\/GDaiQh4"\ʋ^.)k>rcXwI*9`+Voɕ xL\Ѧߊ1~0%>J\^0hL @p uy]*k+Z.[ڶrF,h֥gM!EXXi [+>Xjg{1#ExYX(SRkK+`OJ;![A>! sh\%ػ`YQjg-$OcORHE.6\7nJ;ֶ Qn4;2@t/9nRe"p {q*s8k֖6)2Ќ̻ӶO<-JE\!ږ~S@fm[ kQpcZW]FK D Z;b:{y WMxӢ;Ў[ܷ`CVp5(\3 zN9v`"Pe >]߹rB O|CJu|h˥gmC# v>5SB@pYTqkG)!swIV?{b;XzR%㒼I 2)%X6}6qMoIk1.~lPf3u!jC{MkgX'K9uPT:mTvx!pC~9,}{OLKK;brXc;b~&u:Ws$K AE*t4d -C\%uSFJhC\%s("L1>R2YR R :!@FO1p#yX:J ^h9!֙[jr>_ {DʗKRZ 'w\-L1)R|{i$A1'$OXOGake'0/މC~d9D5bV$wc /23ꐻ>:zh>Y|t7QgAMZ JNਭTX@ҖJy1KHzT%ÈLsh>#9R2\Cm/V 1ґW;`N7{uU7eJx|{a;LOѫ;|t7U .\ @p .\ @p .\ @p .\ @p .\ @p .\ @p .\ @p .\ @p .\ @p .\ @p @F3!".$^>OIENDB`cREVTempMaster traversalOnfalsepalindromeFramesfalse repeatCount0inksrcCopysize4126threeDtrue blendLevel50rect 0,29,512,338angle0namebkgnd image id 6062hotSpot1,1 fileNamecolorstoolTip alwaysBufferfalselayer131 dontDitherfalsevisibletrue cantSelectfalse borderWidth2opaquetrueyHot1id6062 currentFrame1altId0 showBorderfalse disabledfalsexHot1 frameCount0 constantMaskfalseshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1090620188174PrevC 7on mouseUp go prev updateCustomLimits end mouseUp xFcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 9,376,39,407 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6539altId2 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenamePrevicon18059toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188175 InstalledLimitsx oon mouseup put word two of the clickline into whichLine put whichline into fld "CurrentLine" if the optionKey is down then answer "Are you sure you want to delete the limit formula for" && item 1 of line whichLine of me\ && "" &item 2 of line whichLine of me & "?" with "Delete" or "Cancel" if it is "Delete" then delete line whichLine of me end if else select line whichLine of me get item 1 of line whichline of me if it is not empty then put it into fld "Name" get item 2 of line whichline of me if it is not empty then put it into fld "Cone" get item 3 of line whichline of me if it is not empty then put it into fld "Surface" repeat with i=4 to 15 set the cursor to busy get item i of line whichline of me put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if (upperLimit=LowerLimit or upperLimit-lowerLimit<.02) and upperLimit>0 then add .02 to upperLimit subtract .01 from lowerLimit end if put the rect of bg btn i into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn i to MyButtonRect end repeat select line whichLine of me end if end mouseupvCcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight13rect118,252,502,319multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6540altId4autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameInstalledLimitstoolTipvGridfalse listBehaviorfalselayer131visiblefalse cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188176  uBarium Mat,04,Mat,0.04 0.12,0.28 0.42,0 0.00,0.24 0.39,0.17 0.22,0 0.00,0 0.00,0 0.11,0 0.3,0.18 0.38,2 3.2,0 0,0 0, nClear,04,gloss,0 0.04,0.19 0.33,0 0.13,0.47 0.72,0 0.03,0 0.03,0 0.04,0 0.1,0.36 0.8,0.24 0.44,2 2.8,0 0,0 0, Generic Glaze,04,gloss,0.01 0.07,0.1 0.34,0 0.17,0.21 0.64,0 0.05,0 0.05,0 0.17,0 0.09,0.14 0.6,0.08 0.88,1.4 4.4,0 0.28,0 0.03, yLithium Mat,04,Mat,0 0.04,0.01 0.05,0.59 0.77,0.05 0.25,0 0.05,0 0.05,0.02 0.1,0 0.00,0 0.22,0.14 0.18,1 2.4,0 0,0 0.05, ~Majolica,04,opaque gloss,0.02 0.04,0.25 0.32,0 0.00,0.6 0.68,0 0.04,0 0.04,0 0.04,0 0.02,0.48 0.64,0.32 0.46,2.6 3.4,0 0,0 0, {Mat LeadFree,04,Matt,0.01 0.06,0.15 0.31,0 0.26,0.27 0.63,0 0.11,0 0.11,0 0.11,0 0.21,0.14 0.48,0.18 0.36,1.6 2.8,0 0,0 0, xStrontium Mat,04,Mat,0.04 0.12,0.28 0.42,0 0.00,0.24 0.39,-.01 0,0.17 0.22,0 0.00,0 0.11,0 0.3,0.18 0.38,2 3.2,0 0,0 0, wGeneric matte,06,Mat,0 0.06,0.05 0.28,0 0.49,0.21 0.7,0 0.06,0 0.02,0 0.11,0 0.03,0.1 0.52,0.08 0.32,0.8 3,0 0,0 0.07, vGloss,06,Gloss,0.01 0.09,0.17 0.44,0 0.33,0.17 0.59,0 0.21,0 0.08,0 0.09,0 0.02,0.22 0.64,0.12 0.36,2 3.2,0 0,0 0.01, ~Leadless Clear,06,Glossy,0 0.06,0.2 0.39,0 0.18,0.27 0.69,0 0.17,0 0.17,0 0.12,0 0.03,0.28 0.72,0.14 0.36,1.8 2.8,0 0,0 0.03, ~Leadless Lowfire Clear,06,Glossy,-.0 0.0,0.2 0.4,-.1 0.3,0.4 0.7,0.0 0.0,0 0,0.0 0.0,0.0 0.0,0.2 0.8,0.1 0.4,2.1 2.9,0.0 0.0, tMatte,06,matte,0 0.07,0.06 0.26,0 0.35,0.26 0.73,0 0.18,0 0.07,0 0.12,0 0.04,0.12 0.5,0.12 0.36,1.2 3.2,0 0,0 0.08, Leadless Raku,08,Varied,0.01 0.05,0.12 0.46,0 0.13,0.35 0.72,0 0.03,0 0.03,-.01 0.03,-.01 0.03,0.32 1,0.06 0.22,0.8 2,-.01 0,0 0, tClear Glossy,6,Glossy,0.03 0.13,0.06 0.26,0 0.2,0.35 0.73,0 0.1,0 0.1,0 0.14,0 0.1,0.08 0.68,0.28 0.44,2.6 3.6,0 0, |Gloss-no craze,6,Gloss,0 0.11,0.04 0.19,0 0.08,0.59 0.86,0 0.00,0 0.00,0.01 0.15,0 0.00,0.2 1.04,0.22 0.44,2.4 4.6,0 0,0 0, vLithium Gloss,6,Gloss,0.06 0.21,0.04 0.14,0.16 0.37,0.1 0.37,0 0.18,0 0.18,0 0.13,0 0.3,0 0.16,0.2 0.36,2 3.2,0 0.01, Lithium matte,6,mat,0.03 0.09,0.04 0.24,0.08 0.29,0.04 0.41,0 0.29,0 0.29,0 0.21,0 0.27,0 0.08,0.24 0.46,1.6 2.4,0 0,-.01 0.03, Magnesium matte,6,matte,0.04 0.1,0.05 0.18,0 0.1,0.21 0.49,0 0.09,0 0.09,0.15 0.45,0 0.18,0 0.12,0.24 0.38,1.6 2.6,-.01 0,0 0.01, gMat,6,Mat,0.04 0.13,0.05 0.24,0 0.14,0.2 0.58,0 0.21,0 0.21,0 0.22,0 0.27,0 0.12,0.26 0.5,1.8 3.2,0 0, wP2O5 Glazes ,6,,0.03 0.12,0.1 0.18,0 0.00,0.44 0.72,0 0.11,0 0.11,0.02 0.16,0 0.1,0 0.16,0.18 0.36,1.2 2.4,0 0,0 0.06, uSatin Mat,6,Satin Mat,0.04 0.12,0.05 0.19,0 0.08,0.36 0.61,0 0.14,0 0.14,0 0.2,0 0.3,0 0.26,0.3 0.46,1.8 2.6,0 0.01, }Spodumene Mat,6,matte,0.02 0.07,0.02 0.1,0.11 0.21,0.17 0.48,0 0.27,0 0.26,0.14 0.46,0 0.00,0 0.1,0.28 0.42,1.6 2.2,0 0,0 0, }Strontium Mat,6,Matte,0.05 0.1,0.08 0.27,0 0.2,0.02 0.26,0 0.07,0.02 0.76,0 0.07,0 0.19,0 0.02,0.26 0.52,1.6 2.6,0 0,0 0.01, zZinc Gloss,6,Gloss,0.03 0.15,0.08 0.21,0 0.07,0.22 0.58,0 0.11,0 0.05,0 0.21,0.1 0.28,0.02 0.22,0.2 0.36,2.4 3.4,0 0,0 0, tCrystal,9,crystal,0.02 0.12,0.05 0.21,0 0.00,0.1 0.32,0 0.18,0 0.08,0 0.00,0.38 0.63,0 0.04,0 0.08,1.4 1.8,0 0,0 0, Barium/Strontium mat,10,mat,0.06 0.13,0.06 0.23,0 0.03,0.12 0.45,-.01 0.47,0 0.47,0 0.29,0 0.05,0 0,0.28 0.48,1.8 3,0 0,0 0.02, }Blue celadon,10,glossy,0.13 0.25,0.09 0.14,0 0.00,0.27 0.65,0 0.36,0 0.36,0 0.07,0 0.02,0 0.08,0.36 0.52,3.4 4.6,0 0,0 0.02, oCeladon,10,Glossy,0.1 0.2,0.0 0.2,-.0 0.0,0.5 0.8,-.0 0.1,0 0,0.0 0.1,-.0 0.1,-.0 0.0,0.3 0.5,2.7 4.2,0.0 0.0, dCopper Red,10,Glossy,0.1 0.2,0.1 0.2,0 0,0.5 0.6,0 0.1,0 0.1,0 0.1,0 0.2,0 0.2,0.3 0.4,2.8 3.6,0 0, ~Fake Ash - rivulet,10,rivulets,0.02 0.09,0.01 0.03,0 0.01,0.61 0.78,0 0.18,0 0.18,0.05 0.2,0 0.01,0 0,0.12 0.28,0.8 2,0 0.01, {Gloss Glazes,10,gloss,0.08 0.22,0.05 0.25,0 0.05,0.3 0.69,0 0.12,0 0.05,0 0.21,0 0.09,0 0.12,0.28 0.68,2.2 4.4,0 0,0 0.02, |Gloss no boron,10,Glossy,0.09 0.22,0.06 0.24,0 0.05,0.34 0.71,0 0.09,0 0.09,0 0.13,0 0.1,-.02 0,0.28 0.76,3 4.8,0 0,0 0.02, |Gloss with boron,10,Gloss,0.08 0.2,0.09 0.22,-.01 0.03,0.39 0.66,0 0.07,0 0.07,0 0.2,0 0.07,0.08 0.2,0.28 0.48,3 4,0 0,0 0, yIron Red,10,matte,0.1 0.17,0.05 0.09,0 0.00,0.6 0.73,0 0.00,0 0.00,0.08 0.18,0 0.00,0 0,0.24 0.46,1.4 2.6,0 0,0.02 0.08, }Magnesia Matte,10,satin,0.07 0.16,0.06 0.15,-.01 0,0.34 0.45,-.01 0,-.01 0,0.33 0.44,-.01 0,0 0.12,0.28 0.52,2 3,-.01 0,0 0, iMatte,10,mat,0.06 0.15,0.07 0.14,0 0,0.29 0.52,0 0.12,0 0.12,0.16 0.41,0 0.13,0 0.08,0.3 0.52,2 3.2,0 0, ~Satin Matte,10,Satin,0.07 0.15,0.04 0.18,0 0.05,0.29 0.62,0 0.18,0 0.08,0.06 0.35,0 0.07,0 0.04,0.26 0.54,1.8 3.4,0 0,0 0.02, vShino New,10,gloss,0.13 0.22,0.49 0.65,0.06 0.26,0.03 0.1,0 0.00,0 0.00,0.01 0.04,0 0.00,0 0,0.94 1.52,4 5.8,0 0,0 0, Shino,10,Glossy,0.11 0.17,0.56 0.62,0.15 0.25,0.05 0.07,0.00 0.00,0 0,0.01 0.01,0.00 0.00,0.00 0.00,0.90 1.16,3.81 4.81,0.00 0.00, wSpodumene Mat,10,Mat,0.05 0.11,0.03 0.08,0.07 0.13,0.36 0.44,0 0.12,0 0.12,0.22 0.36,0 0.07,0 0,0.36 0.52,1.4 2.4,0 0, Temmoku,10,Glossy,0.17 0.30,0.07 0.14,0.00 0.00,0.49 0.70,-.00 0.02,0 0,-.03 0.10,-.01 0.06,-.02 0.06,0.48 0.60,3.93 5.20,0.00 0.00, Yellow Matte,10,matte,0.06 0.17,0.05 0.12,0 0.02,0.2 0.58,0.05 0.37,0.05 0.37,0.1 0.27,0 0.04,0 0,0.26 0.48,1.4 2.4,0 0,0 0.03,  aAKA o' cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 39,174,59,184 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6541altId5 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameKicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188177 NaA oA cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 65,173,85,183 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6542altId6 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameNaicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188178 LiA o\ cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect92,178,112,191 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6543altId9 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameLiicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188179 CaA ov& cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect118,160,138,198 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6544altId10 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188180 BaA o cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect146,193,166,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6545altId11 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBaicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188181 SrA o& cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect172,160,192,198 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6546altId12 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSricon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188182 MgA o cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect200,193,220,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6547altId13 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameMgicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188183 ZnA ocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect226,181,246,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6548altId14 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameZnicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188184 BA o5cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect309,186,328,201 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6549altId15 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188185 AlA oT cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect340,174,359,187 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6550altId16 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameAlicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188186 SiA ocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect456,187,476,192 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6551altId17 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSiicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188187 PbA ocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect256,200,274,201 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6552altId18 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePbicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188188  Name )h=<cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 61,60,235,81multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6553altId19autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNametoolTipvGridfalse listBehaviorfalselayer131visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188189  Frit glaze Cone )h<?cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 286,60,349,81multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6554altId20autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameConetoolTipvGridfalse listBehaviorfalselayer131visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188190  6  CurrentLineh?cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect438,234,501,253multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6555altId22autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name CurrentLinetoolTipvGridfalse listBehaviorfalselayer131visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188191  15 Surface )h<ZcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 414,60,504,81multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6556altId23autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSurfacetoolTipvGridfalse listBehaviorfalselayer131visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188192  Gloss  conenumbers(0cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 14,254,54,302multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6557altId24autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name conenumberstoolTipvGridfalse listBehaviorfalselayer131visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188193  InstalledLimits2 x \-- Script of bg fld "InstalledLimits2" 1992-1993 Richard Burkett on mouseup put word two of the clickline into whichLine put whichline into fld "CurrentLine" if the optionKey is down then answer "Are you sure you want to delete the limit formula for" && item 1 of line whichLine of me\ & "?" with "Delete" or "Cancel" if it is "Delete" then get last word of line whichLine of me -- put it && word 1 of item 1 of line whichLine of fld "InstalledLimits" if it is last word of item 1 of line whichLine of fld "InstalledLimits" then delete line whichLine of me delete line whichLine of fld "installedLimits" if the last char of me is return then delete last char of me if the last char of fld "installedLimits" is return then delete last char of fld "installedLimits" end if end if else if fld "name" is not in fld "InstalledLimits2" then answer "Do you want to install (save) the currently shown limit formula before replacing it?" with "No" or "Install" if it is "install" then installGraph "NoDialog" select line whichLine of me put item 4 to 16 of line whichLine of fld "installedLimits" into fld "CurrentLimit" get item 1 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Name" get item 2 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Cone" get item 3 of line whichline of fld "installedLimits" if it is not empty then put it into fld "Surface" put ",,,K,Na,Li,Ca,Ba,Sr,Mg,Zn,B,Al,Si,Pb,P,," into myOxides repeat with i=4 to 16 set the cursor to busy get item i of line whichline of fld "installedLimits" put word 2 of it into upperLimit if word 1 of it>=0 then put word 1 of it into lowerLimit else put 0 into lowerLimit if (upperLimit=LowerLimit or upperLimit-lowerLimit<.02) and upperLimit>0 then add .02 to upperLimit subtract .01 from lowerLimit end if put the rect of bg btn (item i of myOxides) into myButtonRect if i<=11 then put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect else if i<=13 then put round(200-(50*upperLimit)) into item 2 of MyButtonRect put round(200-(50*lowerLimit)) into item 4 of MyButtonRect else if i<=14 then put round(200-(5*upperLimit)) into item 2 of MyButtonRect put round(200-(5*lowerLimit)) into item 4 of MyButtonRect else put round(200-(100*upperLimit)) into item 2 of MyButtonRect put round(200-(100*lowerLimit)) into item 4 of MyButtonRect end if set the rect of bg btn (item i of myOxides) to MyButtonRect end repeat select line whichLine of me end if end mouseup [cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight13rect272,270,505,361multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6558altId25autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameInstalledLimits2toolTipvGridfalse listBehaviorfalselayer131visibletrue cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188194  C04 - Barium Mat C04 - Clear C04 - Generic Glaze C04 - Lithium Mat C04 - Majolica C04 - Mat LeadFree C04 - Strontium Mat C06 - Generic matte C06 - Gloss C06 - Leadless Clear C06 - Leadless Lowfire Clear C06 - Matte C08 - Leadless Raku C6 - Clear Glossy C6 - Gloss-no craze C6 - Lithium Gloss C6 - Lithium matte C6 - Magnesium matte C6 - Mat C6 - P2O5 Glazes C6 - Satin Mat C6 - Spodumene Mat C6 - Strontium Mat C6 - Zinc Gloss C9 - Crystal C10 - Barium/Strontium mat C10 - Blue celadon C10 - Celadon C10 - Copper Red C10 - Fake Ash - rivulet C10 - Gloss Glazes C10 - Gloss no boron C10 - Gloss with boron C10 - Iron Red C10 - Magnesia Matte C10 - Matte C10 - Satin Matte C10 - Shino New C10 - Shino C10 - Spodumene Mat C10 - Temmoku C10 - Yellow Matte  `Y  CurrentLimit cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 1,249,513,268multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6559altId26autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name CurrentLimittoolTipvGridfalse listBehaviorfalselayer131visiblefalse cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090620188195  f0.05 0.1,0.08 0.27,0 0.2,0.02 0.26,0 0.07,0.02 0.76,0 0.07,0 0.19,0 0.02,0.26 0.52,1.6 2.6,0 0,0 0.01 PA ocREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect388,200,408,201 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6560altId27 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePicon0toolTiplayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1090620188196 limitsi CcREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -4,22,516,345 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletetrue vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid3978altId0radioBehaviortrue textStylelockLocfalselabelnamelimitstoolTiplayer1visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton2 cREVGeneral revUniqueID 1089840881853* D; PNG  IHDR;;gAMA=-fPLTEٟtRNS0J IDATx흋& EtWzoIH 8g߶!m=nR&My:, CPp(8 CPp(8 CPp(8 CPp(8 CPp(8 CPp(8 CPp(8.ʏN#PM](rǀe n}];8~D6o94$Z0}ED{f[kqX_!CM)LIq775x9MPE QKh=w\;Bw ]r 0]"cp8^ܒQ=H'EvA{N#!ω&k-D2E32m&OHԵ7HrRc9#-gҲOB5߿e:\Nhsr;W#,L< 1R(BSjg)xzWc]P8@j"tC\ݚso%8Cx(p?(dK'W20 &oˀqI1(wxB <|y(rƳ9 {s/y{ Obc\g9$_%t'bHPp֧o.'E㯼0:A{J}&y*C5\w)`w6 8@{g5y+qy `_%, ^Kq\ 7 iK3ȽϦ@rXX*Qė)@DFr;c#> LC|!o!z+Krd1X IM$qj^ŮXB.T`}9}M4/3ؗͭ[ޚ1ߴ;'({/~VPwcm` jQ^ }7 AxtR,/ܴK望R;X7!x fEW `s xӺq) |;Fp2R@0W y7ٱd8S@v_ﹺ̠] 5F7ySRL((-h:!؇.@-p7`$Qjboʝ@MA}]fQ28f]S`s2jG f.] ẏ$ l|+/1^3}42ww1HPOL 1d)tލ!vz%: 2TAF*~ iFx&P ^_ $iHjsGT؍@<8qj\s'pm5n<yxtr(@#V_CF)@ SSoXW<{T#&90qwAPp(8 CPp(8 CPp(8^x`рo_=iGLFhI) .9%p4dՍ|рoW5IX4p E2F>kH"OTcFz5fIqWA(v; ‰o(@b8w;P /;o[vRd P.] Q veV6]'h `Z9sҎ E4-NPEEu5EȆ6vZQN -b23$c Pj5LUBv rP/5'+$t+չ\6UUT{Ў E4ܯ~(!'YkY}շ`ZXmh_j,$'_ mƤi ұ5֚5 0K '2N+?b<1kdf̅FB5LUǝGfhDkˡLOqmmNpO ӭ_QI#2OjD,1dl@:V%+Q7T  Z_7 0Y*iGtmKβqLs|\+U ZaEW!.@`aO ~%\ڼ*/mKSз),(@`>jUfJ߬ȢU2 ,`D:Fefzth@br6ȝWCxnWz~׷hzӶ>\CƁD)QK5Ƽᢨ[;Hf@OmGu3Ҙ7ExWm ֏=?MAod2QwzjU׭X/)35؞Hb`*3e #%R Y-K5^ ukKc gTeob%CX5WJӝ1N57m#fN#Z$c_Nwڦ6c/c|Q(4CT"@m pzU,pC-!-mHDt߿pF'@7#AuY5ۭw'K7`0fBcSiy³) Lcix,iwjU+Gt#vT=B]ͽ4Lw9=y^yrVjK)dUx"-H#h8ÙGgOLsshc"-Kt,@S&@amƙL0;xطklpԽ{nY$a@@i[= wIY  ߙ?'Iw_ȑ\CPp(8 CPp(8 CPp(8 CPp(8 CPp(8 CPp(8 aR,TIENDB`cREVTempMaster traversalOnfalsepalindromeFramesfalse repeatCount0inksrcCopysize3349threeDtrue blendLevel50rect 0,26,512,341angle0namebkgnd image id 4138hotSpot1,1 fileNamecolorstoolTip alwaysBufferfalselayer2 dontDitherfalsevisibletrue cantSelectfalse borderWidth2opaquetrueyHot1id4138 currentFrame1altId0 showBorderfalse disabledfalsexHot1 frameCount0 constantMaskfalseshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1089840881854Glossyon mouseUp if the short name of me contains "Gloss" then set the name of me to "Matte" doThermalExpansion if the short name of bkgnd button id 6562 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" setGlazeLimits else set the name of me to "Glossy" doThermalExpansion if the short name of bkgnd button id 6562 contains "Gloss"\ and cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" setGlazeLimits end if select line 1 of card field "al/si ratio" end mouseUp @:RcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 320,58,402,78 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6562altId15 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameGlossyicon0toolTiplayer3 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins6opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881855 KA o3333%cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 37,174,59,191 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6563altId17 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameKicon0toolTiplayer4 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881856 NaA o3333@cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 64,174,86,191 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6564altId18 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameNaicon0toolTiplayer5 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881857 LiA o3333[cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect91,179,113,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6565altId19 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameLiicon0toolTiplayer6 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881858 CaA o3333vz0cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect118,128,140,173 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6566altId20 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameCaicon0toolTiplayer7 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881859 BaA o3333cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect145,182,167,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6567altId21 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBaicon0toolTiplayer8 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881860 SrA o3333cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect172,182,194,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6568altId22 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSricon0toolTiplayer9 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881861 MgA o3333cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect199,180,221,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6569altId23 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameMgicon0toolTiplayer10 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881862 ZnA o3333cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect226,176,248,200 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6570altId24 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameZnicon0toolTiplayer11 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881863 BA o aaii/cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect303,189,327,190 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 144,12,97 151,18,105 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6571altId25 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameBicon0toolTiplayer12 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881864 AlA oDD[[ƹQcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect337,170,362,193 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 68,178,178 91,198,185 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6572altId27 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameAlicon0toolTiplayer13 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881865 SiA o(($$cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect453,173,477,190 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 28,143,40 29,129,36 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6573altId28 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenameSiicon0toolTiplayer14 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881866   ConeNumbers!X(--on mouseup -- hide me --end mouseup =. cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 391,61,437,74multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6574altId32autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0name ConeNumberstoolTipvGridfalse listBehaviorfalselayer15visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881867 016 015 014 013 012 011 010 09 08 07 06 05 04 03 02 01 1 2 3 4 5 6 7 8 9 10 11 12 13 14  SuggestedSi h @1!cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect422,292,512,336multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6575altId33autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name SuggestedSitoolTipvGridfalse listBehaviorfalselayer16visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1089840881868 )Suggested Si/Al Ratio: greater than 8 :1  ConeTempx on mouseup hide me end mouseup >xB"cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight16rect318,14,438,336multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6576altId34autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameConeTemptoolTipvGridfalse listBehaviorfalselayer17visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881869 792 804 838 852 884 894 905 923 955 984 999 1046 1060 1101 1120 1137 1154 1162 1168 1186 1196 1222 1240 1263 1280 1305 1315 1326 1346 1366  a@@LimitsA'on mouseUp setGlazeLimits end mouseUp =$cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect226,179,287,187 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6577altId36 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsenameLimitsicon0toolTiplayer18 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881870 No LeadC  on mouseUp if the optionKey is down then set the visible of cd fld "Pb?" to not visible of cd fld "Pb?" if the visible of cd fld "Pb?" is true then set the hilite of me to true else set the hilite of me to false else get the icon of me if it is 30913 -- "Black X" then set the icon of me to 10553 -- "noIcon" set the locktext of cd fld "Pb" to false setglazelimits else set the icon of me to 30913 -- "Black X" set the locktext of cd fld "Pb" to true setglazelimits end if end if end mouseUp 0'xcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect254,222,276,270 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6580altId39 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameNo Leadicon30913toolTiplayer19 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize9 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881871  CombineKNaAon mouseUp if the optionKey is down then set the visible of cd fld "KNaLi?" to not visible of cd fld "KNaLi?" set the visible of cd fld "KNaLi?Header" to not visible of cd fld "KNaLi?Header" else send mouseup to btn "Combined K & Na" end if if the visible of cd fld "KNaLi?" is false then set the hilite of me to false else set the hilite of me to true end if end mouseUp $21click to combine K & Na oxides(cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalserect 34,223,84,270 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6581altId40 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBorderfalsename CombineKNaicon0toolTipclick to combine K & Na oxideslayer20 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFillfalse showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881872  GlazeTemp  on mouseup set numberFormat to 0 get last word of me if it is "C" then put (((word 1 of me)*(9/5))+32) && "F" into me if it is "F" then put (((word 1 of me)-32)*(5/9)) && "C" into me end mouseup P4 )cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 250,80,307,93multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6582altId41autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name GlazeTemptoolTipvGridfalse listBehaviorfalselayer21visibletrue cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize9 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881873 2381 F PbA o3333-cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect253,200,275,201 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 153,0,51 153,0,51 hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6583altId45 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePbicon0toolTiplayer22 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881874   LimitNameA.cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect222,276,400,315multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6584altId46autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name LimitNametoolTipvGridfalse listBehaviorfalselayer23visibletrue cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeightfalse textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881875  KNaButtonLoch#/cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchtruetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 195,7,336,42multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6585altId47autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinestrue sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name KNaButtonLoctoolTipvGridfalse listBehaviorfalselayer24visiblefalse cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881876 PA o0cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect387,200,406,201 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6586altId48 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBordertruenamePicon0toolTiplayer25 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont helveticashowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881877  Glaze Calci[4on idle if the visible of field PrintComments is true then hide field PrintComments show menubar if the showlines of field 3 is false then send mouseup to bkgnd button "show Lines" end if pass idle end idle on SetGlazeColor set cursor to watch put field "GlazeName" into GlazeName put field "cone" into Cone put empty into glazeType if the hilite of button "Combined K & Na" is true then if field K>.1 then put "KNa " after GlazeType end if else if field K+field Na>.1 then put "KNa " after GlazeType end if if field Pb>0 then put "Pb " after GlazeType if field Ca>.5 then put "Ca " after GlazeType if field B>.1 then put "B " after GlazeType if field Mg>.15 then put "Mg " after GlazeType if field Ba>.15 then put "Ba " after GlazeType if field Li>.05 then put "Li " after GlazeType if field Zn>.1 then put "Zn " after GlazeType else if field Zn>.01 then put "Zn(Low) " after GlazeType go to stack "Color Guide" put GlazeType into card field "GlazeType" put glazeName into card field "Name" put cone into card field "Cone" end SetGlazeColor on calcGlaze set cursor to watch Global calcAll, restart, UnityToBatch,skipIt,IngredientList,theOxides global verNum, FromFormula,whichLine,MyResult,firstemptyLine,myMaterial global myGlaze put empty into myGlaze put empty into calcAll put empty into restart put false into skipIt put empty into myResult put empty into whichLine put empty into fromFormula set numberFormat to "0.0000" put true into UnityToBatch hide message get line 1 of fld "ingredients" if it is empty then lock screen push card put "Going to Materials for new ingredient." into fld \ "talkBack" put true into UnityToBatch put false into fromFormula go to cd "MaterialsIndex" of stack "Materials" put 1 into whichLine unlock screen put "Click the name of the ingredient you want to add to the recipe." exit CalcGlaze end if if fld "amounts" is empty -- find out if this is a good unity formula then lock screen send mouseup to bkgnd button "TotalFlux" -- if fld "fluxTotal" >1.01 -- then -- answer "Too much flux. RO column must total 1." with "OK" -- select line 1 of fld "fluxTotal" -- exit calcGlaze -- end if -- if fld "fluxTotal" <0.99 -- then -- answer "Not enough flux. RO column must total 1." with "OK" -- select line 1 of fld "fluxTotal" -- exit calcGlaze -- end if set numberFormat to 0.000 put empty into fld "R2O" put empty into fld "R2O3" put empty into fld "RO2" put CalcSetUp() into myGlaze put empty into fld "Amounts" repeat with x=1 to 14 put return after fld "amounts" end repeat show fld "R2O" show fld "R2O3" show fld "RO2" unlock screen else put line 1 to 12 of fld "R2O" & return into myGlaze put line 1 to 7 of fld "R2O3" & return after myGlaze put fld "RO2" & return after myGlaze put emptyToZero(myGlaze) into myGlaze end if if the hilite of button "combined K & Na" is true then put True into CombineKNa else put false into combineKNa --Find first ingredient name with no amount put 0 into FirstEmptyLine put MakeIngredientList() into NewIngredientList put empty into useAmount repeat with x=trunc(FirstEmptyLine)+1 to 14 if line x of fld "Quantity" is not empty then if (line x of fld "Quantity")>1 then repeat until (line x of fld "quantity")<=1 put "USE must be less than 1" into fld "talkBack" play boing ask "Enter a decimal equal to or less than 1.0" with "1.0" if it is empty then exit calcGlaze put it & return after UseAmount put it into line x of fld "Quantity" end repeat else put line x of fld "Quantity" & return after UseAmount end if else put 1 & return after UseAmount end repeat if newIngredientList is not IngredientList \ -- and newIngredientList is not empty then put empty into TheOxides -- holds all oxide info for all ingredients put newIngredientList into IngredientList repeat with i=1 to 26 -- initialize variable put return after theOxides end repeat put "Now getting materials analyses" into \ fld talkBack set lockscreen to true set lockmessages to true set lockrecent to true push card go to cd "MaterialsIndex" of stack "Materials" --go to materials stack index to find materials if the result is not empty then answer "Please use the latest version of Materials." exit calcGlaze end if set cursor to "calculating" put empty into theOxides put FindOxideAmountsX (IngredientList,theOxides) into TheOxides pop card else put true into Skipit if MyResult is not empty then play boing put myMaterial & " was not found! Check spelling." into\ fld "talkBack" send mouseup to bkgnd button flasher put false into unityToBatch unlock screen set lockmessages to false set lockrecent to false exit calcGlaze else set lockscreen to false set lockmessages to false set lockrecent to false end if if skipit is true ------------- then put "Calculating amounts" into field "TalkBack" set the numberformat to 0.000 CalculateMaterialX theOxides,IngredientList,myGlaze,\ firstEmptyLine,combineKNa,UseAmount checkCalcErrors combineKNa end if ------------------ if the result is not empty then put "Material not needed!" into fld "TalkBack" if "not needed" is not in field "talkBack" and skipIt is not true then lock screen push card put "Add another ingredient & choose calculate." into fld \ "talkBack" go to cd "MaterialsIndex" of stack "Materials" put whichLine+1 into whichLine unlock screen put "Click the name of the ingredient you want to add to the recipe." else put false into unityToBatch if the short name of this bkgnd is "Glaze Calc" then if "Now" is in fld "TalkBack" then put "Add another ingredient & choose calculate." into fld \ "talkBack" put false into skipIt put false into FromFormula put empty into myMaterial put empty into myResult put empty into firstemptyLine -- if there is a menu "Glaze Calculator" then enable menuitem 9 of menu "Glaze Calculator" end calcGlaze on checkCalcErrors combineKNa put empty into ExcessAmt if combineKNa then put "KNaO,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList else put "Na2O,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into StabList put "SiO2,TiO2,ZrO2,SnO2,MnO2" into GlassList get fld "R2O" repeat with i=1 to 11 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of FluxList & ", " after ExcessAmt end repeat get fld "R2O3" repeat with i=1 to 7 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of StabList & ", " after ExcessAmt end repeat get fld "RO2" repeat with i=1 to 6 if line i of it is empty then next repeat if line i of it<(-.015) then put item i of GlassList & ", " after ExcessAmt end repeat if ExcessAmt is not empty then answer "WARNING:" & return & "Your calculation has added too much of these oxides: " & return & " " & ExcessAmt & return & "Check your ingredients, then choose 'Clear Amounts' and calculate again." end if end CheckCalcErrors on SaveGlazeCard if fld "amounts" is empty then answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." exit saveGlazeCard end if if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe global verNum,transfer,HGFriendly set cursor to watch put empty into transfer put field GlazeName & "," into transfer repeat with i=1 to 14 put line i of field ingredients & "," after transfer put line i of field amounts & "," after transfer end repeat put Field "Cone" after Transfer answer file "Where is the HyperGlaze stack where you want to save this glaze?" -- of type stack if the result is not empty then exit saveGlazeCard put it into myStack put true into HGFriendly go to stack myStack put false into HGFriendly put the short name of this stack into myStack go to card 1 of background "Glazes" of stack myStack if the result is not empty or the short name of this bkgnd is not "glazes" then play boing answer "This is not a HyperGlaze stack with glaze recipe cards! You can't store glazes here." exit saveGlazeCard end if send "domenu" && quote & "New Card" & quote to this card put item 1 of transfer into field 1 put last item of transfer into field "Cone" repeat with i=2 to 29 put item i of transfer into field (i+3) end repeat put the short date into field "date" tabkey end SaveGlazeCard on UndoCalc global Whichline if whichLine is empty then put "Can't Undo!" into field TalkBack play boing send mouseup to bkgnd button "flasher" exit UndoCalc end if if whichline is empty then play boing put "Nothing to undo!" into field talkBack set the hilite of bkgnd button flasher to true set the hilite of bkgnd button flasher to false wait 2 seconds put empty into field talkBack exit UndoCalc end if Answer "Undo the last ingredient calculation?" with "YES!" or \ "Cancel" if it is "Cancel" then exit UndoCalc if it is "YES!" then subtract line whichLine of field amounts from field "TotAmt" put empty into line whichLine of field amounts put field "R2OII" into field "R2O" put field "R2O3II" into field "R2O3" put field "RO2II" into field "RO2" -- if there is a menu "Glaze Calculator" then disable menuitem 9 of menu "Glaze Calculator" end if end UndoCalc on FindPercentRecipe if (field "TotAmt" >100.1 or \ field "TotAmt" < 99.9) -- line 1 of field "RO2" <.5 and then else play boing put "Percentage already calculated." exit FindPercentRecipe end if if line 1 of field "amounts" is empty or line 1 of field "amounts" is\ 0 then play boing answer "Please calculate the glaze first. Choose Calculate from the 'Glaze Calculator' menu." exit FindPercentRecipe end if put false into NeedOxides get fld "R2O" repeat with i=1 to 11 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides end repeat get fld "R2O3" repeat with i=1 to 7 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides end repeat get fld "RO2" repeat with i=1 to 6 if line i of it is empty then next repeat if line i of it>(.015) then put true into NeedOxides end repeat if NeedOxides then answer "WARNING:" & return & "You still have major oxide amounts that are not being supplied by your recipe." & \ " You should choose additional ingredient(s) and 'Calculate' before continuing." with "Continue" or "Okay" if it is "Okay" then exit FindPercentRecipe end if put "Choose 'Clear Amounts' before adding another material." into field talkback set cursor to "calculating" set numberformat to 0.00 put empty into total put empty into newtotal put field "ingredients" into TempIngredients repeat with i=14 down to 1 put false into SkipIngred if line i of field "ingredients" is empty then next repeat repeat with x=1 to (i-1) if line i of field "ingredients" is line x of TempIngredients then add line i of field "amounts" to line x of field "amounts" delete line i of field "amounts" delete line i of field "ingredients" put true into SkipIngred exit repeat end if end repeat if SkipIngred is false then add line i of field "amounts" to total end repeat repeat with i=1 to 14 if line i of field "amounts" is not empty and line i of \ field "amounts" is not 0 then put ((line i of field "amounts")/total)*100 into line i \ of field "amounts" add line i of field "amounts" to newTotal else exit repeat end repeat put newTotal into field "totAmt" set numberFormat to 0.000 repeat with i=1 to 11 put (field (i+8))- line i of fld "R2O" into temp if temp>0 then put temp into line i of fld "R2O" else put empty into line i of fld "R2O" end repeat put field "Sr"-line 12 of fld "R2O" into temp if temp>0 then put temp into line 12 of fld "R2O" else put empty into line 12 of fld "R2O" repeat with i=1 to 7 put (fld (i+19))- line i of fld "R2O3" into temp if temp>0 then put temp into line i of fld "R2O3" else put empty into line i of fld "R2O3" end repeat repeat with i=1 to 6 put (fld (i+26))- line i of fld "RO2" into temp if temp>0 then put temp into line i of fld "RO2" else put empty into line i of fld "RO2" end repeat -- if there is a menu "Glaze Calculator" then -- disable menuitem 1 of menu "Glaze Calculator" -- disable menuitem 2 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if put "StopCalc" into line 2 of fld "Totals" end FindPercentRecipe on ClearUnity repeat with i=9 to 33 set the cursor to busy put empty into fld i end repeat put empty into fld "FluxTotal" put empty into card fld "TempKNa" put empty into fld "Sr" put empty into fld "thermalExpansion" if the visible of fld "RO2" is true then hide fld "R2O" hide fld "R2O3" hide fld "RO2" put empty into fld R2O put empty into fld R2O3 put empty into fld RO2 end if end clearUnity on ClearRecipe global WhichField hide field "R2O" hide field "R2O3" hide field "RO2" repeat with i=2 to 4 put empty into field i end repeat put empty into field R2O put empty into field R2O3 put empty into field RO2 put empty into field "quantity" put empty into field "Cone" put "Click 'Calculate' to begin glaze calculations." into field \ talkBack put 0 into field "TotAmt" -- if there is a menu "Glaze Calculator" then -- enable menuitem 1 of menu "Glaze Calculator" -- enable menuitem 2 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if put empty into whichField put empty into line 2 of fld "Totals" end clearRecipe on ClearAmounts global WhichField put empty into field 4 put empty into field R2O put empty into field R2O3 put empty into field RO2 hide field "R2O" hide field "R2O3" hide field "RO2" put "Click 'Calculate' to begin glaze calculations." into field \ talkBack put 0.00 into field "TotAmt" put empty into whichField -- if there is a menu "Glaze Calculator" then -- enable menuitem 1 of menu "Glaze Calculator" -- enable menuitem 2 of menu "Glaze Calculator" -- disable menuitem 9 of menu "Glaze Calculator" -- end if put empty into line 2 of fld "Totals" end ClearAmounts on MakeTextFile if fld "amounts" is empty then answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." exit MakeTextFile end if put char 1 to 27 of fld "GlazeName" into fileName ask file "Save this recipe as a TEXT file:" with FileName & ".txt" if the result is not empty then exit makeTextFile put it into FileName if fld "GlazeName" is empty then put filename into fld "GlazeName" open file fileName --do the procedure to create a text file for a word processor set cursor to watch write "Glaze name: " & field "GlazeName" & return to file fileName write "Cone: " & fld "Cone" & return to file filename write "Recipe: " & tab & "Amount" & return to file fileName if round(field "totAmt")>100.1 or round(field "totAmt")<99.9 then FindPercentRecipe repeat with i=1 to 14 if line i of field ingredients is empty then exit repeat write line i of field "ingredients" & tab &\ line i of field "amounts" & return to file fileName end repeat write "Total: " & tab & field "totAmt" & return to file fileName write return & "Comments: " & return to file fileName write "Molecular Formula: " & return to file fileName put empty into myAnalysis put empty into myRO put empty into myRO2 put empty into myR2O3 if the hilite of button "Combined K & Na" is true then put "KNa0, ,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems else put "K20,Na2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into R2O3Items put "SiO2,TiO2,ZrO2,SnO2,MnO2,F,Si:Al Ratio" into RO2Items repeat with i=1 to 12 if line i of fld "R2O" is not empty then put tab & line i of fld "R2O" && item i of ROitems \ & return after myRO if line i of fld "RO2" is not empty then put tab & line i of fld "RO2" && item i of RO2Items \ & return after myRO2 if line i of fld "R2O3" is not empty then put tab & line i of fld "R2O3" && item i of R2O3Items \ & return after myR2O3 end repeat repeat with i=1 to 12 if line i of MyRO is not empty or line i of MyRO2 is not empty\ or line i of MyR2O3 is not empty then put line i of myRO & tab & line i of MyR2O3 & tab &\ line i of MyRO2 & return after myAnalysis else next repeat end repeat write myAnalysis to file filename close file fileName end MakeTextFile on makeHyperGlazeFile if fld "amounts" is empty then answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient." exit makeHyperGlazeFile end if if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe if fld "GlazeName" is empty then put "New Glaze.HGII" into fileName else put char 1 to 27 of fld "GlazeName" & ".HGII" into fileName put createHGFile (FileName,"GLAZ") into fileName if fileName is empty then exit makeHyperGlazeFile put empty into myRecipe open file FileName put fld "GlazeName" & tab & fld "Cone" & tab & tab & tab into myRecipe repeat with i=1 to the number of lines of fld "amounts" put line i of fld "Ingredients" & tab & line i of fld "amounts" & tab after myRecipe end repeat put numToChar(30) after myRecipe write myRecipe to file fileName close file FileName end makeHyperGlazeFile on PrintIt if the short name of bkgnd button id 112 is "hide lines" then send mouseup to bkgnd button id 112 hide field TalkBack show field printComments doMenu "Print Card" hide field printComments show field TalkBack send mouseup to bkgnd button id 112 end printIt function FindOxideAmountsX ingredientList, theOxides -- 1990-1993 Richard Burkett -- this is an experimental version 12/23/93 for the Glaze Calculator global SkipIt, FromFormula,myResult,myMaterial put empty into theOxides repeat with i=1 to 14 if line i of IngredientList is empty then exit repeat put line i of IngredientList into myMaterial put true into skipIt put true into FromFormula put empty into firstCard find whole myMaterial in field 1 if the result is not empty then put "not found" into MyResult exit repeat else if myMaterial contains field 1 then put empty into myResult else put the number of this card into firstcard go next repeat until myMaterial contains field 1 find whole myMaterial in field 1 if the number of this card is firstCard then put "not found" into myResult exit repeat end if end repeat end if if MyResult is not empty then exit repeat get line 1 of fld "CompiledAnalysis" put it & return after theOxides end repeat repeat with y=1 to the number of lines of theOxides repeat with x=1 to the number of items of line y of theOxides get item x of line i of theOxides if it is empty or it is "NAN(255)" then put "0.00" into item x of line i of theOxides end repeat end repeat global TempOxides put theOxides into TempOxides return theOxides end FindOxideAmountsX on CalculateMaterialX myOxides,IngredientList,myGlaze,\ firstEmptyLine,combineKNa,useAmount global myMaterial -- 1990-1993 Richard Burkett -- this is an experimental version for the Glaze Calculator 12/23/93 put myOxides into theOxides repeat with i=1 to the number of lines of IngredientList put i+firstEmptyLine into CurrentLine if line i of IngredientList is empty then exit repeat put line i of IngredientList into myMaterial put "Now calculating" & return & myMaterial into fld "talkBack" -- findOxideAmounts put ",,,,,,,,,,,,,,,,,,,,,,,," into bigAmt put 0 into KNaTemp put 0 into temp put 0 into tempAmt put 0 into amount put 0 into howMuch put 0 into oxideAmount if CombineKNa then put (item 1 of line i of theOxides)+( item 2 of line i of theOxides) into KNaTemp if KNaTemp>0 then put (line 1 of myGlaze)/KNaTemp into item 1 of BigAmt else put "9999" into item 1 of BigAmt end if if (item 1 of bigAmt)<=0 then put "9999" into item 1 of bigAmt put "9999" into item 2 of bigAmt else if (item 1 of line i of theOxides)>0 then put (line 1 of myGlaze)/(item 1 of line i of theOxides) into item 1 of BigAmt else put "9999" into item 1 of BigAmt if (item 1 of bigAmt)<=0 then put "9999" into item 1 of bigAmt if (item 2 of line i of theOxides)>0 then put (line 2 of myGlaze)/(item 2 of line i of theOxides) into item 2 of BigAmt else put "9999" into item 2 of BigAmt if (item 2 of bigAmt)<=0 then put "9999" & "," into item 2 of bigAmt end if repeat with x=3 to 25 put item x of line i of theOxides into temp if temp>0 then put line x of myGlaze into myGlazeAmount put (myGlazeAmount)/temp into item x of bigAmt else put "9999" into item x of bigAmt if (item x of bigAmt)<=0 then put "9999" into item x of bigAmt end repeat -- end findOxideAmounts put (min(BigAmt)) into amount if amount is "9999" --do ingredient not needed routine then play boing put myMaterial & " not needed!" into fld "talkBack" send mouseup to bkgnd button "flasher" select line CurrentLine of fld "ingredients" put (i-1) into whichLine put false into unityToBatch exit CalculateMaterialX end if --save flds for undo later put fld "R2O" into fld "R2OII" --save fields for undo put fld "R2O3" into fld "R2O3II" put fld "RO2" into fld "RO2II" --check for how much ingredient to add towards satisfying --the unity formula put (line i of UseAmount) into howmuch put (amount*howMuch) into OxideAmt put (((item 26 of line i of theOxides))*OxideAmt) into tempAmt put tempAmt into line CurrentLine of fld "amounts" add tempAmt to fld "TotAmt" -- CalcGlaze put 0 into myOxideItem if combineKNa is true then put (line 1 of myGlaze) -(((item 1 of line i of TheOxides)+(item 2 of line i of TheOxides))*oxideAmt) into temp if temp<>0 then put temp into line 1 of myGlaze else put 0 into line 1 of myGlaze else put (line 1 of myGlaze) -((item 1 of line i of TheOxides)*oxideAmt) into temp if temp<>0 then put temp into line 1 of myGlaze else put 0 into line 1 of myGlaze put (line 2 of myGlaze) -((item 2 of line i of TheOxides)*oxideAmt) into temp if temp<>0 then put temp into line 2 of myGlaze else put 0 into line 2 of myGlaze end if repeat with x=3 to 25 put (item x of line i of theOxides) into MyOxideItem put (line x of myGlaze) -(MyOxideItem*oxideAmt) into temp if temp<>0 then put temp into line x of myGlaze else put 0 into line x of myGlaze end repeat put empty into theGlaze repeat with x=1 to 25 if (line x of myGlaze) <>0 then put line x of myGlaze & return after theGlaze else put return after theGlaze end repeat put line 1 to 12 of theGlaze into fld "R2O" put line 13 to 19 of theGlaze into fld "R2O3" put line 20 to 25 of theGlaze into fld "RO2" --end calcGlaze end repeat end calculateMaterialX function calcSetUp -- 1990-1991 Richard Burkett --new version for Glaze Calculator 1/20/91 -- recompiled 9/1995 put empty into myR2O put empty into myR2O3 put empty into myRO2 put 0 into myField repeat with i=9 to 19 if fld i is empty then put return after myR2O else put fld i & return after myR2O end repeat if fld "Sr" is empty then put return after myR2O else put fld "Sr" & return after myR2O repeat with i=20 to 26 if fld i is empty then put return after myR2O3 else put fld i & return after myR2O3 end repeat repeat with i=27 to 32 if fld i is empty then put return after myRO2 else put fld i & return after myRO2 end repeat put myR2O into fld "R2O" put myR2O3 into fld "R2O3" put myRO2 into fld "RO2" put myR2O into myGlaze put myR2O3 after myGlaze put myRO2 after myGlaze put BlankToZero(myGlaze) into MyGlaze return myGlaze end calcSetUp function BlankToZero myList -- 1990 Richard Burkett repeat with x=1 to the number of lines of myList if line x of myList is empty then put "0.0" into line x of myList end repeat return myList end BlankToZero  _ cREVGeneralscriptChecksumk yX@j bookmarks handlerListidle SetGlazeColor calcGlaze checkCalcErrors SaveGlazeCard UndoCalc FindPercentRecipe ClearUnity ClearRecipe ClearAmounts MakeTextFile makeHyperGlazeFile PrintIt FindOxideAmountsX CalculateMaterialX calcSetUp BlankToZero tempScript prevHandler BlankToZeroscriptSelectionchar 8261 to 8260script~

on idle

if the visible of field PrintComments is true

then

hide field PrintComments

show menubar

if the showlines of field 3 is false

then send mouseup to bkgnd button "show Lines"

end if

pass idle

end idle

on SetGlazeColor

set cursor to watch

put field "GlazeName" into GlazeName

put field "cone" into Cone

put empty into glazeType

if the hilite of button "Combined K & Na" is true

then

if field K>.1 then

put "KNa " after GlazeType

end if

else

if field K+field Na>.1 then put "KNa " after GlazeType

end if

if field Pb>0 then put "Pb " after GlazeType

if field Ca>.5 then put "Ca " after GlazeType

if field B>.1 then put "B " after GlazeType

if field Mg>.15 then put "Mg " after GlazeType

if field Ba>.15 then put "Ba " after GlazeType

if field Li>.05 then put "Li " after GlazeType

if field Zn>.1

then put "Zn " after GlazeType

else if field Zn>.01

then put "Zn(Low) " after GlazeType

go to stack "Color Guide"

put GlazeType into card field "GlazeType"

put glazeName into card field "Name"

put cone into card field "Cone"

end SetGlazeColor

on calcGlaze

set cursor to watch

Global calcAll, restart, UnityToBatch,skipIt,IngredientList,theOxides

global verNum, FromFormula,whichLine,MyResult,firstemptyLine,myMaterial

global myGlaze

put empty into myGlaze

put empty into calcAll

put empty into restart

put false into skipIt

put empty into myResult

put empty into whichLine

put empty into fromFormula

set numberFormat to "0.0000"

put true into UnityToBatch

hide message

get line 1 of fld "ingredients"

if it is empty

then

lock screen

push card

put "Going to Materials for new ingredient." into fld \

"talkBack"

put true into UnityToBatch

put false into fromFormula

go to cd "MaterialsIndex" of stack "Materials"

put 1 into whichLine

unlock screen

put "Click the name of the ingredient you want to add to the recipe."

exit CalcGlaze

end if

if fld "amounts" is empty -- find out if this is a good unity formula

then

lock screen

send mouseup to bkgnd button "TotalFlux"

-- if fld "fluxTotal" >1.01

-- then

-- answer "Too much flux. RO column must total 1." with "OK"

-- select line 1 of fld "fluxTotal"

-- exit calcGlaze

-- end if

-- if fld "fluxTotal" <0.99

-- then

-- answer "Not enough flux. RO column must total 1." with "OK"

-- select line 1 of fld "fluxTotal"

-- exit calcGlaze

-- end if

set numberFormat to 0.000

put empty into fld "R2O"

put empty into fld "R2O3"

put empty into fld "RO2"

put CalcSetUp() into myGlaze

put empty into fld "Amounts"

repeat with x=1 to 14

put return after fld "amounts"

end repeat

show fld "R2O"

show fld "R2O3"

show fld "RO2"

unlock screen

else

put line 1 to 12 of fld "R2O" & return into myGlaze

put line 1 to 7 of fld "R2O3" & return after myGlaze

put fld "RO2" & return after myGlaze

put emptyToZero(myGlaze) into myGlaze

end if

if the hilite of button "combined K & Na" is true

then put True into CombineKNa

else put false into combineKNa

--Find first ingredient name with no amount

put 0 into FirstEmptyLine

put MakeIngredientList() into NewIngredientList

put empty into useAmount

repeat with x=trunc(FirstEmptyLine)+1 to 14

if line x of fld "Quantity" is not empty

then

if (line x of fld "Quantity")>1

then

repeat until (line x of fld "quantity")<=1

put "USE must be less than 1" into fld "talkBack"

play boing

ask "Enter a decimal equal to or less than 1.0" with "1.0"

if it is empty then exit calcGlaze

put it & return after UseAmount

put it into line x of fld "Quantity"

end repeat

else

put line x of fld "Quantity" & return after UseAmount

end if

else put 1 & return after UseAmount

end repeat

if newIngredientList is not IngredientList \

-- and newIngredientList is not empty

then

put empty into TheOxides -- holds all oxide info for all ingredients

put newIngredientList into IngredientList

repeat with i=1 to 26 -- initialize variable

put return after theOxides

end repeat

put "Now getting materials analyses…" into \

fld talkBack

set lockscreen to true

set lockmessages to true

set lockrecent to true

push card

go to cd "MaterialsIndex" of stack "Materials" --go to materials stack index to find materials

if the result is not empty

then

answer "Please use the latest version of Materials."

exit calcGlaze

end if

set cursor to "calculating"

put empty into theOxides

put FindOxideAmountsX (IngredientList,theOxides) into TheOxides

pop card

else put true into Skipit

if MyResult is not empty

then

play boing

put myMaterial & " was not found! Check spelling." into\

fld "talkBack"

send mouseup to bkgnd button flasher

put false into unityToBatch

unlock screen

set lockmessages to false

set lockrecent to false

exit calcGlaze

else

set lockscreen to false

set lockmessages to false

set lockrecent to false

end if

if skipit is true -------------

then

put "Calculating amounts" into field "TalkBack"

set the numberformat to 0.000

CalculateMaterialX theOxides,IngredientList,myGlaze,\

firstEmptyLine,combineKNa,UseAmount

checkCalcErrors combineKNa

end if ------------------

if the result is not empty

then put "Material not needed!" into fld "TalkBack"

if "not needed" is not in field "talkBack" and skipIt is not true

then

lock screen

push card

put "Add another ingredient & choose calculate." into fld \

"talkBack"

go to cd "MaterialsIndex" of stack "Materials"

put whichLine+1 into whichLine

unlock screen

put "Click the name of the ingredient you want to add to the recipe."

else put false into unityToBatch

if the short name of this bkgnd is "Glaze Calc"

then if "Now" is in fld "TalkBack"

then put "Add another ingredient & choose calculate." into fld \

"talkBack"

put false into skipIt

put false into FromFormula

put empty into myMaterial

put empty into myResult

put empty into firstemptyLine

-- if there is a menu "Glaze Calculator" then enable menuitem 9 of menu "Glaze Calculator"

end calcGlaze

on checkCalcErrors combineKNa

put empty into ExcessAmt

if combineKNa then

put "KNaO,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList

else put "Na2O,K2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into FluxList

put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into StabList

put "SiO2,TiO2,ZrO2,SnO2,MnO2" into GlassList

get fld "R2O"

repeat with i=1 to 11

if line i of it is empty then next repeat

if line i of it<(-.015)

then put item i of FluxList & ", " after ExcessAmt

end repeat

get fld "R2O3"

repeat with i=1 to 7

if line i of it is empty then next repeat

if line i of it<(-.015)

then put item i of StabList & ", " after ExcessAmt

end repeat

get fld "RO2"

repeat with i=1 to 6

if line i of it is empty then next repeat

if line i of it<(-.015)

then put item i of GlassList & ", " after ExcessAmt

end repeat

if ExcessAmt is not empty

then

answer "WARNING:" & return & "Your calculation has added too much of these oxides: " & return & " " & ExcessAmt & return & "Check your ingredients, then choose 'Clear Amounts' and calculate again."

end if

end CheckCalcErrors

on SaveGlazeCard

if fld "amounts" is empty then

answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient."

exit saveGlazeCard

end if

if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe

global verNum,transfer,HGFriendly

set cursor to watch

put empty into transfer

put field GlazeName & "," into transfer

repeat with i=1 to 14

put line i of field ingredients & "," after transfer

put line i of field amounts & "," after transfer

end repeat

put Field "Cone" after Transfer

answer file "Where is the HyperGlaze stack where you want to save this glaze?" -- of type stack

if the result is not empty then exit saveGlazeCard

put it into myStack

put true into HGFriendly

go to stack myStack

put false into HGFriendly

put the short name of this stack into myStack

go to card 1 of background "Glazes" of stack myStack

if the result is not empty or the short name of this bkgnd is not "glazes"

then

play boing

answer "This is not a HyperGlaze stack with glaze recipe cards! You can't store glazes here."

exit saveGlazeCard

end if

send "domenu" && quote & "New Card" & quote to this card

put item 1 of transfer into field 1

put last item of transfer into field "Cone"

repeat with i=2 to 29

put item i of transfer into field (i+3)

end repeat

put the short date into field "date"

tabkey

end SaveGlazeCard

on UndoCalc

global Whichline

if whichLine is empty

then

put "Can't Undo!" into field TalkBack

play boing

send mouseup to bkgnd button "flasher"

exit UndoCalc

end if

if whichline is empty

then

play boing

put "Nothing to undo!" into field talkBack

set the hilite of bkgnd button flasher to true

set the hilite of bkgnd button flasher to false

wait 2 seconds

put empty into field talkBack

exit UndoCalc

end if

Answer "Undo the last ingredient calculation?" with "YES!" or \

"Cancel"

if it is "Cancel"

then exit UndoCalc

if it is "YES!"

then

subtract line whichLine of field amounts from field "TotAmt"

put empty into line whichLine of field amounts

put field "R2OII" into field "R2O"

put field "R2O3II" into field "R2O3"

put field "RO2II" into field "RO2"

-- if there is a menu "Glaze Calculator" then disable menuitem 9 of menu "Glaze Calculator"

end if

end UndoCalc

on FindPercentRecipe

if (field "TotAmt" >100.1 or \

field "TotAmt" < 99.9) -- line 1 of field "RO2" <.5 and

then

else

play boing

put "Percentage already calculated."

exit FindPercentRecipe

end if

if line 1 of field "amounts" is empty or line 1 of field "amounts" is\

0 then

play boing

answer "Please calculate the glaze first. Choose Calculate from the 'Glaze Calculator' menu."

exit FindPercentRecipe

end if

put false into NeedOxides

get fld "R2O"

repeat with i=1 to 11

if line i of it is empty then next repeat

if line i of it>(.015)

then put true into NeedOxides

end repeat

get fld "R2O3"

repeat with i=1 to 7

if line i of it is empty then next repeat

if line i of it>(.015)

then put true into NeedOxides

end repeat

get fld "RO2"

repeat with i=1 to 6

if line i of it is empty then next repeat

if line i of it>(.015)

then put true into NeedOxides

end repeat

if NeedOxides

then

answer "WARNING:" & return & "You still have major oxide amounts that are not being supplied by your recipe." & \

" You should choose additional ingredient(s) and 'Calculate' before continuing." with "Continue" or "Okay"

if it is "Okay" then exit FindPercentRecipe

end if

put "Choose 'Clear Amounts' before adding another material." into field talkback

set cursor to "calculating"

set numberformat to 0.00

put empty into total

put empty into newtotal

put field "ingredients" into TempIngredients

repeat with i=14 down to 1

put false into SkipIngred

if line i of field "ingredients" is empty then next repeat

repeat with x=1 to (i-1)

if line i of field "ingredients" is line x of TempIngredients

then

add line i of field "amounts" to line x of field "amounts"

delete line i of field "amounts"

delete line i of field "ingredients"

put true into SkipIngred

exit repeat

end if

end repeat

if SkipIngred is false

then add line i of field "amounts" to total

end repeat

repeat with i=1 to 14

if line i of field "amounts" is not empty and line i of \

field "amounts" is not 0

then

put ((line i of field "amounts")/total)*100 into line i \

of field "amounts"

add line i of field "amounts" to newTotal

else exit repeat

end repeat

put newTotal into field "totAmt"

set numberFormat to 0.000

repeat with i=1 to 11

put (field (i+8))- line i of fld "R2O" into temp

if temp>0

then put temp into line i of fld "R2O"

else put empty into line i of fld "R2O"

end repeat

put field "Sr"-line 12 of fld "R2O" into temp

if temp>0

then put temp into line 12 of fld "R2O"

else put empty into line 12 of fld "R2O"

repeat with i=1 to 7

put (fld (i+19))- line i of fld "R2O3" into temp

if temp>0

then put temp into line i of fld "R2O3"

else put empty into line i of fld "R2O3"

end repeat

repeat with i=1 to 6

put (fld (i+26))- line i of fld "RO2" into temp

if temp>0

then put temp into line i of fld "RO2"

else put empty into line i of fld "RO2"

end repeat

-- if there is a menu "Glaze Calculator" then

-- disable menuitem 1 of menu "Glaze Calculator"

-- disable menuitem 2 of menu "Glaze Calculator"

-- disable menuitem 9 of menu "Glaze Calculator"

-- end if

put "StopCalc" into line 2 of fld "Totals"

end FindPercentRecipe

on ClearUnity

repeat with i=9 to 33

set the cursor to busy

put empty into fld i

end repeat

put empty into fld "FluxTotal"

put empty into card fld "TempKNa"

put empty into fld "Sr"

put empty into fld "thermalExpansion"

if the visible of fld "RO2" is true

then

hide fld "R2O"

hide fld "R2O3"

hide fld "RO2"

put empty into fld R2O

put empty into fld R2O3

put empty into fld RO2

end if

end clearUnity

on ClearRecipe

global WhichField

hide field "R2O"

hide field "R2O3"

hide field "RO2"

repeat with i=2 to 4

put empty into field i

end repeat

put empty into field R2O

put empty into field R2O3

put empty into field RO2

put empty into field "quantity"

put empty into field "Cone"

put "Click 'Calculate' to begin glaze calculations." into field \

talkBack

put 0 into field "TotAmt"

-- if there is a menu "Glaze Calculator" then

-- enable menuitem 1 of menu "Glaze Calculator"

-- enable menuitem 2 of menu "Glaze Calculator"

-- disable menuitem 9 of menu "Glaze Calculator"

-- end if

put empty into whichField

put empty into line 2 of fld "Totals"

end clearRecipe

on ClearAmounts

global WhichField

put empty into field 4

put empty into field R2O

put empty into field R2O3

put empty into field RO2

hide field "R2O"

hide field "R2O3"

hide field "RO2"

put "Click 'Calculate' to begin glaze calculations." into field \

talkBack

put 0.00 into field "TotAmt"

put empty into whichField

-- if there is a menu "Glaze Calculator" then

-- enable menuitem 1 of menu "Glaze Calculator"

-- enable menuitem 2 of menu "Glaze Calculator"

-- disable menuitem 9 of menu "Glaze Calculator"

-- end if

put empty into line 2 of fld "Totals"

end ClearAmounts

on MakeTextFile

if fld "amounts" is empty then

answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient."

exit MakeTextFile

end if

put char 1 to 27 of fld "GlazeName" into fileName

ask file "Save this recipe as a TEXT file:" with FileName & ".txt"

if the result is not empty then exit makeTextFile

put it into FileName

if fld "GlazeName" is empty then put filename into fld "GlazeName"

open file fileName

--do the procedure to create a text file for a word processor

set cursor to watch

write "Glaze name: " & field "GlazeName" & return to file fileName

write "Cone: " & fld "Cone" & return to file filename

write "Recipe: " & tab & "Amount" & return to file fileName

if round(field "totAmt")>100.1 or round(field "totAmt")<99.9

then FindPercentRecipe

repeat with i=1 to 14

if line i of field ingredients is empty then exit repeat

write line i of field "ingredients" & tab &\

line i of field "amounts" & return to file fileName

end repeat

write "Total: " & tab & field "totAmt" & return to file fileName

write return & "Comments: " & return to file fileName

write "Molecular Formula: " & return to file fileName

put empty into myAnalysis

put empty into myRO

put empty into myRO2

put empty into myR2O3

if the hilite of button "Combined K & Na" is true

then put "KNa0, ,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems

else put "K20,Na2O,CaO,MgO,Li2O,BaO,PbO,ZnO,CuO,CoO,NiO,SrO" into ROItems

put "Al2O3,B2O3,Fe2O3,P2O5,Sb2O3,Cr2O3,V2O5" into R2O3Items

put "SiO2,TiO2,ZrO2,SnO2,MnO2,F,Si:Al Ratio" into RO2Items

repeat with i=1 to 12

if line i of fld "R2O" is not empty

then put tab & line i of fld "R2O" && item i of ROitems \

& return after myRO

if line i of fld "RO2" is not empty

then put tab & line i of fld "RO2" && item i of RO2Items \

& return after myRO2

if line i of fld "R2O3" is not empty

then put tab & line i of fld "R2O3" && item i of R2O3Items \

& return after myR2O3

end repeat

repeat with i=1 to 12

if line i of MyRO is not empty or line i of MyRO2 is not empty\

or line i of MyR2O3 is not empty

then

put line i of myRO & tab & line i of MyR2O3 & tab &\

line i of MyRO2 & return after myAnalysis

else next repeat

end repeat

write myAnalysis to file filename

close file fileName

end MakeTextFile

on makeHyperGlazeFile

if fld "amounts" is empty then

answer "You do not have a complete glaze recipe. Please choose 'Calculate' to find the amounts of each ingredient."

exit makeHyperGlazeFile

end if

if Fld "totAmt" > 100.1 or Fld "totAmt"<99.9 then FindPercentRecipe

if fld "GlazeName" is empty then

put "New Glaze.HGII" into fileName

else put char 1 to 27 of fld "GlazeName" & ".HGII" into fileName

put createHGFile (FileName,"GLAZ") into fileName

if fileName is empty then exit makeHyperGlazeFile

put empty into myRecipe

open file FileName

put fld "GlazeName" & tab & fld "Cone" & tab & tab & tab into myRecipe

repeat with i=1 to the number of lines of fld "amounts"

put line i of fld "Ingredients" & tab & line i of fld "amounts" & tab after myRecipe

end repeat

put numToChar(30) after myRecipe

write myRecipe to file fileName

close file FileName

end makeHyperGlazeFile

on PrintIt

if the short name of bkgnd button id 112 is "hide lines"

then send mouseup to bkgnd button id 112

hide field TalkBack

show field printComments

doMenu "Print Card"

hide field printComments

show field TalkBack

send mouseup to bkgnd button id 112

end printIt

function FindOxideAmountsX ingredientList, theOxides

-- © 1990-1993 Richard Burkett

-- this is an experimental version 12/23/93 for the Glaze Calculator

global SkipIt, FromFormula,myResult,myMaterial

put empty into theOxides

repeat with i=1 to 14

if line i of IngredientList is empty then exit repeat

put line i of IngredientList into myMaterial

put true into skipIt

put true into FromFormula

put empty into firstCard

find whole myMaterial in field 1

if the result is not empty

then

put "not found" into MyResult

exit repeat

else if myMaterial contains field 1

then

put empty into myResult

else

put the number of this card into firstcard

go next

repeat until myMaterial contains field 1

find whole myMaterial in field 1

if the number of this card is firstCard

then

put "not found" into myResult

exit repeat

end if

end repeat

end if

if MyResult is not empty

then exit repeat

get line 1 of fld "CompiledAnalysis"

put it & return after theOxides

end repeat

repeat with y=1 to the number of lines of theOxides

repeat with x=1 to the number of items of line y of theOxides

get item x of line i of theOxides

if it is empty or it is "NAN(255)"

then put "0.00" into item x of line i of theOxides

end repeat

end repeat

global TempOxides

put theOxides into TempOxides

return theOxides

end FindOxideAmountsX

on CalculateMaterialX myOxides,IngredientList,myGlaze,\

firstEmptyLine,combineKNa,useAmount

global myMaterial

-- © 1990-1993 Richard Burkett

-- this is an experimental version for the Glaze Calculator 12/23/93

put myOxides into theOxides

repeat with i=1 to the number of lines of IngredientList

put i+firstEmptyLine into CurrentLine

if line i of IngredientList is empty then exit repeat

put line i of IngredientList into myMaterial

put "Now calculating…" & return & myMaterial into fld "talkBack"

-- findOxideAmounts

put ",,,,,,,,,,,,,,,,,,,,,,,," into bigAmt

put 0 into KNaTemp

put 0 into temp

put 0 into tempAmt

put 0 into amount

put 0 into howMuch

put 0 into oxideAmount

if CombineKNa

then

put (item 1 of line i of theOxides)+( item 2 of line i of theOxides) into KNaTemp

if KNaTemp>0

then

put (line 1 of myGlaze)/KNaTemp into item 1 of BigAmt

else

put "9999" into item 1 of BigAmt

end if

if (item 1 of bigAmt)<=0

then put "9999" into item 1 of bigAmt

put "9999" into item 2 of bigAmt

else

if (item 1 of line i of theOxides)>0

then

put (line 1 of myGlaze)/(item 1 of line i of theOxides) into item 1 of BigAmt

else put "9999" into item 1 of BigAmt

if (item 1 of bigAmt)<=0

then put "9999" into item 1 of bigAmt

if (item 2 of line i of theOxides)>0

then

put (line 2 of myGlaze)/(item 2 of line i of theOxides) into item 2 of BigAmt

else put "9999" into item 2 of BigAmt

if (item 2 of bigAmt)<=0

then put "9999" & "," into item 2 of bigAmt

end if

repeat with x=3 to 25

put item x of line i of theOxides into temp

if temp>0

then

put line x of myGlaze into myGlazeAmount

put (myGlazeAmount)/temp into item x of bigAmt

else put "9999" into item x of bigAmt

if (item x of bigAmt)<=0

then put "9999" into item x of bigAmt

end repeat

-- end findOxideAmounts

put (min(BigAmt)) into amount

if amount is "9999" --do ingredient not needed routine

then

play boing

put myMaterial & " not needed!" into fld "talkBack"

send mouseup to bkgnd button "flasher"

select line CurrentLine of fld "ingredients"

put (i-1) into whichLine

put false into unityToBatch

exit CalculateMaterialX

end if

--save flds for undo later

put fld "R2O" into fld "R2OII" --save fields for undo

put fld "R2O3" into fld "R2O3II"

put fld "RO2" into fld "RO2II"

--check for how much ingredient to add towards satisfying

--the unity formula

put (line i of UseAmount) into howmuch

put (amount*howMuch) into OxideAmt

put (((item 26 of line i of theOxides))*OxideAmt) into tempAmt

put tempAmt into line CurrentLine of fld "amounts"

add tempAmt to fld "TotAmt"

-- CalcGlaze

put 0 into myOxideItem

if combineKNa is true

then

put (line 1 of myGlaze) -(((item 1 of line i of TheOxides)+(item 2 of line i of TheOxides))*oxideAmt) into temp

if temp<>0 then put temp into line 1 of myGlaze

else put 0 into line 1 of myGlaze

else

put (line 1 of myGlaze) -((item 1 of line i of TheOxides)*oxideAmt) into temp

if temp<>0 then put temp into line 1 of myGlaze

else put 0 into line 1 of myGlaze

put (line 2 of myGlaze) -((item 2 of line i of TheOxides)*oxideAmt) into temp

if temp<>0 then put temp into line 2 of myGlaze

else put 0 into line 2 of myGlaze

end if

repeat with x=3 to 25

put (item x of line i of theOxides) into MyOxideItem

put (line x of myGlaze) -(MyOxideItem*oxideAmt) into temp

if temp<>0 then put temp into line x of myGlaze

else put 0 into line x of myGlaze

end repeat

put empty into theGlaze

repeat with x=1 to 25

if (line x of myGlaze) <>0

then put line x of myGlaze & return after theGlaze

else put return after theGlaze

end repeat

put line 1 to 12 of theGlaze into fld "R2O"

put line 13 to 19 of theGlaze into fld "R2O3"

put line 20 to 25 of theGlaze into fld "RO2"

--end calcGlaze

end repeat

end calculateMaterialX

function calcSetUp

-- © 1990-1991 Richard Burkett --new version for Glaze Calculator 1/20/91

-- recompiled 9/1995

put empty into myR2O

put empty into myR2O3

put empty into myRO2

put 0 into myField

repeat with i=9 to 19

if fld i is empty

then put return after myR2O

else put fld i & return after myR2O

end repeat

if fld "Sr" is empty

then put return after myR2O

else put fld "Sr" & return after myR2O

repeat with i=20 to 26

if fld i is empty

then put return after myR2O3

else put fld i & return after myR2O3

end repeat

repeat with i=27 to 32

if fld i is empty

then put return after myRO2

else put fld i & return after myRO2

end repeat

put myR2O into fld "R2O"

put myR2O3 into fld "R2O3"

put myRO2 into fld "RO2"

put myR2O into myGlaze

put myR2O3 after myGlaze

put myRO2 after myGlaze

put BlankToZero(myGlaze) into MyGlaze

return myGlaze

end calcSetUp

function BlankToZero myList

-- © 1990 Richard Burkett

repeat with x=1 to the number of lines of myList

if line x of myList is empty

then put "0.0" into line x of myList

end repeat

return myList

end BlankToZero

B DC <|0~΂`0f`yƃ<w<s?0Ã3f w8p͇ۘÃ18pfyߘ3f< ~<f ؘ3f~ {g0g0w<aw0fcx1l`a30x`̇0s00p`30p`̇30x`37l6``31fcx10`f?1v  0vp  s0~  30 3`03~x  30 0`03nۙ 37 89瀂x3<nوlƇ 31 mm m03afynj 1 }} m039 aa m03  89lxx<?x`f̢`f>``f 8̢`f 0`f0Ͷ`cf00`xa! [!s8 (bLLP BKK x(BLL 0(BL LP0BKs0@0@00xyx`````Ͷ`xfcv`v`~f`~f`nf`nf`fc<f`}?>~>~>~>~`>~||>Ϗ~~>Ϗ~?>Ϗ~?>?Ϗ~? >?~ |>> ~ |>> ~? >?ߟ~??>?π~?>π~>~|?|>~~<ss@HeA @H@;s[sx#䞜Hd@"KđH"LđHsa+KÞx$'B " R߻gk8x;RfTTȪqLfSWRaLfP$HRa^Onh#8Qr <|0~΂`0f`yƃ<w<s?0Ã3f w8p͇ۘÃ18pfyߘ3f< ~<f ؘ3f~ {g0g0w<aw0fcx1l`a30x`̇0s00p`30p`̇30x`37l6``31fcx10`f?1v  0vp  s0~  30 3`03~x  30 0`03nۙ 37 89瀂x3<nوlƇ 31 mm m03afynj 1 }} m039 aa m03  89lxx<?x`f̢`f>``f 8̢`f 0`f0Ͷ`cf00`xa! [!s8 (bLLP BKK x(BLL 0(BL LP0BKs0@0@00xyx`````Ͷ`xfcv`v`~f`~f`nf`nf`fc<f`}?>~>~>~>~`>~||>Ϗ~~>Ϗ~?>Ϗ~?>?Ϗ~? >?~ |>> ~ |>> ~? >?ߟ~??>?π~?>π~>~|?|>~~<ss@HeA @H@;s[sx#䞜Hd@"KđH"LđHsa+KÞx$'B " R߻gk8x;RfTTȪqLfSWRaLfP$HRa^Onh#8Qr previousC Don mouseUp visual effect wipe left go to previous card end mouseUp 7$@ nextC Aon mouseUp visual effect wipe right go to next card end mouseUp 7%A HomeC on mouseUp if fld "amounts" is not empty then Answer "Save this recipe to a Glaze Card?" with "Save" or "No" or "Cancel" if it is "Cancel" then exit mouseup if it is "Save" then SaveGlazeCard end if go home end mouseUp 7 DN TitleAI  GlazeName i#J  Ingredients mA amountsMon mouseup answer "Amounts are calcuated here, not entered." & return & return &\ "(To enter a glaze with batch amounts, go back to the Glaze Index and choose 'New Card' in the Edit menu.)" end mouseupA@ HideTalkBackAon mouseUp set visible of Field TalkBack to false set visible of background button HideTalkBack to false put empty into field 71 end mouseUp  ! BaE   Date a ! CI  PrintCommentsAX 0on mouseup hide field printComments end mouseupA HideCompareAXon mouseUp hide field notCalc repeat with i=71 to 83 Put empty into field i end repeat repeat with i=88 to 90 Put empty into field i end repeat hide field CompareName hide background button K hide Field K2 hide background button Na hide Field Na2 hide background button Ca hide Field Ca2 hide background button Mg hide Field Mg2 hide background button Zn hide Field Zn2 hide background button Li hide Field Li2 hide background button Pb hide Field Pb2 hide background button Al hide Field Al2 hide background button Ba hide Field Ba2 hide background button Si hide Field Si2 hide background button B hide Field B2 hide background button P hide Field P2 hide background button Fe hide Field Fe2 hide background button Ti hide Field Ti2 hide background button HideCompare hide field Backdrop show card field "totPct" show card field "totBatch" end mouseUp f  TalkBackK T) K m on closefield set cursor to watch get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield #+ Na e on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat --send mouseup to bkgnd button "totalFlux" end closefield /+ Ca m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat --send mouseup to bkgnd button "totalFlux" end closefield ;+ Mg m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield G+ Li m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield S+ Ba m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield _+ Pb m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield k+ Zn m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield w+ Cu m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield +D Co m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield +M Ni m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield +N Al m  on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat send mouseup to bkgnd Button "si/al" end closefieldX#. B m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldX/. Fe m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldX;.  P m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldXG.  Sb m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldXS.E Cr m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldX_.F V m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldXk.K Si m  on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat send mouseup to bkgnd Button "si/al" end closefield#.  Ti m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield/. flasherA on mouseUp repeat 3 times set the hilite of bkgnd button "flasher" to true set the hilite of bkgnd button "flasher" to false end repeat end mouseUp W) Zr m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield;.G Sn m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldG.H Mn m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefieldS.I F m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield_.J Si/AlM l&L R2O3MX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseupU$1W RO2MX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseup$2I  Quantity mAA TotalsMHr/B TotAmtMHAC R2OIIAx:Z R2O3IIa'x:[ RO2IIAhx:\K?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Potassium Oxide:" in field "materials" end mouseUp 7% h Na?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "sodium oxide: NaO" in field "materials" end mouseUp 71 j Ca?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Calcium Oxide:" in field "materials" end mouseUp 7= k Mg?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Magnesium Oxide:" in field "materials" end mouseUp 7I l Li?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Lithium Oxide:" in field "materials" end mouseUp 7U m Ba?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Barium Oxide:" in field "materials" end mouseUp 7a n Pb?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Lead Oxide:" in field "materials" end mouseUp 7m o Zn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Zinc Oxide:" in field "materials" end mouseUp 7y p Cu?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Copper Oxide:" in field "materials" end mouseUp 7 q Co?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Cobalt Oxide:" in field "materials" end mouseUp 7 r Ni?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Nickel Oxide:" in field "materials" end mouseUp 7 s Al?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Alumina:" in field "materials" end mouseUp %# t B?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Boron" in field "materials" end mouseUp 1# u Fe?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Iron Oxide:" in field "materials" end mouseUp =# v P?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Phosphorus Pentoxide:" in field "materials" end mouseUp I# w Sb?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Antimony Oxide:" in field "materials" end mouseUp U# x Cr?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Chromium Oxide:" in field "materials" end mouseUp a# y  ConeNumbers!X'--on mouseup -- hide me --end mouseup[Oxide Sources@Eyon mouseUp lock screen set the scroll of field "materials" to 0 show field "materials" show bkgnd button id 300 -- "OK" button show bkgnd button "Find" unlock screen with visual effect dissolve end mouseUp j V?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Vanadium Pentoxide:" in field "materials" end mouseUp m# z Si?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Silica:" in field "materials" end mouseUp %$ { Ti?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Titanium Dioxide:" in field "materials" end mouseUp 1# | Zr?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Zirconium Oxide" in field "materials" end mouseUp =$ } Sn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Tin Oxide:" in field "materials" end mouseUp I$ ~ Mn?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Manganese Dioxide:" in field "materials" end mouseUp U$  F?A on mouseUp if the visible of field materials is not true then send mouseup to bkgnd button "oxide sources" find string "Fluorine:" in field "materials" end mouseUp a$   FluxTotal  2Si/AlA_on mouseUp set numberformat to 0.0 put field "Si"/field "Al" into field "Si/Al" end mouseUp mO   TotalFluxA uon mouseUp set cursor to watch set numberformat to 0.000 put (fld "K" + fld "Na" + fld "Ca" + fld "Mg" + fld "Li" + fld "Ba"\ + fld "Pb" + fld "Zn" + fld "Co" + fld "Cu" + fld "Ni" +fld "Sr") into FluxError if FluxError>1.0011 then --set the textstyle of field "fluxTotal" to Bold,italic put fluxError into Field "FluxTotal" select line 1 of field "FluxTotal" else if FluxError<.999 then --set the textstyle of field "fluxTotal" to Bold,italic put fluxError into Field "FluxTotal" select line 1 of field "FluxTotal" else put fluxError into Field "FluxTotal" --set the textstyle of field "fluxTotal" to plain end if end mouseUp `  MaterialsIxgon mouseup if the optionKey is not down then put item 1 of line clickLine() of me into Ingredient delete char 1 of ingredient if ingredient is empty then exit mouseup if ingredient contains ":" then exit mouseup put empty into whichline repeat with i=1 to 14 if line i of field "ingredients" is empty then put i into whichLine exit repeat end if end repeat if whichLine is not empty then put ingredient into line whichLine of field "ingredients" else put "No more room for ingredients." into field "TalkBack" play boing end if else put item 1 of line clickLine() of me into myIngredient delete char 1 of myIngredient if myIngredient is empty then exit mouseup if myIngredient contains ":" then exit mouseup find whole myIngredient in fld "IngredInfo" if the result is "not found" -- or "ingredientInfo" is not in the foundField then answer "Sorry, no further information is available for " & myIngredient & "." else get (line (word 2 of the foundline) of fld "IngredInfo") if char 1 to (offset(" -",it)-1) of it is not myIngredient then put it into firstFoundLine repeat find whole myIngredient in fld "IngredInfo" if the result is "not found" \ or (line (word 2 of the foundline) of fld "IngredInfo") is firstFoundLine then answer "Sorry, no further information is available for " & myIngredient & "." exit repeat else if char 1 to (offset(" -",(line (word 2 of the foundline) of fld "IngredInfo"))-1) of (line (word 2 of the foundline) of fld "IngredInfo") is not myIngredient then next repeat else answer (line (word 2 of the foundline) of fld "IngredInfo") exit repeat end if end if end repeat else answer it end if end if end mouseupv* `t FindC  on mouseUp ask "What do material you want to find?" if it is empty then exit mouseup find string it in field "materials" put "Find string " & quote & it & quote & " in field Materials" hide message end mouseUp A+z  Cone k f--on closefield -- send mouseup to bkgnd button "limit form u las" --pass closefield --end closefield%-  PercentAnalysis 1on mouseup put empty into me hide me end mouseup5 Sr?A Lon mouseUp find string "Strontium oxide:" in field "materials" end mouseUp 7   Sr m on closefield get me repeat with i=1 to the number of chars of it if char i of it is not in "1234567890." then answer "The amount entered is not a number." with "OK" select line 1 of me exit repeat end if end repeat end closefield + R2OMX on mouseup answer "To change the unity formula, first choose 'Clear Amounts' from the Glaze Calculator menu." with "OK" end mouseup$4 ThermalExpansionK *on mouseup doThermalExpansion end mouseup~/  IngredInfo!hAHe a<Bc G DPNG  IHDRMgAMA=-fPLTEٟtRNS0JMIDATxA0 ð?(>,!]<- Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@'8 Nq@e IENDB`cREVTempMaster traversalOnfalsepalindromeFramesfalse repeatCount0inksrcCopysize438threeDtrue blendLevel50rect 0,0,512,127angle0namecard image id 2375hotSpot1,1 fileNamecolorstoolTip alwaysBufferfalselayer27 dontDitherfalsevisibletrue cantSelectfalse borderWidth2opaquetrueyHot1id2375 currentFrame1altId0 showBorderfalse disabledfalsexHot1 frameCount0 constantMaskfalseshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1089840881878 HC Iconsi U@ calculator D@  000000N00)0/0000/0 00 00 0/00 00)0)00p 000000N00)0/0000/0 00 00 0/00 00)0)00ptHG Next Arrow D` ?  /((N(((((((((((((((((((((/???  /((N(((((((((((((((((((((/??FHG Prev Arrow D ?  /((N(((8(x((((((((((((x(8((((/???  /((N(((8(x((((((((((((x(8((((/??)9NoIcon D xNoLead D `p08  80p``p08  80p`  `p08  80p``p08  80p` N White Home D f4p`> 0c À` !ssccf4p`> 0c À` !ssccA4Tiny Up Arrow D A5tiny down arrow D Good Question D@ @f@OH'H'H'H?'Hx<'H'I'C㏇GO_O?GCI'H'H'H

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1087937703070 X10-6/C    )Custom Limits Uon mouseup put ((menuHistory of me)-1) into myCustomLimit if myCustomLimit is not 0 then installLimit myCustomLimit if "satin" is in the short name of bg btn id 6562 then if "mat" is in the short name of bg btn id 6562 then show btn "TEwarning" else hide btn "TEwarning" put "Suggested Si/Al Ratio: between 5:1 & 8:1" into fld "SuggestedSi" else if "mat" is in the short name of bg btn id 6562 then show btn "TEwarning" put "Suggested Si/Al Ratio: less than 5:1" into fld "SuggestedSi" else -- the button says gloss if cd fld "Li"<.015 and cd fld "Sr"<.015 then hide btn "TEwarning" else show btn "TEwarning" put "Suggested Si/Al Ratio: greater than 8:1" into fld "SuggestedSi" end if end if else if "mat" is in the short name of bg btn id 6562 then show btn "TEwarning" set the name of bg btn id 6562 to "Matte" put "Suggested Si/Al Ratio: less than 5:1" into fld "SuggestedSi" else hide btn "TEwarning" set the name of bg btn id 6562 to "Glossy" put "Suggested Si/Al Ratio: greater than 8:1" into fld "SuggestedSi" end if setGlazeLimits end if end mouseup .~None!None C04 - Barium Mat C04 - Clear C04 - Generic Glaze C04 - Lithium Mat C04 - Majolica C04 - Mat LeadFree C04 - Strontium Mat C06 - Generic matte C06 - Gloss C06 - Leadless Clear C06 - Leadless Lowfire Clear C06 - Matte C08 - Leadless Raku C6 - Clear Glossy C6 - Gloss-no craze C6 - Lithium Gloss C6 - Lithium matte C6 - Magnesium matte C6 - Mat C6 - P2O5 Glazes C6 - Satin Mat C6 - Spodumene Mat C6 - Strontium Mat C6 - Zinc Gloss C9 - Crystal C10 - Barium/Strontium mat C10 - Blue celadon C10 - Celadon C10 - Copper Red C10 - Fake Ash - rivulet C10 - Gloss Glazes C10 - Gloss no boron C10 - Gloss with boron C10 - Iron Red C10 - Magnesia Matte C10 - Matte C10 - Satin Matte C10 - Shino New C10 - Shino C10 - Spodumene Mat C10 - Temmoku C10 - Yellow Matte  (cREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect302,382,492,402 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id6697altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabelNone autoHilitefalsestylepopup disabledIcon0 armBorderfalsename Custom Limitsicon0toolTiplayer113 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines40margins4opaquetrue accelModstext None C04 - Barium Mat C04 - Clear C04 - Generic Glaze C04 - Lithium Mat C04 - Majolica C04 - Mat LeadFree C04 - Strontium Mat C06 - Generic matte C06 - Gloss C06 - Leadless Clear C06 - Leadless Lowfire Clear C06 - Matte C08 - Leadless Raku C6 - Clear Glossy C6 - Gloss-no craze C6 - Lithium Gloss C6 - Lithium matte C6 - Magnesium matte C6 - Mat C6 - P2O5 Glazes C6 - Satin Mat C6 - Spodumene Mat C6 - Strontium Mat C6 - Zinc Gloss C9 - Crystal C10 - Barium/Strontium mat C10 - Blue celadon C10 - Celadon C10 - Copper Red C10 - Fake Ash - rivulet C10 - Gloss Glazes C10 - Gloss no boron C10 - Gloss with boron C10 - Iron Red C10 - Magnesia Matte C10 - Matte C10 - Satin Matte C10 - Shino New C10 - Shino C10 - Spodumene Mat C10 - Temmoku C10 - Yellow Matte shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModecomboboxfamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088025128702 *Field 1 HcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect148,384,298,404multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6698altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameField 1toolTipvGridfalse listBehaviorfalselayer114visibletrue cantSelectfalse borderWidth2margins5 htmlText

Choose a Custom Limit:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088027455304 Choose a Custom Limit: ,LimitInstructionsLabel H F2cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect156,326,420,376multipleHilitesfalse patterns colors 0,0,0 shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6700altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLimitInstructionsLabeltoolTipvGridfalse listBehaviorfalselayer115visibletrue cantSelectfalse borderWidth2margins2 htmlText

NOTE: Thermal expansion only includes oxides shown.

Click and drag light blue bars to set or adjust amounts.

Hold Option/Alt key down and click oxide names for

more info on each oxide. Color bars are limit amounts.

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088469767991 4NOTE: Thermal expansion only includes oxides shown. 9Click and drag light blue bars to set or adjust amounts. 4Hold Option/Alt key down and click oxide names for 7more info on each oxide. Color bars are limit amounts. .GlazeLimitsMenuBarIcREVTempMaster# traversalOnfalse dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect -7,-5,221,23 patterns showNamefalsecolors hScroll0backgroundBehaviortrue cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid6702altId0radioBehaviortrue textStyleboldlockLocfalselabelnameGlazeLimitsMenuBartoolTiplayer120visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize12 disabledfalse textFontArialvScroll0hilitedButton0 cREVGeneral revUniqueID 1089840881968/File]n--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Open" answer file "Select the HyperGlaze stack to open:" of type "RSTK" if it is empty then exit menuPick open stack it show stack it break case "Close" close stack the topstack break case "Save" set the cursor to watch save stack "Glazes" save stack "Glaze Index" save stack "Materials" save stack "Materials Index" save stack "clays" save stack "clay Index" save stack "Glaze Limits" save stack "Glaze Calculator" break case "Import" send mouseup to btn "import Glaze File" --hidden break case "Export" saveAsGlazeFile break case "Page Setup" answer printer break case "Print Card" open printing with dialog print this card close printing break case "Quit" -- answer "Save changes to HyperGlaze first?" with "Cancel" or "No" or "Save" -- if it is "Cancel" then exit menuPick -- if it is "Save" then -- set cursor to watch -- save stack "Glazes" -- save stack "Glaze Index" -- save stack "Materials" -- save stack "Materials Index" -- save stack "clays" -- save stack "clay Index" -- save stack "Glaze Limits" -- save stack "Glaze Calculator" -- end if quit break end switch end menuPick &FileB&Open/0 &Close/W (- &Save/S (- Page Setup &Print Card/P - &Quit/QcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect -3,1,35,17 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6703altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameFileicon0toolTiplayer121 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext<&Open/0 &Close/W (- &Save/S (- Page Setup &Print/P - &Quit/Q shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881969 0Edit]--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Undo" undo break case "Cut" cut break case "Copy" Copy break case "Paste" if the clipboard is "text" then paste break case "Clear" delete break case "New Card" create card break case "Delete Card" answer "Delete this Glaze recipe permantly?" with "Delete" or "Cancel" if it is "Delete" then delete this card break case "Duplicate Card" copy card paste card break case "Preferences" open stack "Preferences" break end switch end menuPick !(Edit7Undo/Z (- Cu&t/X &Copy/C &Paste/V Clea&r - PreferencescREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 33,1,73,18 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6704altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameEditicon0toolTiplayer122 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext6Undo/Z (- Cu&t/X &Copy/C &Paste/V Clea&r - Preferences shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881970 1Go]--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Go Back" go back break caser "Go Forward" go forward break case "Index" open stack "HyperGlaze" show stack "HyperGlaze" break case "Glazes" open stack pWhich show stack pWhich break case "Glaze Index" open stack pWhich show stack pWhich break case "Glaze Limits" open stack pWhich show stack pWhich break case "Glaze Calculator" open stack pWhich show stack pWhich break case "Clays" open stack pWhich show stack pWhich break case "Clay Index" open stack pWhich show stack pWhich break case "Materials" open stack pWhich show stack pWhich break case "Materials Index" open stack pWhich show stack pWhich break case "Unity Explained" open stack pWhich show stack pWhich break case "Bibliography" open stack pWhich show stack pWhich break case "QuadBlender" open stack pWhich show stack pWhich break case "Potter's Friend" open stack pWhich show stack pWhich break end switch end menuPick HGoGo &Back/[ Go &Forward/] (- Index (- Glazes Glaze Index (- (Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Bibliography Unity Explained QuadBlender Potter's FriendcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 72,-1,100,19 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6705altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameGoicon0toolTiplayer123 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines14margins4opaquetrue accelModstextGo &Back/[ Go &Forward/] (- Index (- Glazes Glaze Index (- (Glaze Limits Glaze Calculator (- Clays Clay Index (- Materials Materials Index (- Bibliography Unity Explained QuadBlender Potter's Friend shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881971 2 Glaze Limits]K--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Increase Cone" send mouseup to cd btn "ConeUp" break case "Decrease Cone" send mouseup to cd btn "ConeDown" break case "Get Analysis for Current Glaze" send mouseup to btn "Limits for Current Glaze" break case "Send to Glaze Calculator" sendToGlazeCalculator break case "Analyze Glaze" send mouseup to cd btn "Analyze Glaze" break case "Install Custom Limits" go to cd "LimitFormulas" break end switch end menuPick dO Glaze LimitsIncrease Cone/+ Decrease Cone/- (- Get Analysis for Current Glaze Send to Glaze Calculator Analyze Glaze (- Install Custom LimitscREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 100,-1,179,19 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6706altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruename Glaze Limitsicon0toolTiplayer124 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstextIncrease Cone/+ Decrease Cone/- (- Get Analysis for Current Glaze Send to Glaze Calculator Analyze Glaze (- Install Custom Limits shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881972 3Help]F--The following menuPick handler was generated by the Menu Builder. on menuPick pWhich switch pWhich case "Help with HyperGlaze" open stack "HyperGlaze Help" show stack "HyperGlaze Help" break case "About HyperGlaze" open stack "HG Splash" show stack "HG Splash" break end switch end menuPick &Help*&Help with HyperGlaze - &About HyperGlazecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect 179,-1,217,19 mnemonic1armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6707altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLoctruevisitedfalse showHilitefalselabel autoHilitetruestylepopup disabledIcon0 armBordertruenameHelpicon0toolTiplayer125 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext)&Help with HyperGlaze - &About HyperGlaze shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModepulldownfamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881973 4Install This Custom LimitEp7on mouseup InstallGraph sortLimitName end mouseup Fx.puts currently visible glaze limits into menucREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect70,376,246,404 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6708altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameInstall This Custom Limiticon0toolTip-puts currently visible glaze limits into menulayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1088538173566 :bigSmallWindowCon mouseup if the platform is "MacOS" then put 315 into myMinHeight put 388 into myMaxHeight else -- for Windows with menus in window put 338 into myMinHeight put 413 into myMaxHeight end if if the icon of me is 201186 then set the icon of me to 200951 revChangeWindowSize 518,myMinHeight else set the icon of me to 201186 revChangeWindowSize 518,myMaxHeight end if end mouseup >%click to show or hide buttons & menucREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect 2,318,28,332 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIcontruecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6714altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle transparent disabledIcon0 armBordertruenamebigSmallWindowicon201186toolTip$click to show or hide buttons & menulayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089387302875 <Import Limit FileEp'on mouseup importLimits end mouseup Oxn1compiled limits from Glazes using Complex SearchcREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect335,376,445,404 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6716altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameImport Limit Fileicon0toolTip0compiled limits from Glazes using Complex Searchlayer131 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089741160918 [GlazeAnalysis?!x on mouseup hide me end mouseupHLccREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth16 textHeight13rect 5,328,513,404multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbartrue hScrollbarfalseid6491altId99autoTabfalse textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle scrolling showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameGlazeAnalysis?toolTipvGridfalse listBehaviorfalselayer126visiblefalse cantSelectfalse borderWidth2margins14 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881936 GLAZE ANALYSIS INFORMATION: %Dominant oxides in this glaze: Ca,Si Thermal expansion is about right to not craze on typical clay bodies. Underfired (porous) clays will still be likely to craze. !* Silica/Alumina Ratio is 10.7:1 As the Silica:Alumina Ratio is greater than 8 to 1 the glaze will probably be glossy unless very large amounts of Calcium, Lithium, Magnesium, Barium or Zinc are present.  Boron oxide:  `@IJZAnalysisBackDropAo@% dcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect-1,293,523,422 mnemonic0armFillfalse visitedIcon0 patterns showNamefalse showIconfalsecolors 255,255,204 hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6490altId100 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitefalsestyle rectangle disabledIcon0 armBorderfalsenameAnalysisBackDropicon0toolTiplayer116 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBorderfalse menuHistory1 cREVGeneral revUniqueID 1089840881935 \Save Analysisxon mouseUp set cursor to watch put char 1 to 23 of cd fld "name" && "Analysis" into myFile put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb" into ROox put "K2O,Na2O,Li2O,CaO,BaO,SrO,MgO,ZnO,PbO" into ROLabels put "B,Al" into R2O3ox put "Si" into RO2ox set numberFormat to 0.00 repeat with i=1 to 8 get cd fld (item i of ROox) if it >0 then put it && item i of ROLabels & return after UMF end repeat if the visible of cd fld "Na" is false \ and word 2 of line 1 of UMF is "K2O" then put "KNaO" into word 2 of line 1 of UMF put tab & 1*cd fld "Al" && "Al2O3" & tab & 1*cd fld "Si" && "SiO2" after \ line 1 of UMF put tab & cd fld "B" && "B2O3" after line 2 of UMF ask file "Save TEXT file of this glaze analysis as:" with myFile & ".txt" if the result is not empty then exit mouseup put it into myFile set fileType to "HGLZTEXT" open file MyFile write cd fld "Name" && "" & cd fld "cone" & return & return & \ "Unity Molecular Formula:" & return & UMF & return & return & \ cd fld "GlazeAnalysis?" to file myFile close file myFile end mouseUp -- ScriptEdit Prefs:Monaco,9,47,24,376,524,576,576,50 5-tecREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect53,301,169,323 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6492altId101 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruename Save Analysisicon0toolTiplayer117 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins6opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881937 zPrint Analysison mouseUp set cursor to watch put char 1 to 23 of cd fld "name" && "Analysis" into myFile put "K,Na,Li,Ca,Ba,Sr,Mg,Zn,Pb" into ROox put "K2O,Na2O,Li2O,CaO,BaO,SrO,MgO,ZnO,PbO" into ROLabels put "B,Al" into R2O3ox put "Si" into RO2ox set numberFormat to 0.00 repeat with i=1 to 8 get cd fld (item i of ROox) if it >0 then put it && item i of ROLabels & return after UMF end repeat if the visible of cd fld "Na" is false \ and word 2 of line 1 of UMF is "K2O" then put "KNaO" into word 2 of line 1 of UMF put " " & 1*cd fld "Al" && "Al2O3" & " " & 1*cd fld "Si" && "SiO2" after \ line 1 of UMF put " " & cd fld "B" && "B2O3" after line 2 of UMF put cd fld "Name" && "" & cd fld "cone" & return & return & \ "Unity Molecular Formula:" & return & UMF & return & return & \ cd fld "GlazeAnalysis?" into myGlazeAnalysis revPrintText myGlazeAnalysis end mouseUp .tcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect231,302,347,324 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6522altId146 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenamePrint Analysisicon0toolTiplayer118 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins6opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881967 ]Donexon mouseUp lock screen send mouseup to cd fld "GlazeAnalysis?" hide btn "Save Analysis" hide btn "Print Analysis" hide btn "AnalysisBackDrop" hide me unlock screen end mouseUp -AfcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBordertruerect413,301,478,323 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id6493altId102 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameDoneicon0toolTiplayer119 accelTextvisiblefalse cantSelectfalse borderWidth2 menuLines5margins6opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089840881938 > HelpInfo  lcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect31,263,266,371multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6718altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameHelpInfotoolTipvGridfalse listBehaviorfalselayer131visibletrue cantSelectfalse borderWidth2margins8 htmlText&

Option click a limit bar to set to zero.

Click on zero line (0.0) and drag to show

zeroed oxides. Drag bottom of bar upward

to set lower limit.

Currently installed limits at right.

Click to show limit above.

Option [ALT] click to delete.

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1090619558500 )Option click a limit bar to set to zero. *Click on zero line (0.0) and drag to show )zeroed oxides. Drag bottom of bar upward to set lower limit. %Currently installed limits at right. Click to show limit above. Option [ALT] click to delete. ? UMF label H (% cREVGeneral revUniqueID 1092883214785 UMF Wt.% DpctKkX on closefield global OldKamount setButtonHeight if the visible of button "Na" is false then put card field "K"/OldKamount into myFactor set the numberFormat to 0.0000 put item 1 of cd fld "tempKNa"*myFactor into item 1 of cd fld "tempKNa" put item 2 of cd fld "tempKNa"*myFactor into item 2 of cd fld "tempKNa" end if end closefield on setButtonHeight global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit setButtonHeight else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end setButtonHeight on openfield global OldKamount put line 1 of me into OldKamount end openfield@ cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 31,210,62,225 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6433altId13autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameKtoolTip listBehaviorfalsevGridfalselayer28 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884933814 1.00 EpctNakX won closefield setButtonHeight end closefield on setButtonHeight global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit setButtonHeight else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end setButtonHeight @;cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 59,210,87,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6434altId23autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameNatoolTip listBehaviorfalsevGridfalselayer29 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884933870 2.08 FpctLikX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@XcREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect88,210,116,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6435altId24autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameLitoolTip listBehaviorfalsevGridfalselayer30 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884933924 GpctCakX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@scREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect115,210,143,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6436altId25autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameCatoolTip listBehaviorfalsevGridfalselayer31 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884933980 0.59 HpctBakX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect142,210,170,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6437altId26autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBatoolTip listBehaviorfalsevGridfalselayer32 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934036 IpctSrkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect169,210,197,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6438altId27autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSrtoolTip listBehaviorfalsevGridfalselayer33 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934086 9.70 JpctMgkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect196,210,224,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6439altId28autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameMgtoolTip listBehaviorfalsevGridfalselayer34 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934149 0.07 KpctZnkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect223,210,252,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6440altId29autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameZntoolTip listBehaviorfalsevGridfalselayer35 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934208 LpctPbKX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@cREVTempMaster5 tabStops traversalOnfalse firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect251,210,279,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6441altId132autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTexttruescroll0namePbtoolTip listBehaviorfalsevGridfalselayer36 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934266 MpctAlkX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "Al" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>2 then repeat until it>=0 and it<=2 ask "Amounts must be between 0 and 2." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 put round(200 - 50*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeight@M"cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect333,210,367,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6453altId4autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameAltoolTip listBehaviorfalsevGridfalselayer48 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934317 14.05 NpctSikX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "Si" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>20 then repeat until it>=0 and it<=20 ask "Amounts must be between 0 and 20." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 put round(200 - 5*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeight@&cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect442,210,480,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6455altId6autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameSitoolTip listBehaviorfalsevGridfalselayer50 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934376 72.14 OpctBkX on closefield setButtonHeight end closefield on mouseleave setButtonHeight end mouseleave on setButtonHeight put "B" into MyFlux put the rect of button myFlux into MyButtonRect if card field myFlux is empty then put 0 into card field myFlux get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>2 then repeat until it>=0 and it<=2 ask "Amounts must be between 0 and 2." with it if it is empty then put 0 into card field myFlux exit setButtonHeight else put it into card field myFlux end repeat end if set the numberFormat to 0 set numberformat to 0 put round(200 - 50*(it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect end setButtonHeight @+"cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect299,210,333,224 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6461altId31autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameBtoolTip listBehaviorfalsevGridfalselayer56 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934429 0.37 PpctPkX 7on closefield global myFlux put the short name of me into MyFlux put the rect of button myFlux into MyButtonRect get card field myFlux if it is empty then put "0.0" into cd fld myFlux else if it<0 or it>1 then repeat until it>=0 and it<=1 ask "Amounts must be between 0 and 1." with it if it is empty then put 0 into card field myFlux adjustAmounts exit closefield else put it into card field myFlux end repeat end if set numberformat to 0 put round(200-(100*it)) into item 2 of MyButtonRect set the rect of button MyFlux to MyButtonRect adjustAmounts end closefield@~ cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect382,210,410,223 textHeight13 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6503altId142autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0namePtoolTip listBehaviorfalsevGridfalselayer93 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092884934485 Q Graphic 2KF  cREVGeneral revUniqueID 1092885109913A Graphic 1K@1q cREVGeneral revUniqueID 1092883407180 @ Si-AlLabel -S cREVGeneral revUniqueID 1092883301824 :1 Si/Al ratio B Al/Si RatiomXZ-- on closefield -- answer "Be sure to adjust Si/Al bars to new ratio." -- end closefield2' cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect424,273,467,292 textHeight18 patterns colors 0,0,0 shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid6462altId32autoTabtruehGridfalse textStylebold dontWrapfalselockLocfalse autoHilitetruestyle transparent sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTextfalsescroll0name Al/Si RatiotoolTip listBehaviorfalsevGridfalselayer57 borderWidth2 cantSelectfalsevisibletruemargins4 htmlText

opaquefalse threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize14fixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1092883440405 8.8C SiAlRatioAjon mouseUp set the numberFormat to 0.0 put cd fld "Si"/cd fld "Al" into cd fld "Al/Si Ratio" end mouseUp .xjcREVTempMaster; traversalOnfalseinksrcCopythreeDtrue hiliteBorderfalse mnemonic0rect423,271,512,293armFillfalse patterns visitedIcon0colors showIconfalse showNamefalsehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id6458altId106 labelWidth0 accelKey armedIcon0 textStyleplainlockLocfalse autoHilitetruelabel showHilitefalsevisitedfalse disabledIcon0style rectangle armBorderfalseicon0name SiAlRatiotoolTip accelTextlayer53 borderWidth2 cantSelectfalsevisibletrue menuLines5margins4 accelModsopaquefalsedefaultfalse shadowOffset4text hiliteFillfalse menuName showBorderfalse disabledfalse hiliteIcon0 textSize12autoArmfalsefamily0 menuMode textFont helvetica menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1092883529054 mKNaLi?A on mouseup put the short name of me & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn "Li?" is true then set the hilite of btn "Li?" to false if the hilite of bg btn "CombineKNa" is true then set the hilite of bg btn "CombineKNa" to false end mouseup}KyY cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect125,75,502,314multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6509altId89autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameKNaLi?toolTipvGridfalse listBehaviorfalselayer99visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881954  Potassium, Sodium, and Lithium oxides are powerful, alkaline fluxes and have somewhat similar effects on glaze color. Alkaline glazes tend to be clear and bright, with intense colors. Potassium and Sodium both cause a high thermal expansion in glazes, so that it may be difficult to create glazes that do not craze using only these two fluxes. Lithium has a low thermal expansion and small additions to a glaze may be useful to prevent crazing in high alkaline glazes. Too much Lithium may cause glaze shivering, although very high amounts of Lithium may make crazing worse. Unfortunately it is impossible to reliably calculate the estimated thermal expansion for glazes containing Lithium. Very high amounts of Lithium may also cause mat surfaces and flowing mat glazes. It is difficult to get a sufficient amount of Sodium or Potassium into an alkaline low-fire glaze without resorting to the use of a Frit or soluble ingredients. Colors are often intense in alkaline glazes. Copper will give bright turquoise blues in a strongly alkaline glaze, including Lithium glazes. Glaze color in Lithium glazes is often intense. n KNaLi?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup}2ymcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 125,50,502,79multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6510altId109autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name KNaLi?HeadertoolTipvGridfalse listBehaviorfalselayer100visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881955 'Alkaline Fluxes - K2O, Na2O, Li2O lCa?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseup}Xo cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect153,125,497,290multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6508altId111autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameCa?toolTipvGridfalse listBehaviorfalselayer98visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881953 Calcium oxide is one of the primary glaze fluxes, especially at stoneware temperatures. Calcium oxide has little noticeable affect on glaze color. Calcium adds hardness to the fired glaze. u Calcium oxide is useful as a flux in glazes over a wide range of temperatures, although at lower temperatures (below 04 where it is not very powerful as a flux) it is often used in combination with other strong fluxes such as Boron. Excessive amounts in a stoneware glaze may cause running and beading of the glaze, as in many so-called "Fake ash" or "Drip" glazes. ~ Very high amounts of Calcium in glazes will usually in result in mat glazes, especially at temperatures below stoneware. qBa?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupWH^ cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect183,87,511,290multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6513altId94autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameBa?toolTipvGridfalse listBehaviorfalselayer103visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881958  Barium oxide helps to create smooth matte glazes at high temperatures. Amounts of more than 0.2 mole of Barium oxide should begin to produce a mat glaze, unless boron is present. It also has a strong effect on color. Its affect on color is similar to that of a strongly alkaline glaze. The presence of even small amounts of Boron in the glaze may make it impossible to obtain matte glazes with Barium.  Barium carbonate, the major source of Barium in glazes is TOXIC. It was once used as rat poison. Use it with care. There is much evidence that low-fire and improperly formulated high-fire Barium stoneware glazes will release Barium when used with food. You should have glazes tested for Barium release if this is a possibility or avoid using Barium containing glazes on food contact surfaces. Try Strontium as a less toxic substitute. pSr?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupY1 cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect199,89,504,280multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6512altId134autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameSr?toolTipvGridfalse listBehaviorfalselayer102visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881957 MStrontium oxide is a flux similar in some ways to both Calcium and Barium oxides in its affect on glazes. Colorants react more strongly to it than with Calcium, but probably less strongly than the intense color effects of Barium. Adding Strontium should lower the thermal expansion of most glazes, but its effects are unpredictable. GOne of the major attractions of Strontium is that its major source, Strontium carbonate, does not have the toxicity of Barium carbonate. To replace barium with strontium, try substituting identical molecular amounts of strontium oxide for barium oxide. This works with many glazes, but less successfully with high barium mats. sMg?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupY$s cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect219,89,511,316multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6515altId115autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameMg?toolTipvGridfalse listBehaviorfalselayer105visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881960 ] Magnesium can be used in moderate amounts (0.2 to 0.4moles) to cause sugary mattes in low temperature oxidation glazes and buttery mattes in high-fire reduction glazes. It is seldom used in larger quantities. Smaller quantities can help achieve beautiful satin mat glazes in reduction. Magnesium is as useful as a flux at lower temperatures. Magnesium can have a distinct effect on glaze color, causing Cobalt to give lavender to purple colors rather than the more usual blues, and Iron oxide to give yellowish greens.  Magnesium Carbonate, a fluffy material that shrinks a great deal during firing, is often a major ingredient in so called "Crawl" glazes that intentionally use glaze crawling for texture. Magnesium may be used in amounts up to 0.6 to 0.8 mole in these glazes. uZn?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupbu cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect248,98,512,324multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6517altId117autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameZn?toolTipvGridfalse listBehaviorfalselayer107visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881962  Zinc oxide is a valuable flux at medium to high temperatures. It was used to replace Lead in Bristol glazes for mid-range temperatures. At lower temperatures it is not as useful as a flux. Zinc can effect color, especially in glazes containing Chromium which gives brown instead of the more usual green. The addition of Zinc to a glaze is often useful to lower the thermal expansion. Large amounts of Zinc may act as an opacifier, especially at lower temperatures. Zinc is also necessary ingredient in crystal glazes. An extremely low alumina content and the presence of titanium are necessary attributes of most crystal glazes. N Zinc Oxide which has not been calcined may contribute to glaze crawling. `Pb?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupOz cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,88,248,318multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6496altId122autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0namePb?toolTipvGridfalse listBehaviorfalselayer86visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881941  Lead oxide is a powerful flux even at the lowest temperatures. Despite its toxicity, it is useful in producing certain colors at low temperatures, particularly oranges and reds. It should not be used above cone 5-6, as Lead is volatile above this temperature. Whenever possible use Lead-containing frits as this lessens the solubility of Lead in the raw glaze, thus decreasing the hazard to the artist. LALWAYS USE PROPER HANDLING AND FIRING PROCEDURES WHEN USING LEAD IN GLAZES.  PLEASE NOTE: There are legal restrictions on the use of lead glazes on ware which may be used with food. Adequate kiln ventilation is also a must. wSi?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupePN cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect101,80,435,302multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6519altId128autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameSi?toolTipvGridfalse listBehaviorfalselayer109visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881964 Silica is the main ingredient of most types of glass and is a necessary ingredient in almost all glazes. Since many ceramic materials contain Silica in some amount, it is not always necessary to add Flint (or pure Silica) to a glaze recipe. _ The amount of Silica in a glaze also can have a substantial affect on the thermal expansion. Too little Silica in a glaze may result crazing of the glaze. Too much Silica in a glaze may lead to glaze devitrification upon cooling and/or shivering of the glaze due to poor glaze/clay fit that occurs with the resulting very low thermal expansion. b An extreme lack of silica will result in a dry mat surface if sufficient amounts of Alumina present, or a very runny glaze if there is not enough Alumina to resist the action of the fluxes. However, many fluxes depend on the formation of a eutectic between the flux and silica. In such cases if not enough silica is present the glaze may not melt.  dAl?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupO~ cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,79,391,318multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6500altId126autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameAl?toolTipvGridfalse listBehaviorfalselayer90visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881945  Aluminum oxide is quite refractory and adds hardness and viscosity to glazes. It is called a 'stabilizer' due to its ability to lessen the runniness of glazes, thus rendering them more stable. It also strengthens and lowers the solubility of fired glazes. Alumina prevents crystal formation in glazes. Alumina is kept low or absent in most crystal glazes and certain other special types of glazes, and where its presence can prevent or dull specific colors. Low alumina glazes will usually be quite runny. Large amounts of Alumina will cause glazes to not melt completely and to be matte and dry. High amounts of Alumina in a glaze will dull many colorants. Although alumina is present in several ceramic materials, notably feldspar, kaolins and clays are often a major source of alumina in glazes. The adhesive and flotative qualities of clay are helpful in making a raw glaze batch which is easily applied and which adheres to the surface of the unfired ware. Kaolin is usually the first choice for glazes due to its purity (lack of color and contaminants), particle size, and moderate plasticity. Other clays may be used if appropriate. Calcined clays are used when the plasticity of the clay causes glaze application problems. hP?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupTK cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 10,75,341,262multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6504altId143autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameP?toolTipvGridfalse listBehaviorfalselayer94visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881949  Phosphorus most often occurs in stoneware glazes such as Iron reds or yellows where it is important to the color development, and Chun-type glazes where it helps develop the pearlescent qualities of the glaze. The usual source is Bone ash, but many kinds of ash contain some phosphorus. In lowfire glazes bone ash is most often used as a texture producing agent, as it does not readily melt into the glaze if large quantities are present. It may have some affect on color as well. dPhosphorus is usually considered a secondary-level glass former, and is used in addition to silica. bB?A on mouseup put the short name of me into myName put myName & "Header" into myHeader hide me hide cd fld myHeader if the hilite of btn myName is true then set the hilite of btn myName to false end mouseupKa| cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 3,75,356,301multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6498altId124autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameB?toolTipvGridfalse listBehaviorfalselayer88visiblefalse cantSelectfalse borderWidth2margins12 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881943 9 Boric oxide usually functions as a strong flux in glazes. Glaze fit in alkaline glazes is often improved by the addition of small amounts of Boron, as it reduces the thermal expansion of the glaze and therefore the tendency to craze. In large amounts Boron may have the opposite effect and induce crazing. Boron and Barium in the same glaze may result in a very fluid melt - glazes that run - due to a very low temperature eutectic formed by the two. As an amphoteric oxide, it also functions to some extent as a glass former. High boron glazes (many lead-free raku glazes for instance) are often quite soft and easily scratched. O High Boron glazes may give broken, patchy colors, especially with rutile. The solubility of many compounds containing useful amounts of Boron is problematic in glaze formulation. Frits and Gerstley Borate (a natural frit) are the most useful insoluble forms. c B?Headeron mouseup hide me put the short name of me into myField repeat 6 delete last char of myField end repeat send mouseup to cd fld myField end mouseup2a}cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 3,50,356,79multipleHilitesfalse patterns colors 0,0,0 shadowtruehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6499altId125autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleshadow showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameB?HeadertoolTipvGridfalse listBehaviorfalselayer89visiblefalse cantSelectfalse borderWidth2margins4 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089840881944 Boric oxide - B2O3 S TEwarningCon mouseup if card field "Sr" >0.002 and card field "Li" >0.002 then put "Lithium oxide & Strontium oxide" into CalcProblems else if card field "Li" >0.002 then put "Lithium oxide" into CalcProblems if card field Sr >0.002 then put "Strontium oxide" into CalcProblems end if if calcProblems is not empty then put "This formula contains " & calcProblems & "." & return & "NOTE: Thermal expansion calculations are not accurate."\ & return & "The thermal expansion should be lower with increasing" & return & "amounts, but large amounts may have an unpredictable effect." & return\ into TEdialog end if if the short name of bkgnd button id 15 contains "mat" then put "You have specified this as a matte glaze." & return & "Thermal expansion calculations are not accurate for matte glazes." \ after TEdialog end if answer TEdialog end mouseup 6,estimated thermal expansion is not accurateT cREVGeneral revUniqueID 1092932466605 Tanimatedexclamation1.gif@200954GIF89a3f3333f333ff3fffff3f3f̙3f3333f3333333333f3333333f3f33ff3f3f3f3333f3333333f3̙333333f333ff3ffffff3f33f3ff3f3f3ffff3fffffffffff3fffffff3fff̙ffff3fffff3f̙3333f33̙3ff3ffff̙f3f̙3f̙̙3f̙3f3333f333ff3fffff̙̙3̙f̙̙̙3f̙3f3f3333f333ff3fffff3f3f̙3f(((444@@@LLLXXXdddppp|||𠠤! NETSCAPE2.0!,i H*\tZΛ%v[8H4RA%9&ʙ/MN ̘{FП@DTCJ*ëX҄!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,u H*\tZ--7WvR#Bv)2ĒQR2$A*k(sĚ{sϣYF4:q(ўMidҕիXftȵW߉K컀!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,i H*\tZΛ%v[8H4RA%9&ʙ/MN ̘{FП@DTCJ*ëX҄!2, (Lp!Çp!f,"\x1;/"fbEf|ؐ*MN,JE󤭝R$hʞD]BG"}siУ7ZZ򩝯`Ânٳh'~|Ƕ۷!2,u H*\tZ--7WvR#Bv)2ĒQR2$A*k(sĚ{sϣYF4:q(ўMidҕիXftȵW߉K컀; cREVGeneral revUniqueID 1093792632985 7Label3 H <(8cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 312,44,368,60multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6711altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel3toolTipvGridfalse listBehaviorfalselayer129visibletrue cantSelectfalse borderWidth2margins5 htmlText

Surface:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088609513333 Surface: 8Label4 H (cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 384,42,512,58multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6712altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel4toolTipvGridfalse listBehaviorfalselayer130visibletrue cantSelectfalse borderWidth2margins5 htmlText

Est. Thermal Expansion:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088609531633 Est. Thermal Expansion: 6Label2 H (LcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 238,44,314,60multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6710altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel2toolTipvGridfalse listBehaviorfalselayer128visibletrue cantSelectfalse borderWidth2margins5 htmlText

Limit Cone:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088609492548 Limit Cone: XLabelOrigCone H ffffff(BcREVTempMaster5 tabStops traversalOnfalse firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 238,44,314,60 textHeight13 patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6710altId0autoTabfalsehGridfalse textStylebold dontWraptruelockLocfalse autoHilitefalsestyle transparent sharedTexttrue showLinesfalsenoncontiguousHilitesfalse lockTexttruescroll0nameLabel2toolTip listBehaviorfalsevGridfalselayer128 borderWidth2 cantSelectfalsevisibletruemargins5 htmlText

Limit Cone:

opaquefalse threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1109615616316 Orig. Cone: W OriginalCone iX'on closefield global startingCone get me if it is not startingCone then setGlazeLimits end closefield on mouseenter global startingCone put me into startingCone end mouseenter on mouseleave global startingCone get me if it is not startingCone then setGlazeLimits end mouseleave 65&cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 254,56,311,75 textHeight16 patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid6465altId38autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyle transparent sharedTextfalse showLinestruenoncontiguousHilitesfalse lockTextfalsescroll0nameConetoolTip listBehaviorfalsevGridfalselayer60 borderWidth2 cantSelectfalsevisibletruemargins6 htmlText

opaquefalse threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize12fixedLineHeighttrue textFont helveticavScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1109615534577 6 5Label1 H ffffff&hcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,42,98,58multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid6709altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0nameLabel1toolTipvGridfalse listBehaviorfalselayer127visibletrue cantSelectfalse borderWidth2margins5 htmlText

Glaze Limits for:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1088609447362 Glaze Limits for: Match Glazes3 Aon openstack put empty into fld "searchResults" end openstack ̙% Match Glazes UArial UArial WArial WLucida Grande WArial ULucida GrandeUArialWArial WArial UArialcREVTempMaster+windowManagerPlacefalsemenubarlinkHiliteColorrect581,405,1008,647 maxWidth65535 cantAbortfalse patterns colors 204,204,153 decorations)title,menu,minimize,maximize,close,systemlinkVisitedColoriconicfalseshadowtrue cantDeletefalseid1021altId0 hcAddressingfalsestartUpIconicfalse windowShape0title Match Glazes linkColor textStyle cantModifyfalseunderlineLinks maxHeight65535styletopleveldestroyWindowfalse password liveresizingfalsescroll0passkey resizabletruename Match Glazesicon0formatForPrintingfalse alwaysBuffertruevisibletruemetalfalse minWidth32 textSize destroyStackfalse textFont minHeight32 dynamicPathsfalsecREVGeometryCachestackID1021 cREVGeneral @cREVTempMastermarkfalse dontSearchfalsethreeDtruerect 0,0,427,242name card id 1002 patterns defaultButtoncolors layer1 borderWidth2 cantDeletefalseid1002altId0 showBorderfalse textSize textFont textStylecREVGeometryCacheIDs 108966382467410141089664063554101610896653520761019108966874730010211089665352077102010896640964771017108966326150510031089663581583100710896647044611018108966341807410041089663728853101010896639062461015cREVGeometryCacheorder total12 cREVGeneralFind Matching GlazesExon mouseup global gComplexSearch put true into gComplexSearch set the hilite of me to true put "Searching the Glaze stack..." into fld "SearchResults" set the thumbposition of scrollbar "SearchProgress" to 0 set the visible of scrollbar "SearchProgress" to true put empty into myGlaze put 100 into pFairPct put 100 into pGoodPct put fld "ExactPct" into pExactPct put empty into myCardCount if the hilite of btn "FindMark" is true then put "findAndMark" into WhichSearch else if the hilite of btn "MatchMarked" is true then put "MarkedCards" into WhichSearch else send mouseup to btn "FindMark" put "findAndMark" into WhichSearch end if -- start the search go to stack "Glazes" push card put the id of this cd into myFirstCard mark this card put line 1 fld "cone" into MyCone repeat with i=1 to 8 -- out of 12 put line i of fld "R2O" & return after myGlaze end repeat put line 12 of fld "R2O" & return after myGlaze repeat with i=1 to 2 -- out of 7 put line i of fld "R2O3" & return after myGlaze end repeat put line 4 of fld "R2O3" & return after myGlaze repeat with i=1 to 1 -- out of 6 put line i of fld "RO2" & return after myGlaze end repeat if myGlaze is empty then answer "Please calculate this glaze first!" exit mouseup end if go next put the number of cds of stack "Glazes" into NumGlazes if WhichSearch is "FindAndMark" then find empty find whole myCone in fld "Cone" if the result is "not found" then put "No other" & myCone & " glazes were found!" into fld "SearchResults" set the thumbposition of scrollbar "SearchProgress" to 0 set the visible of scrollbar "SearchProgress" to false set the hilite of me to false exit mouseup end if repeat with i=1 to NumGlazes set the cursor to busy put findGlazeMatch (MyGlaze,pFairPct,pGoodPct,pExactPct) into myMatch if myMatch is "exact" then mark this card put (myCardCount+1) into myCardCount else unmark this card end if go next find whole myCone in fld "Cone" if the id of this card is myFirstCard then exit repeat set the thumbposition of scrollbar "SearchProgress" of card id 1002 of stack "Match Glazes" to trunc(10000*(number of this card/numGlazes)) end repeat else if WhichSearch is "MarkedCards" then put the id of this cd into myFirstCard put the number of marked cds into myNumMarked if myNumMarked<=0 then put "No glazes are currently marked!" into fld "SearchResults" set the thumbposition of scrollbar "SearchProgress" to 0 set the visible of scrollbar "SearchProgress" to false set the hilite of me to false send mouseup to btn "FindMark" exit mouseup end if go next marked card repeat with i=1 to myNumMarked set the cursor to busy put findGlazeMatch(MyGlaze,pFairPct,pGoodPct,pExactPct) into myMatch if myMatch is "exact" then mark this card add 1 to myCardCount else unmark this card go next marked card if the id of this card is myFirstCard then exit repeat set the thumbposition of scrollbar "SearchProgress" of card id 1002 of stack "Match Glazes" to trunc(10000*(number of this card/numGlazes)) end repeat end if pop card go to stack "Match Glazes" set the thumbposition of scrollbar "SearchProgress" to 0 if myCardCount>1 then put myCardCount && "matching glazes found." into fld "searchResults" else if myCardCount>0 then put myCardCount && "matching glaze found." into fld "searchResults" else put "No matching glazes found." into fld "searchResults" put empty into gComplexSearch set the visible of scrollbar "SearchProgress" to false end mouseup cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect242,176,388,206 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1003altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameFind Matching Glazesicon0toolTiplayer1 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize12 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontArialshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089663261505   ExactPctmxOon enterInField send mouseup to btn "find Matching Glazes" end enterInField sy26enter percentage variation allowed for an exact matchcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 306,32,356,58multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId0autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyle rectangle showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTextfalsescroll0nameExactPcttoolTip5enter percentage variation allowed for an exact matchvGridfalse listBehaviorfalselayer2visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBordertrue textSize12 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089663418074  50  label y`cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 210,32,306,58multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1007altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer3visibletrue cantSelectfalse borderWidth2margins8 htmlText

Match within:

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089663581583 Match within: label ycREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight16rect 354,32,384,58multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1010altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer4visibletrue cantSelectfalse borderWidth2margins8 htmlText

%

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize12 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089663728853 %i BcREVTempMaster# traversalOntrue dontSearchfalsethreeDtruescrollbarWidth20 boundingRectrect10,144,214,210 patterns showNamefalsecolors hScroll0backgroundBehaviorfalse cantDeletefalse vScrollbarfalsetabGroupBehaviorfalse hScrollbarfalseid1016altId0radioBehaviortrue textStylelockLocfalselabelname group id 1016toolTiplayer5visibletrue cantSelectfalse borderWidth2margins4opaquefalse showBorderfalse textSize disabledfalse textFontvScroll0hilitedButton2 cREVGeneral revUniqueID 1089664063554 FindMark`e "2looks at all glazes of same cone - initial searchFind and Mark Matching GlazescREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect14,148,210,182 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1014altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelFind and Mark Matching Glazes autoHilitetruestyle radiobutton disabledIcon0 armBordertruenameFindMarkicon0toolTip1looks at all glazes of same cone - initial searchlayer6 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize11 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont Lucida GrandeshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089663824674  MatchMarked`e ":finds matches in previously marked glazes - refine searchMatches in the Marked GlazescREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBorderfalserect14,172,210,206 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedtrue sharedHilitetrueshadowfalse textAlignleftarmedfalsemenuMouseButton1id1015altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabelMatches in the Marked Glazes autoHilitetruestyle radiobutton disabledIcon0 armBordertruename MatchMarkedicon0toolTip9finds matches in previously marked glazes - refine searchlayer7 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquefalse accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBorderfalse textSize11 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont Lucida GrandeshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089663906246  label  ncREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight32rect 10,10,188,120multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1017altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer8visibletrue cantSelectfalse borderWidth2margins8 htmlText>

Find Glazes

Similar to the

Current Glaze

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize24 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089664096477 Find Glazes Similar to the Current Glaze label  ccREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect216,58,414,132multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1018altId0autoTabfalse textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitefalsestyle transparent showLinesfalse sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer9visibletrue cantSelectfalse borderWidth2margins8 htmlText

Glazes will be matched by comparing

12 main oxide amounts of each glaze.

Glazes within (+ or -) the percentage

variation above will be marked.

Try 50% as a starting point.

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBordertrue cREVGeneral revUniqueID 1089664704461 %Glazes will be matched by comparing %12 main oxide amounts of each glaze. 'Glazes within (+ or -) the percentage variation above will be marked. $A smaller percentage means a closer "match, larger a less close match. Try 50% as a starting point.SearchProgressaaѶ Ѷ10000cREVTempMasterstyleprogress traversalOntruelineInc512threeDtrue showValuefalserect237,134,391,150nameSearchProgress patterns numberFormatcolors toolTip endValue10000 orientation horizontallayer10visiblefalse cantSelectfalse borderWidth2opaquetrueid1019altId0 showBordertruepageInc8192 textSize disabledfalse thumbSize8192 startValue0 textFontthumbPosition0 textStyleshowFocusBordertruelockLocfalse cREVGeneral revUniqueID 1089665352076 SearchResults  @cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDfalsescrollbarWidth20 textHeight13rect216,154,410,175multipleHilitesfalse patterns colors shadowfalsehScroll0 textAligncenter vScrollbarfalse hScrollbarfalseid1020altId0autoTabfalse textStyleboldhGridfalselockLocfalse dontWrapfalse autoHilitetruestyle transparent showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name SearchResultstoolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins2 htmlText

threeDHilitefalseopaquefalse shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1089665352077  6 matching glazes found. CloseEwson mouseup hide scrollbar "searchProgress" save stack "Match Glazes" close stack "Match Glazes" end mouseup `>cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect352,214,414,234 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1021altId0 labelWidth0 accelKey armedIcon0 textStylelockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestyle rectangle disabledIcon0 armBordertruenameCloseicon0toolTiplayer12 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFontshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1089668747300 Label Printing0 q ULucida GrandeWArial WArial UArialUArial WLucida Grande UArial UArial UArial cREVGeneral @ q cREVGeneral @ q @ q @ q @ q @ q i" Recipe Label cREVGeneral revUniqueID 1094147965333 Nameon closefield put stripSpaces(fld 1) into fld 1 put stripReturns(fld 1) into fld 1 pass closefield end closefield on openfield click at 300,48 end openfield @cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 0,14,324,44multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1003altId1autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNametoolTipvGridfalse listBehaviorfalselayer2visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971115  Crawl Glaze   Pinnell's Lowfire  Stain Colored Engobe  Majolica  label  @ BcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,38,68,52multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1022altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer20visibletrue cantSelectfalse borderWidth2margins6 htmlText

Ingredients:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971116 Ingredients: label  @& cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 234,38,272,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1007altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer6visibletrue cantSelectfalse borderWidth2margins6 htmlText

Cone:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971117 Cone:  IngredientsL @cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,46,168,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name IngredientstoolTipvGridfalse listBehaviorfalselayer3visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971118  Nepheline syenite Magnesium carbonate   Ferro Frit 3289 EPK  Talc Frit 3110 OM-4 Ball Clay  frit 3195 frit 3124 EPK Kona F-4 feldspar  AmountsL @HcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,46,236,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1005altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameAmountstoolTipvGridfalse listBehaviorfalselayer4visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971119  55.00 45.00   90.00 10.00  47.06 17.65 35.29  41.18 51.76 3.53 3.53  coneJon closefield set cursor to watch put AddSpaces(fld "Cone") into fld "Cone" pass closefield end closefield function addSpaces myText put false into CheckNext repeat with i= the number of chars of myText down to 1 get char i of myText -- if it is not in "a0123456789,- " -- then answer "Please use only numbers (0-9) and ',' or '-' in the cone field" if checkNext then if it is not " " then put " " after char i of myText put false into CheckNext if it is "-" then if char i+1 of myText is not " " then put " " after char i of myText put true into checkNext end if if it is "," then if char i+1 of myText is not " " then put " " after char i of myText end if end repeat return myText end addSpaces@&0-cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect244,48,326,114multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1006altId45autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameconetoolTipvGridfalse listBehaviorfalselayer5visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971120  10   06 04  06  04 03  label H @cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,166,58,180multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1021altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer19visibletrue cantSelectfalse borderWidth2margins6 htmlText

Also add:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971121 Colorants and Additives:  ColorantsL @:cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,178,168,236multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1011altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorantstoolTipvGridfalse listBehaviorfalselayer10visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971122    Bentonite  Commercial Stain  zircopax tin bentonite   ColorAmtsL @H<cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,178,236,238multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1012altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorAmtstoolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094145971123    4.00  17.65  4.71 12.94 2.35   Print Glazese --Prints six 3.3 x 4 inch labels on an 8.5 x 11 sheet on mouseup global gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeName,gGlazeCone,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion set printMargins to 18,36,18,41 -- 0.25,0.25,0.25,0.56 inches set the printGutters to 18,3 put false into BailOut open printing with dialog if the result is not empty then close stack "Label Printing" exit mouseup end if go to first card go to stack "Glazes" put the number of marked cards of stack "Glazes" into NumberOfMarkedGlazes if NumberOfMarkedGlazes<=0 then answer "There are no marked cards. Please select and mark which glazes to print." close stack "label printing" close printing exit mouseup end if go next marked card put the id of this cd into myFirstCard repeat NumberOfMarkedGlazes set cursor to busy if bailOut is not true then set cursor to busy go to stack "Label Printing" put empty into fld "Name" put empty into fld "Ingredients" put empty into fld "Colorants" put empty into fld "Amounts" put empty into fld "ColorAmts" put empty into fld "Cone" if gGlazeName is empty then send makeGlazeGlobals to stack "Glazes" put gGlazeName into fld "name" put gIngredList into fld "Ingredients" put gColorList into fld "colorants" put gIngredAmounts into fld "Amounts" put gColorAmts into fld "colorAmts" put gGlazeCone into fld "Cone" put stripMiscChars(fld "Cone") into fld "Cone" print card from 2,2 to 280,236 -- 7/1/05 go to stack "Glazes" go to next marked card if the id of this cd is myFirstCard then go to stack "Label Printing" put true into bailOut end if end if if bailOut is true then exit repeat end repeat close printing close stack "Label Printing" end mouseup function StripMiscChars myText --removes commas, hyphens, and spaces from cone field for print formatting repeat get offset(",", myText) if it>0 then put return into char it of myText else exit repeat end repeat repeat get offset("-", myText) if it>0 then put return into char it of myText else exit repeat end repeat repeat get offset(" ", myText) if it>0 then delete char it of myText else exit repeat end repeat return myText end StripMiscChars   cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect82,380,228,404 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameGet Current Glazeicon0toolTiplayer18 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize11 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont Lucida GrandeshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1094146071792 breakPoints Get Current Glazeevon mouseup global gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeName,gGlazeCone,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion if gGlazeName is empty then send makeGlazeGlobals to stack "Glazes" put gGlazeName into fld "name" put gIngredList into fld "Ingredients" put gColorList into fld "colorants" put gIngredAmounts into fld "Amounts" put gColorAmts into fld "colorAmts" put gGlazeCone into fld "Cone" --put gR2O into fld "R2O" --put gR2O3 into fld "r2o3" --put gRO2 into fld "ro2" --put gThermExpansion into fld "thermalExpansion" --put gPercent into fld "PercentAnalysis" --formatPercentageAnalysis end mouseup on formatPercentageAnalysis -- formats chemical subscripts of oxides repeat with i=1 to the number of lines of fld "percentAnalysis" get offset ("2", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("3", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if get offset ("5", last word of line i of fld "PercentAnalysis") if it>0 then set the textShift of char it of last word of line i fld "percentAnalysis" to 3 set the textSize of char it of last word of line i of fld "percentAnalysis" to "9" end if end repeat end formatPercentageAnalysis   cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertrue mnemonic0rect82,380,228,404armFillfalse patterns visitedIcon0colors showIconfalse showNametruehilitedfalseshadowfalse sharedHilitetrue textAligncenterarmedfalsemenuMouseButton1id1020altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalse autoHilitetruelabel showHilitefalsevisitedfalse disabledIcon0stylestandard armBordertrueicon0nameGet Current GlazetoolTip accelTextlayer18 borderWidth2 cantSelectfalsevisibletrue menuLines5margins4 accelModsopaquetruedefaultfalse shadowOffset4text hiliteFilltrue menuName showBordertrue disabledfalse hiliteIcon0 textSize11autoArmfalsefamily0 menuMode textFont Lucida Grande menuHistory1showFocusBordertrue cREVGeneral revUniqueID 1094146809291  Graphic 2KF   cREVGeneral revUniqueID 1094153342526 Graphic 1KF!" cREVGeneral revUniqueID 1094153342527Label GlazeHazards1s q WArial WArial UArial WLucida Grande WArial ULucida GrandecREVGeometryCachestackID1025 cREVGeneral @ qcREVGeometryCacheIDs109427177270310211094270680832100310942706808331004109427068083410051094270906896101810942706808351006109427068083610071094270680837100810942706808381009109427068084010111094270680839101010942706808411012109427068084210131094270680843101410942708331821017109427070231410161094270928967101910942706922431015cREVGeometrycachetotal18order  @{icREVGeometryCacheIDs109427177270310211094270680832100310942706808331004109427068083410051094270906896101810942706808351006109427068083610071094270680837100810942706808381009109427068084010111094270680839101010942706808411012109427068084210131094270680843101410942708331821017109427070231410161094270928967101910942706922431015cREVGeometryCachetotal18order  @{icREVGeometryCacheIDs109427177270310211094270680832100310942706808331004109427068083410051094270906896101810942706808351006109427068083610071094270680837100810942706808381009109427068084010111094270680839101010942706808411012109427068084210131094270680843101410942708331821017109427070231410161094270928967101910942706922431015cREVGeometryCachetotal18order iL cREVGeneral revUniqueID 1094271772703 Nameon closefield put stripSpaces(fld 1) into fld 1 put stripReturns(fld 1) into fld 1 pass closefield end closefield on openfield click at 300,48 end openfield @cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect 0,14,324,44multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1003altId1autoTabtrue textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameNametoolTipvGridfalse listBehaviorfalselayer2visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680832  Stain Colored Engobe  Robbin's Egg Blue Raku rev.  SDSU Base Slip label  @ BcREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 2,38,68,52multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1022altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer20visibletrue cantSelectfalse borderWidth2margins6 htmlText

Ingredients:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680833 Ingredients: label  @& cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 234,38,272,51multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1007altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer6visibletrue cantSelectfalse borderWidth2margins6 htmlText

Cone:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680834 Cone:  IngredientsL @cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,46,168,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name IngredientstoolTipvGridfalse listBehaviorfalselayer3visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680835  Talc Frit 3110 OM-4 Ball Clay  Gerstley Borate Nepheline Syenite EPK Flint  EPK Ball Clay Custer Feldspar Flint Whiting Frit 3134 AmountsL @HcREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,46,236,178multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1005altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameAmountstoolTipvGridfalse listBehaviorfalselayer4visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680836  47.06 17.65 35.29  59.30 31.10 2.00 7.60  20.00 35.00 25.00 10.00 5.00 5.00 coneJon closefield set cursor to watch put AddSpaces(fld "Cone") into fld "Cone" pass closefield end closefield function addSpaces myText put false into CheckNext repeat with i= the number of chars of myText down to 1 get char i of myText -- if it is not in "a0123456789,- " -- then answer "Please use only numbers (0-9) and ',' or '-' in the cone field" if checkNext then if it is not " " then put " " after char i of myText put false into CheckNext if it is "-" then if char i+1 of myText is not " " then put " " after char i of myText put true into checkNext end if if it is "," then if char i+1 of myText is not " " then put " " after char i of myText end if end repeat return myText end addSpaces@&0-cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight24rect244,48,326,114multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignleft vScrollbarfalse hScrollbarfalseid1006altId45autoTabtrue textStyleplainhGridfalselockLocfalse dontWrapfalse autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0nameconetoolTipvGridfalse listBehaviorfalselayer5visibletrue cantSelectfalse borderWidth2margins6 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize18 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680837  06  08 07 06  9 10 label H @cREVTempMaster5 tabStops traversalOnfalseinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight13rect 6,166,58,180multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1021altId1autoTabfalse textStyleboldhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinestrue sharedTexttruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTipvGridfalse listBehaviorfalselayer19visibletrue cantSelectfalse borderWidth2margins6 htmlText

Also add:

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680838 Colorants and Additives:  ColorantsL @:cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect 4,178,168,236multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1011altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorantstoolTipvGridfalse listBehaviorfalselayer10visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680839  Commercial Stain  Copper carbonate  Zircopax Bentonite (NOTE: plus added colorants)  ColorAmtsL @H<cREVTempMaster5 tabStops traversalOntrueinksrcCopy firstIndent0 dontSearchfalsetoggleHilitesfalsethreeDtruescrollbarWidth20 textHeight12rect164,178,236,238multipleHilitesfalse patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1012altId3autoTabtrue textStyleplainhGridfalselockLocfalse dontWraptrue autoHilitetruestyleopaque showLinesfalse sharedTextfalsenoncontiguousHilitesfalse lockTexttruescroll0name ColorAmtstoolTipvGridfalse listBehaviorfalselayer11visibletrue cantSelectfalse borderWidth2margins8 htmlText

threeDHilitefalseopaquetrue shadowOffset4 showBorderfalse textSize10 disabledfalsefixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270680840  17.65  1.00  5.00 2.00 Print GlazeHazardse --Prints six 3.3 x 4 inch labels on an 8.5 x 11 sheet (two per glaze on mouseup global gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeName,gGlazeCone,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion set printMargins to 18,36,18,41 -- 0.25,0.25,0.25,0.56 inches set the printGutters to 18,3 put false into BailOut open printing with dialog if the result is not empty then close stack "Label GlazeHazards" exit mouseup end if go to first card go to stack "Glazes" put the number of marked cards of stack "Glazes" into NumberOfMarkedGlazes if NumberOfMarkedGlazes<=0 then answer "There are no marked cards. Please select and mark which glazes to print." close stack "label GlazeHazards" close printing exit mouseup end if go next marked card put fld "Hazards" into myHazards put the id of this cd into myFirstCard repeat NumberOfMarkedGlazes set cursor to busy if bailOut is not true then set cursor to busy go to stack "Label GlazeHazards" put empty into fld "Name" put empty into fld "Ingredients" put empty into fld "Colorants" put empty into fld "Amounts" put empty into fld "ColorAmts" put empty into fld "Cone" Put empty into fld "Analysis" put empty into fld "Hazards" if gGlazeName is empty then send makeGlazeGlobals to stack "Glazes" put gGlazeName into fld "name" put gIngredList into fld "Ingredients" put gColorList into fld "colorants" put gIngredAmounts into fld "Amounts" put gColorAmts into fld "colorAmts" put gGlazeCone into fld "Cone" put gPercent into fld "Analysis" put myHazards into fld "Hazards" put stripMiscChars(fld "Cone") into fld "Cone" print card from 2,2 to 570,236 -- 7/1/05 go to stack "Glazes" go to next marked card put fld "Hazards" into myHazards if the id of this cd is myFirstCard then go to stack "Label GlazeHazards" put true into bailOut end if end if if bailOut is true then exit repeat end repeat close printing close stack "Label GlazeHazards" end mouseup function StripMiscChars myText --removes commas, hyphens, and spaces from cone field for print formatting repeat get offset(",", myText) if it>0 then put return into char it of myText else exit repeat end repeat repeat get offset("-", myText) if it>0 then put return into char it of myText else exit repeat end repeat repeat get offset(" ", myText) if it>0 then delete char it of myText else exit repeat end repeat return myText end StripMiscChars   cREVTempMaster; traversalOntrueinksrcCopythreeDtrue hiliteBordertruerect82,380,228,404 mnemonic0armFillfalse visitedIcon0 patterns showNametrue showIconfalsecolors hilitedfalse sharedHilitetrueshadowfalse textAligncenterarmedfalsemenuMouseButton1id1020altId0 labelWidth0 accelKey armedIcon0 textStyleboldlockLocfalsevisitedfalse showHilitefalselabel autoHilitetruestylestandard disabledIcon0 armBordertruenameGet Current Glazeicon0toolTiplayer18 accelTextvisibletrue cantSelectfalse borderWidth2 menuLines5margins4opaquetrue accelModstext shadowOffset4defaultfalse menuName hiliteFilltrue showBordertrue textSize11 hiliteIcon0 disabledfalseautoArmfalse menuModefamily0 textFont Lucida GrandeshowFocusBordertrue menuHistory1 cREVGeneral revUniqueID 1094270680841 breakPoints  Graphic 2KF   cREVGeneral revUniqueID 1094270680842 Graphic 1KF!" cREVGeneral revUniqueID 1094270680843 HazardsH @,cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 4,46,168,178 textHeight12 patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId3autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTexttruescroll0name IngredientstoolTip listBehaviorfalsevGridfalselayer3 borderWidth2 cantSelectfalsevisibletruemargins8 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270692243  ATalc: wear a NIOSH approved dust mask when handling dry material  NFlint: free silica-wear a NIOSH approved dust mask when handling dry material  RBall Clay: free silica-wear a NIOSH approved dust mask when handling dry material NFlint: free silica-wear a NIOSH approved dust mask when handling dry material  Hazardlabel @6cREVTempMaster5 tabStops traversalOnfalse firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 2,38,68,52 textHeight13 patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1022altId1autoTabfalsehGridfalse textStylebold dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTexttrue showLinestruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTip listBehaviorfalsevGridfalselayer20 borderWidth2 cantSelectfalsevisibletruemargins6 htmlText

Ingredients:

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270702314 Potential Health Hazards: AnalysisLabel  @I cREVTempMaster5 tabStops traversalOnfalse firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 234,38,272,51 textHeight13 patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1007altId1autoTabfalsehGridfalse textStylebold dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTexttrue showLinestruenoncontiguousHilitesfalse lockTexttruescroll0namelabeltoolTip listBehaviorfalsevGridfalselayer6 borderWidth2 cantSelectfalsevisibletruemargins6 htmlText

Cone:

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeightfalse textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270833182 % Analysis:  AnalysisL @^cREVTempMaster5 tabStops traversalOntrue firstIndent0inksrcCopy dontSearchfalsescrollbarWidth20threeDtruetoggleHilitesfalsemultipleHilitesfalserect 4,46,168,178 textHeight12 patterns colors shadowfalsehScroll0 textAlignright vScrollbarfalse hScrollbarfalseid1004altId3autoTabtruehGridfalse textStyleplain dontWraptruelockLocfalse autoHilitetruestyleopaque sharedTextfalse showLinesfalsenoncontiguousHilitesfalse lockTexttruescroll0name IngredientstoolTip listBehaviorfalsevGridfalselayer3 borderWidth2 cantSelectfalsevisibletruemargins8 htmlText

opaquetrue threeDHilitefalse shadowOffset4 showBorderfalse disabledfalse textSize10fixedLineHeighttrue textFontArialvScroll0 hilitedLinesshowFocusBorderfalse cREVGeneral revUniqueID 1094270906896   63.50 % SiO2  11.20 % Al2O3  0.50 % B2O3  0.87 % K2O  3.10 % Na2O  4.89 % CaO  14.90 % MgO  0.49 % Fe2O3  0.45 % TiO2  0.09 % MnO2   40.48 % SiO2  10.71 % Al2O3  20.90 % B2O3  1.74 % K2O  7.63 % Na2O  15.66 % CaO  2.65 % MgO  0.23 % Fe2O3   64.29 % SiO2  23.88 % Al2O3  1.31 % B2O3  3.33 % K2O  1.50 % Na2O  4.46 % CaO  0.18 % MgO  0.53 % Fe2O3  0.53 % TiO2  Graphic 1KF  cREVGeneral revUniqueID 1094270928967Glaze Picture3 on openstack global gHGImageFolderLoc revChangeWindowSize 300,300 put (fld "JPEGLoc" of stack "Glazes") into GlazeImageFilename put gHGImageFolderLoc & GlazeImageFilename into GlazePicLocation set the filename of Image ID 1004 of stack "Glaze Picture" to GlazePicLocation if GlazeImageFilename is not empty then put GlazeImageFilename into fld "GlazePictureFilename" of stack "Glaze Picture" else put "No image file found." into fld "GlazePictureFilename" of stack "Glaze Picture" end openstack `,,Glaze Picture ,, WArial ULucida Grande cREVGeneral @,, GlazeImage`,pC:/Documents and Settings/HP_Owner/My Documents/HyperGlaze 10.0.3.7/HyperGlaze Windows/HyperGlaze/Glaze Images/ cREVGeneral revUniqueID 1127229521047 GlazePictureFilename+h @ \Filename of this glaze image - Option [ALT] click Picture button in Glazes window to change cREVGeneral revUniqueID 1127403540949  No image file found.lCompare UnityVon openstack revChangeWindowSize 855,630 hide button "ButtonHider" end openstack vWv+Compare Unity Molecular Formulas of Glazes WArial WArial WArial ULucida GrandeWArial cREVGeneralcREVGeometryCachestackID1898 @WvcREVGeometryCacheIDs 112820369346318941128205732137189811281996307951241112820193619312641128203536970189211282054030491896112819894747310101128201876858126211281999452791245112819967150112421128198330053100811281992942131239cREVGeometrycachetotal12order  cREVTableacellfalsedfhj CompareLabels RR^*X cREVTable currentview

RO R2O3 RO2

 cREVGeneral revUniqueID 1128198330053 RO R2O3 RO2 CompareGlazeUMF)c@R>- cREVTable topcellloc41 leftcellloc56formatcelllineformattedview

10

currentxmouseloc38currenthscroll0bottomcellloc64currentymouseloc111 rightcellloc101scrollbarwidth16 formatlist cellyspacing16rightfieldloc838 topfieldloc40 leftfieldloc8 cellxspacing45formatlistnumberformatvalueline currentview

10

currentvscroll0 viewablerows26 currentxcell2 currentycell1currentcellvalue

10

viewablecolumns19 cellformatfalsenumbertabstops1formattypeline celleditfalsebottomfieldloc450 cREVGeneraltabletrue revUniqueID 1128198947473  PDenton 6 0.111 0.049 0.734 0.035 0.072 0.386 0.008 0.000 2.703 0.001 7.0:1 TMH 4 6 ^Nordhoff Yellow 6 0.059 0.189 0.473 0.095 0.184 0.328 0.271 0.001 0.000 2.695 0.001 8.2:1 JTMH 2 6 0.128 0.056 0.782 0.034 0.295 0.354 0.003 2.399 0.006 8.1:1 XPharsalia 6 0.131 0.047 0.459 0.295 0.067 0.413 0.200 0.032 0.001 2.220 0.013 5.4:1 Phoenix 6 YNew Tyler Amber 6 0.096 0.138 0.668 0.097 0.359 0.768 0.098 0.003 2.998 0.030 8.4:1 PJade Green 6 0.144 0.063 0.502 0.097 0.194 0.230 0.286 0.001 2.850 12.4:1 WPeacock 5 0.169 0.073 0.458 0.011 0.289 0.281 0.491 0.001 0.000 3.089 0.000 11.0:1 ICrystal Glaze 6 0.024 0.248 0.113 0.615 0.036 0.037 1.819 50.5:1 XLana's Bronze Aqua Glaze 6 0.054 0.176 0.014 0.003 0.753 0.254 0.000 1.124 4.4:1 !Mark Bell's Lichen Glaze 6 SLana's Lichen Glaze 6 0.079 0.239 0.021 0.661 0.468 0.003 1.950 0.008 4.2:1 LSpiffy Blue 6 0.223 0.096 0.666 0.015 0.355 0.678 0.001 4.174 11.8:1 YKiwi Green 6 0.059 0.189 0.473 0.095 0.184 0.328 0.271 0.001 0.000 2.695 0.001 8.2:1 XMetallic Black 6 0.352 0.151 0.489 0.008 0.631 0.329 0.002 0.000 3.571 0.001 5.7:1 lBertha's Caribbiean Vacation 6 0.145 0.062 0.501 0.098 0.194 0.288 0.285 0.001 0.000 2.965 0.001 10.3:1 bOrange Blue Crystal 5 0.071 0.030 0.231 0.000 0.162 0.506 0.144 0.001 0.000 1.088 0.000 7.6:1 MCrackle Glaze 5 0.245 0.106 0.645 0.004 0.499 0.002 2.615 0.005 5.2:1 aOpaque Semi Blue Gloss 5 0.002 0.157 0.678 0.162 0.218 0.742 0.005 0.001 2.782 0.002 12.8:1`@5S CompareLabels *X cREVTable currentviewR2O3 cREVGeneral revUniqueID 1128199630795 R2O3 CompareLabels *X cREVTable currentviewRO2 cREVGeneral revUniqueID 1128199671501 RO2Get Current Glaze UMFmpon mouseUp global gComplexSearch,gGlazeName,gGlazeCone,gIngredList,gColorList,gIngredAmounts,gColorAmts,gGlazeSurface,gR2O,gR2O3,gRO2,gPercent,gThermExpansion if the optionKey is down then push card go to stack "Glazes" go to first marked card repeat the number of marked cards put returnToTab (line 1 to 8 of gR2O) into CompareR2O put returnToTab (line 1 to 4 of gR2O3) into CompareR2O3 put (the number of lines of fld "CompareGlazeUMF" of stack "Compare Unity")+1 into myNewLine put gGlazeName & tab & gGlazeCone & tab & CompareR2O & tab & last line of gR2O & tab & compareR2O3 & tab & line 1 of gRO2 & tab & line 2 of gRO2 & tab & last line of gRO2 into line MyNewLine of fld "CompareGlazeUMF" of stack "Compare Unity" go next marked card end repeat pop card else put returnToTab (line 1 to 8 of gR2O) into CompareR2O put returnToTab (line 1 to 4 of gR2O3) into CompareR2O3 put the number of lines of fld "CompareGlazeUMF"+1 into myNewLine put gGlazeName & tab & gGlazeCone & tab & CompareR2O & tab & last line of gR2O & tab & compareR2O3 & tab & line 1 of gRO2 & tab & line 2 of gRO2 & tab & last line of gRO2 into line MyNewLine of fld "CompareGlazeUMF" end if end mouseUp function returnToTab MyText repeat the number of lines of myText put offset(return,myText) into myReturn if myReturn >0 then put tab into char myReturn of myText else exit repeat end repeat return myText end returnToTab R7hold down the Option [ALT] key to add all MARKED cardsGet Current Glaze UMF cREVGeneral revUniqueID 1128199945279 breakPoints Clear Compare UMF tableepon mouseUp answer "Clear the entire Compare Glaze UMF table?" & return & "This cannot be undone!" with "Clear" or "Cancel" if it is "Clear" then put empty into fld "CompareGlazeUMF" end if end mouseUp 33AARdeletes ALL entriesClear Compare UMF table cREVGeneral revUniqueID 1128201876858 Clear Selected Lineepon mouseUp if the selectedLines is empty then answer "Please select a line of the Compare Glaze UMF table first." else delete selectedLines end if end mouseUp R'deletes selected line of compare tableClear Selected Line cREVGeneral revUniqueID 1128201936193 breakPoints CompareHeader@>4- cREVTableformattedview;

Glaze Name: Cone: K2O Na2O CaO MgO Li2O BaO PbO ZnO SrO Al2O3 B2O3 Fe2O3 P2O5 SiO2 TiO2 Si:Al

formatcellline leftcellloc191 topcellloc21currenthscroll0currentxmouseloc37currentymouseloc117bottomcellloc44scrollbarwidth16 rightcellloc236 formatlist2,1:2,60 Decimal:0 cellyspacing16rightfieldloc828 cellxspacing45 leftfieldloc8 topfieldloc20 currentview;

Glaze Name: Cone: K2O Na2O CaO MgO Li2O BaO PbO ZnO SrO Al2O3 B2O3 Fe2O3 P2O5 SiO2 TiO2 Si:Al

formatvaluelineformatlistnumbercurrentvscroll0 viewablerows4 currentxcell5 currentycell2viewablecolumns19currentcellvaluenumbertabstops1 cellformatfalseformattypeline celleditfalsebottomfieldloc46 cREVGeneraltabletrue revUniqueID 1128199294213  eGlaze Name: Cone: K2O Na2O CaO MgO Li2O BaO PbO ZnO SrO Al2O3 B2O3 Fe2O3 P2O5 SiO2 TiO2 Si:Al      ( ) = > ? @ C D E F J K L N O P Q R W Y \ ]    dGlaze Comparisons)h F(enter the type of glazes being compared cREVGeneral revUniqueID 1128203536970  Clear Gloss 10 GlazesfPrintep7on mouseUp show button "ButtonHider" answer "Please choose landscape mode for printing (horizontal page layout)." answer printer open printing with dialog print card into 36,36,756,576 -- 8.5 x 11 sheet in landscape mode with 0.5 inch borders close printing hide button "ButtonHider" end mouseUp RRclick to print this table Print Page cREVGeneral revUniqueID 1128203693463 hExportepPon mouseUp put fld "CompareHeader" & return & fld "CompareGlazeUMF" into myText ask file "Save this table of UMF comparisons as:" with (char 1 to 28 of fld "Glaze Comparisons") & ".txt" if it is empty then exit mouseup else put it into myFile open file myFile write myText to file myFile close file myFile end mouseUp RR?saves a text copy of this page - open it with a word processorExport cREVGeneral revUniqueID 1128205403049 j ButtonHideraP"on mouseUp hide me end mouseUp @N@$  cREVGeneral revUniqueID 1128205732137