#!/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 "$@" 016on preOpenStack set the vis of me to false end preOpenStack on openStack open stack "SimplePainter2" end openStack function jpAnswer pTag, pFldName, pCdNum, pWdName get ("get the text of fld "& pFldName &" of cd "& pCdNum & "of wd "& pWdName) do it get the htmlText of line (lineOffset(pTag, IT) + 1) to (lineOffset("/"& pTag, IT) -1) \ of fld pFldName of cd pCdNum of wd pWdName return replaceText(IT, "

", " ") end jpAnswer function englishTag return "" end englishTag Kt  ULucida Grande cREVGeneralscriptChecksumFu1NY^9R* bookmarks debugObjectsFbutton id 1047 of card id 1002 of stack "simplePainter" of stack "016" handlerList*preOpenStack openStack jpAnswer englishTagscriptSelectionchar 530 to 529 prevHandler openStack tempScriptscript

on preOpenStack

set the vis of me to false

end preOpenStack

on openStack

open stack "SimplePainter2"

end openStack

function jpAnswer pTag, pFldName, pCdNum, pWdName

get ("get the text of fld "& pFldName &" of cd "& pCdNum & "of wd "& pWdName)

do it

get the htmlText of line (lineOffset(pTag, IT) + 1) to (lineOffset("/"& pTag, IT) -1) \

of fld pFldName of cd pCdNum of wd pWdName

return replaceText(IT, "</p>", " ")

end jpAnswer

function englishTag

return "<font face=Geneva size=12>"

end englishTag

 @ whitepaper @hJFIFddDucky<Adobed       hK ?@ cREVGeneral revUniqueID 1084714364954 drawing3 @h UGIF89ahrrrֻEEE(((!,hx0I8ͻ`(dihlp,tmx|pH,Ȥrl:ШtJZجvzxL.zn|N~tkbZQ IćD;ᖊ ͳ4ʹź 1v:ҢUUl"W Ȭ{'c`K$Cd$fCjPJpD +THj6>ɱJE8RhPb4H*D өӥ*8ZI,pQ Y ԫMCE)g D֬ۈ?TWwh_k]!0\H2B'C z Z*!4jjDB*I-q̽ސSGwVfv%IH(V\ EfKzV*i_y)3*jAx :*rVDH(<1(,) zFF,> [FeH% Τ"9_8;̛ڶ5^\ll@fq,6-{Efk/jkkA#+E1ҦK/. `&Qm'1.YKi?xI&,qhB ۸F#]5mCյ.QlBPE/'۵μZgç1ux7 ]FSJIA bmk\-kPswj˒t{<_&iHTX3nO&z ֗+y W< soOed>+^[RʇЗ[z"hf;a%:ҼVX=ܯ?=Q>45xR(ޤK ADv_)ȯ92djx0G1Ԝipk5{ o^8d Y!c YIiru{ 6VqH8FUhbF~oxK'pс׋`n,6)b@88C/Rx!*ğIHE1 "4Iz[t$ q+ċ -9606@T`Px8zmrvi yJKt~iZAj 3 L?B|\XbS=-S 8yg1n$&0)F<7Kxvyc ̀v\3ոά(h$k:ɔ6p Ԟ'39#-ɴF|4 M2ٱ`@igq*Zr1Y>vYcn#L%qCԉAĩn\.=hR3bVdJGUpiP/ tTY*x%yI]_uU\ TrGuTI+jJ& İi0k7D,Qө*'&dY>擶\hR!vK mMJQ?"k[vfX܉K#ݶnE!sjRB9nAml]©WsK{p@`] L N"|26w ?Un4PL,:\,nF";Td+azaqfy׸>ɬuc%Em%/`Z/6aз* c2/yi756n0pd,k2rpF&"b "F+5#`8g‹YX13E ʬֳ6.?JM Lc@q<{B31=L)cy*/STO"N!OR zWV(dž8hْ]=2GD1U7l:VDq6?g )s0#K76 x;&vmrR!Ggp t:%2ck? 1p$æ~7LR$bݼL g'˼L8K<; ;B{J.WFi6 U kx(oH׿g68` jZ&8RW(bh*Njw0Ӑo#y~KyN}& }|$~HmwXV;z<)0|:qUtA#yS;4VXY4D7P;^#RLE<|тj[CV~Ԑ0~+lQ" 1pR@ 6-CzaM {Ȗh 9c3r%=! jGqɀ$ 9A2P}q@ ѷ%G :etFv5 1f:|O2&HGF.{ׄbyj(%cabvoG'u x&qhHgHBQeHxYׇ~(秈gPxbݢh1 vxmȉŴyndXN_YH1=؊YQXTtIk`D*8XԄ ;Y37)Pt Xr M3ըR_ϸ#%pٸ"~[; Qr;ćZrX_""pz y ؅f7'(L"ha(~&*@F~4΂`.DR5B%+0\X2f@+\`=r Z7)=X<((z20ps*02"3 ARG%TChg@$4+`pqg' ei;%v{Y WI+TQ8t!1鍫u+ %Kə юE$SiQ`#6)@݈i@ȎΩ숚W閴yؙ(AYٜ TaII9Yyٟ:Zz5; cREVGeneral revUniqueID 1084717031425 drawing1 @hGIF89ahrrrֹFFF)))!,hx0I8ͻ`(dihlp,tmx|pH,Ȥrl:ШtJZجXl ۴z|8fOA^(g{qxBapgq4du'bncp"b^ʜc kb kc {XdŴ9F͞A(qH< PE% ]0ھRIM0`䜊'c +)'/cd.l,泩 U2s s*O`Wh B6C@Qtcu1uVc4Il-Q L"+^_`Z 44;5a0hkvF'4>9JkxNf$085N}65<(x=<荽nAW[T5w6`ªbWWQ'HE|QX9PAD[tQh[Yp54Ut"`82̦D z>doT#}x> 䐄1r^Hxr|WSR9F#^0RBDO)\:l$tt23.ʕ8gi Vph7Ƈr4fYF<QUrчKY6 Et{Wg`7rA DgP0(D([m>A4jl#ZjV8FQaF[Vf[܂w60*હ1$R&l0 oO nyr`Z\<! >\Wn*Vy*%ʱw̑&!p5o@1yFZV`I2܌` _+aYqIC C TJCCbx 㡮)ZRs 4cA4r o1{e*r*Jms btZlB0) .ҒH(Bn6Dq> T3*.$\sΓiL@%5{J %0f}0(N @*Caѡ !HT) αN V)4GhV_ybXڂ( pY2hwf}מ+KXg)p 42PpDGE彐z1,Bqy !-C6ɨHe"(gTƘ[@ceF4F_!{QNLt'3K{!"{ WדiXOl|$ $ʘ8i7|g*Cڼ- %$Ɲ7@>#^"Em5Ca{5:8jwRA p:|%e~UC| oO[>Ew(wWt~Qt/&|g T$ -@ ~t}R|QLqE/Wz6fx| qTeU1%WE&gU*7}G K@}`sz^CU#Xa+}W=(rҗ $b9k6lway(C2pTlD mY(OdxP!(g1$XXf7hV8hu0HC\j6oT+61+xT|w&zx 6oj0DeV-0+qЉb>Ç~bv8/[vNj'Dvۨ wrgc}W$xȑDVG(|\3ƨ8^8hq}$x!`yNN14dxHxz0 "aHOTi~wf޵׍qPȐ݄1nۈr 3{$ zkƈq8=n]xq0)bbx* Hg@7GRHic^n#+0ĕ&ɔ z)!a x"5pAtKh~T+42 }1E7qʸgy1a#1Њavї [ ['ngw5YoGi9!bP٘w)q`< `ȏ3rVҖ'5 v8yYc `.Pa+8eR_3ko]Cϐ_w<6=m%W^8RKy^pZZْ;@,Bi$׆#ZfL)=`}mPyZE:f}RlҹcYhG !Z9EےRjy"d\,S5q ҖLy9t\:%BI.]{pab5~F)pljPؚx@vX*oI!T@"vPPPx 񔦀XJZ@ԦUtՆk}evdTVơ`TyQ T〬+3У>zhvJmM ʷPbzJҊwwTȬ pApG4Zv{¯ z3C9K 1@*0C#j E6 isP[`.)GڪZ<:> #F5Q.[ Z K݊w:l)Kpd? o8g^f:;kz=f#@*)6`Ф6j:_`+0d"F@`R]bA]HUje'@zKr y~Hv0 f6׺Y{CKz>k,lF*~qJ$YKۛx {D,&]9 d #ʊ{'#KځwvP;QKz "ZX#xD;oed+{rNnji[pOKlʭ,|)eƚ{J::i6²)K: K Mu]t<<vfiėf;kV_zùfARwp}|f(:=&? :+jKZ1\ŕߚ Cb b)诽-鋕y\%\/=Hлw@Ƌ[hQׯh~|`;.qI Y| uloQ 켆 Qj(tL˳̅5Vam w[vs{<(c <ɾ+`SܼOۂaMrl*a{\Q6 +Hp:0wjn,+L`ch>)Ʒ:9C, ='31j*|S Ny*M1μ;д ,RM(3rӏxmwp*vpͷ%Ȗ#F ˗ZEt=~D}%0`Ei^)SRK &q`L(qp4znp[b+7)Ъ ~iN՜HLSg"𾔱`3ٮfiܵZ({Ti\wG֨`ܱ=鶭,=10-ƫρ-'ME@پ ͵(_=av ~*2{ɜ T,s&n}M0s7p;`p܁jȗz#8]z DZO\QGi_罡 ѬׇmgJA$|f}'愱fYQ_RZs(; cREVGeneral revUniqueID 1084679200554 drawing2 @h GIF89ahSSS'''!,hH0I8ͻ`(dihlp,tmx|pH,Ȥrl:ШtJZجvzxL.zn|N~) | {un~hc ^VRNʄJǶƺDA߿ ; ߻;D5P'u!9#k)2 A0@^ I8G,ɜH#$d,ѣ2m0; ţ-hp__ZTM@1X3ki9PZi<9֥i?,_aasތT\2If:pfz՘t},.9zkmfqWh /ҳ xt1>{&Y 38=(? 4a " @'~ZPGxU@TG!9QdmՕWZ(Ds0hCg! 1sᤢ3qT P\bV8c *@Zd%Xhd8- Cx5 2Wˆ^^d}_pO'7v߇o*_IqI'Mv腏tew(!ZYj:JUFXcwxaK] d|(!#- (9ƫ p[kR-Jc躀@M1d[n <QS"Ļ!YUG\148S]N12ye<c2%Y%BfAk^wpD/<5?Ag (ڛ<  < UfQȠ1&M L8 iQ_18Ap IVQAL0?*ȇOP S mH?A4Q I =2L![$q*|G@!~(D,"vDp vq 1:{VW75RaeGl%Ǟa m")="HA2㉙He< B7ZNÅ$oq,ԲIq$aV !QJ:m%'xf 'e!iM-dDp2CI 7ޯXf75꾩iBs0cibTH6yF3;pOA<h* ns6Q@c3I;386$>1QHpA4wQH `*05τJT0yY(DPt7jy0ThCT)a@#QJֲ 'h b4L>l4hz>F U.DS1*${ufw ,2GlZ;I*f bP`--5Ҥfi̒UrVg둇橔yYh5m/_ YYfǘd^j՞g!Oz)m2#CpI֘/msq^O@+ꅟ Tԙ`jUmffy֡7iZiwkVؘŧ䦋>&M=dшhoϲWm{"]@eGAw 5a[YGلݍ' f\)Su a@x~vq W*o "yP6@?e9 QZ\!AmŹh$+k\Ņ5<)zYutgSz:ɶ3}~Ҽ.! eٝ5{a fjUڋ`ȘS 12E?IҊ}*]`jV؅檞 ubҲw='wOO;ЏO[Ͼ{7m; cREVGeneral revUniqueID 1084733927590%simplePainter2+on preOpenStack if platform() is "MacOS" then set the label of btn "openDrawer" to the cOpenMe of btn "openDrawer" else set the label of btn "openDrawer" to the cOpenWin of btn "openDrawer" end preOpenStack on closeStack save stack "simplePainter2" close stack "tDrawer" end closeStack TnRevolution Painter ULucida Grande UOsaka,Japanese ULucida Grande UOsaka,Japanese UGeneva U ,japanese U ,japanese Ums sans serif ULucida Sans Unicode,Japanese ULucida Sans Unicode,Japanese UOsaka UOsaka Ugeneva,english UGenevacRevStandaloneSettings;scriptLibrariesInternet Geometry PrintingMacOSXfalsesubstackFolderdata OSX,name simplePainterMacOS,documentTypeUNIX,fileSelectortrueWindowstrueMacOS,longVersionsimplePainter 1.0.0.0Windows,LegalCopyright)2004 Kojima All rights reserved worldwideUNIX,pageSetuptrueOSX,documentTypeLinuxfalse inclusionssearchOdtfalseWindows,documenticonFile;C:/Program Files/Revolution 2.2/Sample Icons/genericdoc.ico answerDialogtrueSPARCfalseOSX,documentExtension SolIntelfalseWindows,FileDescription!simplePainter 1.0.0.0 for WindowsOSX,longVersionsimplePainter 1.0.0.0 MacOSfatfalseUNIX,printerChoosertrueOSX,copyright)2004 Kojima All rights reserved worldwideMacOS,MinimumSize15000MacOS,versionnumber11MacOS,ReleaseFinalMacOS,versionnumber20MacOS,versionnumber30name simplePaintermoveSubstackstrue MacOS,Region1rs6000falseHp9k700falseOSX,shortVersion1.0.0.0Windows,fileversion11Windows,productversion11Windows,fileversion20Windows,fileversion30Windows,productversion20Windows,fileversion40Windows,productversion30cursorsfalseBsdfalse OSX,infosimplePainter Version 1.0.0.0Windows,productversion40 MacOS68kfalseMacOS,dynamicMemorytrue askDialogtrueIrisfalseOSX,signature????Windows,iconFile;C:/Program Files/Revolution 2.2/Sample Icons/genericapp.icoWindows,ProductName simplePainterMacOS,PreferredSize15000UNIX,colorChoosertrue MacOSPPCfalseMacOS,creator???? SolSparcfalseWindows,companynameKojima cREVGeneralscriptChecksum-ib& dt bookmarks debugObjects handlerListpreOpenStack closeStackscriptSelectionchar 299 to 298 prevHandler closeStack tempScriptscript

on preOpenStack

if platform() is "MacOS" then set the label of btn "openDrawer" to the cOpenMe of btn "openDrawer"

else set the label of btn "openDrawer" to the cOpenWin of btn "openDrawer"

end preOpenStack

on closeStack

save stack "simplePainter2"

close stack "tDrawer"

end closeStack

 Pon openCard winStandalone send mouseUp to btn openDrawer end openCard on winStandalone if environment()&& platform() is "standalone application Win32" then answer information jpAnswer(winAppli, jpText, 2, simplePainter2) exit to top end if end winStandalone  cREVGeneralscriptChecksum?av L# d bookmarks handlerListopenCard winStandalonescriptSelectionchar 277 to 276 prevHandleropenCard tempScriptscript

on openCard

winStandalone

send mouseUp to btn openDrawer

end openCard

on winStandalone

if environment()&& platform() is "standalone application Win32" then

answer information jpAnswer(winAppli, jpText, 2, simplePainter2)

exit to top

end if

end winStandalone

 @ tColorKPon mouseUp answer color with backColor of me if the result is "Cancel" then put the backgroundColor of me into fld "tColor" else set the backgroundColor of me to it put it into fld "tColor" end if end mouseUp ffffff fillColor51,51,51 cREVGeneralscriptChecksumAx Jxl revUniqueID 1084457957320 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 36 to 35scriptA

on mouseUp

answer color with backColor of me

if the result is "Cancel" then

put the backgroundColor of me into fld "tColor"

else

set the backgroundColor of me to it

put it into fld "tColor"

end if

end mouseUp

tColor 'T cREVGeneral revUniqueID 1084458157630 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0script 0,128,128tScript }on menuPick switch (the menuHistory of me) case 1 get the script of btn "blendOn" break case 2 get the script of btn "openDrawer" break case 3 get the script of grp "lineDrawings" of cd 1 of stack "tDrawer" break case 4 get the script of grp "traceColoring" of cd 1 of stack "tDrawer" end switch answer information "The Script:" &cr&cr& it end menuPick dlable0000000 fontSize14backgrouncolor51,51,510000000g00000SJf0k 000000O000000X0 0000Q0n00000000 00000l0}u  cpMode1 tFolderPath2 tFileList3 openFolder cREVGeneral scriptChecksum0_M7,, handlerListmenuPick breakPointsscriptSelectionchar 323 to 322 bookmarks revUniqueID 1084511136823 prevHandlermenuPick tempScriptscriptU

on menuPick

switch (the menuHistory of me)

case 1

get the script of btn "blendOn"

break

case 2

get the script of btn "openDrawer"

break

case 3

get the script of grp "lineDrawings" of cd 1 of stack "tDrawer"

break

case 4

get the script of grp "traceColoring" of cd 1 of stack "tDrawer"

end switch

answer information "The Script:" &cr&cr& it

end menuPick

 jpText)h ,j cREVGeneral revUniqueID 1084541863603 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0script   (0000000gRRPlayer 0Ou(0W0_X4T0    00000K0x00`0000o  %00000h0000`0Q0LOu(0g0M0~0Y0 $ +N0ntX0g0o0Y0y0f0n0000LOu(0g0M0~0Y0 *   `g-unicodeToHtmlE Ion mouseUp set the text of fld 1 to the htmlText of fld 1 end mouseUp $p cREVGeneralscriptChecksum #՛A bookmarks revUniqueID 1084541863604 handlerListmouseUpscriptSelection char 72 to 71 prevHandlermouseUp tempScriptscript\

on mouseUp

set the text of fld 1 to the htmlText of fld 1

end mouseUp

htmlToUnicodeE on mouseUp set the htmlText of fld 1 to the text of fld 1 --set the htmlText of fld 1 to noWarranties() end mouseUp function noWarranties get "

カーソルをディスプレイの左上に移動させると、ムービーはストップします。

" return it end noWarranties $p cREVGeneralscriptChecksumA(Ҿj?l0 bookmarks revUniqueID 1084541863605 handlerListmouseUp noWarrantiesscriptSelectionchar 502 to 501 prevHandlermouseUp tempScriptscript

on mouseUp

set the htmlText of fld 1 to the text of fld 1

--set the htmlText of fld 1 to noWarranties()

end mouseUp

function noWarranties

get "<p><font face=Osaka lang=ja>&#12459;&#12540;&#12477;&#12523;&#12434;&#12487;&#12451;&#12473;&#12503;&#12524;&#12452;&#12398;&#24038;&#19978;&#12395;&#31227;&#21205;&#12373;&#12379;&#12427;&#12392;&#12289;&#12512;&#12540;&#12499;&#12540;&#12399;&#12473;&#12488;&#12483;&#12503;&#12375;&#12414;&#12377;&#12290;</font></p>"

return it

end noWarranties

 setSizeNfontE on mouseUp set the textsize of line 1 to (the num of lines of fld 1) of fld 1 to 12 set the textFont of fld 1 to "Osaka" end mouseUp @p cREVGeneralscriptChecksumSjir< C revUniqueID 1084541863606 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 86 to 85script

on mouseUp

set the textsize of line 1 to (the num of lines of fld 1) of fld 1 to 12

set the textFont of fld 1 to "Osaka"

end mouseUp

findTagE ;on mouseUp ask "" find it in fld "jpText" end mouseUp @p cREVGeneralscriptChecksum:5p<$ revUniqueID 1084541863607 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelection char 46 to 45scriptq

on mouseUp

ask ""

find it in fld "jpText"

end mouseUp

Field 1 n& cREVGeneral revUniqueID 1084541863608 10S0n0000oeg,000000nR0n0_00`0Q0g0 0 10S0n00000n000000h0ovcO0B00~0[00 0 baseImaged hGIF89ahrrrֹFFF)))!,hx0I8ͻ`(dihlp,tmx|pH,Ȥrl:ШtJZجXl ۴z|8fOA^(g{qxBapgq4du'bncp"b^ʜc kb kc {XdŴ9F͞A(qH< PE% ]0ھRIM0`䜊'c +)'/cd.l,泩 U2s s*O`Wh B6C@Qtcu1uVc4Il-Q L"+^_`Z 44;5a0hkvF'4>9JkxNf$085N}65<(x=<荽nAW[T5w6`ªbWWQ'HE|QX9PAD[tQh[Yp54Ut"`82̦D z>doT#}x> 䐄1r^Hxr|WSR9F#^0RBDO)\:l$tt23.ʕ8gi Vph7Ƈr4fYF<QUrчKY6 Et{Wg`7rA DgP0(D([m>A4jl#ZjV8FQaF[Vf[܂w60*હ1$R&l0 oO nyr`Z\<! >\Wn*Vy*%ʱw̑&!p5o@1yFZV`I2܌` _+aYqIC C TJCCbx 㡮)ZRs 4cA4r o1{e*r*Jms btZlB0) .ҒH(Bn6Dq> T3*.$\sΓiL@%5{J %0f}0(N @*Caѡ !HT) αN V)4GhV_ybXڂ( pY2hwf}מ+KXg)p 42PpDGE彐z1,Bqy !-C6ɨHe"(gTƘ[@ceF4F_!{QNLt'3K{!"{ WדiXOl|$ $ʘ8i7|g*Cڼ- %$Ɲ7@>#^"Em5Ca{5:8jwRA p:|%e~UC| oO[>Ew(wWt~Qt/&|g T$ -@ ~t}R|QLqE/Wz6fx| qTeU1%WE&gU*7}G K@}`sz^CU#Xa+}W=(rҗ $b9k6lway(C2pTlD mY(OdxP!(g1$XXf7hV8hu0HC\j6oT+61+xT|w&zx 6oj0DeV-0+qЉb>Ç~bv8/[vNj'Dvۨ wrgc}W$xȑDVG(|\3ƨ8^8hq}$x!`yNN14dxHxz0 "aHOTi~wf޵׍qPȐ݄1nۈr 3{$ zkƈq8=n]xq0)bbx* Hg@7GRHic^n#+0ĕ&ɔ z)!a x"5pAtKh~T+42 }1E7qʸgy1a#1Њavї [ ['ngw5YoGi9!bP٘w)q`< `ȏ3rVҖ'5 v8yYc `.Pa+8eR_3ko]Cϐ_w<6=m%W^8RKy^pZZْ;@,Bi$׆#ZfL)=`}mPyZE:f}RlҹcYhG !Z9EےRjy"d\,S5q ҖLy9t\:%BI.]{pab5~F)pljPؚx@vX*oI!T@"vPPPx 񔦀XJZ@ԦUtՆk}evdTVơ`TyQ T〬+3У>zhvJmM ʷPbzJҊwwTȬ pApG4Zv{¯ z3C9K 1@*0C#j E6 isP[`.)GڪZ<:> #F5Q.[ Z K݊w:l)Kpd? o8g^f:;kz=f#@*)6`Ф6j:_`+0d"F@`R]bA]HUje'@zKr y~Hv0 f6׺Y{CKz>k,lF*~qJ$YKۛx {D,&]9 d #ʊ{'#KځwvP;QKz "ZX#xD;oed+{rNnji[pOKlʭ,|)eƚ{J::i6²)K: K Mu]t<<vfiėf;kV_zùfARwp}|f(:=&? :+jKZ1\ŕߚ Cb b)诽-鋕y\%\/=Hлw@Ƌ[hQׯh~|`;.qI Y| uloQ 켆 Qj(tL˳̅5Vam w[vs{<(c <ɾ+`SܼOۂaMrl*a{\Q6 +Hp:0wjn,+L`ch>)Ʒ:9C, ='31j*|S Ny*M1μ;д ,RM(3rӏxmwp*vpͷ%Ȗ#F ˗ZEt=~D}%0`Ei^)SRK &q`L(qp4znp[b+7)Ъ ~iN՜HLSg"𾔱`3ٮfiܵZ({Ti\wG֨`ܱ=鶭,=10-ƫρ-'ME@پ ͵(_=av ~*2{ɜ T,s&n}M0s7p;`p܁jȗz#8]z DZO\QGi_罡 ѬׇmgJA$|f}'愱fYQ_RZs(;h cREVGeneral revUniqueID 1084679235411 myPaintingt--global tSec on mouseMove --put the milliseconds into tMilliSec --put tMilliSec --put the imagedata of me end mouseMove  hcImageSPNG  IHDRh2 ^gAMA=-f PLTE@TgtRNS AIDATxAn OXձ$uμ 1~]=[\=C:lϙ^rЋYuu^fWt蜑9$1K \;^Tv2/̧f\rb'hP1SOusd^6OE5$nйsCusC#:Gt:"tbtĎtıRE)]Q"tF鈯GeHQtE+tE+Jg(]QtĂX:"tE#tE?+JW(]:"tE+BG:"tD#BGn؂'' :7tn9sD:sD#ÈJD舣+BW(񙮌ubl\=RtFʶgy*y)]1+3Rw(]Q:tF+BWnGIENDB`JFIFddDucky<Adobed       hK ?@ cREVGeneralscriptChecksumc ᘥO% bookmarks revUniqueID 1084680466459 handlerList mouseMovescriptSelectionchar 129 to 128 prevHandler mouseMove tempScriptscript

--global tSec

on mouseMove

--put the milliseconds into tMilliSec

--put tMilliSec

--put the imagedata of me

end mouseMove

tBlendqon mouseUp if the hilite of btn "blendOn" is true then set the blendLevel of image "myPainting" to thumbPos of me end if end mouseUp 8&3100 cREVGeneralscriptChecksumBx<:CW"E|y revUniqueID 1084681287237 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelectionchar 141 to 140script

on mouseUp

if the hilite of btn "blendOn" is true then

set the blendLevel of image "myPainting" to thumbPos of me

end if

end mouseUp

blendOnheon mouseUp if hilite of me then enable sb "tBlend" set the blendLevel of image "myPainting" to thumbPos of sb "tBlend" else set the blendLevel of image "myPainting" to 0 disable sb "tBlend" end if end mouseUp 00000SJf0k cREVGeneral scriptChecksumu~? handlerListmouseUp breakPointsscriptSelectionchar 129 to 128 revUniqueID 1084711256730 bookmarks tempScript prevHandlermouseUpscriptW

on mouseUp

if hilite of me then

enable sb "tBlend"

set the blendLevel of image "myPainting" to thumbPos of sb "tBlend"

else

set the blendLevel of image "myPainting" to 0

disable sb "tBlend"

end if

end mouseUp

 openDrawereon mouseUp if "tDrawer" is not among the lines of windows() then if item 1 of the loc of this stack <= item 1 of screenLoc() then drawer stack "tDrawer" at right else drawer stack "tDrawer" at left end if if platform() is "MacOS" then set the label of me to the cCloseMac of me else set the label of me to the cCloseWin of me else close stack "tDrawer" if platform() is "MacOS" then set the label of me to the cOpenMac of me else set the label of me to the cOpenWin of me end if end mouseUp :l cCloseMac000000X0 cOpenWin00000O0 cOpenMac000000O cCloseWin00000X00 Open Drawer000000X0 cREVGeneralscriptChecksumQDeWi5, revUniqueID 1084715045695 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelectionchar 463 to 462script

on mouseUp

if "tDrawer" is not among the lines of windows() then

if item 1 of the loc of this stack <= item 1 of screenLoc() then

drawer stack "tDrawer" at right

else

drawer stack "tDrawer" at left

end if

if platform() is "MacOS" then set the label of me to the cCloseMac of me

else set the label of me to the cCloseWin of me

else

close stack "tDrawer"

if platform() is "MacOS" then set the label of me to the cOpenMac of me

else set the label of me to the cOpenWin of me

end if

end mouseUp

jpText1  d$ cREVGeneral revUniqueID 1084745125480 0000000  00O tDraweron closeStack if platform() is "Win32" then set the label of btn "openDrawer" of cd 1 of stack "simplePainter2" \ to the cOpenWin of btn "openDrawer" of cd 1 of stack "simplePainter2" end closeStack on winStandalone if environment()&& platform() is "standalone application Win32" then answer information jpAnswer(winAppli, jpText, 2, simplePainter2) exit to top end if end winStandalone |r  ULucida Grande U ,japanese U ,japanese UOsaka,Japanese cREVGeneralscriptChecksumT4hM@rBM bookmarks handlerListcloseStack winStandalonescriptSelectionchar 410 to 409 prevHandler closeStack tempScriptscript1

on closeStack

if platform() is "Win32" then set the label of btn "openDrawer" of cd 1 of stack "simplePainter2" \

to the cOpenWin of btn "openDrawer" of cd 1 of stack "simplePainter2"

end closeStack

on winStandalone

if environment()&& platform() is "standalone application Win32" then

answer information jpAnswer(winAppli, jpText, 2, simplePainter2)

exit to top

end if

end winStandalone

 @r cREVGeneralscriptChecksumُ B~ bookmarks handlerList tempScript prevHandler winStandalonescriptSelection char 1 to 0script

 lineDrawings i0on mouseUp put the short name of the target into tName if tName is "whitePaper" then put image tName of cd 1 of stack "016" \ into image "myPainting" of cd 1 of stack "simplePainter2" if the hilite btn "coloring" then blendOff else if the optionKey is down then put image tName of cd 1 of stack "016" \ into image "baseImage" of cd 1 of stack "simplePainter2" end if end if else if the hilite btn "trace" then put image tName of cd 1 of stack "016" \ into image "baseImage" of cd 1 of stack "simplePainter2" else put image tName of cd 1 of stack "016" \ into image "myPainting" of cd 1 of stack "simplePainter2" blendOff end if end if end mouseUp on blendOff if the hilite of btn "blendOn" \ of cd 1 of stack "simplePainter2" then set the hilite of btn "blendOn" \ of cd 1 of stack "simplePainter2" to false disable sb "tBlend" of cd 1 of stack "simplePainter2" set the blendLevel of image "myPainting" \ of cd 1 of stack "simplePainter2" to 0 end if end blendOff on mouseEnter set the borderWidth of the target to 2 end mouseEnter on mouseLeave set the borderWidth of the target to 1 end mouseLeave -X cREVGeneral scriptChecksum%dX?ZhacMn handlerList&mouseUp blendOff mouseEnter mouseLeave breakPointsscriptSelection char 61 to 60 revUniqueID 1084734396302 bookmarks tempScript prevHandlerblendOffscript0

on mouseUp

put the short name of the target into tName

if tName is "whitePaper" then

put image tName of cd 1 of stack "016" \

into image "myPainting" of cd 1 of stack "simplePainter2"

if the hilite btn "coloring" then

blendOff

else

if the optionKey is down then

put image tName of cd 1 of stack "016" \

into image "baseImage" of cd 1 of stack "simplePainter2"

end if

end if

else

if the hilite btn "trace" then

put image tName of cd 1 of stack "016" \

into image "baseImage" of cd 1 of stack "simplePainter2"

else

put image tName of cd 1 of stack "016" \

into image "myPainting" of cd 1 of stack "simplePainter2"

blendOff

end if

end if

end mouseUp

on blendOff

if the hilite of btn "blendOn" \

of cd 1 of stack "simplePainter2" then

set the hilite of btn "blendOn" \

of cd 1 of stack "simplePainter2" to false

disable sb "tBlend" of cd 1 of stack "simplePainter2"

set the blendLevel of image "myPainting" \

of cd 1 of stack "simplePainter2" to 0

end if

end blendOff

on mouseEnter

set the borderWidth of the target to 2

end mouseEnter

on mouseLeave

set the borderWidth of the target to 1

end mouseLeave

 whitePaper 2N cREVGeneral revUniqueID 1084735363739 e0000   drawing3 6H cREVGeneral revUniqueID 1084735339007 Drawing 3  drawing2 6~H cREVGeneral bookmarks revUniqueID 1084735319553 handlerListscriptSelection char 1 to 0 prevHandler tempScriptscript Drawing 2  drawing1 5<H cREVGeneral revUniqueID 1084735257809 Drawing 1 whitePaper `5H0JFIFddDucky<Adobed       hK ?@h cREVGeneralscriptChecksumُ B~ bookmarks revUniqueID 1084716146860 handlerListscriptSelection char 1 to 0 prevHandlermouseUp tempScriptscript

 drawing2  `6NH4wGIF89aH4bbbsss:::!,H4I8}`(diln,>#}a |F#1 D`Je `@`+p䲎fE yU+ ?+  v:'EI.  nkf, -x3c1$2ln]/'i7 q,2 k63 pt-A1  & Q@^'؅bb` G yLP-D 2B%E,@GÚ<(IlL8Y+6tD;h\@` #@c0RP&`#WsC1܉/RO[91fz@&;a F0ղ'>td#[x'0@,z$YnNm<4T~m  ژ%l`f3  h@JbX>a ;6h$8 yH@:6 K;V3}[|I`T@_(XO]WXS1O`Q4O@y3bASm!a*c"WEbPlpTBM'MWq"0)EA& pRb"}MX`!pB_xLʅd9-a% %P`rp0N2}&LY)5@xPQ6G)[*D<|`Ho$B 1hcKԘ׽A/Zc8; O,臡!@&on mouseUp

if the hilite of btn "trace" then

set the hilite of btn "blendOn" of cd 1 of stack "simplePainter2" to true

enable sb "tBlend" of cd 1 of stack "simplePainter2"

set the blendLevel of image "myPainting" of cd 1 of stack "simplePainter2" to \

thumbPos of sb "tBlend" of cd 1 of stack "simplePainter2"

end if

end mouseUp

trace`d 6"R 0000 cREVGeneral revUniqueID 1084735645955  coloring`d 66R0l0}u cREVGeneral revUniqueID 1084735746030 saveexon mouseUp ask file "" with "RevPaint.jpg" if the result is not "cancel" then export image "myPainting" of cd 1 of stack "simplePainter2" to file IT as JPEG if platForm() is "MacOS" then set the fileType to "prewJPEG" end if end mouseUp *Nb00000kO[X cREVGeneralscriptChecksum  rڸ6 revUniqueID 1084737270597 bookmarks handlerListmouseUp tempScript prevHandlermouseUpscriptSelectionchar 147 to 146scriptq

on mouseUp

ask file "" with "RevPaint.jpg"

if the result is not "cancel" then

export image "myPainting" of cd 1 of stack "simplePainter2" to file IT as JPEG

if platForm() is "MacOS" then set the fileType to "prewJPEG"

end if

end mouseUp

toolsiE on mouseUp set the borderWidth of the target to 2 put the short name of the target into tTool switch tTool case "browse" choose browse tool break case "Magnifier" winStandalone choose pencil tool set the magnify of image "myPainting" of cd 1 of stack "simplePainter2" to true set the penColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2" break case "pencil" choose pencil tool set the penColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2" break case "brush" winStandalone choose brush tool set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2" break case "bucket" choose bucket tool set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2" break case "eraser" winStandalone choose eraser tool break case "spray can" winStandalone choose spray can tool set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2" break end switch end mouseUp on mouseDown set the borderWidth of the target to 3 end mouseDown on mouseEnter set the showborder of the target to true end mouseEnter on mouseLeave set the showborder of the target to false end mouseLeave ! cREVGeneral scriptChecksumd 'L".n0ږ(r handlerList'mouseUp mouseDown mouseEnter mouseLeave breakPointsscriptSelectionchar 1272 to 1271 bookmarks revUniqueID 1084754948231 prevHandler mouseEnter tempScriptscript

on mouseUp

set the borderWidth of the target to 2

put the short name of the target into tTool

switch tTool

case "browse"

choose browse tool

break

case "Magnifier"

winStandalone

choose pencil tool

set the magnify of image "myPainting" of cd 1 of stack "simplePainter2" to true

set the penColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2"

break

case "pencil"

choose pencil tool

set the penColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2"

break

case "brush"

winStandalone

choose brush tool

set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2"

break

case "bucket"

choose bucket tool

set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2"

break

case "eraser"

winStandalone

choose eraser tool

break

case "spray can"

winStandalone

choose spray can tool

set the brushColor to the backgroundColor of grc "tColor" of cd 1 of stack "simplePainter2"

break

end switch

end mouseUp

on mouseDown

set the borderWidth of the target to 3

end mouseDown

on mouseEnter

set the showborder of the target to true

end mouseEnter

on mouseLeave

set the showborder of the target to false

end mouseLeave

browse @  Browse ToolGIF89aeee!,hܾ@8!0DĠѲJl)pv4΍nCpD r;TE:`7u *e {E/9mf{qFkumqg;#$9{fQ !qof:[zfeW$# ; cREVGeneral revUniqueID 1084397780322 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0scriptbucket @ P Bucket ToolGIF89aggg"""񳳳!,ܾ ASDyG$,kڲ,@8@aPzRSg6(y,7@nڰrP!sRc0$3?wK}^=z$W>J~i+wI~<\y gQ}~e//~+sw'Vͧ ; cREVGeneral revUniqueID 1084397792248 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0scripteraser @ h Eraser ToolGIF89aVVVeee!,Xܾ@8D(Ǡjp-.6E:܂R2"[`hì8џJb7JЄt\VQDŽ҆^w<bv{xy|/zmhoEAYA< ; cREVGeneral bookmarks revUniqueID 1084397802330 handlerListscriptSelection char 1 to 0 prevHandler tempScriptscript spray can @ Spray Can ToolGIF89aiii!,Hܾa(X;DPU&hy_M[jx~LKZ@%*< @H9S"vj#4j]$=S3z$MEX!v ; cREVGeneral revUniqueID 1084426350885 bookmarks handlerList tempScript prevHandlerscriptSelection char 1 to 0script DrPNG  IHDRr)sgAMA=-fPLTE@+wrtRNS0JIDATxױ 0 @ '"'ʺkME"IHR$)tii)I$E"IHR$)I$E"IHR$)I$E"IHR$)ti {ԖƊ$E"IHR$)I$E"I}-HR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"IHR$)I$E"I I7tIENDB`