[_CDMiwok_01_]<cedarcommon2.0>ColorizeViewPoint>TestColorizer.cm!4

TestColorizer.cm

Bob Coleman, July 22, 1990 1:39:46 pm PDT

-- Test beginning on:

Date

-- Test/WRCPaletteBG.ip

ColorizeViewPoint Temp/WRCPaletteBG-C.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-C.ip Test/WRCPaletteBG-C.ip

ColorizeViewPoint -c "Palette: Grey" Temp/WRCPaletteBG-CGrey.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CGrey.ip Test/WRCPaletteBG-CGrey.ip

ColorizeViewPoint -c "Palette: Grey\n GreyFormula: size 0.0 = If (End); ConvertToRGB C2ToC1 1.0 .253 r * .684 g * .063 b * + + - Store" Temp/WRCPaletteBG-CGreyForm.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CGreyForm.ip Test/WRCPaletteBG-CGrey.ip

ColorizeViewPoint -c "Palette: Bright" Temp/WRCPaletteBG-CBright.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CBright.ip Test/WRCPaletteBG-CBright.ip

ColorizeViewPoint -c "Palette: Bright\n BrightFormula: size Loop i v1 Round Store EndLoop;" Temp/WRCPaletteBG-CBrightForm.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CBrightForm.ip Test/WRCPaletteBG-CBright.ip

ColorizeViewPoint -c "Palette: Sweeps" Temp/WRCPaletteBG-CSweeps.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CSweeps.ip Test/WRCPaletteBG-CSweeps.ip

ColorizeViewPoint -c "Palette: Complement" Temp/WRCPaletteBG-CComp.ip ← Test/WRCPaletteBG.ip

BinCom Temp/WRCPaletteBG-CComp.ip Test/WRCPaletteBG-CComp.ip

-- Test/WRCPalettePro.ip

ColorizeViewPoint Temp/WRCPalettePro-C.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-C.ip Test/WRCPalettePro-C.ip

ColorizeViewPoint -c "Palette: Gray" Temp/WRCPalettePro-CGray.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CGray.ip Test/WRCPalettePro-CGray.ip

ColorizeViewPoint -c "Palette: Gray\n GrayFormula: GreyFormula\n GreyFormula: size 0.0 = If (End); ConvertToRGB C2ToC1 1.0 .253 r * .684 g * .063 b * + + - Store" Temp/WRCPalettePro-CGrayForm.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CGrayForm.ip Test/WRCPalettePro-CGray.ip

ColorizeViewPoint -c "force to Bright: c41, c42, c43, c44, c45, c81, c82" Temp/WRCPalettePro-CPartBr.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CPartBr.ip Test/WRCPalettePro-CPartBr.ip

ColorizeViewPoint -c "Palette: Grey Sweeps\n Force ToSweeps: c26, c032, c38, c44, c50\n force to Light Blue: c95\n forceto25%ABCDE: c25, c05" Temp/WRCPalettePro-CPartGrey.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CPartGrey.ip Test/WRCPalettePro-CPartGrey.ip

-- should be the same:

ColorizeViewPoint -c "Palette: Grey Sweeps\n ForceTo Palette: c26, c032, c38, c44, c50\n ForceTo Light Blue: c95\n ForceTo25%ABCDE: c25, c05" Temp/WRCPalettePro-CPartGrey2.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CPartGrey2.ip Test/WRCPalettePro-CPartGrey.ip

ColorizeViewPoint -c "Palette: BW Sweeps\n ForceTo Standard: c2, c17, c033, c64, c90, c140\n ForceTo Magenta: c100\n ForceTo25%ABCDE: c25, c05\n ForceToc78: c73, c83, c0077, c79, c78" Temp/WRCPalettePro-CPartBW.ip ← Test/WRCPalettePro.ip

BinCom Temp/WRCPalettePro-CPartBW.ip Test/WRCPalettePro-CPartBW.ip

-- Test/108NamedColors.ip

ColorizeViewPoint -AmbushAllYESColors -Colorize3 Temp/108NamedColors-CRGB.ip ← Test/108NamedColors.ip

BinCom Temp/108NamedColors-CRGB.ip Test/108NamedColors-CRGB.ip

ColorizeViewPoint -Colorize3 -c "Palette: BW\n ForceToBlack: blue, dark reddish orange\nForceTo None: deep green; very light greenish blue\n pale greenish yellow: {cyan}" Temp/108NamedColors-CBWMod.ip ← Test/108NamedColors.ip

BinCom Temp/108NamedColors-CBWMod.ip Test/108NamedColors-CBWMod.ip

ColorizeViewPoint -Colorize3 -c "Palette: BW\n BWFormula: Sweep If (0.0 Store Quit); size Sw 0.0 [End] 1.0 [r 0.8 > If (1.0 Store) Else (0.0 Store); ] 3.0 [r g b ++ 0.0 = If (1.0 Store) Else (0.0 Store);] 4.0 [c k + m k + y k + + + 3.0 >= If (1.0 Store) Else (0.0 Store);] Else [Error];\n ForceToBlack: blue, dark reddish orange\nUnchanged: deep green; very light greenish blue\n pale greenish yellow: {cyan}" Temp/108NamedColors-CBWModForm.ip ← Test/108NamedColors.ip

BinCom Temp/108NamedColors-CBWModForm.ip Test/108NamedColors-CBWMod.ip

ColorizeViewPoint -c "Colorize3: TRUE\nPalette: Gray" Temp/108NamedColors-CGray.ip ← Test/108NamedColors.ip

BinCom Temp/108NamedColors-CGray.ip Test/108NamedColors-CGray.ip

-- Test/VPCQuickReference.ip

ColorizeViewPoint -Colorize3 -c "Marker: EC-10 \n Gobbledygook \n" Temp/VPCQuickReference-C.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-C.ip Test/VPCQuickReference-C.ip

ColorizeViewPoint -Colorize3 -c "Palette: BW" Temp/VPCQuickReference-CBW.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CBW.ip Test/VPCQuickReference-CBW.ip

ColorizeViewPoint -Colorize3 -c "Palette: BW\nSpecialSnapList: c54, c83\nForceToBlack: strong bluish green, grayish yellow\nUnchanged: light green, pale pink\n ForceToSpecial: yellowish white\n" Temp/VPCQuickReference-CBWMod.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CBWMod.ip Test/VPCQuickReference-CBWMod.ip

ColorizeViewPoint -Colorize3 -c "Palette: Grey" Temp/VPCQuickReference-CGrey.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CGrey.ip Test/VPCQuickReference-CGrey.ip

ColorizeViewPoint -Colorize3 -c "Palette: Gray\nForceToBlack: strong bluish green, light green, light orange\nForceTo None: light green, pale pink\nForceToWhite: grayish yellow" Temp/VPCQuickReference-CGrayMod.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CGrayMod.ip Test/VPCQuickReference-CGrayMod.ip

ColorizeViewPoint -Colorize3 -c "Palette: Spring" Temp/VPCQuickReference-CSpring.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CSpring.ip Test/VPCQuickReference-CSpring.ip

ColorizeViewPoint -Colorize3 -c "Palette: Spring\n ConvertToRGBFormula: size Sw 0.0[End] 1.0[1.0 r - Dup Dup Store Store Store] 3.0[C1ToC2] 4.0[3.0 Loop 1.0 ((k i V1 +) 1.0 Min) - Store EndLoop;] Else[Error];\n NearestFormula: (e1 r - Dup *) (e2 g - Dup *) (e3 b - Dup *) + + SqRt Store\n " Temp/VPCQuickReference-CSpringForm.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CSpringForm.ip Test/VPCQuickReference-CSpring.ip

ColorizeViewPoint -Colorize3 -c "Palette: Complement" Temp/VPCQuickReference-CComp.ip ← Test/VPCQuickReference.ip

BinCom Temp/VPCQuickReference-CComp.ip Test/VPCQuickReference-CComp.ip

-- Test/ColorizerTransfer.ip

ColorizeViewPoint Temp/ColorizerTransfer-C.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-C.ip Test/ColorizerTransfer-C.ip

ColorizeViewPoint -c "Palette: Spring Fall Standard \n Springc04: cyan\nFall88%: magenta\n 0%A: StandardC54\n Springc39: 0 1 0" Temp/ColorizerTransfer-CMod.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-CMod.ip Test/ColorizerTransfer-CMod.ip

ColorizeViewPoint -c "Palette: BW" Temp/ColorizerTransfer-CBW.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-CBW.ip Test/ColorizerTransfer-CBW.ip

ColorizeViewPoint -c "Palette: BW\nForceToBlack: c64, 77%\nUnchanged: 22%LO, 0%A\nForceToWhite: Underline" Temp/ColorizerTransfer-CBWMod.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-CBWMod.ip Test/ColorizerTransfer-CBWMod.ip

ColorizeViewPoint -c "Palette: Grey" Temp/ColorizerTransfer-CGrey.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-CGrey.ip Test/ColorizerTransfer-CGrey.ip

ColorizeViewPoint -c "Palette: Bright" Temp/ColorizerTransfer-CBright.ip ← Test/ColorizerTransfer.ip

BinCom Temp/ColorizerTransfer-CBright.ip Test/ColorizerTransfer-CBright.ip

ColorizeViewPoint -c "Palette: Custom\n CustomSnapList: c81, Sweep c82- c83 - c84 Remove, c85\n 100%: black\n SweepLevels: boo" Temp/ColorizerTransfer-CCustomBlk.ip ← Test/ColorizerTransfer.ip

-- (should have reported one "Colorizer Warning: Can't snap to a sweep color..." & two "Colorizer Warning: Sweep levels must be a positive number...")

BinCom Temp/ColorizerTransfer-CCustomBlk.ip Test/ColorizerTransfer-CCustomBlk.ip

-- Test/ColorizerInstr4.ip

ColorizeViewPoint -c "0%: clear" Temp/ColorizerInstr4-CClear.ip ← Test/ColorizerInstr4.ip

BinCom Temp/ColorizerInstr4-CClear.ip Test/ColorizerInstr4-CClear.ip

ColorizeViewPoint -c "Palette: BW\n 0%: clear" Temp/ColorizerInstr4-CClearBW.ip ← Test/ColorizerInstr4.ip

BinCom Temp/ColorizerInstr4-CClearBW.ip Test/ColorizerInstr4-CClearBW.ip

ColorizeViewPoint -c "Palette: Grey\n 0%: clear" Temp/ColorizerInstr4-CClearGrey.ip ← Test/ColorizerInstr4.ip

BinCom Temp/ColorizerInstr4-CClearGrey.ip Test/ColorizerInstr4-CClearGrey.ip

BinCom Temp/ColorizerInstr4-CClearSnap.ip Test/ColorizerInstr4-CClearSnap.ip

ColorizeViewPoint -c "0%: clear\n ForceToBright: c71, strikeout\n ForceToSpring: c41\n ForceToGrey: strikeoutdoubleunderline\n ForceToCustom: c13, c66\n CustomSnaplist: c6, c7, c8, c9, c10, --c11--, c12 , c13; c16, c17, c18, c19, c20\n Double underline: unchanged\n BrightFormula: size Loop i v1 Round Store EndLoop;\n ConvertToRGBFormula: size Sw 0.0[End] 1.0[1.0 r - Dup Dup Store Store Store] 3.0[C1ToC2] 4.0[3.0 Loop 1.0 ((k i V1 +) 1.0 Min) - Store EndLoop;] Else[Error];\n NearestFormula: (e1 r - Dup *) (e2 g - Dup *) (e3 b - Dup *) + + SqRt Store" Temp/ColorizerInstr4-CClearSnapForm.ip ← Test/ColorizerInstr4.ip

BinCom Temp/ColorizerInstr4-CClearSnapForm.ip Test/ColorizerInstr4-CClearSnap.ip

ColorizeViewPoint -c "Palette: Complement\n 0%: clear" Temp/ColorizerInstr4-CClearComp.ip ← Test/ColorizerInstr4.ip

BinCom Temp/ColorizerInstr4-CClearComp.ip Test/ColorizerInstr4-CClearComp.ip

-- Test/DropShadows.ip

ColorizeViewPoint Temp/DropShadows-C.ip ← Test/DropShadows.ip

BinCom Temp/DropShadows-C.ip Test/DropShadows-C.ip

ColorizeViewPoint -c "Palette: Winter" Temp/DropShadows-CWinter.ip ← Test/DropShadows.ip

BinCom Temp/DropShadows-CWinter.ip Test/DropShadows-CWinter.ip

-- Test/WebsterTiles.ip

CVP Temp/WebsterTiles-C.ip ← Test/WebsterTiles.ip

BinCom Temp/WebsterTiles-C.ip Test/WebsterTiles-C.ip

CVP -c "sweep levels: 2 other stuff" Temp/WebsterTiles-C2Level.ip ← Test/WebsterTiles.ip

BinCom Temp/WebsterTiles-C2Level.ip Test/WebsterTiles-C2Level.ip

-- Test/FourPage.ip

ColorizeViewPoint -c "0%: clear" Temp/FourPage-CClear.ip ← Test/FourPage.ip

BinCom Temp/FourPage-CClear.ip Test/FourPage-CClear.ip

ColorizeViewPoint -c "0%: white" Temp/FourPage-CWhite.ip ← Test/FourPage.ip

BinCom Temp/FourPage-CWhite.ip Test/FourPage-CWhite.ip

ColorizeViewPoint -c "0%T: white\n 0%: clear" Temp/FourPage-CClearXpToWh.ip ← Test/FourPage.ip

BinCom Temp/FourPage-CClearXpToWh.ip Test/FourPage-CClearXpToWh.ip

-- Test/LongCCPage.ip

CVP Temp/LongCCPage-C.ip ← Test/LongCCPage.ip

BinCom Temp/LongCCPage-C.ip Test/LongCCPage-C.ip

-- Test/FooterTest.ip

CVP Temp/FooterTest-C.ip ← Test/FooterTest.ip

BinCom Temp/FooterTest-C.ip Test/FooterTest-C.ip

-- Test/With4Bitmaps.ip Test/With4BitmapsPro.ip

CVP -c "Bitmap5: Sweep c44, c45" Temp/With4Bitmaps-C.ip ← Test/With4Bitmaps.ip

BinCom Temp/With4Bitmaps-C.ip Test/With4Bitmaps-C.ip

CVP -c "Bitmap5: Sweep c44, c45" Temp/With4BitmapsPro-C.ip ← Test/With4BitmapsPro.ip

BinCom Temp/With4BitmapsPro-C.ip Test/With4BitmapsPro-C.ip

CVP -c "Palette: BW \n Bitmap5: Sweep c44, c45" Temp/With4BitmapsPro-CBW.ip ← Test/With4BitmapsPro.ip

BinCom Temp/With4BitmapsPro-CBW.ip Test/With4BitmapsPro-CBW.ip

CVP -c "Palette: Reds \n Bitmap5: Sweep c44, c45" Temp/With4Bitmaps-CReds.ip ← Test/With4Bitmaps.ip

BinCom Temp/With4Bitmaps-CReds.ip Test/With4Bitmaps-CReds.ip