ࡱ>  ~uxU}  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|Root Entry`'y_tVh@JSRV_SummaryInformation2FDMTextΨFDMIndex\?@ABDFGHIJKLMNOPQRSTUVWXYZ[\]^`abcdefghijklopqrstuvwyz{~0@NN1QW0 1\Ob *h_O>y 00000000100000  1\ObeBf  1MRVfeeBf 1MRVfe *h_O>y 00000000 1feVpe1gB}0000eBf 1gB}0000 10000Vpe 1MRVpS7ReBf  1MRVpS7R  1}}ƖBf> 1(u}000 A1 XShy0&~eT1000peb 1000000 T 100000000 T 1O>y T c`bĸ*H*qad`"` "` Hanako |}fgjn|}k'e@eOS`\H*qad ` "` "` You |}fgjn|}k'e@eOS`bĸ*H*qad`"` "` Hanako |}fgjn|}k'e@eOS`\H*qad ` "` "` You |}fgjn|}k'e@eOS`b5ĸOH*qad`"` "` Hanako |}fgjn|}k'e@eOS`\H*qad ` "` "` You |}fgjn|}k'e@eOS`b5ĤOH*qad`|"` "` Hanako |}fgjn|}k'e@eOS`\H*qad ` "` "` You |}fgjn|}k'e@eOS`yPϿѥH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`H!GadF`FGG FG`FGG G 2SA1388 |}fgjn`~KH!Gad`GGG`GGG 470pF |}fgjn`ͫ\H!GadF`FGGFG`FGG G A-DC15 |}fgjn`|ͩ̿H!Gad`GGG`GGG 22F |}fgjn`|.IH!Gad`GGG`GGG 22F |}fgjn`|£ԱH!Gad`GGG`GGG SW-A |}fgjn`|˒H!Gad`GGG`GGG SW-A |}fgjn`| ԀH!Gad`GGG`GGG SW-A |}fgjn`| ΑÑH!Gad`GGG`GGG SW-A |}fgjn`zӪԛPH!Gad`GGG`GGG 1K |}fgjn`|4ʂz׀H!GadF`FGGFG`FGGG 10K |}fgjn`|iH!Gad`GGG`GGG 47K |}fgjn`~3yXH!GadF`FGGFG`FGGG 4.7K |}fgjn`ՂoH!GadF`FGGFG`FGG G 1N5234 |}fgjn`|K%ȠH!Gad6`6GG6G`6GG&! '#+3G |}fgjn`|j˾ŰH!GadF`FGGFG`FGGG 47K |}fgjn` 7SȌH!GadF`FGGFG`FGG `q G 1S1588 |}fgjn`xŪϖFH!Gad`GGMG`GGM&! '#+3G 5A |}fgjn`2H!GadF`FGGFG`FGG `q G 1S1588 |}fgjn`lTH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`FEH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`ֽЧH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`|ҁqƀH!GadF`FGGFG`FGGG 10K |}fgjn`|;aс϶H!GadF`FGGFG`FGGG 10K |}fgjn`|ˣյH!Gad`GGG`GGG 47K |}fgjn`RẁؘH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`||HӝH!GadF`FGGFG`FGGG 10K |}fgjn`|ӡ]ӲH!GadF`FGGFG`FGGG 10K |}fgjn`|iϸӾH!Gad`GGG`GGC ^(G"G*G 22F |}fgjn`zعtH!Gad`GGG`GGG 1K |}fgjn`| OH!GadF`FGGFG`FGGG 10K |}fgjn`z^LOšH!Gad`GGG`GGG 1K |}fgjn`|ֻtH!GadF`FGGFG`FGGG 10K |}fgjn`z٨#ڙxH!Gad`GGG`GGG 1K |}fgjn`z&{H!Gad`GGG`GGG 1K |}fgjn`݋sH!GadF`FGG FG`FGG G 2SC2562 |}fgjn`Ŝ%H!GadF`FGG FG`FGG G 2SC2562 |}fgjn`z.bʷH!Gad`GGG`GGG 1K |}fgjn`|NBʣH!GadF`FGGFG`FGGG 10K |}fgjn`|YEH!GadF`FGGFG`FGGG 10K |}fgjn`|"\hͱH!GadF`FGGFG`FGGG 10K |}fgjn`|~LӀH!GadF`FGGFG`FGGG 10K |}fgjn`zIԞH!Gad`GGG`GGG 1K |}fgjn`|ceTúH!Gad`GGG`GGG SW-A |}fgjn`|ۚ5܋ϊH!Gad`GGG`GGG 47K |}fgjn`z׍8~ȍH!Gad`GGG`GGG 1K |}fgjn`|idZɹH!Gad`GGG`GGG SW-A |}fgjn`kر8H!GadF`FGGFG`FGG `q G 1S1588 |}fgjn`|.IH!Gad`GGG`GGG 22F |}fgjn`|ӡ]ӲH!GadF`FGGFG`FGGG 10K |}fgjn`|"\hͱH!GadF`FGGFG`FGGG 10K |}fgjn`|zXπH!GadF`FGGFG`FGGG 10K |}fgjn`̜!H!qad6`6q6`6qR`q 9 1???Nkd dhDighHDiܠiH .eh1!@0HghDit t `e<`̜בVH!qad6`6q6`6qR`q . 1???Nk dhDighHDiܠiH .eh1!@0HghDit t `ʏk`̜1H!qad6`6q6`6qR`q "f 1???Nk dhDighHDiܠiH .eh1!@0HghDit t `ɽ `̜㖀H!qad6`6q6`6qR`q  1???Nk dhDighHDiܠiH.eh1!@0HghDit t `ɓޫ`4j᱀H!qad6`6q6`6qR`q  1???Nk dhDighHDiܠiH.eh1!@0HghDit tp `3Ki`gr0n[fuzp0000zp2W([fu}pgr0n[fuzp 1???Nk dhDighHDiܠiH eh1!@0HghDi`Ͱ.qH&!qad'`'q1'"'q '`'q''`'q('`'q(( [plpO\bmp]0 pox}0kRrN0000hOR)0g0Y0 1???Nk dhDighHDiܠiH eh1!@0HghDi`yH-!qad`q' `q`q$`q.`q/O// 0TOu(0k0j0RM0k00~0Z Vbx0n [plpO\bmp] 0[L0W0fN 0U0D0 1???Nk dhDighHDiܠiH, eh1!@0HghDi`<H!qad6`6q6`6qs etmpilenp@ . 1???Nk dhDighHDiܠiH .eh1!@0HghDit tT `zҡR"`̜ɁFH!qad6`6q6`6qR`q  1???Nk, dhDighHDiܠiH.eh1!@0HghDit t `3[i`ǜ2aH!qad6`6q6`6qR`q "` 1???Nk, dhDighHDiܠiH .eh1!@0HghDit t `3[i`̜ՆH!qad6`6q6`6qR`q 9 1???Nk dhDighHDiܠiH .eh1!@0HghDit tt `O`2ӡH!qad6`6q6`6qR`q . 1???Nk dhDighHDiܠiH.eh1!@0HghDit t, `;;`QH!qad6`6q6`6qR`q "` 1???Nk dhDighHDiܠiH .eh1!@0HghDit tt `M+`a&H!qad6`6q6`6qR`q . 1???Nk, dhDighHDiܠiH .eh1!@0HghDit tt `;R`Դ|AH!qad6`6q6`6qR`q 9 1???Nk dhDighHDiܠiH.eh1!@0HghDit t `س`Դl1H!qad6`6q6`6qR`q  1???Nk dhDighHDiܠiH.eh1!@0HghDit t `س[`ë‹PH!qad,`,q ,`,q R`q SRimR$[hO\b 1???Nk dhDighHDiܠiHeh1!@0HghDi`‹ϭPH !qad`q: `q: R`q 1999. 8.12 1???Nk dhDighHDiܠiH   eh1!@0HghDi`vн‹ўPH!qad`qF`qFR`q 1 1???Nk dhDighHDiܠiH eh1!@0HghDi`|ҿ‹ԞPH!qad`qB`qBR`q TADA 1???Nk dhDighHDiܠiH  eh1!@0HghDi`zy`H!qad`q`qR`q 2/2 1???Nk dhDighHDiܠiH eh1!@0HghDi`|O.àH!qad`qB`qBR`q 1001 1???Nk dhDighHDiܠiH  eh1!@0HghDi`fùH afFad\`\GG \G`\GG FGF Welcome! -3 fgFfraejnBBrush Script MTeOS`fw`ŀH afFad\`\GG \G`\GG FGF Welcome! -3 fgFfraejnBBrush Script MTeOS`l7 H aIf&ad=_`&&I =_&`=_&&I& &&  00F0S0]0000nNuL0x BBrush Script MTeOS2-3 00000 >eejn`lKȰH aIf&ad=8`&&I =8&`=8&&I& &f&  00F0S0]0000nNuL0x BBrush Script MTeOS2-3 00000 >eejn`jv HHaqfadR`RqDR`Rq!R`Rq0R0`Rq 6<R`RqKRF`RqVR`RqlcR \`RqnR `RqR r`RqR`RqR`RqR`RqlR`RqR)`RqR`RqlR?`Rql            0S0n00000k0oVb0000h0W0f 00000j0000QC0kb;0Y 000000 0 0000 000000000h0W0f 0 000000000 0 00000 00v}[0g00ep0N0F 0 S͎cb&0 T00d0j0D0g00000000O\0 0 0000000O\b0 [PVލ0O\b0Ɗ0Y0 0 Vލc}V0 0Lv{20U00f0D0~0Y0 00000000[L0}0gVb0000 [L0W0f00f0O0`0U0D0 1-3 0000FfjnTimes New Romanjn mY"V"V"V"V"V"V"V"V"V&[^``llF>fLhh Ǎ  Ǎ ǍV Ǎ8 Ǎ&0 Ǎ/: Ǎ9 ǍE ǍR Ǎa( ǍZ ǍҾ Ǎ $ Ǎ Ǎ ǍJ Ǎ& Ǎ2T Ǎ?~ ǍN Ǎ`| ǍsL Ǎ Ǎ< Ǎ Ǎ: Ǎ> ǍB ǍF ǍK ǍQj ǍW Ǎ^| Ǎf Ǎo: Ǎy Ǎ Ǎ6 Ǎ ǍB Ǎ$ Ǎ* Ǎ0 Ǎ8 Ǎ@ ǍJD ǍU Ǎa ǍoV Ǎ Ǎ$ Ǎ Ǎ4 ǎS` ǎr ǎ ǎ ǎ 8~ 8 8غ 8X 8 8 82 8 8n ]8 ]8 ]8T ]8 ]8 ]8: ]8 ]8~ ]8 ]8 8J R8 8 h 8 Ņ8 D8 68t 8 8 Ɉ8\ 8 8§ Aͬ0(˼¸P(0¸Lp(˼DL˴˼¸, $L˴DL˴$, j6 Ÿ4J !WDJ '×e ê:e =e$ G G, G,n G,M& G:e se : ŵOe Bc ^ @d @c j :b ̆ϣşƖ ̧ό/&- ɫ7$zư7N @7xȚ7|Ʋ7 B7Ȝ8 G,8 G,8 G, Fӑn`h+g`h+batV`(0``px` (. Fӑ`h+g`h+ atV`(0``px<` (`h')[tLծ')[լծ$[խխ0[ }0]ˬˮ_]<ˬˮa]\ʼˮ_a]|ʾ_a]ʾ_a]˭XX]Q]Y^LNgY;>&<=K^<NWY^\ԼԾgY^|LN^>6c"^^wǙ^5ðð?d»A,`nÖijBճD"WeĻ_55pEDȿG۲kH'5ƺJ{݉8UK݃M٘ۦNۯݽˌ̩PؾQآڰ7SسlTzڸ_< u0_Խ5xx`֜֞w`455|ĸ`T֝exx`t46ïy` ePĠaL4֞wyal4֞ïña֜֞ïyaïñaҌҎ7yaҎwyb Ҍ79b,ҌVwybLwyblwIbLNWb|ԾWYbL~WYb|c |~Yc,ԽԿcLԽԿclԼԾ_c|ԾcԽԿcԼԾc|~d |Ծd,|~dLYdlOӡd,Vүұdd %׵Ұfؾ.чf,,ѾfL,.ѿұfl״.ѿf,.f,VfWYftvү)g tWYg,ԼvWYgLtvgYglgtvCgϣU6gtΟΡgvΟΡh tvΟh,vhLthlFh*hڬ&h]ʨh') i$oqi$܌܎9iD$&3qid$܎79i$&o9i,ݦoqi,~ɟɡiGj>j$MjDMMɠjd4^oqj4ȯȱWr)jٖwyjٔwyj^AıjٖٔwYk֜֞WƁk<֜֞/Yk\46oȱk|֜fWYkٖWYk46ȯkٖٔWȱk|ٖȯȱlڬNɟɡl<Ml\ۄhltLɟɡl4چWYl46WlظFɟɡlظ6m֜ïñm4fïñmTظغɡmtoñmoqm7ymoimڝ Aın ~wyn,ҍ߅nLҍҍ8nl588n\߆͇͉XվZhƜn+Un5nͯo <>)o,\^͇)oLTwyol<o>wyo-ݓo*ݔ˩˫o֜֞ɟɡp ֜֞_ɡp,==xpLլvpltvp;=1pt<p=ػɟɡp֜>ɟɡq ˓!q,˕qL8:ɮqlؾ.]q˓˕q ˕qU``q wݝmt ؐ^ק[΃Ȑɭv 3!Hw ÍÍ8w,3wL5ȠwdFɐw|VYw8ŨDwmmOw5ť·wƭƭHxU x$˭˭x@xDuxx\5gxtH(x4ǁxUU8xxLgx0xyUU̘y$UyDϭɐy\hy|Uxxy΍?ίyMM(yխխ̘ytaz խխ0z,ˬˮ_zLu)͙zdʅ)͙z|ϮՏ]d=KzԼԾgYzцՏzϮ̯z55p^ؾ{mAı{my{4eAı{Ley{dïñ{Uo{UAı{ϫHĸ{wy{Mǁ|:|$wI|Dцѯ|\|||FӶՏ|ԼԾ_|ԆЫ|ԆΑ||~},Vүұ}$ѐѺ}Deч}\,V}|ؾ.Տ}ԆՏ}<֬Տ}tΟΡ}vΟΡ~=ۭh~uwΤ~<=ۭЙ ~T܌܎9~t^8̨~ێDZ!~4^oq~m7ǧ~e Ɛ~mz 46ȯ,^ ƐD؂h\fïñ|Ly588ؾ.Y|!ؾ.Ϩ\^͇)$ta<6 <̋ߠm7N ŅǍ5: |̄ߴoG;'ôq o'ôrY'ôt['ôug7vےwxz zfɒL|TEķ>~htre: uзƣ uƣ"ZV |̄*Ǭ , D Ƅ Ҽj&c ҼD,d ҼtpeT pf ԰LTf EٹXg Ҽ:ռhr ԰ i ҵ*W eUyH^&à)d_qxL^d,̥FDMVectorhPageCountConnectorMng DocumentInfo h      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ `  ǍVhLllJ f  `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` 9;d;` ;;`2O;n{;` W ` ĉ=^=`2=ġĔt=` ĸl{l` =Ī= `VLm.`(ˆéZ` )uu`j+ŒR[¹v<9Ó  !D?{cĥĿ6kĦnİ< Ħ<ĿhĨ?{!D 9Ó9Ów< `£6v6`@£#£`@,$(H,`@U=DsU`@~`6f<Û/~`X(åPLHx `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` M{|cJJ88 0 ` ēeuƠĒƋīx\@[@[g 0 `0 . ` [[ z „­ ¬[5"];] 5!00000 `0 \. ` [\[`z „­`¬\[\*"J;J *00000S2 `ǍDVx>n `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"66?5`:TTr`"ğ|66X`:qqĭư `0. ` dd ƒ–¶ µd5"];] 5!00000 `0 h. ` \h\d{ …Ž®d­h\h5"];] 5!00000 `0\. ` d\d`ƒ–¶`µ\d\*"J;J *00000S3 ` ǍFXL| `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `B < ^rwƠ0`"Đ++Lc `iM1  0`"++ci2 `0. ` ('GQZzy(5"]:] 5!00000 `0UE. ` åäUEå5#]:]!5!00000 `0i. ` (i'eGQZzeyi(i5"]:] 5!00000 `0UEi. ` åiäeUEeiåi5#]:]!5!00000 `0Zƿ. ` %Z$^DNƿWw^vZ%Z)"K:K )00000 `0RZBƿ. ` âZá^RƿB^ZâZ)#K:K!)00000 `07. ` f7f3…¾««˜¿¸3·7f75"];] 5!00000 `0?Ť. ` f?fC…ĸŤ˜ķ¸C·?f?)"K;K )00000S8 `  ǍPbJz : j `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"y.5Z`"t^6Acj`"ĘƷ.5Z`"ĝƝ6^*Lk `0%. ` *%)!IS\|!{%*%5"]:] 5!00000 `0WG%. ` ç%æ!WG!%ç%5#]:]!5!00000 `0Gì. ` *ì)èI3 SG \4|è{ì*ì5"]:] 5!00000 `0WGGì. ` çìæè3W GG 4èìçì5#]:]!5!00000 `0 o. ` YoYkx ‚ ‹«kªoYo5"];] 5!00000 `0Yƾ. ` *Y)]ISƾ\|]{Y*Y)"K:K )00000 `0WYGƾ. ` çYæ]WƾG]YçY)#K:K!)00000 `06. ` *)IJ]S6]\I|{*)"K:K )00000 `0WG6. ` çæJW]6G]Iç)#K:K!)00000S9 `Ǎ^p6XxHx  8 h `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `" -Z`" ('` pp!` $` ::=`"~ ?+5`"|c -rY` ĥĥ]` ZZZ` ? `0%. ` %!'(R()V))**d*++,,-L--.//00000011(12n23384>45R556 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` r`R*x:]:M0AA` Ĥg`Rąą~čcĞSĹS]vƒ `~§U.`P¢›BHP `vŠ.`H&m'V}…&z6d67.-1'0(4A`—s¹T3;=5£m `­o2`XP/EPVo^P`@"@M$7`Hc{­ šc`j A¢ŸªmYNHA `.`@(t"`'U3B31@+I,^!i!}11?L]na^{i\KC`z ­5=;¾-¿`7¹T—s`A4(00,`m'V}…&z6d67)'")@SYN`j (0EÁâåÝY OE-"="C8MIN `³5G.`¿¸$¸1¿;BB=* #00(*474¼*¾$`*)tB‚dŠ `{Y0x`H1KY"@1`@7O${c7` ›N `v¢„w.`H·¨{n.n `]u.`` cDv ll`UcD `n7w.`@.nn ` h.`x #@GWthîeZ3åy?  `®¯Ý<.`¶¯& X%ÐJjÝÔÇ®°¶¯ `¶G.`Ѐ¶®0·\Áä7ûsëù(íGÔAË;ÝäÝÐËXs+O'¶® `à.`1Y|:ÔsÝÚàÝÏrhhî\~LX01`"…KZ`"…E`M `BŠ.`¾» ¶²³¼”k¼X¯IB’fŠv›”¡«ž¶•¾ `" 2`X)__A3& )`@¿¿`X  ` Ó2`PÓ)Ó)#óÝÓ`@_Õ_Õ_Õ`H¾Ó¾ðÓ¾Ó `*Šº.`p ³¼®«k1•BJ¤c¶½—¿³¼ `vf´7.`Hn­«­ ‘/n`"UU1`" /`"‘‡O8 +`"‘‡(+`"‘‡g@ `p.`X 4“‘1­´O¼i”k  `v—žu.`Hxl•l¤©xl` l¾l `ÿĊ.`x ĊnJÿ RyĊ `HJX.`ЀXMķďjZSJH÷UiaJzPVqÍjq9fĔĴX `nÝ.` ĭĄWzqnÿqÝãôý9`|Ċ `"‰- `qU`.`XĚk9÷qÚzrUlÕ9R.[S`~^ĴX`"‰2 `J.`PJSX[z£¶¨˜zcXP `iÛ.`Xn¿nÓÓ~tn `8Q).`XH$N$I@6KH$ `v[[®ī.`H¥ĢaĢcčf{}b¥Ģ `Tĝ.`p [`Ķcģ£ģ«w[`" ĒUUG^`" Ē H\`"} O8;W2`"} (0lV`"} g?H `K!.`X}`aZBR(z&` M&N&` ÓÓ `îĿ.`` çMÒrvěWĸ&O&c2~=çM `vˆP.`HJ,‘$$J `n_.`@G$$YĵG `vn.`H•(w& •(` Q&R&` %D`"…@@Z `~f>y.`PpkrsQsKVCp `v _ƾ.`H&3&NZŲZlQ=0/\flŎ}}/Ŏ;ŭ8*­ v T?I`ƍ%Ǝ`I\T?v ­ *8;ŭ/Ŏ}}Ŏg`3&NZŲZlQ=0/\lqj$S@ :E`j kNkŬhŖpōňN*] `~*BR.`P2?*M<@<}N{UoUbNX?Q3Q#Viu}łŋőŔŎ i._<\J_QiOoFx>x>}`*© ` sXB `/;.`z UG64DZ !6/ `-U.`p -6609IURD;-`R-DOURI;- `V;.`(#" c~`"#" c~ `&.`؀¼¡’fK.&)7Hfœœ¦`r ¦¼¡„`¬œfH7)&.Kf’¡ `VK‡.`(iZ`"iZ` 4“³l` ’1°` _#` by_ `?fK.`z k%3'DJF\6a an\YBD'K\k `"%RM.`p %M3DCDQJRAQ1=%0(%6"?%M`R"M$6-+:%E(Q1S?QM `V@Xu.`(:WP@`":WP@ `rxT.`؀-r{Ĥľ /L9TSQfCr2xuff]aĬ_ċTyHs-r`r ^aĬ_ċTyHs-r{Ĥľ/C`6s=ă@ĢEĺVfuxr2fCSQ9TL/  `V[/.`(=Z`"=Z `0. ` 99XtabakuċĊ95"];] 5!00000 `09š). ` šť9.).ťšš*"J;J *00000S11 `9d{9\Ǎ*<jb @T.hn < ~  n  :X@l6hd&\2VP !D!","""##6#h$b$$%<%^%%&H&'D'(<(^()>)V)**d**+~+,^---.`./0\0001D1f12R22233:3Z3z3345~68, `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `z \SMM'R2\;;3%`:5 j~=N`z |ĊĵľgĿ\ĵSĉS{[viv|`:ƃħēr{Q^@ `ˆz.`˜Ÿ¿ +791´S iˆz˜ `f—9.`f9f,xM5—•fA“¡·zk7f9` ˜fŒ `"fA.`X_R< (.*3C5W;_ `¤8.`` Š0 3›Ÿ”Š `qˆ0X`(4Z`XG`qˆ`*`:Xs`*J`qŠ`Z Š0 3›Ÿ”Š`Ÿ¿ +79¿%`j &.?ÒîëàcUF0s„³Œ`21¶OŸh‰y`2 3JwZZ`B[MGG O[`"Z` ne` h[` n e` `VŽ.`(®Z`"4Z `v|‡6v6`@OJ:v8|O`@EYAho\EY`@=c]7=`@1XO7&/1`@#YM]E‡‚#Y `~D8’6v6`@v8;ˆgndv8`@i…‚ci`@]zvV]`@P4q9liHcP4`HfˆE…D’Pffˆ `{.`tħkĒpkp^[K( Į%?ĺZĮtħ `n4s;.`@sX4M;s `ij0p`@ijĭx{ij`@RLR`Rt#.H1cVqc `tIJ.`h IJĘtwty$VĠIJ `Jvp.`Xvv8upnhZ5OJv `ĝŠ.`x ƒxĸqģIij(3I L_tƒ` žP`"ƒ==.D`"ƒoh/AJ`2Wį?r.7# `2r`@`HīĤį`@zt?Dz`:ĭx?`2rps@sv `nf™/.`@~(m ~( `S .`` ?zöfâS|fDy  `H¡.`h*=–RZˆ•¡ 4fÍvðtvkO.|dXHæMÅNÁgåü:PVXæ[Äie|:„y^=– `?].`p ?]ÁXÝSÿS( `–„Á.`` ><–R´w„ ‚(l^ZÁ>`=–ey„|:ka[ÇVëU&ûfàP| `Bܤ .`ЀJðGH›—âzâtótvnR1 `R÷NìJð `Š.`x ˆ“š •¿¤¬¼—ˆ`[q¨Œ££ ›L„ÄtösvoO,oSþJé `.ûć.`` Æć.UyÔèûèPÕzÆć `±xU.`p x.U±¶»»Gjx `Š..`` .V¼—ĬŠĈŒl¢6´.V `mæ.`h*¼´†yĮmčn`.˜šÿ˜ç£ç¿òô ïJæjéÒ÷êöçÏkJ1¾¸¶³¥/’ZŠā•ĥ° `†Í.`ûà—Þ±ìóô+ëXæsìÔ÷ëü`©•ĥŠā’Z£3³ ¸¹>mÌèü`³‚kčktsHŠš›ÿšë›ã¿ñôìNæsëßýû `n›[â.`@›~¶âÄ[›~` G `–ß.`¦¡/¡<¶OÓؤ¦½· `7Â0p`@77`@D3J-ÂzD`R¡&ÓÚÕi®D 7 `_Úå.`h e~Ú#ÚÇÕå_åhvkDhe `Ú+à.`XÛÞÚcÛ+â3öfÉàÛÞ` ßß` w«º«`"‡‹==i`"‡‹oh`2º(cØ `(¼kà2r`@+~fÄeà(à+~`H0¼4hhL0¼`@4k#iX0S4`:fi%i^eÇ_â`2Ú(Û]ÛÂØâ `nug¨Ü.`@n¡|~Ó~̐n`"†@@Z`2Rs/bF$`2Rs/bF$ `¹10.`X' +,' `V¼.`(++ P `¹!,.`x &!½¹½,&`j %¿!¹,/# &. ` N.`` 1*B<11`"++ P`R!7MB611 ` J.`` %9GJ+ ``2û 1Mo `d.`Xm ĜĿĘm `Vzj.`(;ĩ++9X~`j o Č"ĬĿĞĂnf`";ĩ++9X~ ` FaĊ.`` c Ą3{I|QjURNX6cc`RZąbsd]aGRR=^"cc `DJdć.`` VćDNoT[WMbJdi]Vć `h".`x n ĕĴ"Ĩ Čh n`DĮ `RŃ.`X|{se`^X| `w[èƜ.`è[èh; G_wƜyƌ¦ 1]ĹÔ|ã]è[ `i[ƾ.`` ƒƹ ƃuc`rƜnƧyƹƒƹ `….`uƙnƧNƼ0ƹƢƀh\ prZ| h( ~$NplN6X, ! !!!""""##2#$6$%R'p''(&(x())F))**4*T*++, ,V,---. .r..//fivSf2i|"(0wLonzƒŠ‰kmm]F8>LTN<;8*$ ):1 ,JO`B 0` Nl` 0L`Rfg…–f~tf`r –­ &76²¸`,AÀãáÎ^B$5º8¤5˜&¦`j ˜&–6žR¼ej‡œ#«H®d¥Ây`JtŠd„\nfLtOÂGÊ`2nnt"Ç(`4¦Xu@0,* *?bƒŠƒmL0.G\\G`2|`2h2xK€f†`2¡‡„~s`R[LBAGW e[`"Z` `Vh®.`(‹Z`"‚…!!- `–`|.`x 0{`|R3C+³–³%+]0{ `I~.`y~•|¥#²¾¨‰`JIZh6y~ `Ž|.`p £|Ž{œ1¯½˜´%¦k£|`"6þ.o3 `"x|.`p c|x{j1WF½1"•9R%`kc|`"‚!!-oY`"þS`X `Pĉ.`ÃtcDUPU cOÀĉÊ~ì<þÿýä:ÎÉ Ã `§–({.`x {§{²7³–(³%]{ `§(.`x §²WĘ(ĝi1 `Bĉ.`D Oĉ|~X6GBÿI`>v  `I.`y•¥k²ĩ¾¨ľ‰ĶbľJIZĒhXy ``.`x 0`R[CĘ+ĝi+10`"BtH7k `~0.`P010 0 `~0{Ô.`P0|{ÍÔ1Ô0Á0|`"BpK(h`"t> `³NĹ6~&~`H%³N; %³`X +",?SJ `PÊÉÒâÊ`X0;`Xuj'h0Ċ;ĠĹĕu`"p; `ģ6~V`H `H7!UkL7`HÔÍñÔ`H9- `PWkģĊămW `Áľ6~&v`H{;(h7s{`P_[U~ÍTÒWh_[`XRþ6RQRþ`P*W_CeT%cJ*`PNľ;ğ\Ē{|ÁćgĥNľ`"B2Ij@`"K< `~1×.`P1×3×31 `VXÜ®.`(ƒ++Z `76n`PĜıĹĪĜ`H%`P"GUyÏ.Ç+q"G`P1/.`P6%Ckxj86`"‚…PS+ `Ž.`p £Žœ]¯ğĹ¾Č¦#£`"‚AAEo`"6&]+ ` x.`p cxj]WğF1 9ĻRi`#c`"‚@@B4`"‚PM/Xc`"o` -` .|| `jTƵ.`` qƥ%G OM%/@Ÿơ‚ưqƥ `vœƔ».`HŸƤµƔµƩ»œƾŸƤ `d@.`x ƂơƸ0Ư;Ɨ@xgdƂ `v=C\.`HP2=CAA\'VP `y#à.`;M%n#Ð6àZÝyÊƏoƑmƦ\ƾDHH>*º›…|y~ưŸơ™œ¨¾µƧ¸Ɛƀơ$Ƹ5ƺFƥHƎAw"gaQDZgpmƀ~m~_rLT>-;M%`"-Z`J¿´ƪ¶Ƒ`JƶƟƂ`Rº›…|yƮ`B«›š Ƣ`JD]ƿmƦpƉepB[R`B6ƻDƪIƑ?x"hc`JpƔÊƏÝyàZÐ6n#M%`BnƁ~p~`sMXA0<`B?~;Ɨ,ư` ¹›ƿ` B[B?`RM% Ƣ‚ưqƥ%G OM%`r qƥZƸ+ƻƪƊeTBUUnOƊ4ƗƊ`mJdŦfŗyŏōŝŝŏq,])D9/O/ZD`2BLOżJs`2#¼ ¡`2f:& `RG0B?4IJD4&G0`" Z` `VYōŸ.`(|ŰZ`:hy+yf` fª `|a^.`Ȁğ5DRYRC.ĜħĨėxhffvğĪĥĘğ `VE.`(+Z`"+Z`*{©|`Z ď4HSYSH4ď`hhnyĜĨĩĩĠċċĠĨ ĨĘy nh` == `č .`Ȁ9 *+>R_+d@duĀĈĆse  `V$+X_.`(>EZ`">EZ`Z < ()@R[(bEbb `*b= `0. ` ;;ZtadamučČ;5"];] 5!00000 `09Š). ` ŠŤ9-)-ŤŠŠ*"J;J *00000S13 `d ^ǍHZz ,^~ `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` 9;d;` ;;`2O;n{;` W ` =ī=` ĉ=^=`2=ġĔt=` ĸl{l `O. `^yEDˆD±{zý‘°O`O{{;þ;{^y$$$$ -.$00000C1 `Ǎ>PLH( `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` M{|cJJ88 0 ` ēeuƠĒƋīx\@[@[g 0 `. `[*B…®,+nŽ­]xx8o8,[*$$$$ -.$00000 `lƺ. `[BBw…ƺw®@AŻŽ­l]lxx8ź8@[B $$$$%$ %00000C2 `ǍDVx `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"ēl66X`:ĿĿeeġƠ`"66?5`:TTr `. `\*C†¯,+n®^yy9o9,\*$$$$ -.$00000 `lƺ. `\BCw†ƺw¯@AŻ®l^lyy9ź9@\B $$$$%$ %00000 `O. `Yy@DƒD¬{zýŒ«O[Ovv6þ6{Yy$$$$ -.$00000C3 ` ǍFX `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `B ) )goo9` Q;;`B_mmƁą}}A` ě?e? `. `./X10sa0KK t 1./$$$$ -.$00000 `">. `É/oò10>sýËææe"te1É/%%$% -.$ 00000 `+dGƱ. `9n÷ƱsnÍ8n8+nŲìÎddűG89 $$$ % $%$ 00000 `dƱ. `:naƱn789ųW9ddnnŲ8: %%% % %%% 00000C4 ` h bǍHZ| `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"{45#. `É/oò10>sýËææe"te1É/%%$% -.$ 00000 `+dGƱ. `9n÷ƱsnÍ8n8+nŲìÎddűG89 $$$ % $%$ 00000 `dƱ. `:naƱn789ųW9ddnnŲ8: %%% % %%% 00000 `O. `Ry9D|¿D¥{zý…¤OTOoo/þ/{Ry$$$$ -.$00000C5 ` * $ǍJ\~ d D `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"04Z`"6K%O`"đv04Z`"čƢ6KQ| ` . `06Z87zc 2 MM { 806$$$$ -.$00000 `$@ . `Ë6qô87@zÿ Í èèg${g8Ë6%%$% -.$ 00000 ` X. `0ÂMZ MÄà cX2XMM Ä0Â$$$$ -.$00000 `$ @X. `ËÂqMô MÄÃ@ ÿXÍXèèg $gÄËÂ%%$% -.$ 00000 `h;Ƶ. `=rëƵgrÁrUƵr+< = ŷK-h}hbbŶ<> %%% % %%% 00000C6 `$ ǍHZ ~ ^ > `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `RIIyy7`RƼfZxƴĈƌĐ`Đ8 ` . `$6 Nw87zWv & AA{8$6$$$$ -.$00000 `4 . `6eè874zó Á ÜÜ[{[86%%$% -.$ 00000 ` X. `$ MN MwÄà WvX&XAA Ä$Â$$$$ -.$00000 ` 4X. `ÂeMè MÄÃ4 óXÁXÜÜ[ [ÄÂ%%$% -.$ 00000 `h/Ƶ. `=rßƵ[rurIƵr<=ŷ?!hqhVVŶ %%% % %%% 00000 `+. `XU? ‚ «WV™‹³ª+Z+u³u±5š5WXU$$$$ -.$00000C7 ` ǍN`t T 4 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `wƠĨƠrĐ>^rwƠ0`"Đ++Lc `iM1  0`"++ci2 ` . `06Z87zc 2 MM { 806$$$$ -.$00000 `$@ . `Ë6qô87@zÿ Í èèg${g8Ë6%%$% -.$ 00000 ` X. `0ÂMZ MÄà cX2XMM Ä0Â$$$$ -.$00000 `$ @X. `ËÂqMô MÄÃ@ ÿXÍXèèg $gÄËÂ%%$% -.$ 00000 `h;Ƶ. `=rëƵgrÁrUƵr+< = ŷK-h}hbbŶ<> %%% % %%% 00000 `+. `XU? ‚ «WV™‹³ª+Z+u³u±5š5WXU$$$$ -.$00000 `J Ř. `W >UŘUª ꊩJYJtt4Ę4W $$$$%$ %00000C8 `ǍPb j J *  `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"y.5Z`"t^6Acj`"ĘƷ.5Z`"ĝƝ6^*Lk ` . `+6U~87z^} - HH{8+6$$$$ -.$00000 `; . `Æ6lï87;zú È ããb{b8Æ6%%$% -.$ 00000 `JØ. `+UJ~I^ }Ø-ØH HJ+$$$$ -.$00000 `J;Ø. `ÆlïJ;Iú ØÈØã ãbJbÆ%%$% -.$ 00000 `+G. `ħ÷sÍĦnĦ+cn ìIÎIKGbĦħ $$$ % $%$ 00000 `. `Ĩa7Ħħd!WJ9nInL cĦĨ %%% % %%% 00000 `+bGƯ. `7l÷ƯslÍ6n6+nŰìÎbbůG67 $$$ % $%$ 00000 `bƯ. `8laƯl767űW9bbnnŰ68 %%% % %%% 00000 `]. `^ÇERˆR±ÉÈ‘°]`]{{;;É^Ç$$$$ -.$00000C9 `xǍ^p6XxxX 8   `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `" -Z`" ('` pp!` $` ::=`"~ ?+5`"|c -rY` ġġ]` ZZZ` ? ` . `"6 Lu87zUt $ ??{8"6$$$$ -.$00000 `2 . `}6cæ872zñ  ÚÚY{Y8}6%%$% -.$ 00000 `JØ. `" LJuIU tØ$Ø? ?J"$$$$ -.$00000 `J2Ø. `}cæJ2Iñ ØØÚ ÚYJY}%%$% -.$ 00000 `">. `ħîjÄĦeĦ"ce ãIÅúIúK>bĦħ $$$ % $%$ 00000 `. `ĨX.Ħħd!NJ0eIeL cĦĨ %%% % %%% 00000 `"b>Ư. `7lîƯjlÄ6e6"eŰãÅbbúúů>67 $$$ % $%$ 00000 `bƯ. `8lXƯl.67űN0bbeeŰ68 %%% % %%% 00000 `+. `^UE ˆ ±WV™‘³°+`+{³{±;š;W^U$$$$ -.$00000 `JŘ. `] DU‡ŘU°ę¯J_Jzz:Ę:] $$$$%$ %00000C10 `8p}8hǍ.@`$(v $ . F  t <2P .Prt vb bdf<\X> J !!*!T!t!!!!"#z$%Z&J&'^'(b()))p)**+H++,T,-0-. .z./V/00.0N01112f23B344h446 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` s`R+y;^;N1BB` ğb`RĀĀ~ĈcęSĴS]vƒ `¯t4\`(oZ`(1Z`(DZ`XPPPn©ŸœP `~§U.`P¢›BHP `vŠ.`H&m'V}…&z6d67.-1'0(4A`—s¹T3;=5£m`j A¢ŸªmYNHA `.`@(t"`'U3B31@+I,^!i!}11?L]na^{i\KC`z ­5=;¾-¿`7¹T—s`A4(00,`m'V}…&z6d67)'")@SYN`j (0EÁâåÝY OE-"="C8MIN `³5G.`¿¸$¸1¿;BB=* #00(*474¼*¾$`*)tB‚dŠ `V2V.`(DZ `VC,.`(1Z `V].`(oZ `n".`` 'íÛv;2'' `mÍ.`` ‹Å])x{{z4‹D‹Å `n*Z.`@/,$º› `xk0`?ls×pràsD  ¤³`0O~àûóÕvI4 `"!!Tm&`"Tj|`"Tj2`"…*;`"…-,: `VnI.`(3Z `V#.`( Z `V.`(Z `V~Gê.`(1ÔZ `V52a^.`(KHZ `Vy.`PpkrsQsKVCp `v _ƾ.`H&3&NZŲZlQ=0/\flŎ}}/Ŏ;ŭ8*­ v T?I`ƍ%Ǝ`I\T?v ­ *8;ŭ/Ŏ}}Ŏg`3&NZŲZlQ=0/\lqj$S@ :E`j kNkŬhŖpōňN*] `~*BR.`P2?*M<@<}N{UoUbNX?Q3Q#Viu}łŋőŔŎ i._<\J_QiOoFx>x>}`*© `V=,a.`(OZ `VgƋ.`(yZ `VŒƐ°ƴ.`(žƢZ ``!}.`2*uu* `nW.`@L L `nĮ$.`@Ĺ `n{.`@ĹIJĆĹ `nGĽ.`@ĆR~IJĆ `nW.`@L L `nĮ$.`@Ĺ `n{.`@ĹIJĆĹ `nGĽ.`@IJ~RĆIJ`JR~L L~R` R ` Ru ``wT.`2FKoFK `nQ“.`@)\FˆFU) `n;Qz.`@FˆF¼oo\Fˆ `n…Q.`@F¼FF¼ `n;¸z..`@FF#ooF `n;z“.`@o)FUFˆo\o) `nQQ.`@\FˆF¼\ `n;…z.`@F¼ooFF¼ `n¸Q..`@F#F`JF#)FUo)oF#` F#FU` F#F `ü. `" LďuĕCĕU]t$?]?[üD"$$$$ -.$00000 `8ŷT. `ƍ ƋƌTI/ŷŷ/1{8H{Ƌƍ $$$$%$ %00000C11 `==Ǎ ZJFp.  L ~  " B Z ( ~ * , L X , :Zzhd>TX2RrH,($Fh  4 V v !"P#$4$%0%&,&N&p&&&&''<'^'~'''(("()^)*+Z+++,B,-.-`---..$.<../ /`/0 0b011.1`12<234455$5F5h556:67789L9n9999:; `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `z \SMM'R2\;;3%`:5 j~=N`z |ĊĵľgĿ\ĵSĉS{[viv|`:ƃħēr{Q^@ `"¬Á.`bAy½ª"™F‘fŒ˜ 3JwbA `"fA.`X_R< (.*3C5W;_ `¤8.`` Š0 3›Ÿ”Š `ˆz.`˜Ÿ¿ +791´S iˆz˜ `hŽ0X`(4Z`XG`qˆ`*`:Xs`*J`qŠ`Z Š0 3›Ÿ”Š`Ÿ¿ +79¿%`j &.?ÒîëàcUF0s„³Œ`21¶OŸh‰y`2 3JwZZ`B[MGG O[`"Z` ne` h[` n e` `VŽ.`(®Z`"4Z `VUy2.`(g Z `VODsh.`(aVZ `VH{l.`(ZZ `VAe.`(SZ `V;_ .`(MZ `V4XC.`(F1Z `V-VQz.`(?hZ` “aŒ `¦Þ.`X†~"3†~ `f{Þ.`X†~KsQ8'"3†~ `~>È.`P†~Igƒ›†~ `'».`8Ql†­¡ { dI8 `~“™Ñ.`P†~%™ ­¾†~`"†‹..+ `v—Ï.`H†~2 Lb!~†~ `~s“RÑ.`P†~™ ­3¾K†~ `vu.Ï.`H†~2Lb~†~`"†”ss `"†”\\D(i` ‡º‡` ™¶«` ¨¬` ²œ®` [ž/°` e­D` u·c` ‡º‡ `!Ú.`` (ûá(á,û,( `nwç.`@~~á)á~` )áá `n.`@!*` * `~CĪ.`P‡ğ¦ēŠĎrĐMě‡ `'Ĉ.`¼ij¡Ĩ‡ĥ`ĭHĻ9KĚlĒ}č’č©Ēě `g|.`X‡LtģRē9Ą(tc‡ `~tS.`P‡4L‡`"‡ ...?Xq `vv/y.`H‡dJ4‡ `§.`X‡ģēĄtc‡ `~š.`P‡&‡ `v˜y.`H‡d J4"‡`"‡ss:K\`"‡\\1mU?` ††Ĭ` tbĴ` eC` [/` ²` ¨` ˜ªij` ††Ĭ `6U ċ.`]Wh;/HjÏ þ 8Sjząrm\>x7)òÓxdkY]W `f@QD.`8$FûI×Rr]Wr\{g~z{ÅÔäíó}},s8`=Z>T*KFRWWQýFû `~@ô\.`PFFúOûWTLF `~fNÆ.`Pu]~l}{{ju] `~Å.`PÑâïõßÑ `~.`P `~h D.`P}'u7-`"GvvEm`"GGl `"GuuEn `"L6y6`"Doz`"×:g(`"cv?Z^&`"b Ut`"L6x` Pÿ` Vî` V` P`"GBp`"GHk `6 ÷Č.`ï@ä\ÉĆkzNh3O-  ÜÁ$_;DT-pÌÚ*ðYÔ`}neÄTäNQZmÈ3á>ï@ `fJSF.`8$ú%ï@Ú;Ñ0Ë}pe_bh]OOVøhíbß_ÒeÄr{~{Ï~ÏkÙ_ìZòYømÔýúõõû `~ð÷.`Pýýõøýý `~bæI.`P×:Î+Ìxm~-×: `~>q.`P]ajYOV] `~?Ãs.`POþWõkîbä_ÑTçOþ `~]SäÎ.`Po|zyÌ~Ïp×`Ãjo|`"vv@`"?`"uu@`"}×6K`"lA`"| :(`"é!Z1`"êw(G`"}×6K` Íü` öj` ölî` üÿÌ`"B`">Y `aƭ.`ëRÔwyěZĺ6§uƙ`!I;ëR `RŃ.`X|{se`^X| `i[ƾ.`` ƒƹ ƃuc`rƜnƧyƹƒƹ `….`uƙnƧNƼ0ƹƢƀh\+0X`(Z`X ƃ5 ­"…ƺ ƃ`* ƃ5`:ƌ µšƳ`*­"ƒƹ`Z ƒƹ ƃuc`rƜnƧyƹƒƹ`nƧNƼ0ƹƢƀh\ `ü. `" LďuĕDĕU^t$?^?\üE"$$$$ -.$00000 `8ŸT. `Ǝ ƌƍTJ0ŸŸ02{8I{ƌƎ $$$$%$ %00000C12 `;;Ǎv(Hh(H~ D " d 2 R r 6 * t  > tBFf *LlDFHF hl  0 P p !!!"6""#8#$$%2%T%v%&$&'@'))*@**++h++,6,x,,- -|..p../0 0R00011f123 3*3J3j4 4n45&6,6L6l667N779 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` ;f` ` ;:f:` ;;` QQ:` Q` ;o` Ĭ` čb` TĬT` čSbS` T` wƥ` wSģ `6goi.`>fiwSg2j}#)1wMooz„‹Šlnn^G9?MUO=<9+$):1 ,JO`B 1` Om` 0L`Rfh†—f~tf`r —®&76³¹`-AÁäâÏ_C%5»8¥5™&§`j ™&—6ŸR½ej‡œ$«I®e¥Ãy`JuŠe„]ngLuOÃGË`2oou"È(`4§XvA1-+ +?bƒŠƒmL0.G\\G`2|`2h3xL€g†`2¢‡„~s`R[LBAGWe[`"Z` `Vi¯.`(ŒZ `°ë.`` £åuüuîRR>¿+¶–Ý£å `‡.`‡Û’¹ƒUUÀMÖGå+ûXYø`ëo߇Û `H†.`XU Uƒ½‹„U  `O.`XU ƒ‹¥†ƒ±c†U‰U  `v€Œ4â.`H’Ÿ.µ–݇ے `SªV.`p [NNI;+³o"[N `G˜ z.` Nssm_I ³-8DK[KNs `žÃ.`X¯®ø£å¶ÉÿÉê `~¸ø].`P;¾TðTØ#|[;¾` UŠUu`"uPP` ¢K` sNs`"K((` ³&` N[N`"&((` vۍ` £å;½`*½ƒU` UðU `n§kÖ.`@q÷qþ̱Ìq `V z.Þ.`(ÌZ `V4>X.`(,FZ `V>.`(,Z `V¨>.`(,ºZ `VÎò.`(àZ `V~Îò.`(àZ `<Ì^ö. `ЀHÓJÒXàJîEíEßHßHÓ000 `Cw.`` dCKY9,9qd `#ñ .`€):Nļ„z²ķ² º¯®§˜€ `1s¿.`X²²ķ„zJ8EƒĮ² `=ħ¸ .`X²„ĮEb„¤²² `v‡.`H(q€( ` 5ô.`p ì=M=.;N%`".Z`Jµƪ·Ƒ`JƶƟƂ`R»œ†}z€Ʈ`B¬œ›¡Ƣ`JE^ƿnƦqƉfpC[R`B7ƻEƪJƑ@x#hc`JqƔËƏÞyáZÑ6o#N%`BoƁp`tMYA1<`B@~<Ɨ-ư` ºœƿ` C[C?`RN%¡Ƣƒưrƥ%H PN%`r rƥ[Ƹ,ƻƪƊeTCUVnPƊ5ƗƊ`mJeŦgŗzŏōŝŝŏ=VNSdVpeby`j perUj9L&!`J?K>*DXe `!Ĕ6.`؀&8<+DWĄďďee[];R.F&4&&0D`` sX4` gˆ` ¤eX` 2f»`>-DLXćĎ đĎć $08>-`b ff[`Kee `ü. `" LďuĕDĕU^t$?^?\üE"$$$$ -.$00000 `8ŸT. `Ǝ ƌƍTJ0ŸŸ02{8I{ƌƎ $$$$%$ %00000C13 `8 2ǍHZz ,^~ `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` 9;d;` ;;` W `2O;n{;` =ī=` ĉ=^=`2=ġĔt=` ĸl{l `U. `†U`ƒ\ [†U@+ @00000H1 `Ǎ>PLH `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` Est[BB;; 0 ` ƽĕgwƝĔƈĭuY=]=]d 0 `ŀƺ. `ŀuŠyzŀU+ U00000 `. `†ƒ †@+ @00000H2 `0*ǍDVxv `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"u66?5`:IIg`"ēo66X`:ĿĿeeġƣ `. `†ƒ †@+ @00000 `U. `‡U`„\ [‡U@+ @00000 `ŀƺ. `†ŀuƒy z†ŀU+ U00000H3 ` ǍFX8 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `B < yôy+yôŁ V .V00000 `ŀƹ. `\ŀx\xx\ŀ V -V00000 `. `b^b@, @00000 `+B. `ù,ö@ù@, @00000H4 ` ǍHZ|j `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"r45#ƺ. `òŁ÷@, @00000 `U. `ŒU`‰\[ŒU@+ @00000H5 `" ǍJ\~Lh `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"~04Z`"6K%O`"Ē}04Z`"ĎƩ6KQ| `. `b^b@, @00000 `+B. `ù,ö@ù@, @00000 `"Z. `aZd]b`aZ@, @00000 `0 FX. `þX1bû_D]þX@+ @00000 `Łƺ. `\Ły\yy\Ł V -V00000 `*ł@ƻ. `ôł>zôz+zôł V .V00000H6 ` ǍHZf6 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `RIIyy7`RƼfZxƴĈƌĐ`Đ8 `ł3ƻ. `çł1zçzzçł V .V00000 `"Z. `TZdPb`TZ@, @00000 `Łƺ. `OŁyOyyOŁ V -V00000 `. `UQU@, @00000 `5. `ìé3ì@, @00000 `# 9X. `ñX$bî_7]ñX@+ @00000 `+. `†+6ƒ2 1†+@+ @00000H7 `z tǍN`<X  `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `cG{0  0`"{++ci2 `|ƨĭƨzĕFcz|ƨ0`"ĕ++Lc `6łLƻ. `łJzz7zł V .V00000 `"Z. `mZdib`mZ@, @00000 `Łƺ. `hŁyhyyhŁ V -V00000 `. `njn@, @00000 `7N. `8L@, @00000 `< RX. `X=b_P]X@+ @00000 `+. `†+6ƒ2 1†+@+ @00000 `D ~. `…D9‚= >…DU+ U00000H8 `D>ǍPbZv*F `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"y.5Z`"t^6Acj `. `a]a@, @00000 `*A. `ø+õ?ø@, @00000 `UÍ. `a͗]”’aÍ@, @00000 `*TAÌ. `øÌ+–õ“?‘øÌ@, @00000 `*}@Ƹ. `ñ}?sõv+xñ}"V1V00000 `~ƹ. `Z~t]wyZ~!V 1V00000 `*@!. `ñ?õ+ñ"V1V00000 `". `Z]Z!V 1V00000 ` W. `‡Wb„^ ]‡W@+ @00000`"ĘƷ.5Z`"ĝƝ6^*LkH9 `  Ǎ^p6Xxl <X `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `" -Z`" ('` jj"` %` 44>`" ?+5`"}c -rY` ĢĢ]` __Z` ? `. `a]a@, @00000 `*A. `ø+õ?ø@, @00000 `UÍ. `a͗]”’aÍ@, @00000 `*TAÌ. `øÌ+–õ“?‘øÌ@, @00000 `". `Z]Z!V 1V00000 `*@!. `ñ?õ+ñ"V1V00000 `~ƹ. `Z~t]wyZ~!V 1V00000 `*}@Ƹ. `ñ}?sõv+xñ}"V1V00000 `+. `‡+6„2 1‡+@+ @00000 `Qŋ. `‡QF„J K‡QU+ U00000H10 `::ǍHZz>  \ b V J~f8Np&<RHh Bdj*Jl8Z*Ln !6"##6$&$%:%&>&&&'L'((() )4)*0*r*+z+,v,,,--0-.t.//6/X//00$161222t23|34x44455256v67787Z7788&989b9:@ `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` s`R+y;^;N1BB` ğb`RĀĀ~ĈcęSĴS]vƒ `DWöĺ4|<`H†4ªkªĦdĦdf†4`bvÆØå7ñRßcÏ|ÃÓ|ñyüy|Ç Õ"ðBØpÁĐcijb`uh7\Rnc~|Óñü x"]BupĐijE`Hbªª+†`b)b `F‹<DT<`Hb)bHŽ2• £b)`Hª+ª‹Ž–£ª+`$GoØ ÿ ?[yĦčsP. Û|K$`\R~wÖ÷~m0\?R&JFJÛQz\R`ÆoY@06!SsÓ÷""B2]F|_ĕoĥÃČmwTZB>5)%%ü)Ý2}FMT7j!Æ`ðVßcÉÄ~ázþz~È ×%ð>ú#öÓývðV`Hdf "Lddf`Hªcªªc `VAÄ.`(†AAZ `±v.`؀cPB946?<6+( <GW_ _et‡šªpc `~§U.`P¢›BHP `vŠ.`H&m'V}…&z6d67.-1'0(4A`—s¹T3;=5£m`j A¢ŸªmYNHA` P `.`@(t"`'U3B31@+I,^!i!}11?L]na^{i\KC`z ­5=;¾-¿`7¹T—s`A4(00,`m'V}…&z6d67)'")@SYN`j (0EÁâåÝY OE-"="C8MIN `³5G.`¿¸$¸1¿;BB=* #00(*474¼*¾$`"[''#S!`"=.''#S!`"†''#S!`*)tB‚dŠ `u.` ÉÅÀàzüzÀÉâøú÷àäÌÉÅ `n^·®.`@¨dd½¨½¨ `±ÿi.`cıL;2*Ļ'ĭ,Ę:Ą$ĉć~q^I7064+»¶ ¸cı `ÿ\.`ıĻĭĘĄĉć ~q^I7 0!634E+RW ULHEı `±¼i.`cL;2*',:$  #6K]d^`i»y¶È¸Þìúc `¼\.` #6K] d!^3`EiRyWÈUÞLìHúE `~Ñ.`P®†É®£†`£®`"†AAZ `V[ß±.`(†''Z` d ¨ `2dd$¨$¨` n<ž<`""=22Mr`"Ð22)Mr`"Z22:n`"=229-iU`"%Ð229-]`"22LiU`"# 9`":I`"!8 `~.`P† †4 `n^Ě®.`@¨ĠdĠd¨¨Ġ` dĈ¨Ĉ`2ddp¨p¨` nXžX`""W22 -y.`PpkrsQsKVCp `v _ƾ.`H&3&NZŲZlQ=0/\flŎ}}/Ŏ;ŭ8*­ v T?I`ƍ%Ǝ`I\T?v ­ *8;ŭ/Ŏ}}Ŏg`3&NZŲZlQ=0/\lqj$S@ :E`j kNkŬhŖpōňN*] `~*BR.`P2?*M<@<}N{UoUbNX?Q3Q#Viu}łŋőŔŎ i._<\J_QiOoFx>x>}`"8''P6`"e''P6`"‡Ɣ''P6`*© `~….`P|):Mfo| `~….`P)|ofM:)`B|ofM:)`B|ofM:) `HN7.`ipO·pžkatq‚••wi `~C¬v(.`PM¶pi` UOM¶ `~CEw.`PM¶pžiS`dWzPšM¶`"JM `"fJ9C`"·%4B`*O·pžiS`*O·pi `OE8.`$>¸Ÿ"br ƒ‘––$ `~­J).`P@·$- 8>@· `~FJ.`P@·Ÿ$T-e6{=›@·`" J `"gJCM`"p¸RaV`*>¸Ÿ$T`*>¸$ `VO.`(0Z`"0Z `x. ` || 00000000 `~(QV.`PFFK5:-'-3F `~;dV.`PFKFY__'W:FK`BFY__'W:FK`BF3--'5:FK `\=&.`ĤYĝĤľĽĝĢęČ}kbbĚnĚyėĆĎĖ{ĤY `~ėL.`PľĝĤĤYĭhĸĈľĥľ `~ĖĴ/.`PľĝĤ!ĭĶĽľ`"elJC3M`"eJ `"ĽRaB`*ľĽĝĤ!`*ľĽĝĤĤY `<1%.`Xģļ"++ęęĖčzX `~K.`PĽģXgćĤĽ `~ij..`PĽ Ľ`"(kJ9`C`"( J `"ĝļ%4V`*ļ `*ļģX `V'%ec.`(FDZ`"FDZ `'[e. ` apaP<++p<_P_ap 00000000`*įE`*cıc `. `PMP@+ @00000 `8N. `9LU+ U00000H11 `2820ǍN`^r0 Dn J  Z | J l  6 .@bRt<^&Hh(Hh .Pr!F!h!!!!""("H"h""""# #,#N#p####%&&'`((:(t(()z)**H****+ +$+z+++,,$,F,f,,-.P.p.../0h0001| `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `z \SMM'R2\;;3%`:5 j~=N`z |ĊĵľgĿ\ĵSĉS{[viv|`:ƃħēr{Q^@ `:Ÿ–.`h*—z| „Š‡o&e=eTk_vj‚rtyulxc[VX^kqkaUMHJRc'[,U/J9BD?XGqOzX‚Re‹— `"fA.`X_R< (.*3C5W;_ `¤8.`` Š0 3›Ÿ”Š `ˆz.`˜Ÿ¿ +791´S iˆz˜ `hŽ0X`(4Z`XG`qˆ`*`:Xs`*J`qŠ`Z Š0 3›Ÿ”Š`Ÿ¿ +79¿%`j &.?ÒîëàcUF0s„³Œ`21¶OŸh‰y`2 3JwZZ`B[MGG O[`"Z` ne` h[` n e` `VŽ.`(®Z`"4Z`"oX00@`"x00@`"†00@`"”G00@`"ž00$r` ˜fŒ `o² 0`Po´¹¹ ²Š&„&o´`Po„kŠk o `(A‡80( `<Òà z)t1j#\K8/+*4'E?AHSenÅÒÚëô ".?OWXW'R)b2q?{N[~nqteznÇyÐ~ÜmëRü óÿÄò]á4Ò`EP"b"k|,|8ÂCÏF×HèFñ>þ2@HHE>0!$+!<L TUTO_nx|{nbkv{{oj`OOFFðLÁYZj1y` ¦ -ĹĮ·ğăŠn¦`x f tkĉQģ5Ĺ 8f ` ¦Š!›´(º¯¤—¹‘¦`fV:”ž¬»6Of t(f `Ó.`0 ,9,M?iOÌUåX]þcñsã„à˜â¦ì°ºÓsM3 Dk Ç vbO?-¬˜4‚Uq:^!B!  `Ð.`3ZUO E#:6(L`n|ćččĝijĵ,ģ?ėSăhmyR…>“T¨p·ĘİĿG`ĵtĠÆČ_Č9ăxhRA-º¶³©›ˆwkaZ `n¬ÖĒ.`@E f L %)A]|¶Ý±ÿ±¹%B[ p"~DĉqčÂčÏ~ÂxynsemnbvP;{3v+j&X(OWXUMA6+ñ¿âÒÁ~saMA>%D)/6 IR_m)s3{&Í `"†@@A`"†??Do `VVÛ¶.`(†,,Z`"†,,Z `Vpõœ.`(†Z`"†‹..F|` fŒ†2` ¦Œ†2`"FQ`"FS~`"p3{@`"m5^@`"4`"=`"s#&`"q$` § ‡f`"‡ ..:K` g ‡f`"tvD` tt7` t*K` tÁ` t` t` t*K` tt_` tó;` t` t` tÞ` tó_`"O@''(V`"e'' O`"æ''uG`"''@+`"1'' s9 `"OV''1`"ÙV'')`"Ù@''/@ `nu_Ē.`@E ) A9]J|UÝZÿZRF%4B[p~ĉčč|~xnenv{vjXOWX UM#A%6%++;GJG<1?JñLâFÒ3Á~#s%aM A>D/ )3&~ `"B=q` 7` K` Á` +` ` K` _` X;` H` E` HÞ` X_`"@''0U^z`"e''6f`""æ''?m`""''Fu^`"1''M|`"V''U胫`"rV''h`"r@''FuW `nƣ.`h*vƛ“Ɛ‘Ɔ‰}ƒz†zŽwžm¨V¨?¢4—)‹!Œ”¡ª²·µ¯¢œ¢¬¸ŷŪřŌ»{ªl²g¸dZO;"¾µ»¨vƛ `RŃ.`X|{se`^X| `i[ƾ.`` ƒƹ ƃuc`rƜnƧyƹƒƹ `….`uƙnƧNƼ0ƹƢƀh\+0X`(Z`X ƃ5 ­"…ƺ ƃ`* ƃ5`:ƌ µšƳ`*­"ƒƹ`Z ƒƹ ƃuc`rƜnƧyƹƒƹ`nƧNƼ0ƹƢƀh\23f44 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` ;f` ` ;:f:` ;;` QQ:` Q` ;o` Ĭ` čb` TĬT` čSbS` T` wƥ` wSģ `6goi.`>fiwSg2j}#)1wMooz„‹Šlnn^G9?MUO=<9+$):1 ,JO`B 1` Om` 0L`Rfh†—f~tf`r —®&76³¹`-AÁäâÏ_C%5»8¥5™&§`j ™&—6ŸR½ej‡œ$«I®e¥Ãy`JuŠe„]ngLuOÃGË`2oou"È(`4§XvA1-+ +?bƒŠƒmL0.G\\G`2|`2h3xL€g†`2¢‡„~s`R[LBAGWe[`"Z` `Vi¯.`(ŒZ `‡X4@ `"d þ"'>;/00 ` "Xdþ "-'>+;/00`–6c‡ck›v¤‹¦›£¤‡‹’˜adð·½±³¼¡‡nUB·1–`´¡ĻŠĵzĵfļSD<¤¤è+Hddn|‹˜¡£ `B·8Ph P` 8¾VqÎä7ô^Íõÿô+ãUÈĂgĩPĽ;-Ħā2nMM\1iruuøoÐ_aNC8& $8¾` ½yc6S]GÌBôBHS*dTāĨļĥĀmL0÷Ï`B%½`hĈdn—B.`? ¡· .7GZkyÍÕâñ"4CJLQ`n|ČĜĨĮ&İĸ+<.ī#Ď{R0÷ÐvJ!!.7¼%¯ ¡`"ƒMe`"7þ==&3`"ƒMf `>—D.`?¡· .#73G9Z9k4y!Í,Õ7â?ñ?7(+477"14%CJ LQ`#n%|#ČĜĨĮİĸīĎ{R0 ÷ ÐvJ!¼¯¡`"ƒ! 9~`"þ==SWa`"ƒ f9`"ƒ@@B4 `kUƵ.`` rƥ%H PN%0@ ơƒưrƥ `vƔ¼.`H Ƥ¶Ɣ¶Ʃ¼ƾ Ƥ `dA.`x ƂơƸ1Ư<ƗAx gdƂ `v=D\.`HP3=DAB\(VP `z#á.`;N%o#Ñ6áZÞyËƏpƑnƦ]ƾEII?+»œ†}zư ơš©¿¶Ƨ¹Ɛƀơ%Ƹ6ƺGƥIƎBw#gaQEZhpnƀm_sLU>.;N%`".Z`Jµƪ·Ƒ`JƶƟƂ`R»œ†}z€Ʈ`B¬œ›¡Ƣ`JE^ƿnƦqƉfpC[R`B7ƻEƪJƑ@x#hc`JqƔËƏÞyáZÑ6o#N%`BoƁp`tMYA1<`B@~<Ɨ-ư` ºœƿ` C[C?`RN%¡Ƣƒưrƥ%H PN%`r rƥ[Ƹ,ƻƪƊeTCUVnPƊ5ƗƊ`mJeŦgŗzŏōŝŝŏ=VNSdVpeby`j perUj9L&!`J?>`:e e>K`*e> `\h.`p y+i>aQi]yab" `V$^d.`(>DZ`">DZ`Z y+i>aQi]yab `Ė(.`{![be ~#ČđČ{`{![be ~#ČđČ{ `. `PMP@+ @00000 `8N. `9LU+ U00000H13 ` ǍHZz ,^~ `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` 9;d;` ;;`2O;n{;` W ` =ī=` ĉ=^=`2=ġĔt=` ĸl{l ` g. ` ùv‰ LvúI‰g¸ ù %"! "000D1 `~xǍ>PLH` `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` M{|cJJ88 0 ` ēeuƠĒƋīx\@[@[g 0 ` . ` a‡JbG‡¶ a %"! "000 `f . ` ‡fJGX‡¶d  %"! "000D2 `\VǍDVx&> `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"ēl66X`:ĿĿeeġƠ`"66?5`:TTr `. ` a†IbF†µa %"! "000 `f. ` †fIFX†µd %"! "000 ` g. ` ù¼v‚ EvúB‚g± ù %"! "000D3 ` |ǍFX4Ld `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `B ) )goo9` Q;;`B_mmƁą}}A` ě?e? `. ` bNcN}b %"! "000 `3:. ` :bø{3cxø:b %"! "000 `^ƺ. ` N^ PNƺ}\  %"! "000 `3^:ƺ. ` : ø^{3 xPøƺ\:  %"! "000D4 ` zǍHZ|2Jb `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"{45#^rwƠ0`"Đ++Lc `iM1  0`"++ci2 `. ` d!N!eN}d %"! "000 `3:. ` :d!ø{!3exø:d %"! "000 ` g. ` ùvN vúNg} ù %"! "000 `3 :g. ` :ùvø {v3úxøg :ù %"! "000 ``Ƽ. ` N`RNƼ}^ %"! "000 `3`:Ƽ. ` :ø`{3xRøƼ^: %"! "000 `8. ` ŠG†IG‹F†8µŠ %"! "000 `@Ŝ. ` ī†@IīF2†Ŝµ> %"! "000D8 `  ǍPb2Jbz `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `"y.5Z`"t^6Acj`"ĘƷ.5Z`"ĝƝ6^*Lk ` . ` ^N_N }^ %"! "000 `3: . ` :^ø{3_xø :^ %"! "000 `Dà. ` ¯ND¯6Nà}B %"! "000 `3D:à. ` :¯øD{¯3x6øàB: %"! "000 `4. ` ĆCNCćN4}Ć %"! "000 `3:4. ` :ĆCø{C3ćxø4:Ć %"! "000 `l. ` Nl^N}j %"! "000 `3l:. ` :øl{3x^øj: %"! "000 `d. ` ös†Is÷F†dµö %"! "000D9 `  Ǎ^p6Xx0 H ` x `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `" -Z`" ('` pp!` $` ::=`"s (+5`"qc -rY` ĚĚV` OOZ` ? ` . ` ^N_N }^ %"! "000 `3: . ` :^ø{3_xø :^ %"! "000 `Dà. ` ¯ND¯6Nà}B %"! "000 `3D:à. ` :¯øD{¯3x6øàB: %"! "000 `4. ` ĆCNCćN4}Ć %"! "000 `3:4. ` :ĆCø{C3ćxø4:Ć %"! "000 `l. ` Nl^N}j %"! "000 `3l:. ` :øl{3x^øj: %"! "000 `+. ` }:†I:~F†+µ} %"! "000 `4Ő. ` ğ†4IğF&†Őµ2 %"! "000D10 `9T9LǍ@Rr6*J:NR ` < \ (  T&BX.8X$VvPV`Jj6hbh ( !!r!""\"|"""#J#j####$ $*$J$&>&^'N'(b()f)***t*++,,|,-H-..(./t0 0d01P12$23(3445x56H6784 `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 ` s`R+y;^;N1BB` ğb`RĀĀ~ĈcęSĴS]vƒ `~§V.`P¢›CIQ `v‹.`H&n(W~†&{6e68..1(0(4A`—t¹U4<>6£n` Q `.`A)t#`(U4B41A+J,_!j!~11?L]na^|i]LD`z ­6><¾.¿`8¹U—t`A4(00-`n(W~†&{6e68)(#*ATZO`j )0FÁâåÝY OF.">"D8NIO `³5H.`¿¸%¸2¿+ #00 (+585¼+¾%`*)uBƒd‹`Z nQIAœ¡¡­` y y `f2w.`8nM9n `fNV.`8MD+M `f;ƒ4.`8D+y CD+ `fp¶.`8y ­xy ` n­ `^á.`ĽĠ:ą_o~dÐ_á^Î}{Ę_ĴF- `Y4.`a4YY^ÔilxEÎâ5õaÈõú#Û&{,a4 `wu.`;TgwdV:I^=È8ï7;$@C%Qgu[< øwQ$0; `@/ĩ.`` @Ħ†/ĩ¸Ĝ§ĕ“ē{đ\ę@Ħ `†Ī.`h †/ 2YučěĪ†/ `„.`p L„/ķċ \= `†:.`p †g¯:" :Tw†g `†.`h ' 2=†gL%Æ"g= `>e.`X>\o–°†e> `!'.`P=/!F"m'é%5fĜķIJĜĂY*ç}dP `Fa|.`RonmgaÅæ:Y~|ndZ=LFF÷LÈRo `k™%5.`k5yº§%™¯)2k5`"…@@Dn`"†@@B` ¸`j k52) ¯%š`b Tonmi_N>)/=`2NV¶]¢aŽ` -` ` ` ½` ¨`Z bŒhœs¨~­Œ­—ª¢Ÿ§–¨Œ `7C.`؀N]m€“¤¶°¤–Ÿ¸¸¢3¢‘€gO=FN`R_Û$Jj~Ā `nG+ì.`@P"rärP `nÜ-.`@ä$ä `nV.`@BN) `nGħ.`@PĞĞzP `~vQ6.`P%È'ì'"L%È`*K$Æ`B!BlĘĽ` @ħSĆ`j à_ÇbkkPx7Ĉ&ėĤĸ`b ÷%Ý'Ä+^5=F!VkāĖĪ`2½µ®ª` Êătg` qĤOz` Sľ.đ` 2ĭ`  `Z ©£˜tidc ` Q.`؀½®ľžĸ‹ĵxĶgĺUF:41@ħSğSĆiaiėzē‹ē¤Ė¼ġĪĽ½`Ra5YY^ÕhptJÂ*Í `nHM.`@?D"69"?D `nÎC.`@6:×66 `n>Wà.`@:×ROFDk:× `nM.`@PDvaPD `~º^.`P Úu¿ `*uI`BsR(,:` =` K¢5` ja` KĬ `nbȬ .`@†Ñg†§†Ñ` HY` V¡` e-¢-` sH—H` sN—N` ki¥i` ³ĂjĂ` ęªę `~f?y.`PpkrsRsLVDp `v _ƿ.`H&3'NZųZmQ>00]gmŏ~~/ŏ;Ů8*­ v!T@IaƎ%Ə`I]T@v!­ *8;Ů/ŏ~~ŏh`3'NZųZmQ>00]mrk$TA ;F`j lOkŭhŗpŎʼnO+] `~+BS.`P3@*N~N|UpUcNY?R3R#Wjv~ŃŌŒŕŏŀ j.`<]J`QjOpFy>y>~`* © ` •Ɗ•Ɗ `f>b.`85&G3[5& `f>Ƅ.`8Gi|G `f‹`Ʀ.`8i•Ɗƞi `fWƁ.`8”Ɗ`Ƭ•”Ɗ`Z 3'WDtLtRpjpk`Ƭ` `Ƭ5& `Y.`X,YY' `V.`s  ne^ [[bis `4.`h kX99?cs`Z m]98;`m`pb][] fp  `R,YY' `~Y.`PmYYm `Vi.`(u Z `~0/.`P00//0 `24ąv.`XąvąoĂa_4W45f2r2v `qĹĨ.`ĜģģĠĘČā yvġvĪ{ıāĴČĴĒĭĝĦĠĜģ `.ĝČY.`h ĆģĆ"}5aTYTPN5*44ģĆģ`Z ąģą 0bT\UTR5-2 2ģ`lģğģĭĝIJĔĴČIJăĩyğvv {āČĔ ĜĢģKģ`RąvąoĂa_4W45f2r2v `~Mģl4.`Plģl `4X4M Mģlģ `~Mvlu.`PluMuMŠXv`vlŒlu `VP h%.`(\ Z `. ` 6ĐV7zVą6 %"! "000 `8Ū?. ` ?XŪ8Y}Ɯƨ?X %"! "000D11 `3z3rǍL^ZH(Ff  < \ t P @ ~ f  t:\|*Hzl*|J> p~8Xx n!,!","N"p""#z##$$$%%<%\%|%%%&L&''~'((()`))* *.*P*+++,N,---../J/j//0T011B2Z `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `e0X`(6Z`X IbnŠ  `¦5.`` Œ -0¡–Œ `€.`š¡(46.¶P¢fŠwš ` áU.`µ § °GeÁÜ*ÇLx/`I+ `Š.`§(™I’O§Z¹kš°¼¾«š‘— §³p P4"³§`*`:Xs`*J`qŠ`Z Š0 3›Ÿ”Š`"4Z`Ÿ¿ +79¿%`j &.?ÒîëàcUF0s„³Œ`21¶OŸh‰y` ˜fŒ`2 3JwZZ`B[MGG O[`"Z` ne` h[` n e` `VŽ.`(®Z `"fA.`X_R< (.*3C5W;_`2Rs/bF `‘.`wƝpƫP2ƽƦƄl`>^Hf[Do.‡wƝ `kXƻ.`` …ƶ ƀr`]tƙpƤ{ƶ…ƶ `z@(0X`(Z`X ƀ7¯‡Ʒ ƀ`* ƃ5`:ƌ µšƳ`*­"ƒƹ`Z ƒƹ ƃuc`rƜnƧyƹƒƹ`"Z`nƧNƼ0ƹƢƀh\b ‡ « ª `ÎÞ.`FkÉL`Ó]ÆTg?H&(  `e.`h A`ÓXvGR&*A`R %(ALOeZ}`Ñ `½@"T.`L  úáÈHbÁå"3L `ÃF .`` AÌ è   `fzUûë.`8Á\ó]ÎßÁ\ `fTÓÕ.`8[ÚÍÛh[Ú `f-n1.`84fA%4 `fGs.`8 $?%g $ `Ĉ .`(IOZkš°¾ ķĠ³ĐpčPĘ4Ĩ"Ĺ `faķ.`8hiīh `X.` ĵöbÆöò8ÌĀjĪ<ĵ` õ]ķ`"†Š"(Y)`"†Š>B,`"‡I5Si`   ` = ` Y8>` vJ\` "×X{` 3óWâ`"|qo%44 `7Z.`TK) èÃbI>†å†ST`"|"7 `7Z.`TK4)A JJJè?Ã1bI >ˆåˆ!ST`*@‡ç>` Û,ĝ `D.`ȀJe eiv‡•¢¨© ¾³¥”‡q`TLJ `=ħ.`h I섇Ęę©ďċvċ[ĐIě `~B.`:ġ!ķģzJ/Nnć*ę:ġ `ÿJĦ.`h  Dl!Ė:ġDě`j  Ŀ)į>Ğbč‡Ċ«ďĝĶ `"† "(.CZk`"† >B.'Y`*ĖˆGě`*S‡X `kA.` ĴēplJgąĞķ `R:ĠēĄnJ1`"…Q&[ `@QT.`L úáÈH/b?ÁJåLGA7",3L` DĚ` /v Ċ`  Yv`  =X`  :` ` ` B`*E„ä `fTB.`8;\:; `fwç.`8ó `ffü.`8õôrõ `f$ z.`8sr0s `f16.`8*/.*/ `A¨$>.` V4IFFøLÈZ^¯­` Z5$` tkH `à .`` Ìè`"qoRHa`"Oidb `hOæ¿.`:Uì¹ì¹UUì`"†AADo`"†AAB) `fmE§Ƣ.`8Qvƙ ƆQ `fs²].`8Q¬)ˆQ `fţ½.`8Š·“ŭŠ `f‡OŹ.`8“ŭŅZ“ŭ `f‘f.`8Z3¨ Z `›7>.`p 7¥¥'' 7 `–3@.`j ·¾·· `  ` ¾ `P.`"Z `Xā.`p 6_OćzĭM,,ģģĊ6_ `pk.`j dw\Ħd.Ĭww-Ādw` Zĩĩ` .. `PĖC.`".īZ`z [RLL)Q4[==5'`:4 i}?P`z {ĉĴĽiľ^ĴUĈUz]uku{`:ƅĦƁĒtzS]B `8ū?. ` ?Yū8Z}ƝƩ?Y %"! "000 `. ` 8ĎT9|Tă8 %"! "000D12 `==ǍL^:\BZp l R T < ^ v b&\Xx ,LlR8tfXz !~##$$R$$%0%r%%&@&`&&'D'(8(())**L***+.+,$,n-$-./:/00111122&2F2f233N445j66678f888899&9F9f99::>:^:~::::;;>;^;~;< `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `:(.`x (#!/8:: ( `6enŽh.`>ehuRe1h{!'/vKnmy‚‰Žˆjll\E7=KSM;:7)# (90 +;IOe`"Z`J";ITR`J +8<; `R*1wNomyƒŒ‰`B9G]mnh`J09`B# (`J~kh1xUhf`B +>JO`B 1` Om` 0L`Rfh†—f~tf`r —®&76³¹`-AÁäâÏ_C%5»8¥5™&§`j ™&—6ŸR½ej‡œ$«I®e¥Ãy`JuŠe„]ngLuOÃGË`2oou"È(`4§XvA1-+ +?bƒŠƒmL0.G\\G`2|`2h3xL€g†`2¢‡„~s`R[LBAGWe[`"Z` `Vi¯.`(ŒZ `0đ.`h 00đb !È>% 0 `6€O.`> ‡»Š’Ÿª5»H>2$3Tz×=g-Đ>ĭIĿ5!įą\;òÀQ%'¹­§µ¥­²œ¾Œ{kW°O£6ªµ —6ŽT‰e‡e”m yª‡ª’¥œŸŸ— ‡ `£5.``)1"µO£Yµk~”ª¸µ¥­¹' -_Ë/[ē5ĸ}¹N°ªªå­s¸C”h<1 `6· .`>fK)įęzX7ÖuN$½/Præ :fčĹ,FQYjz‹›¯·²¡¡™tjgf `đ.`h đb!È>  `˜.``)ğ·­›ˆr\Q-ĸā ]+Ê[ /¼¨ž$? MŽ.`PŽ€q\F>Œ`J;Wkq€‡ `Uuz.`fuz”q«ootyeZUUU¨]Šfu `j† .`®¨yŽs£oosw® `u?.`.u”#«%% /:???¨7Š.u `†* .`®¨ Ž!£%%!®`j ynfq]‰UªSV^ elw`j Ž&0q9‡A§BA90 & `Š^.`¥™””œ§?FQXYYSJ@¥`¥™””œ§?FQXYYSJ@¥` ĭĭ` ` ` ` ĭĭ` ` `  `~!8V.`P7'!#'84N8V8`J:Y)=")!#&- : `Ċzį.`ĞĊēĕĕĺĐğċēğzĪĖįİįįħ Ğ `MĈĚ.`Sg|ċđĕĕĻđĦčđĂěqĦcĭSİS `z.`ĺğēzĖİ  `Ĉ'.`! ĻĦđěĦĭ!İ!`j ċĖĞ#ħ įıĮġĦĉğuĘăčđ`j # ĭčtąĐ `6X .`SNH=5*$!!U"N'C1<8;@;KAQJSTS`SNH=5*$!!U"N'C1<8;@;KAQJSTS` S!` S!` S¨!¨` SŒ!Œ` S!` S!` S¨!¨` SŒ!Œ `x-Xh.`Ji` ` >^F.  nV>&0*L2T: `Ǎ. ` XĸX5ĸDžXDž5XX,,,,00000000 `b ą=ąċĕĥĵ`{I8-Ĺ#Ĩ#Ě(č4ĉ?ćDć{ďƌĚƗĩƜijƜƖƊ{` Ņ` ąř` ıăŅ`2ĂjjĂ` 0Ă0` X`b ĥĖĉĄĺĄĭĉģĖėĢĖĖ` ĪĖĀX`b Mn^NC??`==AARJ][gkgyaVKEyj`OB=` >>` ?` b`2 > >““` >ZZ` ?°?2`b ?¶n¶~¹~q?` i2 `E.`nxŒ ¨%½Cby•½­§¼Žn¼Z°JšJ|TcgL{;ƒ*€n `I.`$!(9"P6j@D›@¶.¦‹pZH3$ `…%.`"œ)•@eŠŽ˜¥» i \WYºP©>"œ `Ð.`+$)I`y*E^xxeÅIË.lR7)#+ `À~.`æÓÈ3ÅOÌhÙsñyqdM /  `Ē.`~o^?%"8 U o(=]roćRč7ćy fci~ `%r".`1,*1>IJOĘaĈz{wĄĒİt\H81 `Kő.`ňŅoJ&8BF8.$>JLZnň `?Ÿ.`‰ũ|ŢnŗXwJVD7F N_{‘¯¿8·N aˆk}}|Œ‰ũ `WŇ.`O}Gł/{ jU=( *ALJ?3/H/]8pO} `4z.` ðÌnZF9>ıEĜ^ĆtÐĀèđõħüú `| NĞ.`DeAo.~ ĎėęòēÙćÅrÁUÂ?Ó#æ)D^k+pDe `ÕÈd.`\÷^ÿO4 íßÚßðìÞÍÍØë4G\÷ `}DÒ.`;?53#S nÁÉÿÍäÆÑpÅ_Â=Ë)Þû -0+';`"ˆZ `3c(.`ûlrˆ°òÜÄ#hR?8=O¯g¤ÄŸß£ñ˜ýˆûl ` Y.`#,:*JNRpT‘L¦@+°•weVQ&B,-#`*`ë„#¦ë`"èbb, Zp `b òïr_ë0 `b xyÙu`",,>:G`"èbb,k[ `b jòjïr§ë6 `b xy Ù1}`",,?=H `V.`($$Z `VF.`("$$Z` İij `+Eĕ.`NĂ_ČrĒ„ĕ”ĕ©ČºĂiSOUU¯HžE’H„OvHjEYHNODU8U1O+S;iNĂ `s Æ0`XuÀÆÆ~ssu`X uÀÆÆ~ss u JOKER ``AXǎ|"6 b >    x2x\@$f$Fp*6`$FhD `ǎ. ` XĹ X 4ĹDžXDŽ4XX,,,,00000000 ` Lj0(`]s¡lO|!mM. įę^Ā;[%4 ûÑ$dI-i`؀8DfwZ£]l#%(;-W6vIĒeĨËĸúĵĥă@Z\6fjƖ&Ɩ( 1t1M( ƺƖƖjgXB{)o_\_åo{S:-* `y .` Ĕ Č@yęš L L6 Ĕ  `ęL ÷.`x ęš L ÷÷Úo6ĭę `nc@y{.`@g@c{sbyLg@ `9LĶf.`x yLėjħÉĶøĶĠ{FT_9fc{sbyL `~m{c.`Pc{9fjęm7c{ `c S.` cįćĞIJĂ\8 Y&Ĝ?cScį `vc&}.`HcSĜ?&`*`"„-YJ`*%(`"D6o `nrŗ*ƥ.`@ŧÁƖƖŧ`*jƖ&Ɩ `1.`p ¼+š1w1R+.`"…ƒ[,`*ƖƖm`"B`**` XĹ`  X 4` ĹDŽXDŽ` 4X`"ĺXPPCZ`"Ĺ5PP`"X4PP-`"XXPP-C `up2z`H&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`p //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl`B&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`j //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl1 ``AXǎ|"6 b >    x2x\@$f$Fp*6`$FhD `ǎ. ` XĹ X 4ĹDžXDŽ4XX,,,,00000000 ` Lj0(`]s¡lO|!mM. įę^Ā;[%4 ûÑ$dI-i`؀8DfwZ£]l#%(;-W6vIĒeĨËĸúĵĥă@Z\6fjƖ&Ɩ( 1t1M( ƺƖƖjgXB{)o_\_åo{S:-* `y .` Ĕ Č@yęš L L6 Ĕ  `ęL ÷.`x ęš L ÷÷Úo6ĭę `nc@y{.`@g@c{sbyLg@ `9LĶf.`x yLėjħÉĶøĶĠ{FT_9fc{sbyL `~m{c.`Pc{9fjęm7c{ `c S.` cįćĞIJĂ\8 Y&Ĝ?cScį `vc&}.`HcSĜ?&`*`"„-YJ`*%(`"D6o `nrŗ*ƥ.`@ŧÁƖƖŧ`*jƖ&Ɩ `1.`p ¼+š1w1R+.`"…ƒ[,`*ƖƖm`"B`**` XĹ`  X 4` ĹDŽXDŽ` 4X`"ĺXPPCZ`"Ĺ5PP`"X4PP-`"XXPP-C `up2z`H&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`p //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl`B&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`j //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl2 ``AXǎ|"6 b >    x2x\@$f$Fp*6`$FhD `ǎ. ` XĹ X 4ĹDžXDŽ4XX,,,,00000000 ` Lj0(`]s¡lO|!mM. įę^Ā;[%4 ûÑ$dI-i`؀8DfwZ£]l#%(;-W6vIĒeĨËĸúĵĥă@Z\6fjƖ&Ɩ( 1t1M( ƺƖƖjgXB{)o_\_åo{S:-* `y .` Ĕ Č@yęš L L6 Ĕ  `ęL ÷.`x ęš L ÷÷Úo6ĭę `nc@y{.`@g@c{sbyLg@ `9LĶf.`x yLėjħÉĶøĶĠ{FT_9fc{sbyL `~m{c.`Pc{9fjęm7c{ `c S.` cįćĞIJĂ\8 Y&Ĝ?cScį `vc&}.`HcSĜ?&`*`"„-YJ`*%(`"D6o `nrŗ*ƥ.`@ŧÁƖƖŧ`*jƖ&Ɩ `1.`p ¼+š1w1R+.`"…ƒ[,`*ƖƖm`"B`**` XĹ`  X 4` ĹDŽXDŽ` 4X`"ĺXPPCZ`"Ĺ5PP`"X4PP-`"XXPP-C `up2z`H&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`p //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl`B&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`j //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl3 ``AXǎ|"6 b >    x2x\@$f$Fp*6`$FhD `ǎ. ` XĹ X 4ĹDžXDŽ4XX,,,,00000000 ` Lj0(`]s¡lO|!mM. įę^Ā;[%4 ûÑ$dI-i`؀8DfwZ£]l#%(;-W6vIĒeĨËĸúĵĥă@Z\6fjƖ&Ɩ( 1t1M( ƺƖƖjgXB{)o_\_åo{S:-* `y .` Ĕ Č@yęš L L6 Ĕ  `ęL ÷.`x ęš L ÷÷Úo6ĭę `nc@y{.`@g@c{sbyLg@ `9LĶf.`x yLėjħÉĶøĶĠ{FT_9fc{sbyL `~m{c.`Pc{9fjęm7c{ `c S.` cįćĞIJĂ\8 Y&Ĝ?cScį `vc&}.`HcSĜ?&`*`"„-YJ`*%(`"D6o `nrŗ*ƥ.`@ŧÁƖƖŧ`*jƖ&Ɩ `1.`p ¼+š1w1R+.`"…ƒ[,`*ƖƖm`"B`**` XĹ`  X 4` ĹDŽXDŽ` 4X`"ĺXPPCZ`"Ĺ5PP`"X4PP-`"XXPP-C `up2z`H&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`p //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl`B&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`j //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl4 ``AXǎ|"6 b >    x2x\@$f$Fp*6`$FhD `ǎ. ` XĹ X 4ĹDžXDŽ4XX,,,,00000000 ` Lj0(`]s¡lO|!mM. įę^Ā;[%4 ûÑ$dI-i`؀8DfwZ£]l#%(;-W6vIĒeĨËĸúĵĥă@Z\6fjƖ&Ɩ( 1t1M( ƺƖƖjgXB{)o_\_åo{S:-* `y .` Ĕ Č@yęš L L6 Ĕ  `ęL ÷.`x ęš L ÷÷Úo6ĭę `nc@y{.`@g@c{sbyLg@ `9LĶf.`x yLėjħÉĶøĶĠ{FT_9fc{sbyL `~m{c.`Pc{9fjęm7c{ `c S.` cįćĞIJĂ\8 Y&Ĝ?cScį `vc&}.`HcSĜ?&`*`"„-YJ`*%(`"D6o `nrŗ*ƥ.`@ŧÁƖƖŧ`*jƖ&Ɩ `1.`p ¼+š1w1R+.`"…ƒ[,`*ƖƖm`"B`**` XĹ`  X 4` ĹDŽXDŽ` 4X`"ĺXPPCZ`"Ĺ5PP`"X4PP-`"XXPP-C `up2z`H&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`p //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl`B&WWmeĩƒšıµµµ¾ª”~u"u>~Z”j­ppĩpĿd>¸ kR3ĸf`j //gč%Ĭ> įw/`µµ(»222S2Ċ-ěĵ½ĭċl5 `8Xjx6`bdyH*qad`i.DWLD.SXEA.EDW  \1,000 |}fgjn|}k'e@eOSm1 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \2,000 |}fgjn|}k'e@eOSm2 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \3,000 |}fgjn|}k'e@eOSm3 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \4,000 |}fgjn|}k'e@eOSm4 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \5,000 |}fgjn|}k'e@eOSm5 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \6,000 |}fgjn|}k'e@eOSm6 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \7,000 |}fgjn|}k'e@eOSm7 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \8,000 |}fgjn|}k'e@eOSm8 `8qjx6`bdyH*qad`i.DWLD.SXEA.EDW  \9,000 |}fgjn|}k'e@eOSm9 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \10,000 |}fgjn|}k'e@eOSm10 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \11,000 |}fgjn|}k'e@eOSm11 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \12,000 |}fgjn|}k'e@eOSm12 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \13,000 |}fgjn|}k'e@eOSm13 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \14,000 |}fgjn|}k'e@eOSm14 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \15,000 |}fgjn|}k'e@eOSm15 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \16,000 |}fgjn|}k'e@eOSm16 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \17,000 |}fgjn|}k'e@eOSm17 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \18,000 |}fgjn|}k'e@eOSm18 `8]qj6`ddH*qad`b i.DW LD.SXEA.EDW  \19,000 |}fgjn|}k'e@eOSm19 `| 8ul~6`FdlH *qad` i.DW LD.SXEA.EDW  One Pair |}fgjn|}k'e@eOS One Pair `~8Rdu6`HdH *qad`W i.DW LD.SXEA.EDW  Two Pairs |}fgjn|}k'e@eOSTwo Pairs `8dd6`LdŵH *qadQ`Q i.DW LD.SXEA.EDW  Three Cards |}fgjn|}k'e@eOSThree Cards `8ddW6`JdaH *qad` i.DW LD.SXEA.EDW  Four Cards |}fgjn|}k'e@eOSFour Cards `8Ņdd6`Jd!H *qad` i.DW LD.SXEA.EDW  Full House |}fgjn|}k'e@eOSFull House `tj 8Ddd6`4dH*qad|`|Ii.DWLD.SXEA.EDW  Flush |}fgjn|}k'e@eOS Flush `|p 86dd6`:dH *qadn`n; i.DW LD.SXEA.EDW  Straight |}fgjn|}k'e@eOS Straight `8Kd6`RdƀH*qad`i.DWLD.SXEA.EDW  Straight Flush |}fgjn|}k'e@eOSStraight Flush `8Kd6`RdvH*qad`i.DWLD.SXEA.EDW  Royal Straight |}fgjn|}k'e@eOSRoyal Straight `8Ɉdd .6`jd$H*qad`i.DWLD.SXEA.EDW  Royal Straight Flush |}fgjn|}k'e@eOSRoyal Straight F `ph8dd6`2d’H*qad.`.i.DWLD.SXEA.EDW  Buta |}fgjn|}k'e@eOSButa `8§o9d8P `5]ƒ. ` YY/ 9/9,,,,00000000 `2dàCH*qad<`< Stop |}fgjn|}k'e@eOSstop `0Aͬ. ` @A@̈́ͬͬ̈́0000000` ˸¼,¼` ,¼,H` ˸H,H` ˸¼˸(` (H` H˸H` ˸(( `&j.`eF3_Leke~_„_‘e°eX?&?&°3—L—‘&~9k ee `Ÿ4J.`h ½L½ª?3L?9?½L `~!WD.`P'@@L93-'' `'×e.`p ll-e9_?-?-_l_ÅRÑ9Ñl `ê:e.` ðð9ýLX_4_4??3 `=e.`` 77__ `nG.`@MMM `nG,.`@MM&&M `nG,.`@MM&&M `nG,.`@MM&&M`:MM&&M `nG:e.`@M@M__@M@ `se.`___._NN_m_m;(- `ŵOe.`h ŽG-__-Ž `Bc.`` <<]] `@d.`X(ĽķĤĘrYSMMS fr đ&Ğ3Ğ9Ę?ċFFr?l3F3F?SL_Xr_Ğ_ķR?&ķĞ ċxrrċĘĞĽ `@c.`X(ŽŷŤŘrSMMS frő%Ş2Ş8Ř>ŋEEr>l2F2F>SK_Wr^Ş^ŷQ>2%ŷŞ ŋxrrŋŘŞŽ `v:b.`H&ƷƱƞƒlSMGGM `lƘ1Ƙ7ƒ=ƅDyDl=f1@1@=MJl]Ƙ]ƱPƽ=ƽ1ƽ$ƱƘ ƅrlyƅƒƘƷ ` ̆şϣƖH `Iϣd.`X(I3M"X exρϊϐϘϟϡϣϡϘω{&k1_5_BaOeWkYpYxUσMϐBϘ5ϛ7ϙBϐMZv`gdcdXbRYMQKJI͝S͔^͎`ͅc}cwbv^tVtIw8͆ ͈͊͊̓ͅ}vngY/IOCZ=c+c?PRRůAů `.̆ş.c.`=--*ŵ(Ť ŨŪŪŦŠşŠŦ̽ų̛̋̔̋̇̆̇/̑E̤X̳`̺bccbX I:/)-EIQSS̿O̶I̯B̩:̥1̤)̡̡ ̥̰̾ųŮŬŪŪŬų!%(. `ͮ/d.`x,ͽ͵$ͳ*ͯ3ͮ>ͮDͯOͷZbddbQDQ\bdd^S&F+9&5HS SOK;'*// ` Y.`؀&/,    `^θPƖ.`0CƖƕƏ!Ɔ&~)q)i%bZW SOKJFD<7<<;%-0"589954GNPPLC=8.#&,17@FMQWY`hκoθsθxμƂƋƓƖƖ `#1.`Ѐ  &,/11*"! ##! `^Ƌ.`^`dimuxƀƆƉƋƋ ƇƂzwoib^ `>9d.`?9 EOT^cmoqo\9r·ΔΚΧήδθκθΩ(Σ;ΞMΞSΟY΢YΫOκ@ν;>κKήZΥ`Μd΍dΉ`·W·O΍>Ξ΢ΣΣ΢ΞΘ·x`FWYOd9dH>SXZZXWO>9  `̧/ό&D*>  `-/&.`46&.$--.28AKW_evnjz}d}fr|r·TΏIΠ8Ϋ2α0μ//028- ʹ͚ͣ͌ͅvcO<-#$"- > F#\/s>ɀPɋaɏnɏ `FVoɃ.`YV]VfXj\neoqnɃhɃ[ɂQ~JxFqFiJ`PZWVYV `V<Ͳz.`("̓͐͛ͧͬͰͲͲͮ-ͧG͟Z͔k͋t͇zitXiOcM^KTMIQEVA^Ak>efx܎ܶxɠ/ɠ HfqR 1 K  ` ӠPh6`b ԹԑiAӠ HfqR 1 K  `  Ĵ]Ph6`b 55 ]ť }]U -]55Ĵ HfqR 10 K  ` HͰPh6`b Ͱva9̙̇H HfqR 10 K  ` %uhPh6`b MhM.%u%uӡ%yuQM?M HfqR 10 K  ` TӤ~Ph6`b |~|DT/ӤTӤϷTϏӤg|U| HfqR 10 K  ` %uXPh6`b MXM% u%Ϲuϑ%iuAM/M HfqR 10 K  ` Ͻh Ph6`b ˖Ͻˁ YϽ1 Ͻ ʹʧh HfqR 10 K  ` M۝DPh6`b uDu M۝Mϥ۝}MU۝-uu HfqR 47 K  ` ԕ`Ph6`b Խ`Խ&ԕԕљԕqIԽ7Խ HfqR 47 K  ` Յ0̘Ph6`b խ̘խ^ՅI!ՅՅ˩ˁխoխ0 HfqR 47 K  ` E˨ŕPh6`b mmEŕ̙EqŕIE!ŕmm˨ HfqR 47 K  `"Ͻǘ Ph6`b Ͻȱ ȉϽa 9Ͻ ǘ HfqR 4.7 K  ` $T0јh:Z` T`*} }`b јZFШЀn0 Hfq•ϒR 10 K  ` $UPh:Z` UҰҰ`*~Ұ~қ`b PҮ҇`8& Hfq•ϒR 10 K  ` $hh:Z` Ԕ`*EԕEӳ`b ԽhԽ*ԖԖӟԖxPԽ>Խ Hfq•ϒR 10 K  ` $Eʸڭˁh:Z` ˁ `*!X X`b ڭo[4ʸ ʸٽٕʸكE Hfq•ϒR 10 K  ` $H-h:Z` ܍܍̙`*ܡ܍̘x`b -pp̗ܴH܋̗dH=̗Hpp Hfq•ϒR 10 K  `(D ƆƖɩ# ld"Df2Tv<\|$Fh4Tt@b ,Np > ^   l`"Ʈ((Z`"Ʈʒ((Z`"ƮR((Z`"Nʺ((Cp`"N ((Cp`"NZ((Cp`"N˪((Cp`"N((Cp`"NJ((Cp`"N̚((Cp`"N((Cp`"N:((Cp`"N͊((Cp`"N((Cp`"N*((Cp` ʒNʒ` RNR` Ǟ`"Ʈ((Z` Ǟ"Ǟr` "r` "r`">ǚ((C`">((C`">:((C`">Ȋ((C`">((C`">*((C`">z((C`">((C`">((C`">j((C`">ʺ((C`"> ((C` ȶr>r` ȶ2>2`"2((Z`"b((Z`">͊((C`">((C`">*((C`">z((C`">((C`">((C` ȶb>b`">j((C`">Ϻ((C`"> ((C`">Z((C`">Ъ((C`">((C` ȶ">"`""((Z`"B((Z`"r((Z` >BȶB `(\̊.` s{̃̆̈̊̉̈̆̃{wnjfb_]\\]_bfjns` rȶr`"r((Z `(LjǶ .` ǶǴDzǯǫǧǟ ǚ ǖǒǎNjljLjLjljNjǎǒǖǚǣǧǫǯDzǴǵǶ`vEBH"GadH`HHHHH S (@OG  |}fgjn`vʺEH"GadH`HHHHH S (@OG  |}fgjn`vEBH"GadH`HHHHH S (@OG  |}fgjn`vE2H"GadH`HHHHH S (@OG  |}fgjn`vEH"GadH`HHHHH S (@OG  |}fgjn`vЪEH"GadH`HHHHH S (@OG  |}fgjn`xǐVўH"Gadl`lHHlH S (@OG 41 |}fgjn `(,.Z.` .C,K*O'S#VXZYX VSOKG>:62 /-,,-#/'2*6,:->.C Hfq-A  ` $U8͈P<\|` 8͈` U`}`` `` ``}8͈.`2`}8}͈` Hfq޲ 1S1588  ` $-̗}7P<\|` -̿}̿` U7U` U̿U̗ ``-̿}.`2U̿-}U̿ Hfq޲ 1S1588  ` $f0ƀP<\|` 0ƀ` fX׎X` XX ``׎0ƀ.`2X׎0׎ƀX Hfq޲ 1S1588  `()i@Dd$Ff` Mӡ֝ӡ` uu` uӡuy ``Mӡ֝.`2uӡM֝uӡ` ֝ӡ֝ӵ`"uxxZ` uiu` u)uy HfqªŰ޲ 1N5234  ` 3,>@b`"Í#Z`"É_&%Z` ñȿaȿ `4.` !$(.2342.($!` ÍȿÍ3` ÍɇÍ Hfq  `(3H!>^~` !3` ƭHƭ` \7` ƫƆ` zڒn 0 V ` ÍÍ8` ϐ` mmШ `$$Ǘ%7P<\` ǿ%ǿ ``ǿ%.`2ǿ%ǿ`"ǿǗ`"7 Hfq޲ 1S1588  `$$ǔ54P<\` Ǽ5Ǽ ``Ǽ5 .`2 Ǽ 5 Ǽ`" Ǽ ǔ`" 4 Hfq޲ 1S1588  `$$%ʵP<\` =%= ``=%ʍ.`2=ʍ%ʍ=`"=`"ʍʵ Hfq޲ 1S1588 ` pp` 8` ` p` ` 3` ` ` 0` ÍʅÍ ` ÍʐÍx` 00` p ƈ ` mÍ` ƅʐÍʐ` mPm` mPm` mm˭` ƅPmP` ƭHƭ`  U  ` EŕШP<\|` ŕ_E` mm^` mШm`:E_ŕ_ŕEE_ Hfq˭ 5 A  ` &]xJj *Jj` ]` B]B` A` ˸A` ˚A` ˥}A` ˇ_A` ]˅` qq` ˮˮ` ˮxˮ@ Hfq≏ݻ 22 F ` U``` ʽ`ʽ ` ʽ ` ˭@˭x` ˭@˭X` @˭@ `$$5ʹP<\` A5A ``A5ʑ.`2 Aʑ5ʑ A`" A `" ʑ ʹ Hfq޲ 1S1588 ` 00` 0 0` 0 ʸ` ʰ(` 0` (H` H ǘ` HH` H H` Hǘ` U8Ux` x0` UU̘` ` ` U` h` Uxx` x` ˭` MM(` խխ̘` խ(=(` խ(M(` խ#խ` խ0խ `H (0}@`` ̂˺`*==̩X`*ws=̩׋̘`*=0=˔`"׍ Z` }  HfqNPNݼ޽ 2SC2562 ` ˭`˭` ˭˭`` ʽ`˭`` ʽ``` ʽ``` ˭XX` P` X` MhMX` MXX` ԽhԽX` MM` ` ` ǘx` ð5ð` 55p ` u0Ph6`b ֝0֝uŹuőiuA֝֝ HfqR 10 K ` Խx5x` ֝֝x` 5|5ĸ` ֝xex` 5ð5x ` ePĠhP6`b xؓx~ĠVP.ĠPĠ׶Pפxex HfqR 10 K ` ֝x5x` ֝ð5ð` ֝x֝ð` ðð` ҍ8ҍx` ҍxx` 8ҍ8` Uxҍx` xx` xH` MXM` }XԽX` }XMX` }` }}X` ԾԾ` ԾԾ` ԽԽ`` Խ}` ԾԾ` ԽԽ` }}Ѐ` Խ}` }}` X` ӠP` -ҰUҰ`  `H (%׵Ұ@`` "Z`*uҰuI`*֯uI8`*uu4ъ`"Z` ׵ HfqNPNݼ޽ 2SC2562 `ѿ` ѿ-ѿ` --Ұ` ׵-` --` -U` XX` u(uҰ` uXX` uXԽX` uXuh` ` uDu` Ϥ` uΠΠ` uΠΠ` uΠu` u` u` E` +` %ڭ`%` ((` p%p` ܍܍8` %p%4` ܍8%8` %8%p` -pݥp` }ɠ-ɠ` H` =` M` MMɠ` 5p]p` Ȱ5Ȱ` ٕxx` ٕxx`ٖy` ٕxٕX` ֝ƀ֝X` ֝0֝X` 5Ȱ5p` ֝XeX` ٕXX` 5Ȱ5` ٕXٕȰ` ٕȰ}Ȱ` Mɠڭɠ` M`Lɠ` ɠMɠ` څX5X` 5X5` عɠEɠ` 5ع` ð֝ð` ðeð` ععɠ` ðp` pp` x8` ph`y` x}x` ߅ҍ` ҍҍ8` 858` ߅͈]͈` ,T` 4` Ͱ` =(=` ]͈](` xUx` =` x=x` ݒ.` +˪ݓ˪` ֝ɠ֝ɠ` ֝ɠ֝`` =x=` uխ` uu` <<0` ɠغɠ` =ɠ֝ɠ` ˔ ` ˔` 99ɯ`˕` ˔ ˔`  ˔ ˀ` U`` `.twݝm6`{9 H "qad^`^B  ; &! '#+3 00000000 |}fgjnЖ`Ё@WXgVXe 770-75 sl 3-46 TEL 0886-55-1211  `2ؐק^6` ؙH "qad` ; &! '#+3 vmA[[SnVލc}V |}fgjn}ʖ艻dHڑ}  `(3H!>^~` !3` ƭHƭ` \7` ƫƆ` zڒn 0 V ` ÍÍ8` 3```Îʑ`p ` mOm`mO` ƭHƭ`  U ` ˭@˭x`˭@`/` (H`I` U8Ux`/` x0` UU̘` U`` h` Uxx`Uw` MM(` խխ̘`լ)` խ0խ` ˭`˭`˭a`ʽa`W` ԽhԽX`NW`` 55p`5y`5ñ`֝y`֝ñ` ðð`ҍ7`ҍy`Ā` xx`I` 9` xH`N` }`~W` ԽԽ``Ծ`Ծ` }}` -ҰUҰ` ѹё`-ѿ` -U`W`ԾW`tW` uΠΠ` uΠΠ`uΠ` vΥv`u` ܍܍8`&p`` 5p]p`5o`֝X`5Ȳ` 5Ȱ5`ٖX`غɠ` ðeð`ñ` 858`!`  } `` ]͈](`<)`w` ֝ɠ֝ɠ`t`<`<ɠ`  ˔ ˀ ` $UHP<\|` H` U } ` ``}H.`2 }}H  Hfq޲ 1S1588  `$,5<^`"˩Z`"(1Z`"(!Z` ˩A HfqXCb` SW-A  `ztʊvƄ>^~` 4` 422`"4ŤC`"ŤCp`[; H!qad`q6`q6R`q Y 1???NchDiehHDiܠiH0dXh1!@0HehDit t [qPj"[q" 80 39.55 67.5 36 80 32.45 92.5 36 75.975 32.85 1 5 Jn [qP P 0 0 0  `xN|4̄ʶ8X` ̀8̀ʲ` ̀8̀ʲ QD1 [qQ A 1 [qR C Q 2 0 80 59 80 68.45 1  `6~+ǡvT8r`:;8ǨλǨ+8;8`ʏ+H !qad`q `q R`q yvgrQeR 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t [qQt"o" 80 59 67.4 54 80 49 92.6 54 67.575 50.85 1 6 Ȗ̧ٓ [qQ Q 0 P 0  `xP|̄8X` ̀̀` ̀̀ RF1 [qR A 1 [qS C R 2 0 80 75.55 80 82.6 1  `8ɾʗϠ$8r`:ʳ<ʳ<`e<H !qad`q, `q, R`q yvpO\b 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t [qRz"" 80 75.55 62.5 72 80 68.45 97.5 72 66.525 68.85 1 6.5 Ȗðٍ쐬 [qR R 0 Q 0  `xR|4̄V8X` ̀8̀R` ̀8̀R SH1 [qS A 1 [qT C S 2 0 80 97.4 80 104.45 1  `xP|j̄8X` ̀ǹ` ̀ǹ TF1 [qT A 1 [qU C T 2 0 80 111.55 80 121 1  `6ʆ78r`:ʌoʌStStoʌo`7Лh`H !qad1`1q 1`1q R`q x = 0 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@PghH H [qTx"" 80 111.55 67.5 108 80 104.45 92.5 108 71.775 104.85 1 5 ׸ = 0 [qT T 0 S 0  `6+vԔ8r`:;xλ+x;x`ʏk0H !qad`q `q R`q b~>grQeR 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@PghH H [qUx"o" 80 131 67.4 126 80 121 92.6 126 67.575 122.85 1 6 ̧ٓ [qU U 0 T 0  `xP|פ̄،8X` ̀ר̀؈` ̀ר̀؈ VF1 [qV A 1 [qW C V 2 0 80 151.4 80 157 1  `xP|̄8X` ̀̀` ̀̀ WF1 [qW A 1 [qX C W 2 0 80 167 80 172.6 1  `>؀J48r`:؈؈`ɽ ЀH !qad)`)q})`)q}R`q W([fu}grQeR 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH H [qW"o" 80 167 61.1 162 80 157 98.9 162 62.325 158.85 1 8.5 ݊wϽ̧ٓ [qW W 0 V 0  `xR|D̄,8X` ̀H̀(` ̀H̀( XH1 [qX A 1 [qPO C X 2 0 80 187.4 80 193 1  `@ u8r`:߸((߸߸`ɓޫpH!qad~`~q~`~qR`q R$[gr0kpQeR 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH H [qPO"o" 80 203 61.1 198 80 193 98.9 198 61.275 194.85 1 9 ̧قް [qPO PO 0 X 0  `xZ|̄8X` ̀̀` ̀̀ PPN1 [qPP A 1 [qPQ C PP 2 0 80 223.4 80 229.5 1  `0t8z`B33C`3KiH!qad6`6q6`6qR`q  1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@@ghH H[qPQv"qQ" 80 238.5 75.5 234 80 229.5 84.5 234 78.075 230.85 1 2 Q [qPQ 0 0 PP 0 1  `xf<8X` @` @@ PQZ1 [qPP B 1 [qPR C PQ 2 1 62.5 216 40 216 40 229.5 -1 1  `0ŅǍt8z`Bŋŋ?Cŋ`K)H!qad6`6q6`6qR`q  1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@pghH H[qPRv"qQ" 40 238.5 35.5 234 40 229.5 44.5 234 38.075 230.85 1 2 P [qPR 0 0 PQ 0 2  `xh88X` <`  PR\1 [qPP D 1 [qPS C PR 2 1 97.5 216 120 216 120 229.5 -1 1  `@ɹϠ8r`:̀|8̀`e{<@H!qad`q6`q6R`q zp1 : zp2 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH H [qPP"f" 80 223.4 62.5 216 80 208.6 97.5 216 66.525 212.85 1 6.5 1 : 2 [qPP PP PQ PO PR  `0 t8z`B ssҿC `sKөH!qad6`6q6`6qR`q  1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH H [qPS|"qQ" 120 238.5 115.5 234 120 229.5 124.5 234 118.075 230.85 1 2 R [qPS 0 0 PR 0 3  `xfϜ|ք8X` Ϡրր` Ϡրր PSZ1 [qV D 1 [qPT B PS 2 0 100 144 107.5 144 -1 229.5 -1 1  `<TMצ8r`:̀ס`{{Rϛ{̀ס`;ϑH !qad`q `qR`q }grQeR}BN 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH H [qV"f" 80 151.4 60 144 80 136.6 100 144 64.425 140.85 1 7.5 Ͻ̧ٓ͏I [qV V 0 U PS  `zԶd>^~` t ` t `"tքC`" քCp`;H!qad`q6`q6R`q }BN 1???NchDiehHDiܠiH0dXh1!@0HehDit t!@ghH H [qPTx"[q" 120 147.55 107.5 144 120 140.45 132.5 144 115.975 140.85 1 5 I [qPT 0 PS 0 0  `0ŅǍԔ8z`Bŋ ŋ ?cŋ `k)0H!qad6`6q6`6qR`q ! 1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH H[qPUv"qQ" 40 130.5 35.5 126 40 121.5 44.5 126 38.075 122.85 1 2 ` [qPU PT 0 0 0 4  `xP|t̄\8X` ̀x̀X` ̀x̀X UF1 [qU A 1 [qV C U 2 0 80 131 80 136.6 1  `Ljd$J0:Zz` ` Z ` Z Z `hși.`:ZxHZ;HZ PU^1 [qX B 2 PT 0 PU 1 1 60 180 53.45 180 53.45 134.375 -1 1  `<TF8r`:̀A`{ϛ̀A`ϑܠH !qad`q `qR`q Qe[f^t^ : 1990 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH H [qX"f" 80 187.4 60 180 80 172.6 100 180 64.425 176.85 1 7.5 wNx : 1990 [qX X PU W 0  `Lj<`̋>O:Zz` @d@` @̀ `hԿ̋>.`:̀6l6̀ PT^1 [qPU A 2 U 0 PT 1 1 40 130.5 40 134.375 80 134.375 1 -1  `Lj<ߠ̋mO:Zz` @ߤ@.` @.̀. `h̋m.`:̀.6Ll.6̀. PV^1 [qPV A 2 PO 0 PV 1 1 40 202.5 40 205.95 80 205.95 1 -1  `0Ņ5Ǎ8z`BŋIŋ;;I?ߣŋI`ޫ)pH!qad6`6q6`6qR`q " 1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH H[qPVv"qQ" 40 202.5 35.5 198 40 193.5 44.5 198 38.075 194.85 1 2 a [qPV PV 0 0 0 5  `xX|ߴ̄8X` ̀߸̀` ̀߸̀ POL1 [qPO A 1 [qPP C PO 2 0 80 203 80 208.6 1  `~zuƣзBq<\|` г` гг` г̀ `huƣ".`:̀̔̀ RUn1 [qS D 2 P 0 RU 1 2 95 90 106.875 90 106.875 44.075 80 44.075 -1 1 -1  `6v68r`:̀1( | ̀1`ʏΐH !qad`q `q R`q grQeR}BN 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qSx"f" 80 97.4 65 90 80 82.6 95 90 67.575 86.85 1 6 ̧ٓ͏I [qS S 0 R RU  `xN|*̄Ǭ8X` ̀.̀Ǩ` ̀.̀Ǩ PD1 [qP A 1 [qQ C P 2 0 80 39.55 80 49 1  `xP|̄8X` ̀̀` ̀̀ RF1 [qR A 1 [qS C R 2 0 80 75.55 80 82.6 1  `VR|4̄V6` ̀8̀R SH1 [qS A 1 [qT C S 2 0 80 97.4 80 104.45 1  `VP|j̄6` ̀ǹ TF1 [qT A 1 [qU C T 2 0 80 111.55 80 121 1  `VP|פ̄،6` ̀ר̀؈ VF1 [qV A 1 [qW C V 2 0 80 151.4 80 157 1  `VR|D̄,6` ̀H̀( XH1 [qX A 1 [qPO C X 2 0 80 187.4 80 193 1  `p 6`:߸((߸߸ [qPO"o" 80 203 61.1 198 80 193 98.9 198 61.275 194.85 1 9 ̧قް [qPO PO 0 X 0  `xZ|̄8X` ̀̀` ̀̀ PPN1 [qPP A 1 [qPQ C PP 2 0 80 223.4 80 229.5 1  `Vh86` < PR\1 [qPP D 1 [qPS C PR 2 1 97.5 216 120 216 120 229.5 -1 1  `VfϜ|ք6` Ϡրր PSZ1 [qV D 1 [qPT B PS 2 0 100 144 107.5 144 -1 229.5 -1 1  `VP|t̄\6` ̀x̀X UF1 [qU A 1 [qV C U 2 0 80 131 80 136.6 1  `jșiJ06 `hși.`:ZxHZ;HZ PU^1 [qX B 2 PT 0 PU 1 1 60 180 53.45 180 53.45 134.375 -1 1  `jԿ̕O6 ``Կ̕.`2̀l6̀ PT^1 [qPU A 2 U 0 PT 1 1 40 130.5 40 134.375 80 134.375 1 -1  `j̋mO6 `h̋m.`:̀.6Ll.6̀. PV^1 [qPV A 2 PO 0 PV 1 1 40 202.5 40 205.95 80 205.95 1 -1  `VX|ߴ̄6` ̀߸̀ POL1 [qPO A 1 [qPP C PO 2 0 80 203 80 208.6 1  `X P,8+dR6p: . `d0,8H!qad`q `q `q 0000000 1???NchDiehRHDiܠiH0 |dXh1!@0RHehDi1???Nch  dh? ܠi0 dXh1!@0?dh ` ԰?԰ÿ` 0?0ÿ` P?Pÿ` ÿÿ`:? ??`B!aH!qad`q`q`qFq 000 1???NchDiehHDiܠiH0dXh1!@0HehDi`ׄàH!qad`q `q `qFq VbujS 1???NchDiehHDiܠiH0dXh1!@0HehDi`|S[\H!qqad ` qqq  q` qqq R`qq 0000 1???NchDieh4HDiܠiH0dXh1!@04HehDi`~/a H!qqad`qqqq`qqqR`qq ^t0g0e 1???NchDiehHHDiܠiH dXh1!@0HHehDi`vкZ+H!qqadq`qqqqqqq`qqqqqR`qq rH 1???NchDieh^HDiܠiH pdXh1!@0^HehDi`zҢS#H!qqad`qqqq`qqqR`qq O\b 1???NchDiehlHDiܠiH bdXh1!@0lHehDi` ϰ@ϰ` P԰` €԰€P37 38 160 40.5 158.075 32.85 P8 2 40 18 Ɣ\ 1999. 8. 12 1 TADA 2/2 1001 2 b b 40 160 31.5 175.5 P8 P8 10 Q P R ` a P ` Q a R 80 40 120 40 40 80 40 120 120 160 229.5 229.5 229.5 121.5 193.5 31.5 139.5 31.5 175.5 31.5 P7 P7 P7 P7 P7 P8 P8 P8 P8 P8  `zuƣ"Bq6 `huƣ".`:̀̔̀ RUn1 [qS D 2 P 0 RU 1 2 95 90 106.875 90 106.875 44.075 80 44.075 -1 1 -1  `VN|*̄Ǭ6` ̀.̀Ǩ PD1 [qP A 1 [qQ C P 2 0 80 39.55 80 49 1  ` D <,8+dR6Vvv  `d0,8H!qad`q `q `q 0000000 1???NchDiehRHDiܠiH0 hdXh1!@0RHehDi1???Nch  dh?  ܠi0{dXh1!@0?dh ` ԰?԰ÿ` 0?0ÿ` ϰ?ϰÿ` P?Pÿ` P԰` ԰` ÿÿ`:? ??`B!aH!qad`q`q`qFq 000 1???NchDiehHDiܠiH0dXh1!@0HehDi`ׄàH!qad`q `q `qFq VbujS 1???NchDiehHDiܠiH0dXh1!@0HehDi`|S[\H!qqad ` qqq  q` qqq R`qq 0000 1???NchDieh4HDiܠiH dXh1!@04HehDi`~/a H!qqad`qqqq`qqqR`qq ^t0g0e 1???NchDiehHHDiܠiH  rdXh1!@0HHehDi`vкZ+H!qqadq`qqqqqqq`qqqqqR`qq rH 1???NchDieh^HDiܠiH \dXh1!@0^HehDi`zҢS#H!qqad`qqqq`qqqR`qq O\b 1???NchDiehlHDiܠiH  NdXh1!@0lHehDi<17 16 40 202.5 38.075 194.85 P8 2 40 18 0 0  `0~Ƅ8z`B33S`3[i H!qad6`6q6`6qR`q  1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH  H [qPWr"qQ" 80 40.5 75.5 36 80 31.5 84.5 36 78.075 32.85 1 2 P [qPW PW 0 0 0 6  `xV^~` 4` 4`"4քC`"քCp`;;H!qad`q6`q6R`q }BN 1???NchDiehHDiܠiH0dXh1!@0HehDit t!@ghH 0  H [qQRt"[q" 80 147.55 67.5 144 80 140.45 92.5 144 75.975 140.85 1 5 I [qQR 0 0 QR 0  `xf<Ӭʐ8X` ʌӰ@Ӱ` @Ӱ@ QSZ1 [qQQ B 1 [qQS C QS 2 1 67.5 126 40 126 40 139.5 -1 1  `6ʄ}8r`:̀ʌӫ}҂qӫ̀`7kh0H !qad1`1q 1`1q R`q x : 1 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qQQ"f" 80 133.4 67.5 126 80 118.6 92.5 126 71.775 122.85 1 5 ׸ : 1 [qQQ QR QS QO 0  `0ŅǍd8z`Bŋŋ?3ŋ`;)H!qad6`6q6`6qR`q ! 1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH 0  H[qQSv"qQ" 40 148.5 35.5 144 40 139.5 44.5 144 38.075 140.85 1 2 ` [qQS 0 0 QS 0 7  `HfgrQeR 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qRQ"o" 120 149 107.4 144 120 139 132.6 144 107.575 140.85 1 6 ̧ٓ [qRQ RQ 0 RP 0  `x\Ҽtp8X` xl` xl RRP1 [qRR A 1 [qRS C RR 2 0 120 169.4 120 175.5 1  `0e 8z`B y ksksyҿ y`sөܠH!qad6`6q6`6qR`q " 1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH  H[qRS|"qQ" 120 184.5 115.5 180 120 175.5 124.5 180 118.075 176.85 1 2 a [qRS 0 0 RR 0 9  `x\p8X` l` l RSP1 [qRT A 1 [qRU C RS 2 0 160 165.55 160 175.5 1  `DgM8Z`"Z`سܠH!qad6`6q6`6qR`q # 1???NchDiehZHDiܠiH0dXh1!@0ZHehDit t!@ghH  H [qRU|"qP" 160 184.5 155.5 180 160 175.5 164.5 180 158.075 176.85 1 2 b [qRU 0 0 RS 0 2  `xj԰LT8X` ԴP P` ԴP P RT^1 [qRR D 1 [qRT B RT 2 0 132.5 162 147.5 162 -1 44.7 1 -1  `*Թv8r`:qKҽ"ԱKq` ЀH!qad`q6`q6R`q }BN 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qRR"f" 120 169.4 107.5 162 120 154.6 132.5 162 115.975 158.85 1 5 I [qRR RR 0 RQ RT  `6اL48r`: `׷ ЀH !qad1`1q 1`1q R`q x = 1 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qRT"" 160 165.55 147.5 162 160 158.45 172.5 162 151.775 158.85 1 5 ׸ = 1 [qRT RS RT 0 0  `pOMƄ6`س[ H!qad6`6q6`6qR`q  1???NchDiehzHDiܠiH0dXh1!@0zHehDit t!@ghH 0  H [qRVx"qQ" 160 40.5 155.5 36 160 31.5 164.5 36 158.075 32.85 1 2 R [qRV RU 0 0 0 10  `xZҼ:ռ8X` >ո` >ո RPN1 [qRP A 1 [qRQ C RP 2 0 120 129.55 120 139 1  `$d԰ [8X` Դ@@ `hؕ .`:@ض^@ض!@ RVX1 [qQW D 2 RU 0 RV 1 0 132.5 72 160 72 -1 135 1 -1  `4п af8r`:a;ҽԱ;a`#H!qad`q/ `q/ R`q b~>p : 0 1???NchDiehrHDiܠiH0dXh1!@0rHehDit t!@ghH 0  H [qQW"f" 120 79.4 107.5 72 120 64.6 132.5 72 109.675 68.85 1 5 ѓ_ : 0 [qQW QW 0 QV RV  `HfҵPWO:Zz` T`  `hҵ*W.`:  6 RUZ1 [qRV A 2 RP 0 RU 1 1 160 40.5 160 135 120 135 1 -1  `VVո RPN1 [qRP A 1 [qRQ C RP 2 0 120 129.55 120 139 1  `$d԰ [8X` Դ@@ `hؕ .`:@ض^@ض!@ RVX1 [qQW D 2 RU 0 RV 1 0 132.5 72 160 72 -1 135 1 -1  `fҵ*WO6 `hҵ*W.`:  6 RUZ1 [qRV A 2 RP 0 RU 1 1 160 40.5 160 135 120 135 1 -1  `h e.`:__ ? ? ? ? ? ? ? ? ????????????????Page !\Slide  CPPrintStyleEvControlInfo _p?????????????????????????????????????????????????????????????????????????????????????A1 P[EcHH- ? --3 fgjn"ArialLv}s^Ԝdjnr-3 fgjn"ArialLv}s^Ԝdjnrc@[?@@@@VDA_DOC`AnimationInf mJSRV_SegmentInformation2npFigureWindowhPane xPage\SlidePPrintStylevControlInfopAnimationInfp@@Hj ? Nj  9_ NtVDA_DOC`PaneSplit |(JSRV_SegmentInformation2}PDocumentMacrohMacros-< -hSplit(VDA_DOC`SRCAREA1,MACROAREBaseStorage0phz0hPROJECThMain hPROJECT_MACRO_LIBRARY_AREA6hSRCAREA1,MACROAREA1 LIBRARYEXTENDINFO$     nm !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPRSTUVWXYZ[\]^_`abcdefghijklpoqtrswxyz{|}~!!********************************************************************** !!===================================================================== !!0000 T0 000000 !!0 Q W00 0000000\Ob0000n0000000el0h:yW0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if %keta = CRTTextWidth div 2 - CRTTextWidth mod 2 %gyou = CRTTextHeight div 2 - CRTTextHeight mod 2 %start_x = %keta - 25 %start_y = %gyou - 8 !! gRn0f %ret = start_panel( %start_x, %start_y ) if( %ret = nil or %ret("ng") = 1 ) !! UO0W0j0D00 else !! Vbx ! |}x zp ErrorBreakMode(0) DuplicateMacro("0000000\Ob0000",2,"0000000\Ob0000","0000000\Ob00000h:yW0~0Y00",1) ErrorBreakMode( 1, 0, 1 ) !! pox}x0n0rRNeln0f0 setup_panel( %start_x, %start_y ) end if !! g_n0f last_panel( %start_x, %start_y ) stop end !!**************************************************************************** !!pe gRn00O0 !!**************************************************************************** function start_panel( %start_x, %start_y ) %list = { "plp\Obmpn0pox}rRNn0J0R0" , \\ "0plp\Obmpx00pox}k0rRN00~0Y0h0",\\ "'Y YO)Rg0Y00" ,\\ 0"0plp\Obmpx00pox}k0rRN00~0Y0K0" } CreateDialog( %dialog ) SetDialogTitle( %dialog , "000000") LocationDialog( %dialog, %start_x, %start_y, 50, 8 ) CreateStaticString( %dialog, "str1", 10, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreatePushButton( %dialog, "ok", 18, 7, " / + ","O",1 ) CreatePushButton( %dialog, "ng", 32, 7, " wl~ ","C",1 ) MouseCursorOn %ret = DeleteAfterShowDialog( %dialog ) start_panel = %ret end function !!**************************************************************************** !!{p setupn0fn00O0 !!**************************************************************************** sub setup_panel( %start_x, %start_y ) %list = { "plp\Obmpn0pox}rRNel" , \\ "`$ mpn00p(L)-rRN(A)-pox}(T)00[LW0d",\\ " pox}n0rRNrqxox}0h:yW0~0Y00 ",\\ "a$ pn0NK000|}xv Nn0plp\Obmp ",\\ " 0xbW0~0Y00 ",\\ "b$ plp\Obmpn0L0eQc0_0L0h:yU00~0",\\ " Y0n0g00oxeqeog0pox}k0rR0N",\\ " Q0f0 NU0D00S0n0Bf0Nd0N Nn0pox}L0h",\\ " :yU00f0D0j0Q00p0D0Q0~0[00 "} CreateDialog( %dialog ) SetDialogTitle( %dialog , "000000") LocationDialog( %dialog, %start_x, %start_y, 50, 12 ) CreateStaticString( %dialog, "str1", 10, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreateStaticString( %dialog, "str5", 2, 6, %list( 5 ) ) CreateStaticString( %dialog, "str6", 2, 7, %list( 6 ) ) CreateStaticString( %dialog, "str7", 2, 8, %list( 7 ) ) CreateStaticString( %dialog, "str8", 2, 9, %list( 8 ) ) CreateStaticString( %dialog, "str9", 2, 10, %list( 9 ) ) CreateOKButton( %dialog, "ok", 23, 12, " O K " ) MouseCursorOn DeleteAfterShowDialog( %dialog ) end sub !!**************************************************************************** !!{p g_n0f !!**************************************************************************** sub last_panel( %start_x, %start_y ) %list = { " " , \\ " ",\\ " P[n0-[0CQk0;bY0k0o00",\\ " Vb000n0 0000B}N 00000[LW0f0O0`0U0D00",\\ " ",\\ " ",\\ " ܈",\\ " 0000B}N 0000o00",\\ " 00000000\Ob0000 0000K00g000[Lg0M0~0Y00",\\ " "} CreateDialog( %dialog ) SetDialogTitle( %dialog , "000000") LocationDialog( %dialog, %start_x, %start_y, 60, 12 ) CreateStaticString( %dialog, "str1", 2, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 2, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 3, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 4, %list( 4 ) ) CreateStaticString( %dialog, "str5", 2, 5, %list( 5 ) ) CreateStaticString( %dialog, "str6", 2, 6, %list( 6 ) ) CreateStaticString( %dialog, "str7", 2, 7, %list( 7 ) ) CreateStaticString( %dialog, "str8", 2, 8, %list( 8 ) ) CreateStaticString( %dialog, "str9", 2, 9, %list( 9 ) ) CreateStaticString( %dialog, "str10", 2, 10, %list( 10 ) ) CreateOKButton( %dialog, "ok", 28, 12, " O K " ) MouseCursorOn DeleteAfterShowDialog( %dialog ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O x 5 & `"5""`#UT#w#y##Մ###W%PB%Pf%PU%P%P%P%P%P%P%P$W/(V(h(Ul((((U((((_GR rP+fER.O.B.EAKM.PDH-%`Pb"/e04Q/h08n,0B/EY./|1838@W5RWNI8G/<18&#;e;;QP,Q6-ISL5Y.PUST8p9D.PW2E38ZP/0S90B.PX/Q"00000h:yg0o0[Lg0M0~0[0W000H-I90H?/)PY;"L-TUV?P\R0agyou"KCRA!GATRPQNPTQ/VPTPԬ_sQrQ_xK[_l`f]/nPTc!Qdc-UyKRP>pINPARNMNaO/#CC0000ㅐ0\Ob00児"/3T;Q/5BEt(vD%WEYEr/\T2!bT-O~/r/)uX/xܘTkE?m/nP?iЖ8H>rlܚov柟i0 A4!ApIO90PPAad0%ao{R;QQnc T8T>p/Q?BUPCAaW0CɐE0aa#IP?-?A1PPCϿi/!P0aM/4 ʸ:Il!%ClrR8P PO/PC0acar1/P0a/T0P"P0=@QAWX1Po֏ׯQE/N$ھӥVTYT"\\ߏckqU/*ھ3/ܓT"\A!?_PԹ/QھZ!/TD0a\XaAaʶ :UP>SKB>T̒P/ڴAo@Q/0aCA/ Aa/ѠC ?/ +/Ñ;Q% 2DѠe  6+Ѡ$ /4{ : >Aѡ wNP~KC/OUY/A*ENPUSR #R;QeѠ09(O)pDW0dM<8KAH5y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  dMainSprDataSaveMain000000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveINFOMATION!JSRV_SegmentInformation2z1/, hPROJECT$ hVDA_DOC`PROJECTCONTENTSGINFOMATIONMain +% hPROJECT_MACRO_LIBRARY_AREA6*' hSRCAREA1vMACROAREA1&(Q{7!!********************************************************************** !!===================================================================== !!0000 T0 TMn !!0 Q W00 TL0nK00_0h0M0k0Tn0-Nk00eW[0?ceQY000 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !!la !!0N^K0K00_0TQn0eW[o00 YfY00S0h0L0g0M0~0[000 ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if CommandGuidance( "plpTMn" ) Guidance( "W0p00O0J0_a0O0`0U0D0" ) init( %self_no ) ClearSelectFig() EditDisplayMode( 0 ) $fig = GetFigDocument( $page, %self_no ) !!Rn0NR`1X0MRS %data = GetGroupFigInformation( $fig, 1 ) !!|mpQw}eQRJ00s0yR`1X get_textdata( %self_no, %data ) !!MOn`1Xfe replace_itself( %self_no, %data ) !!|mpQw}?ceQ %length = LenB( %data( 14 ) ) if( %length = 0 ) %data ( 14 ) = " " end if put_text( %self_no, %data, %length ) !!NR`1Xfe put_add_info( %self_no, %data ) Deposit( "SUM_FIG", $fig_number ) Deposit( "LastAX", %data( 2 ) ) Deposit( "LastAY", %data( 3 ) ) Deposit( "LastTX", %data( 10 ) ) Deposit( "LastTY", %data( 11 ) ) Deposit( "LastPage", $page ) !!OX[p0g}n0NR`1Xh0W0f0O0c0d0Q00 make_save_data( ) !!Vb_L0xbU00_0rKan0~0~0k0W0f0J0O0 !!i0n0 Nk0nQ0p0RP}}L0L000K0n0vpSn0_00 if( $fig_number = 1 ) panel() end if EditDisplayMode( 1 ) %self_no = CountFigsPage( $page ) if( $page = "P7" ) %figno( 1 ) = %self_no-1 else %figno( 1 ) = %self_no end if PutSelectFig( $page, %figno ) stop end !!**************************************************************************** !!{p RgS !!**************************************************************************** sub init( %no ) $page = GetPage %no = CountFigsPage( $page ) if( CheckDeposit( "SUM_FIG" ) = FALSE or \\ CheckDeposit( "SUM_LINE" ) = FALSE ) Message( "plp\Obx0[LY00S0h0o0g0M0~0[00" ) stop end if $fig_number = Withdraw( "SUM_FIG" ) $line_number = Withdraw( "SUM_LINE" ) TextFrameStyle( 1, 1, 10, 20, 8, 1, 2, 1, 1, 1, 1, 2, , , , , 1, \\ 25, 0, 100, 7, 1, 0 ) end sub !!**************************************************************************** !!pe rqxn0\Ob !!**************************************************************************** function get_textdata( %self_no, %data ) if( Find( "P}TP[", %data( 1 ), ) > 0 ) %d_width = 40 %d_height = 3 %field_len = 4 else %d_width = 40 %d_height = 3 %field_len = 20 end if CreateDialog( %text ) LocationDialog( %text, 3, 4, %d_width, %d_height ) CreateStaticString( %text, "title", 1, 1, "TQk0h:yY00eW[" ) CreateTextField( %text, "TEXT", 2, 2, %field_len, , , 1 ) if( %field_len = 20 ) CreateStaticString( %text, "title2", 2, 3,\\ "JS҉"&Zen( %data(13)*2 )&"N Ng0'YM0U0Rte" ) end if CreateOKButton(%text,"ok",33,1,"/ +") CreateCancelButton(%text,"can",33,3,"wl~") %ret = DeleteAfterShowDialog(%text) %data(14) = %ret("TEXT") end function !!**************************************************************************** !!{p Rn0MOn`1Xfe !!**************************************************************************** sub replace_itself( %self_no,%data ) !!v||nn0S_ $cp = GetCP $cp_x = GetX($cp) $cp_y = GetY($cp) %figno(1) = %self_no !!w}pn0gw$P{ %lmax = 0 if( LenB(%data(14))>%lmax ) %lmax = LenB(%data(14)) end if !![$PN Ng0B00p0Tn0`1X0 Yf if( %lmax/2 > %data(13) ) %expand_x = %lmax/%data(13)/2 %expand_x = 0.2*int( %expand_x/0.2+0.99 ) %data(13) = %lmax/2 for %i = 2 to 10 step 2 %data( %i ) = %data( %i )*%expand_x next !!Tn0'YM0U00b'Y ClearSelectFig() PutSelectFig( $page, %figno ) Expand( 2, %expand_x*100, 100, #[ $cp_x, $cp_y ], 0, 1, 0 ) ClearSelectFig() end if !!Rꁫn0^jpOck $cp_x = $cp_x - %data( 2 ) $cp_y = $cp_y - %data( 5 ) for %i = 2 to 11 step 2 %data( %i ) = $cp_x + %data( %i ) %data( %i+1 ) = $cp_y + %data( %i+1 ) next string_pos( %data ) end sub !!**************************************************************************** !!pe eW[n0~x0Y00 !!**************************************************************************** function string_pos( %data ) %length = LenB( %data( 14 ) ) %size = ( 1.75*%length + 0.35*( %length - 1 ) ) / 2 %data( 10 ) = %data( 2 ) - %size %data( 11 ) = %data( 5 ) - 3.15 if( Find( "KbeQR", %data( 1 ), ) > 0 ) %data( 11 ) = %data ( 11 ) + 1 end if end function !!**************************************************************************** !!{p NR`1XmN !!**************************************************************************** sub put_add_info( %self_no, %data ) for %i = 15 to 19 %data( %i ) = 0 next %height = Withdraw( "Height" ) if( $fig_number > 0 ) if( abs( %data( 6 ) - Withdraw( "LastAX" ) ) < 10 AND \\ abs( %data( 7 ) - Withdraw( "LastAY" ) ) < %height AND \\ Sign( %data( 7 ) - Withdraw( "LastAY" ) ) = 1 ) auto_line( %data ) end if end if if( Find( "P}TP[", %data( 1 ), ) > 0 ) make_table( %data ) end if !!~0Z0yR_n0Vb_pS_ ClearSelectFig() SelectMode( 5 ) SelectFig( $page, #[ %data( 10 )+2, %data( 11 )+2 ],) %figno = GetSelectFig ClearSelectFig() $fig = GetFigDocument( $page, %figno( 1 ) ) !!NR`1X0NQ00 $fig_number = $fig_number + 1 %data( 15 ) = "zP["&Zen( $fig_number ) $fig = GroupFigInformation( $fig, 1, %data ) !!NR`1Xk0 TMR0NQ00 $fig = FigGroupName( $fig, %data( 15 ) ) !!Vb Nn0Vb_x0n0S f overwriteFig( %figno( 1 ), $fig, $page ) end sub !!**************************************************************************** !!{p p0d0O00 !!**************************************************************************** sub make_table( %data ) if( Find( "P}TP[", %data( 1 ), ) > 0 ) %list = { "STR1", "X1", "Y1", "PAGE1" } else %list = { "STR2", "X2", "Y2", "PAGE2" } end if if( CheckDeposit( %list( 1 ) ) = TRUE ) %str_list = Withdraw( %list( 1 ) ) %x_list = Withdraw( %list( 2 ) ) %y_list = Withdraw( %list( 3 ) ) %page_list = Withdraw( %list( 4 ) ) %no = Size( %str_list ) + 1 else %no = 1 end if %str_list( %no ) = %data( 14 ) %x_list( %no ) = %data( 6 ) %y_list( %no ) = %data( 7 ) %page_list( %no ) = $page Deposit( %list( 1 ), %str_list ) Deposit( %list( 2 ), %x_list ) Deposit( %list( 3 ), %y_list ) Deposit( %list( 4 ), %page_list ) %data( 20 ) = %no end sub !!**************************************************************************** !!{p Vb_n0uppr !!**************************************************************************** sub overwriteFig( %self_no, %fig, %page ) %figno( 1 ) = %self_no ClearSelectFig() PutSelectFig( %page, %figno ) Delete( 0, 0 ) InsertFigDocument( %fig, %page, ) end sub !!**************************************************************************** !!{p zP[Qn0eW[QR !!**************************************************************************** sub put_text( %self_no, %data, %length ) !!eW[gn0\Ob %length = %length/2 + 1 if( Find( "$Re", %data( 1 ), ) > 0 ) %x_hosei = %data( 10 )+1 else %x_hosei = %data( 10 ) end if MakeTextFrame( #[ %x_hosei, %data( 11 )+1 ],\\ %data( 12 ), %length, "text" ) !!w}n0?ceQ InsertText( %data( 14 ) ) CloseTextFrame() %figno( 1 ) = %self_no %figno( 2 ) = %self_no + 1 fig_compose( %figno ) end sub !!**************************************************************************** !!{p Vb_n0Tb !!**************************************************************************** sub fig_compose( %figno ) ClearSelectFig() PutSelectFig( $page, %figno ) Compose() ClearSelectFig() end sub !!**************************************************************************** !!{p RP}}0LF0 !!**************************************************************************** sub auto_line( %end_data ) %start = #[ Withdraw( "LastAX" ), Withdraw( "LastAY" ) ] %end = #[ %end_data( 6 ), %end_data( 7 ) ] !!P}}CQn0NR`1X0S_ ClearSelectFig() SelectFig( $page, #[ Withdraw( "LastTX" )+2, Withdraw( "LastTY" )+2 ],) %start_figno = GetSelectFig ClearSelectFig() $fig = GetFigDocument( $page, %start_figno( 1 ) ) %start_data = GetGroupFigInformation( $fig, 1 ) if( Find( "P}}", %start_data( 16 ), ) > 0 ) exit sub end if if( Find( "$Re", %start_data( 1 ), ) > 0 ) %ret = open_panel() put_string( %start_data, %ret ) end if !!P}}0cO0 if( Withdraw( "TYPE" ) = 1 ) LinePattern( 1, 2, , "R000G000B000", 1, 3, 2, , 45, 30 ) Line( %start, %end ) LinePattern( 1, 2, , "R000G000B000", 0, ) else LinePattern( 1, 2, , "R000G000B000", 0, ) Line( %start, %end ) %no = CountFigsPage( $page ) %figno( 1 ) = %no %figno( 2 ) = %no + 1 Line( %start, %end ) fig_compose( %figno ) end if $line_number = $line_number + 1 !!P}}n0NR`1X0\ObY00 %data = make_line_info( %start_data, %start, %end ) %end_data( 18 ) = %data( 7 ) !!NR`1X0d0Q00P}}CQVb_0P}} !!P}} %no = CountFigsPage( $page ) $fig = GetFigDocument( $page, %no ) $fig = GroupFigInformation( $fig, 1, %data ) $fig = FigGroupName( $fig, %data( 7 ) ) overwriteFig( %no, $fig, $page ) !!P}}CQ ClearSelectFig() SelectFig( $page, #[ Withdraw( "LastTX" )+2, Withdraw( "LastTY" )+2 ],) %start_figno = GetSelectFig ClearSelectFig() $fig = GetFigDocument( $page, %start_figno( 1 ) ) %start_data( 16 ) = %data( 7 ) $fig = GroupFigInformation( $fig, 1, %start_data ) $fig = FigGroupName( $fig, %start_data( 15 ) ) overwriteFig( %start_figno( 1 ), $fig, $page ) !!pn0OX[ Deposit( "SUM_LINE", $line_number ) end sub !!**************************************************************************** !!pe P}}n0NR`1X0d0O00 !!**************************************************************************** function make_line_info( %start_data, %start, %end ) %data( 1 ) = 1 %data( 2 ) = %start_data( 15 ) %data( 3 ) = "A" %data( 4 ) = 1 %data( 5 ) = "zP["&Zen( Withdraw( "SUM_FIG" )+1 ) %data( 6 ) = "C" %data( 7 ) = "P}}"&Zen( $line_number ) %data( 8 ) = Withdraw( "TYPE" ) %data( 9 ) = 0 %data( 10 ) = GetX( %start ) %data( 11 ) = GetY( %start ) %data( 12 ) = GetX( %end ) %data( 13 ) = GetY( %end ) %data( 14 ) = 1 make_line_info = %data end function !!**************************************************************************** !!pe $Ren00O0 !!**************************************************************************** function open_panel( ) %num1 = 1 %num2 = 1 do CreateDialog( %panel ) LocationDialog( %panel, 3, 4, 44 , 4 ) CreateStaticString( %panel, "TITLE1", 2, 1, "P}}n0mW[" ) CreateRadioButton( %panel, "LIST", 5, 2, \\ {{"90","Y"},{".0", "N"},{"]0n0N", "O"}}, 1, %num2 ) CreateStaticString( %panel, "TITLE2", 2, 3, \\ "]0n0Nn0mW[hQ҉g010eW[NQ " ) CreateTextField( %panel, "STRING", 5, 4, 20, 20, , 1 ) CreateOKButton(%panel,"ok",37,1,"/ +") CreateCancelButton(%panel,"can",37,3,"wl~") %ret = DeleteAfterShowDialog( %panel ) if( IsBlank( %ret ) = TRUE ) Message( "$P0-[W0f0O0`0U0D00" ) elseif( LenB( %ret( "STRING" ) ) = 0 AND %ret( "LIST" ) = 3 ) %num2 = 3 Message( "eW[0eQRW0f0O0`0U0D00" ) else exit do end if loop open_panel = %ret end function !!**************************************************************************** !!{p R\CQk0eW[0fM0QY0 !!**************************************************************************** sub put_string( %data, %ret ) %length = 2 select case %ret( "LIST" ) case 1 %ret( "STRING" ) = "9" case 2 %ret( "STRING" ) = "." case 3 %length = LenB( %ret( "STRING" ) ) end select !!eW[0fO0MOn0-[Y00 %point( 1 ) = %data( 2 ) + 0.7 %point( 2 ) = %data( 3 ) - 0.5 !!eW[0QRY00 %length = %length div 2 MakeTextFrame( #[ %point( 1 ), %point( 2 ) ], 1, %length+1, "text" ) InsertText( %ret( "STRING" ) ) CloseTextFrame() end sub !!**************************************************************************** !!{p O(uk0W0f0n00O0 !!**************************************************************************** sub panel() %list = { "RP}}k0d0D0f0", \\ "0N_0xbU00f0D00Tn0Nd0 Nk0T0nO0h00",\\ "Rvk0P}}L0_K00~0Y00]00NYn0P}}o0;P}}0",\\ 0"00=0O(uW0f0O0`0U0D00" } CreateDialog( %dialog ) LocationDialog( %dialog, 10, 10, 62, 5 ) CreateStaticString( %dialog, "str1", 20, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreateOKButton(%dialog,"ok",54,1,"/ +") CreateCancelButton(%dialog,"can",54,3,"wl~") DeleteAfterShowDialog( %dialog ) end sub !!**************************************************************************** !!{p g}n0NR`1X0\Ob !!g}k00OX[Y00p0NR`1Xh0W0f0c_0[0f0D000 !!**************************************************************************** sub make_save_data() %list = { "SUM_FIG", "SUM_LINE", "LastAX", "LastAY", "LastTX",\\ "LastTY", "LastPage", "TYPE" , "Width", "Height", "r",\\ "t^ge", "Hr", "\Ob", "p|", "VbjuS" } %sub_list1 = { "STR1", "X1", "Y1", "PAGE1" } %sub_list2 = { "STR2", "X2", "Y2", "PAGE2" } !!NR`1X0\Ob %max = Size( %list ) for %i = 1 to %max %self_data( %i ) = WithDraw( %list( %i ) ) next %j = %i if( CheckDeposit( %sub_list1( 1 ) ) ) %self_data( %j ) = Size( Withdraw( %sub_list1( 1 ) ) ) %j = %j + 1 for %i = 1 to 4 %data = Withdraw( %sub_list1( %i ) ) foreach %k in %data %self_data( %j ) = %k %j = %j + 1 next next else %self_data( %j ) = 0 %j = %j + 1 end if if( CheckDeposit( %sub_list2( 1 )) ) %self_data( %j ) = Size( Withdraw( %sub_list2( 1 ) ) ) %j = %j + 1 for %i = 1 to 4 %data = Withdraw( %sub_list2( %i ) ) for %k = 1 to Size( %data ) %self_data( %j ) = %data( %k ) %j = %j + 1 next next else %self_data( %j ) = 0 end if SelectMode( 5 ) ClearSelectFig() SelectFig( "P7", #[ 20, 4 ], , "B" ) %figno = GetSelectFig $fig = GetFigDocument( "P7", %figno( 1 ) ) $fig = GroupFigInformation( $fig, 1, %self_data ) overwriteFig( %figno( 1 ), $fig, "P7" ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OX}Ú *P*P*P*P*P+a+Ѓ+Ќ+К+++Lq-І-Й-Р--- ///////// 20222j222222՚22-5N5^55555537P7P7P7P7P7P"+9U9{9j999 `::$:E:c:Ё:Н:::`=P:=PC=P=P=P=P%>Qq;AAAAAAAA CPRCPzCPCPCPCPΚCPCP EE^EoEEEE G,G5GGGG?ln~Б !@KPrKPKPKPjKPKPKP"MP&MP0MPOMPMPMPMPMP#OwGwnwwjwww7r`yHyQyYy`yxyЁyЃyЕyШyyy8}r}{}}}}}}9=a:QcgЎЙН*A#qP ^f^%EROBEAKEMDp; PPRaaIT!B EY4@WRNIPG2-Ta)QTa|w2ISLYUTD*W4ˌZSBX4P"+00000h:yg0o0[Lg0M0~?0[00kЊ!)P`UCMAGp)IC plp_TMnBRR)W0p00O0J0_a`0U0DkІ=>ᒁIpCsel_no4P CRERCFpG4cHE𬡳SPtQ)z!QEhGp!CpUMpN pagЬ_rfiT㷶Qj7PGUpFҡTpO$P׾|aݵ!(dtЅdt#_EA߬  Ǐ- и-aR_F=ߒG͞Qe Њ!o!aN RutA؁ˉa|͔alntT!kБ$q4͔eta МQ@2eaϢRvPr$G_͞ߌ4eEA"Dc %PSabJS2_"|AumbЕr42|;T4LsABAEPLTDцT_(]D#ganTDv?(D%! TP _"oTaBC4$PֻTB _AV甁Cz$tS$(G$oaU$\($T$PBo*)ц%A,XJD4AU.AAģ)0ϔcD$A0@8!Ŵ&t5$PIyпR%A IP%6r)A=%}=!$?/%a߁>rADADBY)gģD5OHA$UΰObݔ«iPi cBAāaK4[F#4+U1N)F AlF 2$3/4IF NZ$TW!F!h@`$ GF!k?F a%[(C,AK3c!Aanc$S[(d"-afLr% phņ{[(ZF!aS#4cbf\ObxPY00S0h(gaZ$Aa[,T,DARfZwQ'/Z$[(+y_zum?nXlSe D@eFqSAaS@EE/T!F!$Q'*-U03679;=A*K/TOS"RaWJZ]ΰ `hɃttxFHS%7H $T𔦑/T=y$4Ĝk2ODU8˄DQO"z=dvT+5Bz%Kl Ia>"Q)RvHMv<-P;"B*2J_qRQ,?8K'=$L>qHJPPOQlURlZ1S[T˱W L߃NȐ^Eb`J@ ]K>qJDd[Kk>qJT ``ıaD]"d,je_fzAc(˱gq1pT>5JdЂhz` s!?9ҢX(vD @ `aDoO>RrrGz?˱qw>5(J`aDaP1}}lf)Pg$$˱ P>qi>q!ad:P/tՊ$;'6x';P{@>11ea/(xȑaP5  AD! Cdqȑu>q`PoAs{q˓PH]ȑI1P’ua0_x6)!Pm=!zCIˀΨ8ȑՓH>q0gzAa@0! =!ձa?>q;="0*C2|9@1;!C;]?>qgH˱CD0M!Uآ>qZ unhD0p|űow YZa>qUudfAQKudgYuPZqПĆ Hᮇ0!J_7`OZӺ.!]ApdT/1!s1`r1@n_Co2p3o`gE?D`X_QZOd]*g1`hV``u`d`t/3?'ѩqfb?AaddU1%s1@z>q A!"O 4>q'4 YZod/!Tc42'q gVT%D/1Y(5Z(1R_&H>q(Dr?DI %H6@WuT/@DA/H ]H0Hh}H!-h2 "_4 B4O5 ! HFQub@bH0.m)H 4Ѵ>p:g J*;s ;`;W.ApqA j*HE?%DHQW./%1HLb`QAmQ ;`@<;$=>';j;kDKA#GW)IHC0y3!ClN# Oot)>vM@Dcbiq+t3thv>z䚇aEHtÑStHtH1lOzTzÑbWLI^zUciqfDkDZ.$tt2Go!1tuϭ~DVq sCD@CbM2T~aD8ԙiqz~Q1*ցDlD?7?8Y򜌞8U(bDI iq1^hzj ayZ2~38UH/Hz.$%dheaGORbP}ڱF@RqTڠO:iq@UaC$'~QTѝ_.$fd hQ1}ӲN`~3taz%$~QQA1O(EEWڂT}a8uћ?(~Q~Q$:\lm*pk8`_b" Uс I g~ho"PQ"js@a!Ҕ%ׁ_ؔIҔiqؔҔiq qq:%S}R1"5X߶h5Y߶q^P`q%ܡl FѓܼEEE%! ,0whUK0 00[hC1}qKz"P`Va>0% DnM0-QW.$c`\0amOtx%11Fr"`K}".$OoR-Q%Sx,/ORQh2 $Uy.$ D @q%QQ@HVO` yQh3-Q`Diq!##%$ wX8$@U(?!^'' ?TSQ0&F$"'W(,0q)_^!䏑/u Q?EdDαڡJdZga gڡp%$qαW1D@$x Wq?qqķ$rtuO'?qϭF9Qu5t1(D?qhHd}CE_xOuُ2,p"$_cu!mA یxz T{o/0`@@gD(]ݽOA&O[carEo nQd )?q ĵ  9_1" ;qLAeB'OoB1YqaaT @G 01J>9$qU 301Z Qe d;q! BzGB1c_c d$A7aIo}eQ( d?qĿOoBB}Ȩڲ?qfD 2kGrK%q_|V?q !ӴD/@]5,'Oc$/@@+/DQ!4)u93/1oY?qUA/DDO0HjU'G-OP}4FRBTO$ cg9Lm8H! :qQ6yhw1s/@DUID/@qw0D1F$P}+}W/DBKIDB_h3!/D(R3С/@a2DHpA/@2FFHJ VQK?h8HN(TN]q/DRD0DJ.$OA_A AJ\1Q0H_-T-)"Whw!Hd@`Y11d@3HgkHd@q5d@ĕQ ?U?iaS#^Td@vQiAJLE_3R?BB^n(n$Ubd@flRuGRuBu3vr,yn$T1|s,}t(n$E-Dn$i ;?Q3pUJd@}AћfdiaToqr,s,t(tvBn$t$1ق/Oqh*r,s,t(jB#}_~{ ``y;)`qlD$dqIJݱU2S_'c3`3Aћ1IT;>DZLqٿG$SDrdeANgq_'[ulo~lIrJz 1HܿߑO:"Dpd61%u bN@끸ߺ;ڛD%DI,>K_f_>JȮdeJ$ {Aѿ3 q1",ʱțN)ɵ ɱ LOěU dPğnĂDu;^12/rOdתر9}JĞDIz !'=?>_c߬҄A9}*ĠD|'D"N-`2s錪!A(Q9y1n'DOVbWcBq1(&ގ%Q3B1,-?-$_8Nq?5VBLH/$WD5nZo"d#o$Nr$w%'?(_s6?*H../H0_2N5u D8Q*9}D5&_D͕%Ju%DÿYDM;䆿&R?$/ @/ AY"/ +?H.9}2/ ѬA9/$;&G3,M8Ju>5YZ 4d18c/(1٪q8 F!_4h13,1$4d9qjbш / l QSsG_4 'S)0hahm@`kRRRAf?O@fΚ.T` V$T`y\$\']1\&\>-baXO]@aeaa_O]D11\q{T`l1Aiig]x1\ ( [oomopqHrp!p{pk!xzP[s"p51qZ$⸳!QaA0}`I0zCqED*1AO&W0a$bԔIC֏r׿jzDqI}IQ,8՜S2CN&ܟ0 521THϡIUIta!n0mWwP3QԔU!t՜ 1aO>UT2d5j tQ1j,\0U02v9B@k%Q/.jp2q33]0n02OjtE+4{ҧ3Q&"e: >pQILU OޅX ChQ҉g01`eW[N'Q `3QpT}a-dEXd ?j  I$e߅0JIţ3QXeO K_` !oVj7jI 3Q/ +TX.MڡNڐ jR%cj# awlO~PR z\jpN EA:S{Oo$1=rZA11j!3H9aEw52I<}4!B )AKI>8IGKUQ2P}4MSې䫡jZ;t$P0-[W0f0O0`0U0D0pl? p;t2صAy!bAz1bI1">̀C$OERab!1>$N>͛C$ϦMdo 1ERS/%2RAoBC$Ձ~0eQRD]%jp1Ԉ1ɰ8a\ ɰ}a/,`D5cQpdacrRgq+8ɰɰi%elg*0hjpjpɰq$beNOHj1>Q_jD;APn%%jDfe8l@pUHApQ>+l K?mDnwq ňJpl]qh@xsx>PtdminRojDyG_Hyr>ͅ}8g_!jD$^ENjDAH/xψMf?¡u8q+CobPol* E ?ꀨsBRx `@3E ElA`@`@fYD`@FM1WP [`@ltxPf!paD!S5*!zrs>xqac?R`p+Ax+MRpW1wpA-A]Rk0dDf|MN_0xbU0D`D00Tn0Nd0 Nk’0nO0h0t!Qvk0L0_]K@~0YE]@NYn"o0 ;t-qq00=0O(uD]palb1,pՀr&"Ia ä!t^g0?WQqHrCu~!\ObC%5p|F-aV?bjuS*;x8 0WeE 0SyXSfYSf5QPX1PQsabPbuxgPltQoR1S]U[]VE"1ZqXt"xPd1Q 0ՑR'IZ"1 0P1d!.xä 1g1 0xii,xѪPd$e`WT)`DWD PdrAlxqBn@dnbf/2lxIQ5B yl1yIQj"yIQ !|yISHK'PqS!@yv%bYӹ-yY8y}K~xfn~!Q~x|!pq[Aσgqv%vxD{IQr yHzya{A|1A{幑|*IQ1D܅zr!IQy~!bqYӂz/Jzޫ̣1zDIQypaH@q5v%1x\U\TD1p%,qv%xI%1ē9A2k帱{H r!1}Lr~πZc[1IfHIQpĆDO~!q_wHqv%x|̪̲įLLї rIQIP[1»L$ĚUdzěUͲĜUOobߴczaxqaT ES(CM $'SU-r(1A)"73! !3lUPQz![1A!k"[1IQBn4Z}đHWTOb$JBfDnS%}IQ3*3D C5E6 2ˑ- {b- $][1 -  H!Sd- Po6Q qG) O5P36F*@R5A*`I*@Nd1- [17{a:- 0PJI (WOVRqR޲E3ˑWl,k_d$/j&` LIBRARYEXTENDINFO$)JSRV_SegmentInformation2JSRV_SegmentInformation2JSRV_SegmentInformation2VDA_DOC`SRCAREA1vMACROAREA1{7LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`MainlTMn0000000 0 000CONTENTS#-?INFOMATION.JSRV_SegmentInformation2z29h0000\Ob 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  `MainSprDataSaveMainTMnSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS?INFOMATIONVDA_DOC`SRCAREA1P0MACROAREA1VPROJECT1hMain 82hPROJECT_MACRO_LIBRARY_AREA674hSRCAREA1vP0 !!********************************************************************** !!===================================================================== !!0000 T0 RgS !!0 Q W00 00000000RgSW0~0Y00 !!0O(ugr0 j0W0 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if %ok? = Alert( "RgSW0f0000W0D0g0Y0K0", 1 ) if %ok? <> 1 then stop end if CommandGuidance( "plp\ObxRgS" ) Guidance( "W0p00O0J0_a0O0`0U0D0" ) EditDisplayMode( 0 ) jump( "P7" ) $page = "P7" InputPlane( "A" ) $min_width = 40 $max_width = 70 $min_height = 18 $max_height = 30 $str1 = $min_width&"^"&$max_width $str2 = $min_height&"^"&$max_height WarningMode( 0 ) DeletePagePlane( "P7", 92, "AC", 0 ) DeletePagePlane( "P8", 91, "B", 0 ) WarningMode( 1 ) !!xon0k$P-[ %width = Withdraw( "Width" ) %height = Withdraw( "Height" ) TextFrameStyle( 1, 1, 15, 20, 8, 1, 2, 1, 1, 1, 1, 2, , , , , 1, \\ 25, 0, 100, 7, 1, 0 ) PointMode( 1, 1, 1 ) %page = "P7" Jump( %page ) %flag = 0 do Grid( 1, 1, #[ 0, 0 ], %width, %height ) MakeTextFrame( #[ 10, 30 ], 2, 5, "text" ) %str = "*jE^0"&%width&"0&~E^0"&%height InsertText( %str, 0 ) CloseTextFrame() %figno( 1 ) = CountFigsPage( %page ) %ret = Alert( "xoo0S00g000W0D0g0Y0K0", 1, ) if( %ret = 2 ) if %width = nil then %width = $min_sidth end if if %height = nil then %height = $min_height end if %ret = make_dialog( %width, %height ) if %ret <> nil then %width = %ret( "WIDTH" ) %height = %ret( "HEIGHT" ) end if ClearSelectFig PutSelectFig( %page, %figno ) Delete( 0, 0 ) else exit do end if loop Guidance( "W0p00O0J0_a0O0`0U0D0" ) !!]k0h:yW0_0eW[0mSY00 ClearSelectFig PutSelectFig( %page, %figno ) Delete( 0, 0 ) ClearSelectFig !!P}}k0wpS0d0Q00K0i0F0K0n00000O0 %ret = Alert( "P}}n0wpS", 1, \\ { { "NQ00", "Y" }, { "NQ0j0D0", "N" } } ) !!pn0RgS init_data( %ret, %width, %height ) TextFrameStyle( 1, 1, 10, 20, 8, 1, 2, 1, 1, 1, 1, 2, , , , , 1, \\ 25, 0, 100, 7, 1, 0 ) Message( "r0?ceQW0f0O0`0U0D0", 0 ) RunDocumentMacro( "0000?ceQ" ) ClearSelectFig Message( "T0nD0f0O0`0U0D0" ) stop end !!**************************************************************************** !!pe rqx0\ObY00 !!**************************************************************************** function make_dialog( %width, %height ) CreateDialog( %dialog ) LocationDialog( %dialog, 3, 4, 30, 4 ) CreateNumericField( %dialog, "WIDTH", 8, 1, 4, $min_width, \\ $max_width, %width, 1 ) SetControlTitle( %dialog,"WIDTH", 2, 1,"*jE^") CreateStaticString( %dialog, "title3", 10, 2, $str1 ) CreateNumericField( %dialog, "HEIGHT", 8, 3, 4, $min_height, \\ $max_height, %height, 1 ) SetControlTitle( %dialog,"HEIGHT", 2, 3,"*jE^") CreateStaticString( %dialog, "title4", 10, 4, $str2 ) CreateOKButton( %dialog,"ok", 25, 1," O K " ) CreateCancelButton( %dialog,"can", 25, 3, "wl~" ) make_dialog = DeleteAfterShowDialog( %dialog ) end function !!**************************************************************************** !!{p OX[pn0RgS !!**************************************************************************** sub init_data( %ret, %width, %height ) %list = {"SUM_FIG", "SUM_LINE", "LastAX", "LastAY", "LastTX", \\ "LastTY"} %max = Size( %list ) for %i = 1 to %max Deposit( %list( %i ), 0 ) next Deposit( "LastPage", "P7" ) Deposit( "TYPE", %ret ) Deposit( "Width", %width ) Deposit( "Height", %height ) !!pn04xh %list = { "r", "t^ge", "Hr", "\Ob", "p|", "VbjuS",\\ "STR1", "X1", "Y1", "PAGE1", "STR2", "X2", "Y2", "PAGE2" } %max = Size( %list ) for %i = 1 to %max if( CheckDeposit( %list( %i ) ) = TRUE ) %ret = Withdraw( %list( %i ), 2 ) end if next make_save_data() end sub !!**************************************************************************** !!{p g}n0NR`1X0\Ob !!g}k00OX[Y00p0NR`1Xh0W0f0c_0[0f0D000 !!**************************************************************************** sub make_save_data() %list = { "SUM_FIG", "SUM_LINE", "LastAX", "LastAY", "LastTX",\\ "LastTY", "LastPage", "TYPE" , "Width", "Height", "r",\\ "t^ge", "Hr", "\Ob", "p|", "VbjuS" } !!NR`1X0\Ob %max = Size( %list ) for %i = 1 to %max if( CheckDeposit( %list( %i ) ) = TRUE ) then %self_data( %i ) = Withdraw( %list( %i ) ) else %self_data( %i ) = nil end if next %self_data( %i ) = 0 %self_data( %i+1 ) = 0 SelectMode( 5 ) ClearSelectFig SelectFig( "P7", #[ 20, 4 ], , "B" ) %figno = GetSelectFig $fig = GetFigDocument( "P7", %figno( 1 ) ) $fig = GroupFigInformation( $fig, 1, %self_data ) overwriteFig( %figno( 1 ), $fig ) end sub !!**************************************************************************** !!{p Vb_n0uppr !!**************************************************************************** sub overwriteFig( %self_no, %fig ) %figno( 1 ) = %self_no ClearSelectFig PutSelectFig( $page, %figno ) Delete( 0, 0 ) InsertFigDocument( %fig, $page, ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O!B!PNJ:G@@WB_RNIFPG/ZHHJH&]:TQ6;_ISLBY;ЧUTEFD;WJ@4q@ZQMK]GB0OX=4x"*00000h:yg0o0[Lg0M0~0[000>RIԢ>!J:THbPBL;rT=4PT;ARgSW0f0000W0D0g0Y0K0J=a=&T:ok?HTHP\4>!ST([![4@h(C;M!<=4`s 'ppage@4ggAaFrPLro#N=sjHAt{uE=ap(v|Qmin_wpdtTbHэ|pFv܀#axuAa=apPw!Tyehx0ixh0*I㲄pv(#uЩ&(~=a{^JA܂w!!s0Wr1tu9=a ? OEw!2@4 EF/Hj D $:b4T=VaT;pPBGrz5 s=a;\J=4?8Ab=CEEK=4\:TrA=ab[=4f4Hхekq<~>!Hћ >!nBJahLTm%D;AMR=a4VAWZVrJijm%4QHZQ 2:ܳ5P;AXLFM;pSLYVR=C=a"|;A=a/P=R|qH=at>%| *| ||>%Uxxx|$t=4(t?%+td=40tQ=a3|6x:>:RQP;дT!JD t>!JbUFGHnZSw1ZVfn_=C>^Je t:zU=RlP0xofPo0S0Y0$X=a=aZD:rx0/!B=j(N P'=aH\!(-4>!*-HѹHmis|(1Ἥ\!-x64.*)18 L2tP©;$8HPTI#PUI$k_nRVAOFZ0PP>oZ?'F*"H!\qB]N?F!Q?R\q_?b! Ph?^aMa+mnPiapaZLa}?lL?y^aS+m)OEHR$Eg@ ER!R!aCg@`~0! t2za[CPaQt @؂a)`4ex:?Ԟay!QGzPAzC0p00O0J0_ak`0U$ОCCh4Z/[OB\gTh4]o/Cb`oia`pcϡ%I|syam_Hn_:tIh4 jaP}}n0wpSsр-!:ᄭ%NQ0A:eAY)$,!jlBN4~a'a@ޥaABApEA4'aD!XOa/TŏƯ?שBEEIMPSVY\_bRcegؕimw{$~僘%܉ !T:HSV!r#p0?ceQW0)flX!ܳTXP aD߰C*2EA_R߰űT000벒bҎT{|B\gTԔG<@OdESV <@3)QkVa+<@/yXzP P!aJLϲTaԔܟݶEB\b!,ʉϣCفAN__UVt3p]tSPe3ԔE1 bAD/ AVo!A 4Ӆ4A<9/E4gKDAE\Ԕd_xn4%q!QCRM$:AnT!# ԳIC:rA;r '-4 - T`jEE`nHTEmLT-sO QRmSTBT[Ztd"1TP?W6fzrn2*|stz TQt#D0pCIEyaAۡW'A Ms !- |!P 5#AaGPOPtFt E`"+>wI1Po$*>piWQ> Me&NFTxA A8n.Q4e1s 1Vxe7Na߱D R#%AJ>$+ *PQ>sU>ALIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`JSRV_SegmentInformation2CONTENTS0:;INFOMATION;JSRV_SegmentInformation2MainlRgS0000000 0 0000000\Ob 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  ^MainSprDataSaveMainRgSSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS;INFOMATION!!********************************************************************** !!====================z3"VFhPROJECT>hMain E?hPROJECT_MACRO_LIBRARY_AREA6DAhSRCAREA1 MACROAREA1@BLIBRARYEXTENDINFO$C%JSRV_SegmentInformation2&      !"#$'()*+,./02346789:;<=>@ACDEFGHJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~================================================= !!0000 T0 P}}000 !!0 Q W00 P}}0_M0~0Y00 !!0O(ugr0 j0W0 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if call line_main() !!RunDocumentMacro( "P}}000" ) !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0Oy00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  bMainSprDataSaveMainP}}000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTSCINFOMATIONJSRV_SegmentInformation2Bz4SPhPROJECTKPhMain RLPhSprP SuperPlayRite.  /pPQUJU>PLPPPUPCPEPaPUuPPPPUPPPPUPP ,UIa~UM Z U Щ а U 1U?IuU}dUЩ}#UA_U_"@UdmU_ %2U<[iuUЊНкU} UmЀM NUnPROJECT_MACRO_LIBRARY_AREA6QNPhSRCAREA1V MACROAREA1MOI LIBRARYEXTENDINFO$P!!********************************************************************** !!===================================================================== !!0000 T0 P}TP[0000 !!0 Q W00 P}TP[n0ۘs0HQx00000W0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if ClearSelectFig Guidance( "P}TP[0xbW0f0O0`0U0D0" ) SelectFig? CommandGuidance( "P}TP[|l" ) Guidance( "W0p00O0J0_a0O0`0U0D00" ) %fig = GetSelectFig() if Exist( %fig( 1 ) ) then %fig_no = %fig( 1 ) else Message ("P}TP[|l0B}NW0~0Y0") stop end if ClearSelectFig $page = GetPage() %fig = GetFigDocument( $page, %fig_no ) %data = GetGroupFigInformation( %fig, 1 ) if( Find( "P}TP[", %data( 1 ), ) = 0 ) Message( ";P}TP[=So0;P}TP[=0xbW0f0O0`0U0D0" ) else %str = %data( 14 ) %no = %data( 20 ) if( Find( "P}TP[", %data( 1 ), ) > 0 ) !!P}TP[ %type = 1 else !!P}TP[ %type = 2 end if get_table_no( %no, %str, %x, %y, %type ) get_region( %x, %y, %type ) end if stop end !!**************************************************************************** !!{p ۘs0HQn0pjuS0S_ !!**************************************************************************** function get_table_no( %no, %str, %x, %y, %type ) if( %type = 1 ) if( CheckDeposit( "STR1" ) = FALSE ) Message( "ۘs0HQL0d0K00~0[00" ) stop end if %str_list = Withdraw( "STR1" ) %x_list = Withdraw( "X1" ) %y_list = Withdraw( "Y1" ) %page_list = Withdraw( "PAGE1" ) else if( CheckDeposit( "STR2" ) = FALSE ) Message( "ۘs0HQL0d0K00~0[00" ) stop end if %str_list = Withdraw( "STR2" ) %x_list = Withdraw( "X2" ) %y_list = Withdraw( "Y2" ) %page_list = Withdraw( "PAGE2" ) end if %num = Size( %str_list ) %i = 1 do if( Find( %str, %str_list( %i ), ) > 0 ) if( %i <> %no ) if( %type = 1 ) if( Exact( $page,%page_list( %i )) ) exit do end if else $page = %page_list( %i ) exit do end if end if end if if( %i = %num ) Message( "ۘs0HQL0d0K00~0[00" ) stop end if %i = %i + 1 loop %x = %x_list( %i ) %y = %y_list( %i ) end function !!**************************************************************************** !!{p mpn0yR !!**************************************************************************** sub get_region( %x, %y, %type ) %region = GetDisplayRegion %min_x = GetX( %region( 1 ) ) %min_y = GetY( %region( 1 ) ) %max_x = GetX( %region( 2 ) ) %max_y = GetY( %region( 2 ) ) %x = %x - ( %max_x - %min_x )/2 if( %x < 0 ) %x = 0 end if %y = %y - Withdraw( "Height" ) + 3.75 if( %type = 2 ) do %Old_Page = GetPage() Msgbox(%Old_Page & "K00" & $page & "k0|lW0~0Y00") Jump( $page ) %Now_Page = GetPage() IF %Now_Page = $page THEN EXIT DO END IF %PARA("Button")=6 IF Msgbox("|lk01YWeW0~0W0_00",%PARA) = 2 then exit do end if loop redraw() end if DisplayPosition( #[ %x, %y ] ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O"U_"h"j""""U(%L%s%%U%%%%}% (U<(N(R(y(U((((U((FP  +2f(WER-O-B-EAKM.yD-VPP/Y/Q/I\/,Ab,0aB".EY._/tp0,Av2@W4RNI8G*.0P;% :;/,Q}6-TISL4НY.UT808D*.W2t2Z.S8B.X/tP%00000h:yg0o0[Lg0M0~0[0000CiP,A<C>04R>EGC>F*8G2t2T*8U8D4NGp/eB3P}TP[0xbW0f0O0`0US0DEP,AFX.,H?2t 3%Q\/GpO.MKR DJ/BL|l'=0,A-QJoK7UT3W0p0}MJ0_aMEA;J0aVS4_/UTRV0_B}NWDYET`]G_o<#*\NpNX2{ |k`# m`}a);/}ЩA4pv_8O`tY`^I`dT;x`th4yf$_wdO(4<<+0adA{UtQ3|tnpbl|nإ:VV:dt!HԱ1"EPd/Dg/0a:"Q$;EP<3%L3CH*HrK/2P.S8XA/!teR1R/te,AۨP/V8ۘs0HQL0d0K0D0Cd0a<3%TX?TD-A?/`X%_ir<#%洇B`t;Q.Ak!3Ȍr2ΑaE5Ȥ@EPIጐ3R4'5Ķ^EQeI 12{2Ja5ȢIceJxazdAw{2|e<`OQ)"= <3!OdxaAOdAj!IOhk!UP=URh{T|k!!`Od"<Δ[ڕ!OalqRhk!<0"1<  < RdOdHz0 / ]RhY$35e13rOd%Od:WjWRh9iexaijpQ"WVPmoQeVPVQ_Q5ΑǁEr|gBo OniqVPB+VPΑk1UD&`S``LY?zqw{iqǀKDǀ\tcOk1!'ǀ !mnPn/8|YBN>AOGP!ġiqOX?B^gHőaaBno x\~ϻy00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  fMainSprDataSaveMainP}TP[0000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTINFOMATIONUJSRV_SegmentInformation2z5Ic`PhPROJECTXPhCONTENTSKINFOMATIONSprPl SuperPlayRite.>  jSOpOQJUUCQUHUdxUU+UK^hjq*WZ d З U Ъ U P& P; Pg PU P P P PU P P P PMain _YPhPROJECT_MACRO_LIBRARY_AREA6^[PhSRCAREA1MACROAREA1Z\ !!********************************************************************** !!===================================================================== !!0000 T0 000B}N !!0 Q W00 0000000\Ob000n0B}NQt0LD0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if CommandGuidance( "plp\ObxB}N" ) Guidance( "W0p00O0J0_a0O0`0U0D00" ) !! h}rpn0-[ if GetDisplayMode() = 1 then DisplayMode(0) end if !! Ype %list = { "SUM_FIG", "SUM_LINE", "LastAX", "LastAY", "LastTX",\\ "LastTY", "LastPage", "TYPE" , "Width", "Height" ,"r",\\ "t^ge", "Hr", "\Ob", "p|", "VbjuS", "STR1", "X1",\\ "Y1", "PAGE1", "STR2", "X2", "Y2", "PAGE2" } !! tX Ype %env_list = { "XSMO|", "h:y Ps", "0000", "0000000" } !!0upY00 %ret = Alert( "plp\Obx0B}NW0~0Y0000W0D0g0Y0K0", 1, ) if( %ret= 2 ) stop end if !!qQ gpn04xh %max = Size( %list ) for %i = 1 to %max if( CheckDeposit( %list( %i ) ) = TRUE ) Withdraw( %list( %i ), 2 ) end if next !!mpJRd DeleteView( "plp" ) !!tX-[ %ret = Alert( "x[L_n0-[0i0n0rKak0;bW0~0Y0K0", 1,\\ { { "[LMR", "F" }, { "S0n0~0~0", "N" } } ) if %ret = 1 then !! tX-[0;bY00 Recover_Env() %env_max = Size( %env_list ) for %cnt = 1 to %env_max if( CheckDeposit( %env_list( %cnt ) ) = TRUE ) %para = Withdraw(%env_list( %cnt ),1) select case %cnt case 1 !! XSMO| CoordinateLengthUnit(%para) case 2 !! h:y Ps DisplayRatio(%para) case 3 !! 0000 Grid(%para) case 4 !! 0000000 PointMode(%para) end select Withdraw( %env_list( %cnt ), 2 ) end if next ScrollHome() else !! qQ gpn04xhn000 %env_max = Size( %env_list ) for %cnt = 1 to %env_max if( CheckDeposit( %env_list( %cnt ) ) = TRUE ) Withdraw( %env_list( %cnt ), 2 ) end if next end if Inputplane("A") Message( "plp\ObxB}N", 0 ) MouseCursorOn( ) WarningMode( 1 ) !! h}rpn0-[ if GetDisplayMode() = 0 then DisplayMode(1) end if stop end !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O#t^gc+!:2QHr's:jB's$eeA|i>cVbjuS'scS6R1UT:A:Xs2sYse8P,Ls%Pr<2UT"syE uyEUAvyA&S"'aleZ3ce I&q 2#U#XSMO|Wk'a;! PsY'a000<[VAu::0~DenvTV~˫3 $etA5p%D& :"AAB0CAW<YK&rP%PA D&O4~qD~V(#Aj2QD6ATg%D%A6ҩ1tA{쁝42Q#Cph&T$V/E6&ᱥVKJ3cʚl&ћ"B;_n0-[0i0n0r?Kak0;b#g & P22RUj;MRWk2QFWXrd~<įaH~ "_STHa"<*З%t,)iE4E/A+>V$_$ND3cV1~3a.ŜgЈVA$օ v_b~ztcU$tQޱ$I2<3hA_}*~OU&Й2Q32Q,_UF'apZIrZxtU &Jb! &)i*t 9Ax!>%aQN,a0!U/D~14G=BaER8H*Q T/UO}_^kp!'aY#8G%Ea}^ 'a##8*Hfq0T&8~^"#4ꏯMH!U=)4E.tSP%AEL5pH>&2Q0");ToAo!?9PArd[T`$ ?&m(t!@&Je3q84,QUI$ TM,l3-U&/O#%8 !hY!PPTQTYC(˴Amt1XfDVS}c#;AB5 Sϡ$5 K4UMU*USORϡ)CPIW}PRrM 6B…Q5!d!JEe5 (TCnR}TPIgBrF$NI~IAJVDA_DOC`SRCAREA1LIBRARYEXTENDINFO$]JSRV_SegmentInformation2JSRV_SegmentInformation2JSRV_SegmentInformation2MACROAREA1 LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`Mainl000B}N0000000 0 0000000\Ob 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveCONTENTSWaCINFOMATIONbJSRV_SegmentInformation2z6mPhSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  bMainSprDataSaveMain000B}NSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTSCINFOMATIONPROJECTePhMain lfPhPROJECT_MACRO_LIBRARY_AREA6khPhSRCAREA1+    Y" !#%$&'FE)*+,-./0123456789:;=>?@ABCDIGHJLKZ^NOPQRSTUVWX[\]_a`bdcwfghijklmnopqrstuvz{|}~!!********************************************************************** !!===================================================================== !!0000 T0 000 !!0 Q W00 0000000n0OD0e0h:yW0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if %keta = CRTTextWidth div 2 - CRTTextWidth mod 2 %gyou = CRTTextHeight div 2 - CRTTextHeight mod 2 %start_x = %keta - 25 %start_y = %gyou - 8 do %ret = Alert( "v0xbW0f0O0`0U0D0", 1,\\ {{"P}}","L"},{"P}TP[","J"},{"hQSO","A"},{"B}N","E"}} ) if( IsBlank( %ret ) ) exit do end if select case %ret case 1 open_line_panel( %start_x, %start_y ) case 2 open_jump_panel( %start_x, %start_y ) case 3 open_panel( %start_x, %start_y ) case 4 exit do end select loop stop end !!**************************************************************************** !!{p P}}xn00O0 !!**************************************************************************** sub open_line_panel( %start_x, %start_y ) %list = { "P}}xO(uk0W0f0n0la" , \\ "0pL0j0c0_00P}}CQVb_0x0g0O0`0U0D00" ,\\ "]0n0k00Yph0W0_0D04X@bn0]0p0g0s}0xoxW0f0" ,\\ "O0`0U0D00Q^pL00~0Y0K000N^o0P}}" ,\\ "HQVb_0 TX00F0k0x0g0O0`0U0D00",\\ 0"Yp0B}ph0j00po00xoh0Tn0Npp ",\\ "n00g0Y00",\\ "0~0_0P}}xg0o00P}}L04ls^0Wvk0j000F0",\\ "Rvk0OckW0~0Y00"0} CreateDialog( %dialog ) SetDialogTitle( %dialog , "000") LocationDialog( %dialog, %start_x, %start_y, 49, 11 ) CreateStaticString( %dialog, "str1", 15, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreateStaticString( %dialog, "str5", 2, 6, %list( 5 ) ) CreateStaticString( %dialog, "str6", 2, 7, %list( 6 ) ) CreateStaticString( %dialog, "str7", 2, 8, %list( 7 ) ) CreateStaticString( %dialog, "str8", 2, 9, %list( 8 ) ) CreateStaticString( %dialog, "str9", 2, 10, %list( 9 ) ) CreateOKButton( %dialog, "ok", 23, 11, " O K " ) MouseCursorOn DeleteAfterShowDialog( %dialog ) end sub !!**************************************************************************** !!{p P}TP[|ln00O0 !!**************************************************************************** sub open_jump_panel( %start_x, %start_y ) %list = { "P}TP[|lxO(uk0W0f0n0la" , \\ "0P}TP[k0o0.z^B00~0Y00;P}TP[=o0p|",\\ "Q|l0;P}TP[=o0p||lg0Y00" ,\\ 0"0|lY00k00P}TP[n0-Nk0fK00_0eW[L0 TX0",\\ "P}TP[k0|lY000F0k0j0c0f0D0~0Y00[k0j00P}",\\ "TP[L0j0D04XTo0|lg0M0~0[000",\\ "0;P}TP[=o0Tshsn0] Nn0Vb_g0Y00;P}",\\ "TP[=o0S Nn0Vb_g0Y00" } CreateDialog( %dialog ) SetDialogTitle( %dialog , "000") LocationDialog( %dialog, %start_x, %start_y, 50, 10 ) CreateStaticString( %dialog, "str1", 10, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreateStaticString( %dialog, "str5", 2, 6, %list( 5 ) ) CreateStaticString( %dialog, "str6", 2, 7, %list( 6 ) ) CreateStaticString( %dialog, "str7", 2, 8, %list( 7 ) ) CreateStaticString( %dialog, "str8", 2, 9, %list( 8 ) ) CreateOKButton( %dialog, "ok", 23, 10, " O K " ) MouseCursorOn DeleteAfterShowDialog( %dialog ) end sub !!**************************************************************************** !!{p hQSOn0fn00O0 !!**************************************************************************** sub open_panel( %start_x, %start_y ) %list = { "plp\ObxO(uk0W0f0n0la" , \\ "0plpxg0fD0_0zP[0P}}00yRU0[0_00JR",\\ "dW0_00Y00S0h0o0g0M0~0[000~0_00zP[Qn0eW[",\\ "0 YfY00S0h00g0M0~0[000N Nn00F0j0d\O0L",\\ "c0_04XT0ck8^k0xL0R\OW0j0O0j00n0g0l0NQ0f0",\\ "O0`0U0D00FOW00;$Re=n0R\HQn0mW[0r?ceQ",\\ "xg0fD0_0Tr0 YfW0f000xo0ck8^k0RM0~0",\\ "Y00" } CreateDialog( %dialog ) SetDialogTitle( %dialog , "000") LocationDialog( %dialog, %start_x, %start_y, 50, 10 ) CreateStaticString( %dialog, "str1", 10, 1, %list( 1 ) ) CreateStaticString( %dialog, "str2", 2, 3, %list( 2 ) ) CreateStaticString( %dialog, "str3", 2, 4, %list( 3 ) ) CreateStaticString( %dialog, "str4", 2, 5, %list( 4 ) ) CreateStaticString( %dialog, "str5", 2, 6, %list( 5 ) ) CreateStaticString( %dialog, "str6", 2, 7, %list( 6 ) ) CreateStaticString( %dialog, "str7", 2, 8, %list( 7 ) ) CreateStaticString( %dialog, "str8", 2, 9, %list( 8 ) ) CreateOKButton( %dialog, "ok", 23, 10, " O K " ) MouseCursorOn DeleteAfterShowDialog( %dialog ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O'L'P'w''''''))D)O)S)z))))D P,AfWER.O.B.EAKM/D.` TDP0W0Q0Z0`-1aBP/'EY/_0tn1t3@W5RNI9G/L1$PQT;JQ -Q6.T_ISL5Y/UT909D/W3t3ZP/S*9B/X0tP#00000h:yg0o0[Lg0M0~0[_0001C=1a J C =U24C.T?EB*?D?H0t0QHI_JKLy GA1!ke/taL1a%GH=I >4=QNH.%I9H?0LE-TUVW1X Sa1!gyouL5StAHFDSq @XR0HXQ_sRrR_xLM_^`X^~0`XcQeacy 2QhStzP=oDZ4VP5L.X%vT8v0xbW0f0O0`0U0IDFP0X1e;1Q1a;<sCP}}13=BLLsTQtcP}TP[u1Qw^k#hQSOyAsTx{ok#B}N}/0aQlrR;DTdtt Z4R1a9oe]ndlied pRЮ!lQ/jrQ1a80;jt.uxO(uk0pn0lRu0pL0j0c0_00uCQVb_pA0gpFAzC,]0k00Yph0WD04X@bn0]0p~0s}p@o0p~gE޺gQ^݊EY0K0N^o2131!CH TX00F0k1Bn޼0B}j0_0poxᄷh0Tn0Np?p >1PB!Cnn0PY(֯QC~E!2L04ls^0Wvk 13jC,ROckW’FAQ!1!d!c4%vN5OID9nAO9Q*B!dao^cQմk.TS.Tך%T9TnRQ0tPx00 FPP-1!.TEC2I/@AP %P_/jrP1!10t=ta-B;S?CRR9QXD_0tat1!d!rAit."t1a pP1a>Qԋ0 wQ_0tN0tQ0t{!AHϱ?u0t30ttAH OQ0+Z0I1!A%-/OoQA0tJ~50tRUnAXH&O_gHQ{!_0t~>$AB!A3'ϙ%)+,?Q-$*~7$"A?4O2!678Q:_$E~8$jIJjAL@ JᎡC/DOEo")G$A2+9$:J=JҁAALXMOHKxOxOPBTEc`S_T{!Wok$oJ$AsJaTn  P xOtMUےCR"ROP^Ot^1!FQh!HW__TҀaya_tjum PoҀDҀPatjAP}TP[|l2/Oexkϐ.z^{B0ƒ0;x=o0Ppy! ЅQjy)~6~ܓy)X 0y)Ycxn0-Nk0fK0eW[Lr|$øfӃ| PDžQx𸡽awTog0M[06~Kʁshyp!sn0] Nn0`~Ak'Scvԏ̢`'ڢ`mT'I߯I/O"Hs?C,6D:ҁAHP/QOkU$^of$Ajm ɹ!Yt8|?_T4 H<šoøᶼTAu %üޮ $G$OܼRܴ&UH޼!\ݸdH?_x$J0ܼܴ2޼$o8$ߡ$=%ܼܴ?޼!?_I$IܼfKIio N\/]O^k"H $A+a/1b59dCEfghUijll|=(docq'rospad0vlwO"CzpyPp\O9by{0K1cgDPzP[0}yRU_}J5R%W72S0h}~P5҅Qnr8_0 Yf9E9N j0d\O0L+ncPa0ck8^k01cL0կR\OWO2n9l0NQ2PnO0`0UΏ00FB$Re=PR\H;PmW[0r?cceQK35 TG<2A1coAՁRG-/{WPljWP%!PǥS9ФOP$/XѮ*`߭vЮIdT[O o،_Oڤj0bj0imtj0ioa#nx+j0fghϢ!I?j?Hk%PmtХSmt%Vo|{p ]yersuIyv贂kϥymtѥo|a}/zၟ_?贼k%yDmt%o|ቯчxBًߌ폿4kyBKpia/ tEpϛ'po0pO8$tХ;t%>|ExMߥBa^rutx|a/၇_P?5^%t"%|ữx!4IڪTttrT !"#^VDA_DOC`SRCAREA1+MACROAREA1LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`MainJSRV_SegmentInformation2CONTENTSdn;INFOMATIONo JSRV_SegmentInformation2     !"#$%&'(),-./01345789;<=>?@ABCEFHIJKLMPQRSTUWXY[\]_`abcdefgijlmnopqstuvwxyz{|}~l0000000000 0 0000000\Ob 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  ^MainSprDataSaveMain000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS;INFOMATIONSprP@ SuperPlayRite.   0pK_QJUUIWUN_wUUUU)6ESU_mx|U_ , U6 R \ z U Ф Ю W'PEPNPU[PaPcPxPUPPPPUPPPP_+/PVPUzz7<z"hPROJECTr"hMain ys"hPROJECT_MACRO_LIBRARY_AREA6xu"hSRCAREA1MACROAREA1tvLIBRARYEXTENDINFO$w*JSRV_SegmentInformation2+!!********************************************************************** !!===================================================================== !!0000 T0 0000000\Ob0000 !!0 Q W00 0000000\Ob(u00000h:yW0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** WarningMode (0) ErrorBreakMode (1,0,1) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if $a_mode = GetATOKMode(1) ATOKMode(1,0) DialogSize(2) %sel = {\\ "000",\\ "RgS",\\ "P}}000",\\ "P}TP[0000",\\ "0000?ceQ",\\ "g000",\\ "000000",\\ "000B}N"} do %select_no = SelectListBox(%sel,"plp\Ob(uxmpmp0xbW0f0 NU0D0 ") if %select_no = Nil then stop end if select case %select_no case 1 RunDocumentMacro("000") case 2 RunDocumentMacro("RgS") case 3 RunDocumentMacro("P}}000") case 4 RunDocumentMacro("P}TP[0000") case 5 RunDocumentMacro("0000?ceQ") case 6 RunDocumentMacro("g000") case 7 RunDocumentMacro("000000") case 8 RunDocumentMacro("000B}N") stop end select loop ATOKMode(1,$a_mode) DialogSize(3) stop end !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O9UD'A-POS'Z6*1*1  Pb1004pq+bTRgS#s1PP}}00G1FP}TP[00PGv10A2pGP?ceQ#sJ1g00G\0AM02ТQGFIJB}NPE s;pl<Ԥ A>P*1}DR+ty00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  rMainSprDataSaveMain 0000000\Ob0000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`JSRV_SegmentInformation2Gz8"hPROJECT"hMain "hPROJECTCONTENTScINFOMATIONVDA_DOC`PROJECT_MACRO_LIBRARY_AREA6"hSRCAREA1((MACROAREA1<PLIBRARYEXTENDINFO$N!!********************************************************************** !!===================================================================== !!0000 T0 0000?ceQ !!0 Q W00 00000fM00~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if !! Ype EditDisplayMode( 0 ) InputPlane( "C" ) $list = { "r", "t^ge", "Hr", "\Ob", "p|", "VbjuS" } DisplayMode( 0 ) for %i = 1 to 6 if( CheckDeposit( $list( %i ) ) ) %init_data( %i ) = Withdraw( $list( %i ) ) else if( %i = 2 ) %date = ThisDate %date = ReplaceB( %date, 5, 1, "." ) %date = ReplaceB( %date, 8, 1, "." ) if( FindB( "0", %date, 6 ) = 6 ) %date = ReplaceB( %date, 6, 1, " " ) end if if( FindB( "0", %date, 9 ) = 9 ) %date = ReplaceB( %date, 9, 1, " " ) end if %init_data( 2 ) = %date else %init_data( %i ) = "" end if end if next !!rqxn0up do %ret = open_dialog( %init_data ) if( IsBlank( %ret ) = FALSE ) exit do end if loop !!T4X@bx0eW[0?ceQY00 put_string( %init_data, %ret ) !!pn0OX[ for %i = 1 to 6 %init_data( %i ) = %ret( $list( %i ) ) next for %i = 1 to 6 Deposit( $list( %i ), %init_data( %i ) ) next InputPlane( "A" ) DisplayMode( 1 ) Redraw() stop end !!**************************************************************************** !!pe rqx0upY00 !!**************************************************************************** function open_dialog( %init_data ) CreateDialog( %dialog ) SetDialogTitle( %dialog , "0000?ceQ") LocationDialog( %dialog, 3, 4, 36, 8 ) CreateStaticString( %dialog, "TITLE1", 10, 1, "plpr" ) CreateStaticString( %dialog, "TITLE2", 1, 3, $list( 1 ) ) CreateTextField( %dialog, $list( 1 ), 10, 3, 20, 60,\\ %init_data( 1 ), 1 ) CreateStaticString( %dialog, "TITLE3", 1, 4, $list( 2 ) ) CreateTextField( %dialog, $list( 2 ), 10, 4, 12, 12,\\ %init_data( 2 ), 2 ) CreateStaticString( %dialog, "TITLE4", 1, 5, $list( 3 ) ) CreateTextField( %dialog, $list( 3 ), 10, 5, 4, 4,\\ %init_data( 3 ), 2 ) CreateStaticString( %dialog, "TITLE5", 1, 6, $list( 4 ) ) CreateTextField( %dialog, $list( 4 ), 10, 6, 6, 6, \\ %init_data( 4 ), 1 ) CreateStaticString( %dialog, "TITLE6", 1, 7, $list( 5 ) ) CreateTextField( %dialog, $list( 5 ), 10, 7, 10, 10, \\ %init_data( 5 ), 2 ) CreateStaticString( %dialog, "TITLE7", 1, 8, $list( 6 ) ) CreateTextField( %dialog, $list( 6 ), 10, 8, 10, 10, \\ %init_data(6), 2 ) CreateOKButton( %dialog,"ok", 30, 6," O K " ) CreateCancelButton( %dialog,"can", 30, 8, "wl~" ) open_dialog = DeleteAfterShowDialog( %dialog ) if ErrorCode() <> 0 then stop end if end function !!**************************************************************************** !!{p r?ceQ !!**************************************************************************** sub put_string( %init_data, %ret ) !! Ype %center = { #[ 38, 18 ], #[ 86, 18 ], #[ 108, 18 ], #[ 124, 18 ],\\ #[ 166, 13 ], #[ 166, 21 ] } PointMode( 0, 1, 1 ) !!rpn0R0fH0 TextFrameStyle( 1, 1, 10, 20, 8, 1, 2, 1, 1, 1, 1, 2, , , , , 1, \\ 25, 0, 100, 7, 1, 0 ) !!Cpn0hQpJRd %page = GetPage() DeletePagePlane( %page, 1, "C", 0 ) for %i = 1 to 6 %length = LenB( %ret( $list( %i ) ) ) !!eW[n0wU0L0N Nj00p00fO0 if( %length > 0 ) %size = ( 1.75*%length + 0.35*( %length - 1 ) ) / 2 %x = GetX( %center( %i ) ) - %size %y = GetY( %center( %i ) ) - 3.15 if( %i = 1 and %length > 30 ) %keta = 15 %gyou = 2 %size = ( 1.75*30 + 0.35*29 ) / 2 %x = GetX( %center( %i ) ) - %size %y = GetY( %center( %i ) ) - 6.3 else %keta = %length/2 + 1 %gyou = 1 end if !!eW[gn0\Ob $point( %i ) = #[ %x, %y ] MakeTextFrame( $point( %i ), %gyou, %keta ) InsertText( %ret( $list( %i ) ) ) CloseTextFrame( ) end if next PointMode( 1, 1, 1 ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OP@P\PUpPPPPUPPPPUPPP5UHZնW1 PW P PU P P P P_ P, PU7 PA PH PJ PU\ Pa P P PU P P P P P P PW@GUYЅЌРUо}2U_PUSl4  PPPP Nj PXaoq# M&BUi/V"|"""""  $P;$PV$Pe$Pp$Pr$P$P$P$P$P ''2';'='?'w'''֚''! `*V*Z*******,',N,Y,],,,*,,AP'2f P/2f"ER1O1B1E_AKM2D1$$PQP PP3T3Q3W30A]04aB2EIY2_3tk40Aq6@W8RN+I?$P0Q61TISL8Y2UT<04B4aF4!rA1P@B6tt^ge43QHr430AV\Ob434!FTap|VTaU%VbjuSO$PR4!l_ist6t6;ML3GC5%FI$4aI$PRb4a%$PM?i5ubTa>\4aeg@`_h7CJE*RPK32P2SK$PngA]lq^kR$Pue?g@TE_`<KH30R8Cl1lsqmel1o;eQoP^n^t_da^andeHTbIPg$PeQb??gP@T_Q*qrQBD8T3ReQ}4!xW*?g@T_Wq8a#C17eQD3b4!3d301Q.e$с P P? P$$3'$4e*b[>50AT,P4a{P$P9^T4FC73@IPeBE/$PLTadRH?E\deBnnLx{eBD1,їUio"$Pq3?Oo#$PҰ ՒئO_1An P{l1@wUxy33R}U P4ab3t( PFRl"wU?y7Q! Peq]$Qc_@j P7%~Q<OaE<_KAB0O5%y$U$PR( 9١3Cٟ$Ӑ?3-ӐE13t7 13;r4e>%$a[7l[U0AEQ o!e#3tn%/2( {l1~Ӑl4^k!(bӑKA 9XPEB0De$/ol4=Q6U( ' DQl14D ?W( 7L+,-φ;Ϝĉ13%(9 Q$_Al1 lS>Q$189:,Ml15S,[T_Iy00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  dMainSprDataSaveMain0000?ceQINFOMATIONhJSRV_SegmentInformation2kz9}$hPROJECT$hSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTSGINFOMATIONSprP@SuperPlayRite.U  љ/pPnQUJUPBPPPAPPGcwЪ68KMd{}  ` PP PX Pa Pc Pq P P P P P PP#P%P<PSPYP^P`PP̾P:W\w6g ")KY[]Ем ?ftxПMain $hPROJECT_MACRO_LIBRARY_AREA6$hSRCAREA1M<MACROAREA1r@!!********************************************************************** !!===================================================================== !!0000 T0 g}000 !!0 Q W00 N000x0g}n00000000000W0~0Y00 !!0O(ugr0 ha12_smp.jhd !! ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) if IsLayoutWindow() MsgBox("00000h:yg0o0[Lg0M0~0[000") stop end if Guidance( "W0p00O0J0_a0O0`0U0D0" ) %page = GetPage() !!rqx0upY00 %page = open_panel( %page ) %pre_page = "P7" PointMode( 0, 1, 1 ) EditDisplayMode( 0 ) !!c[U00_0p|k0g}L0ek0X[(WY00K0i0F0K0n0jox ClearSelectFig SelectMode( 5 ) %no = SelectFig( %page, #[ 20,4 ], , "B" ) if( %no > 0 ) Message( "ek0g}o0zpU00f0D0~0Y00" ) PointMode( 1, 1, 1 ) EditDisplayMode( 1 ) stop end if !!g}0zpY00 Jump( %pre_page ) ClearSelectFig %no = SelectFig( %pre_page, #[ 20, 4 ], ) Copy( %page, , 1, 0, 0, 1, ) ClearSelectFig Jump( %page ) RunDocumentMacro( "0000?ceQ" ) PointMode( 1, 1, 1 ) EditDisplayMode( 1 ) stop end !!**************************************************************************** !!pe p|c[n00upY00 !!**************************************************************************** function open_panel( %page ) %page = Mid( %page, 2, 2 ) do CreateDialog( %dialog ) LocationDialog( %dialog, 25, 10, 40, 3 ) CreateStaticString( %dialog, "TITLE1", 2, 1, \\ "zpHQn0p|0c[W0f0O0`0U0D0" ) CreateNumericField( %dialog, "PAGE", 10, 3, 2, 1, 99, %page,1 ) CreateOKButton( %dialog,"ok", 34, 1," O K " ) CreateCancelButton( %dialog,"cna", 34, 3,"wl~" ) %ret = DeleteAfterShowDialog( %dialog ) if ErrorCode() <> 0 then stop end if if( %ret <> NIL ) exit do end if loop open_panel = "P"&%ret( "PAGE" ) end function !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0Oa#!pagej/T!&%D O@E+_*@N LAt-B+ACAB/9CTE"E85P7AtI.:AprB_BXANDT\P@OJ+T!YG4$e\G4R#e_QAeDXHT" D+TU2S@$1C" vPADT0IIC10'R1FE;0WTF+G%tDX>EZI" G4#!CT/TDTANZOAG>"ۨ8P"G4"t G4A""tJp&A_no-TLPjA8P"i"W| P3i@aM S1A%" P5Pek0g}o0zpU00f='~0Y82A"oNRO- P#)0w|3wxBA:oTU"eKwx9 PAro*#!J1M@Ax PLMAoXZ[# P*#a/TtabId PewtfwtgAiAo4!^CErYAtwtBg"Δ"w|wt$eJ\w|܆AZo8?"@>kP&%5rR1"2CCEOA;0!"P54!6P00?ceQ#&u/vO1P#)4<78A={/|O""eN8#acq#aQEAoBPe0M#nBlQH;#a|/TCV%tM:4"HoO"R (q:AX:A ,Q^#aF&T'TTA10Obֹl4!diBpl jg%ty#! CI!2AT"t"tDa"@!"ĔAH-S1C"R+ADƯ"tTR1"t̺,ϸ#erHQn0s|0c[Ws=A :A+1!CZFEA _"5#!A"Dyd"!dR$d#e'dcDI+d1hA8RuֿO!B1IT"AH/"tPĮok"tVd"J"tZl\ı !Q !2iȬ4Ģ;#L}/"tAc0a"t,l(wl?~00!#a/#aE^DҜ1AZ$1H2rAt("Bt-4!h~b8P"̈́ė,4 ǒA"GHd8-H 1l"" Ļ%*r<1P:h\l$ A; "1VDA_DOC`SRCAREA1<MACROARELIBRARYEXTENDINFO$JSRV_SegmentInformation2JSRV_SegmentInformation2JSRV_SegmentInformation2A1@LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`Mainlg0000000000 0 0000000\Ob 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveCONTENTS?INFOMATIONJSRV_SegmentInformation2z10$hSprDataSaveSprDataSaveMainSprDataSave  `MainSprDataSaveMaing000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS?INFOMATIONVDA_DOC`PROJECT$hMain $hPROJECT_MACRO_LIBRARY_AREA6$hSRCAREA1e2#!!********************************************************************** !!===================================================================== !!0000 T0 NVΐwR !!0 Q W00 P[V }P[n0ƖP}g0 NVΐk0!nY0 !!0O(ugr0 j0W0 !!0Q[0 %vhxk0 NVΐ(uxgr 0CIRCUIT.MCR 00\ObY00 !! %vhxk0B00ƖP}ggr 0CIRCUIT.TXT 00 NVΐk0!nY0 !! NVΐL0D0j0D04XTo00P[k0ƖP}g0h:yY00 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/XP/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !!0vhxk0 NVΐ(uxgr 0CIRCUIT.MCR 00\ObY00 !!0 NVΐk0ƖP}g0!nY0 !! ƖP}gL0j0D04XT if ExistFile ("CIRCUIT.TXT") = FALSE or \\ CheckDeposit ("Ɩv") = FALSE Message("%ƖP}gL0B00~0[00" & char(10) & \\ "0bV }P[cn0Ɩ_k0[LW0f0O0`0U0D0") STOP end if ErrorBreakMode(1,0,1) select case Alert("000n0h:yel0xbW0f0O0`0U0D0", 1, {{" NVΐ","1"}, {" NVΐ","2"},{"P[","3"}}) case 1 !! NVΐ Create(20, "circuit.mcr") %mcr1= 'LoadSheet("circuit.txt",,2)' %mcr2= 'message(" NVΐ0B}NU0[0f0O0`0U0D0")' %mcr3= 'END' LinePrint ( 20,%mcr1,%mcr2,%mcr3 ) Close(20) ExecWait ("sns.exe","circuit.mcr","circuit.txt") case 2 !! NVΐ %curdir = GetCurrentDirectory(0) %macdir = "c:\just\wm\hanako11\" Create(20, %macdir & "circuit.mcr") %mcr1= 'LoadSheet("' & %curdir & '\circuit.txt",,2)' %mcr2= 'message(" NVΐ0B}NW0~0Y00")' %mcr3= 'Quit()' %mcr4= 'END' LinePrint ( 20,%mcr1,%mcr2,%mcr3,%mcr4 ) Close(20) set %sns = CreateObject("SNS.Application") !! NVΐn00000000ub %snspath = %sns.FullName !! [o0pathL0{0W0D0`0Q0 %sns.Quit(3) ExecWait (%snspath,%macdir & "\circuit.mcr") case 3 !! P[12 P[k0P}g0h:yY00() end select Guidance(" Ɩ0J000~0W0_0 ") END !!====================================================================== !!{p P[k0P}g0h:yY00() !!====================================================================== sub P[k0P}g0h:yY00() $layout = IsLayoutWindow() if $layout = 1 LayoutWindow(0) end if %rg= GetDisplayRegion %page = GetPage() %page = Right(%page,len(%page)-1) %cr = Char(13) NextPage() DeletePagePlane(GetPage) %unit = GetCoordinateLengthUnit() !! XSMO|n0S_ CoordinateLengthUnit(.XSMO|=1, .XSp=0, .YSp=0, .XeT=1, .YeT=1 ) %Ɩv= WithDraw("Ɩv") %ƖP}g= WithDraw("ƖP}g") %fs= GetTextFrameStyle(1) TextFrameStyle(.el=1,.D}0e=1,.eW[{r}=12,.gV҉=0, \\ .eW[=2,.L=2,.L0e=1,\\ .Te0000="-3 0000",\\ .'ke0000="Courier New",\\ .peW[0000=3) EditDisplayMode(0) MakeTextFrame(#[5,10],1,7," }P[ƖP}g") OpenTextFrameName(" }P[ƖP}g") TextFrameStyle(.el=2,.kpe=1,.W=3) %text = Using(";Ɩe###########",%Ɩv(1,5)) %text = % text & Using("################=",%Ɩv(1,6)) %text = %text & %cr & %cr for %c= 1 to 2 %text = %text & Using("############",%Ɩv(1,%c)) next %text = %text & Using("######",%Ɩv(1,3)) %text = %text & Using("######",%Ɩv(1,4)) %text = %text & %cr for %l = 1 to Size(%ƖP}g) for %c= 1 to 2 %text = %text & Using("############",%ƖP}g(%l,%c)) next for %c= 3 to 4 %text = %text & Using("#####",%ƖP}g(%l,%c)) next %text = %text & %cr next do !! InsertTexto0ED0n0g0S0n0el0h000 %strlen = len(%text) if %strlen > 200 InsertText(left(%text,200)) %text = right(%text,%strlen - 200) else InsertText(%text) exit do end if loop CloseTextFrame() ClearSelectFig() TextFrameStyle (%fs) CoordinateLengthUnit(%unit) !! XSMO|0CQk0;bY0 Message(" 0" & %page & "000 0k0;b0~0Y0") Page(%page) DisplayPosition(%rg(1)) Message("ƖP}go0 0" & %page + 1 & "000 0k0B00~0Y0") if $layout = 1 LayoutWindow(1) end if end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OE'"npoT@!at>/gT)EN5nw!oa!)c)~.LJ.N5R|R2fXoo^ouo$yc-4OC/P6/fX)@cA.r5QW;R6WgT:asj0s1emeTg_h~/m\ -4b! @ /7q z+%! -b0f";AT1HxT50 5QTH2Y6QoarkЋc;jEE 0A:\jhpsh\wm\laj0akk1YP\nԙamkc$)dd/kf;w%oD/yh닏;t ;kl/QA\m%oUÏb/ʚr?:s\W>Y0uA"v叔y!/운aQ4(nawx'") -7q{|I ~ TKZ"#Za!o)Z4o:XA -Lس4JeGOHpJ/Y Ш0A%.N..;pplcptoDj2oEQVcjqQ -QwR!QY0,)$-4GJ12D;N0/-0A' 70J0>rW0_0@ /$"Az*Q)-`(6Gt.L;Y6U*-WD6W%TalpyPu2*A;:aM,F%>?/H$c)M-B4Oe/ZMpbԞa -o:P(4QS|HG.OxHud]rcԔ-(:4CP;o7q!c ԮԑaOR|G5 ㅤ , -)/a/oa"O.-@//4сBti#)*41')Aҡ5/ae% ,jA3HPOH2a)GpHߐNX.!7quH䐧a!EOPPC01#p6_AJQ@9!aXS/MO|;94@>94XSpD94U@UG94YA_;xe֥l5y!2D"A 6u_vnEJ "EFHIanLPE.B5LC)'FHJڡSpY7r;xHS!]faT8A]UV8`09]ael;|:4DO}0@;|恇eW[{Or}p94994gVO҉=:4cA949XLhi94La6€;€恌Te0000€-3 00009-n'kRo-5p4Crue xewC%NnpcPoKVm![€E/ҡEr MMP)amq'pDx' q0K)[ƀp~€0mmDmmp4 }P[P' xZO0#[mgx[\/€J9ҐE^mkɐTkpaTmϐT$wk€ xk˔UGp4 ;e# O#P€k J b|ᗡtkѾpHtᥠpa/=/3IAO9t;tA=PrUँOI^aQ$aAWzP]]eaTcjtkko*ؤT}wQ8A#DI\ѭBa(3a画9Բ$1D%ÿɬ\ёϮѡt3aTʑʬ/j͏ϝX(\Qt'H3aQ?t@VTI!j t@Ot@HtAxakmA#Xet@k_Hst@Te8"Zv-Ppa7dh?;딻D夼J$X$R/ G`t@ß 딐PQu똾QxP(3a_ )u,'k$ʤT$Ojm2D LL,$fA+&%kk#(a#Te647$#+3aras@re.a(#-(]kq3j+54=P6SUpRU+CHk/lbUpF3MmAS"k]e&x RRNG83%k %y tq {"!*(YNA$%*!pY|aC{OH5r/Y9:2EЉR5rCr-AY yV!Y+UXptROpRz2!AGNUHNឣ1u1i3v&Te ApVSAUa:2DmA.k qj4Htpag)m#y00JSRV_SegmentInformation2CONTENTS;INFOMATIONJSRV_SegmentInformation2000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  bMainSprDataSaveMain NVΐwRSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS;INFOMATIONSprP SuperPlayRite.  np?lQUJU7UYoUC]UU7WYUl}O U    U       Wa Pv P PU P P P P} PUC\U_U,8PUW8PUYb UDky}U_ P4PUFPJPqP|PUPPPP}P% 1P"z11p 5hPROJECTp 5hMain p 5hPROJECT_MACRO_LIBRARY_AREA6p 5hSRCAREA1JMACROAREA1 LIBRARYEXTENDINFO$JSRV_SegmentInformation2!!********************************************************************** !!===================================================================== !!0000 T0 V }P[n0Ɩ !!0 Q W00 P[V }P[n0Ɩ !!0O(ugr0 j0W0 !!0Q[0 %TbVb_n0 [ TMR"V }P["] n0Vb_0xbW0f0 !! %NR`1Xn0 }P[ Tg0R^ƖY00 !! %vhxk0ƖP}ggr 0CIRCUIT.TXT 00\ObY00 !! %ƖP}g0qQ gp="ƖP}g" k0OX[Y00 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/XP/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !! 00000-[ % = GetPage() !! p|pe %NR`1Xw} = 1 !! _pejuS $Ɩh{r} = 0 !! Rg$P %Vb_pe= CountFigsPage( % ) !! Vb_pen0S_ %count = 0 !! V }P[vs(u for %ix=1 to %Vb_pe %Vb_p= GetFigDocument( %, %ix ) %a = GetFigType(%Vb_p) %b= "" if %a = "TbVb_" and GetFigGroupName(%Vb_p) = "V }P[" %count= %count + 1 Guidance(" Ɩ-N0 V }P[pe " & %count & " P") %w}= GetGroupFigInformation( %Vb_p, %NR`1Xw}) Ɩ( %w} ) end if next !! B}NQt0ƖP}gn000000\ObW0~0Y0 if size($Ɩh) = 0 message("Ɩ[an0 }P[L0j0D0") end if Create(10, "circuit.txt") %v(1)= MakeArray ("[ }P[ T]","[W_/y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0O?ABCDEFHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|cHQ(GETPA!2 Vc> P2"A#NR`1Xw} p<$$Q 'a!h{rJ&&h AADCOUN!pF+I!0S!&""A+! Vb_pec8+48$A(x"A1co?unt,0 $Aa(t%]ix"fV0t+4},4JX!.D-pEC-M!P-"#/|A7J"A90҃*Wp&+<,88P;TY!"A@/ p"AAa*+44$-!FH1bTKq0 0 GH$AID$Tb0MSIA",8R;GR-%P-A="#E p$AOHV }P[c+4;Q  853$A $X30 ,e%G-I,A*-C! G _>5# -! a)-N0acW5peI8@Y$2IaD PcQY!RX]~!TSW.I-F-pR=UA!pI-pN"p U"Ay %&"Ah$&0]H)B"#qK1 KudAMqaA]6JOS.Z!)! 0)$#[$Q0]l=S.P!$AaDC)[an0WqL0j0DM0 :^-2R!Plq~5[$P( P-! 3ir4u.7t.4x4*$ PAT P A3lQKRRAD$#$3[]Wq T]$,![W_/_HׁHHEM?F_>VI:uVDA_DOC`SRCAREA1JMACROAREA1 LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`MainJSRV_SegmentInformation2 JSRV_SegmentInformation2 CONTENTS7INFOMATIONl }P[Ɩ0000000 0 Vc}V 0n0[Lk0_g0Y00 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  `MainSprDataSaveMain }P[ƖSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTJSRV_SegmentInformation2z12p 5hPROJECTp 5hMain p 5hCONTENTS7INFOMATIONVDA_DOC`SRCAREA1PROJECT_MACRO_LIBRARY_AREA6p 5hSRCAREA1vEMACROAREA1TLIBRARYEXTENDINFO$$!!********************************************************************** !!===================================================================== !!0000 T0 0000000\Ob000 !!0 Q W00 0000000\Ob000n000000 !!0O(ugr0 Ha12_smp.jhd !! Ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !!la !!0g}o0mU0j0D0g0O0`0U0D00Vbn00000g}n0NR`1Xh0W0f0c_0[0 !!f0D0~0Y0 !!0000g0\ObW0_00P}}0zP[o0JRdW0_00yRU0[0_00Y00S0h0o0g0M0~0 !![000 !!~0_00zP[n0-Nn0eW[0 YfY00S0h00g0M0~0[00n0g0laW0f0O0`0U0D00 !!0;$Re=n0zP[k0d0D0f0D00mW[o00Uc0_04XT_K000 YfW0f000c0 !!f00P}ig0Y00 ErrorBreakMode( 1, 0, 1 ) KeyBreakMode( 0 ) WarningMode(0) $layout = IsLayoutWindow() if $layout = 1 LayoutWindow( 0 ) end if CommandGuidance( "plpVb00" ) page("P7") !! N,gS[_ !! h}rpn0-[ if GetDisplayMode() = 1 then DisplayMode(0) end if tXOX[0000() CoordinateLengthUnit(.XSMO|=1, .XSp=0, .YSp=0, .XeT=1, .YeT=1 ) Guidance( "W0p00O0J0_a0O0`0U0D0" ) Message( "plp\Obx" , 0 ) MouseCursorOff() EditDisplayMode( 0 ) !! Ype %list = { "SUM_FIG", "SUM_LINE", "LastAX", "LastAY", "LastTX",\\ "LastTY", "LastPage", "TYPE", "Width", "Height", "r",\\ "t^ge", "Hr", "\Ob", "p|", "VbjuS" } %sub_list1 = { "STR1", "X1", "Y1", "PAGE1" } %sub_list2 = { "STR2", "X2", "Y2", "PAGE2" } %p_file = "Ha12_smp.ptm" !!Tgr T %lib = "Ha12_smp.Jbl" !!P[12{x(ur !!rn0p %lib = getfilepath( %lib ) if( %lib = "NONE" ) MouseCursorOn() Message( "Ha12_smp.JblL0d0K00j0D0n0g0x0B}NW0~0Y00") stop end if try 0 SystemUnloadLibrary( %lib ) exception case else end try try 0 SystemLoadLibrary( %lib ) exception case else end try !!NR`1Xh0W0f0g}k0OX[W0f0D0_0`1X0S_Y00 %page = getpage() Inputplane("B") SelectMode( 5 ) ClearSelectFig() SelectFig( %page, #[ 20, 4 ], , "B" ) %figno = GetSelectFig %fig = GetFigDocument( %page, %figno( 1 ) ) %self_data = GetGroupFigInformation( %fig, 1 ) ClearSelectFig() !!p0OX[Y00 %max = Size( %list ) for %i = 1 to %max Deposit( %list( %i ), %self_data( %i ) ) next %j = %i %max = %self_data( %j ) %j = %j + 1 if( %max > 0 ) for %i = 1 to 4 for %k = 1 to %max %data( %k ) = %self_data( %j ) %j = %j + 1 next Deposit( %sub_list1( %i ), %data ) next end if %max = %self_data( %j ) %j = %j + 1 if( %max > 0 ) for %i = 1 to 4 for %k = 1 to %max %data( %k ) = %self_data( %j ) %j = %j + 1 next Deposit( %sub_list2( %i ), %data ) next end if !!tXn0S_ Save_Env() init_env() !!Tgr0~oY00 ErrorBreakMode(0,0,0) if( get_parts_file_no( %p_file ) = NIL ) MouseCursorOn() Message( "Ha12_smp.ptmL0d0K00~0[00n0g0x0B}NW0~0Y00") RunDocumentMacro( "000B}N" ) stop end if ErrorBreakMode(1,0,1) !!O(uW0j0D0shs0X00 CoordinateWindow( 0 ) TextFrameStyle( 1, 1, 10, 20, 8, 1, 2, 1, 1, 1, 1, 2, , , , , 1,\\ 25, 0, 100, 7, 1, 0 ) !!mpn0R0fH00LF0 MouseCursorOn() RecordView("plp", 1, 1, 1,"P7",#[0,0],#[101,82],1) View( "plp", 1, 1, 1, 1 ) if( Withdraw( "SUM_FIG" ) = 0 ) Message( "plp\Obmpn0RgS0[LW0f0O0`0U0D00", 0 ) else !!RP}}L0g0M00Vb_0xbY00 EditDisplayMode( 1 ) SelectMode( 5 ) Jump( Withdraw( "LastPage" ) ) SelectFig( , #[ Withdraw( "LastTX" ), Withdraw( "LastTY" ) ] ) Message( "plp\Obn0}M00Lc0f0O0`0U0D0", 0 ) end if !!xon0k$P-[ %width = Withdraw( "Width" ) %height = Withdraw( "Height" ) Grid( 1, 1, #[ 0, 0 ], %width, %height ) PointMode( 1, 1, 1 ) Guidance( "" ) MouseCursorOn() Inputplane("A") RunDocumentMacro( "000000" ) if GetDisplayMode() = 0 then DisplayMode(1) end if if $layout = 1 LayoutWindow( 1 ) end if stop end !!********************************************************************** !!pe gr{p !!eQR %file gr T !!ԏ$P grL0X[(WY00 grn0} T !! X[(WW0j0D0 "NONE" !!********************************************************************** function getfilepath( %file ) if( ExistFile(%file) = TRUE ) getfilepath = %file else %macdir = GetOptionFile() %path = BreakdownPath( %macdir("000") ) %drive = %path("DRIVE") %dir = %path("DIRECTORY") %s_file = %drive&%dir&%file if( ExistFile( %s_file ) = TRUE ) 00getfilepath = %s_file else MouseCursorOn() Message( %file&"0c[W0f0O0`0U0D0" ) %file = InputFile( , %file ) if( %file = NIL ) getfilepath = "NONE" else getfilepath = %file end if MouseCursorOff() end if end if end function !!********************************************************************** !!pe Tgrn0{pSs0-[ !!eQR %file Tgr T !!ԏ$P grL0X[(WW0_04XT grjuS !! X[(WW0j0K0c0_04XT NIL !!********************************************************************** function get_parts_file_no( %file ) %names = {"zP[","$Re","Qt","܈Rd\O","eQQR","KbeQR","f^","}000","0000","h:y","P}TP[1","P}TP[2"} %mac_name = "0000000\Ob" !!Tgrn0{p %temp_file = %file %file = getfilepath( %file ) if( %file = "NONE" ) get_parts_file_no = NIL exit function end if %flag = Zer( 10 ) %file_no = 0 for %i = 1 to 10 !!TgrL0Y0g0k0-[U0[0f0D00K0 %p_file = GetPartsFile( %i ) if( Size( %p_file ) = 2 ) %flag( %i ) = 1 if( Exact( %file, %p_file( "gr T" ), 3 ) = TRUE ) %file_no = %i exit for end if end if next if( %file_no = 0 ) !!Tgrn0-[ for %i = 1 to 10 if( %flag( %i ) = 0 ) %file_no = %i PartsFile( %file, %i ) exit for end if next if( %file_no = 0 ) %file_no = 1 PartsFile( %file, 1 ) end if end if CurrentPartsFile( %file_no ) !!!!!!!!! %no = 1 %ans = 0 do ErrorBreakMode(0, 0, 0) %tn = GetPartsName(%no) if ErrorCode() <> 0 or %tn = "" exit do end if ErrorBreakMode(1, 0, 1) %chk = FindElement(%tn,%names) if %chk = 0 %name(%no) = %tn %no = %no + 1 continue do end if if %chk = %no %ok(%chk) = 1 %ans = %ans + 1 if %ans = 12 and %no = 12 exit do end if else %ok(%chk) = 0 end if %name(%no) = %tn %no = %no + 1 loop if %ans <> 12 for %i = 1 to Size(%names) if Exist(%ok(%i)) = false continue for end if if %ok(%i) = 0 %find = FindElement(%names(%i),%name) MoveParts( %find,%find,%i ) end if next end if !!!!!!!!!!!!!!!! PartsWindow( 1 ) get_parts_file_no = %file_no end function !!********************************************************************* !!{p tXn0RgSp !!********************************************************************* sub init_env() DisplayMode( 0 ) !!%c;u(upe ActiveScreen( 1 ) !!qxhj0;ub !!%;ubpe SplitScreen( 0, ) !!;ubRrR CoordinateWindow( 0 ) !!^jshsn0 LayoutWindow( 0 ) !!rqsshsn0 ReferFigWindow( 0 ) !!SgqVb_shsn0 Scale( 1 ) !!}yph:y0^h:y !!%܈R ScreenMode( 1 ) !!;ubp !!%R SelectAperture( 3 ) !!1[{V SelectOneObjectMode( 1 ) !!NVb_c[n0 gR!qR SelectMode( 1 ) !!Vb_xbp SelectLockMode( 1 ) !!oxp SelectPriority( 1 ) !!Vb_c[n0i"}ju SelectRestriction( 0, ) !!xbVb_n06RP DisplayMode( 1 ) end sub !!********************************************************************* !!{p tX-[OX[p !!********************************************************************* sub Deposit_set(%ENV_TXT,%ENV_VAL) if not CheckDeposit(%ENV_TXT) then Deposit(%ENV_TXT,%ENV_VAL) end if end sub !!********************************************************************* !!{p tXOX[0000 !!********************************************************************* sub tXOX[0000() !! XSMO|n0S_ %unit = GetCoordinateLengthUnit() !! h:y|n0S_ %ritu = GetDisplayRatio() !! 0000n0S_ %grid = GetGrid() !! 0000000n0S_ %p_mode = GetPointMode() Deposit_set("h:y Ps", %ritu) Deposit_set("XSMO|", %unit) Deposit_set("0000", %grid ) Deposit_set("0000000", %p_mode ) end sub !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OP:rdaNkTrcLco!TH}RnT.SfqqabXSMO|eX![X?Sea!dY:j:meesv'|"Rtoeጋn0p00O0J0_a`0UK0DqbTe0EsSڧj!\Ob)xeøseAUsEpUdSNdROFbcԐEHEҍei哸q PQPe@ PwAf®S}M_Io0fsqLnefTyLv0svAfsbYfaÍT¶oĥy%Pv0geԮAfaAP֕WithvHpiPhvf P.6r0PnAbt^g`ʁPj!qHrfsbafscw|txAEajuS.AfalpapQewbt faStPR1"XeYE@AasvbPq2%%BOEAOt"qeHv01_Pmp.t#!*ypPfplrq)"QNe)?XJlab"qctrjieDnA#AwAAIwBgtPwRxЉqB.tfaNdP$bTg4(bXxet\P4L0d0Kjn0g00B}NW0~0Y0xХA2TtA2hX7PYݒE0LdPAepjnġA0IKP!%gt@0e%f01hI0ieP)/G\s&C˰eK#fab !x%Cn*b4bpa//#$+xe 3te3tbef(iq 7Zq&r!A1#9gnvp57q<:qaG~A a)NAL3~17 AAD=e[3tA@A?!b>#7qUp@8jpVGd2UoFdRTH0AH|eG|TIcefPdv0 tv0bc:.U)zT1%:nXtJ"PJ4:L-.ȟ5|L[1P[ga2U/'3,`*,`k:E51HUTWCNO/'B(P2r3O556n0}M00Lc8H4|sCUICFSO.M*WdŠhv倠QwbsY^$Wc_(S?.ma1H iIhŠd1hij2_$CG`I;'3]$$nH5](2$](Qcj4 _$\ē@nLnLnH_(<$GmA C"a+"_$5_(BP*TL>a21_ F_ Q0;q lJ_r@ٹ_C o0r`201*`azP[!þ$R8rQq`21܈Rd\`UeQQ `UKbe ƺf^!}001`f00!JhLj:y!ÃP}TP[1$*P!t1nmi`Msd) 5ս00 06tfad0_;a=PJti`mT9ElRM@_Y*ZH"d($n(h4Qp˾|$4.VR#(pq ZX@JƊgd|A@ru6q(-ҾAat1ע)iT4(",PY=R`SYA 1Y`E*0DYq ?X|SD3Qt&YCA2Y d]Y1UAHKa1Lqc2K5ABx1NE `Qa*xFR?TvѥױTYO1`@L_t1WAIAiFgr U`AtKvAzBt"L|B|]q8/Bt1"Esa*L8A@_72KEJaEMt1BxAKw1E`kvNmAOOl< Hlr5l]o_1qds%lH@0pѻ7o0Ao1`lЌ${*mqdsef%opwqAp;ňA}ϼsuvԓ$x>AXLEHࣷN@ł_$q\q߁ip_1Da9lВfH3qARhDS gA \XBPa?P#UD@NA_A(P_1AtQ0P)t@IDQp?P?3TRQ,FECzBXaKQGAMHMT/TTqjToyTaA|R\T~1ITZdNA__1P]_1qc`kJjlE4)A\TcWe8_araz̜TL@֩4ҠzA _10ޜQ`Hj¢akѻ4Ira0 0LI0MI%N!Eov 0i4%PŔ'1G"T%A)8_1ԁQ/0QTa 0<0p7Ք29(4pDՔ@AIFݘ0N4m<y4QWNkMq_4EAώT4ŅՔ\(Q٘ԳAՔ_ݘ0p:"\0P B.+Dߐ=PUAAPTDr2\!a$TeIO0EB5PJ+$i7PMXEJG+CQ\XMXJITOPMhQ\){V?JPI1YԋQ\MTXqqI\-#OAeIQTŴ$MXd()QX$!ڣC|se6eUps&s~Pt"*"Nϐ_XkIVC2#hp5nJA0hp !hpe.aACHJrKBPqцq$kq`kr't?sx|n2$!h"a"%tXOX[000hA! !݄hHT5N pTrPUsaAau&t |pA^ |pteAR6\C!ar&Eu /4.a !78 (kĞG\aagU4\"_8IOPIa&mdar4veecwI_`ћ~|pah?:y Pa aUSMO|"CGa00Ó0aaʒj_֙"a0000 0,JSRV_SegmentInformation2%JSRV_SegmentInformation2,JSRV_SegmentInformation20CONTENTS4=vEMACROAREA1TLIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`Mainl 0000000\Ob0000000\Ob000n000000 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  jMainSprDataSaveMain 0000000\ObSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveINFOMATION=JSRV_SegmentInformation2@z136hPROJECT6hVDA_DOC`PROJECTCONTENTS=INFOMATIONSprPqp SuperPlayRite.C  pMain 6hPROJECT_MACRO_LIBRARY_AREA66hSRCAREA1 MACROAREA1Gp !!********************************************************************** !!===================================================================== !!0000 T0 VV !!0 Q W00 vAm[[SnVc}V0 !!0O(ugr0 j0W0 !!0Q[0 0TVb_o00`1XbNR`1Xc/b TMRcj0i0 00c0f0D0~0Y0 !! 0Vb000 0 }P[Ɩ 0 0 NVΐwR 0g0TVb_n0`1X0CQk00 !! Ɩ/h:yW0~0Y0 !! 0b Yf-Tb-NR`1Xc B00D0o0 b;ub-Vb_`1Xc n00000g0 !! 00 T`1Xn0Q[0Sgq/ YfL0g0M0~0Y0 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** ErrorBreakMode(0,0,0) $E_mode = GetErrorBreakMode() $layout = IsLayoutWindow() if $layout = 1 LayoutWindow(0) end if $a_mode = GetATOKMode(1) ATOKMode(1,0) DialogSize(2) %unit = GetCoordinateLengthUnit() !! XSMO|n0S_ CoordinateLengthUnit(.XSMO|=1, .XSp=0, .YSp=0, .XeT=1, .YeT=1 ) RecordView("KAIRO_VIEW",1,1,1,"P5",#[0,0],#[270,165],1) View("KAIRO_VIEW", 1, 0, 1, 1) !! 000n0-[ DeleteView("KAIRO_VIEW") !! 000n0JRd CoordinateLengthUnit(%unit) !! XSMO|0CQk0;bY0 message ("T 0gr T = HA12_SMP.PTM 00-[W0~0Y0") call Tgr-[("ha12_smp.ptm") PartsWindow (0)!! T0000n0Qh:yL0_g0Y0 %top = 0 for %i = 1 to 100 if GetPartsName(%i) = "rupA" %top = %i exit for end if next if %top > 1 MoveParts(%top,%top + 11,1) !! HQ-k0yR end if PartsWindow (1) ATOKMode(1,$a_mode) DialogSize(3) %ret = Alert("NY0P0 }P[Ɩ0LD0~0Y0K0",2,{{"o0D0","Y"},{"D0D0H0","N"}}) if %ret = 1 RunDocumentMacro(" }P[Ɩ") else Message(" }P[Ɩ0LF0o00Vb000n0 0 }P[Ɩ 00[LW0f0O0`0U0D0") end if if $layout = 1 LayoutWindow(1) end if END !!********************************************************************** !!pe Tgrn0{pSs0-[ !!eQR %file Tgr T !!********************************************************************** sub Tgr-[( %file ) !!&{v2n0n0x %pfAbsent= 999 ErrorBreakMode(0,0,0) for %pn= 1 to 10 %pf = GetPartsFile(%pn) if Exist(%pf("gr T")) = TRUE and %pf("gr T") <> "" %bdp= BreakDownPath (%pf("gr T")) if ErrorCode = 0 if %bdp("FILE") = %file CurrentPartsFile(%pn) exit sub end if end if else %pfAbsent= %pn end if next ErrorBreakMode($E_mode) !!&Tgrn0{p %fileP = getfilepath( %file ) if( %fileP = "NONE" ) Message( %file & "0-[W0f0D0~0[000"&char(10)& \\ " Tgr T0-[Y00_L0B00~0Y00" ) exit sub end if if %pfAbsent = 999 %pfAbsent = 10 end if PartsFile( %fileP, %pfAbsent ) CurrentPartsFile( %pfAbsent ) end sub !!====================================================================== !!pe gr{p !!eQR %file gr T !!ԏ$P grL0X[(WY00 grn0} T !! X[(WW0j0D0 "NONE" !!====================================================================== function getfilepath( %file ) if( ExistFile(%file) = TRUE ) getfilepath = %file else %macdir = GetOptionFile() if exist(%macdir("x")) !! f[ %path = BreakdownPath( %macdir("x") ) else %path = BreakdownPath( %macdir(5) ) end if %drive = %path("DRIVE") %dir = %path("DIRECTORY") %s_file = %drive&%dir&%file if( ExistFile( %s_file ) = TRUE ) 00getfilepath = %s_file else Message ( %file&"n00000000c[W0f0O0`0U0D0" ) %fileO = InputFile( , %file ) if( %dir = NIL ) or ( %fileO = NIL ) getfilepath = "NONE" else getfilepath = %fileO end if end if end if end function !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OPUPPPP5PPUbwU U,LdU W@JLUM5 tUВЮM ` 3 UM i Ї Ы  T#PW#P_#Px#PU#P#P#P#P5#P#P &UA&h&&&U&&&&M&#(U(U|(Ў(В(й((((W+P#+P /f(ЯER.O.B.EAKM/D.+PPR000P2P.2+P-Q<G.T./ +PAP6p_mode3t4!`4t46.TISL/Y6U6PW0A1!4!-A"-4!B #P<=0/D43eT 4!j4tGE8@*5A6PO/SD88a 8a9:-A A-3K0`D80bHX-A Ee>81Dd4tD(rG=NbSl(W!]$"b@edA(-Arh${!,DAQt`-3~6!,*7E2(LDQ]fXZa`Qd?]@UP?_MI EN- X6DFZ5'Ck]IQHEM{L$PXIQO_u)ZUNFpNrgD쏕r XaXvpDMxTq!f ~0[00/D2CRBĊMqT9 TY00_L0B02]aSPPeuRӛDCOMI`jha uѽq= pOpl!nU!$v`~fj /Y Y1#u7Mc Zol rUvz4.9 Tz4^%$P  O2IUR; m@ci$&2~(!`z4 ѵoDtx0*z4%ځ(v&_'Bܛ! 3!}0% 0UJb':o#@03!3!4 jA=ѴᤨC0+%DF0IPⵓQd iNJaAUJAt/[TqαFCɂRb)1"j1Xa0Xa!z2A{<9!Nka s`}1Фq !fšQKw$ģKv^BA?Ƒ1ϡ$XKټ>ibTqn0000c\Wn1a1P7! M o1HOeA#d$)dP!AiB5A.]#"A^!OTψ!odPAp1VDA_DOC`LIBRARYEXTENDINFO$}JSRV_SegmentInformation2~JSRV_SegmentInformation2JSRV_SegmentInformation2SRCAREA1 MACROAREA1p LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`MainlVc}V vAm[[SnVc}V0 *h_O>y00000000SprDataSaveSprDataSave  CONTENTS#INFOMATIONJSRV_SegmentInformation2z146hSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  bMainSprDataSaveMainVc}VSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTS#INFOMATIONPROJECT6hMain 6hPROJECT_MACRO_LIBRARY_AREA66hSRCAREA10j      !"#$%&'()*+,-./0123O6789:;<=>?@ABCDEFGHIJKLNPSQRTWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~!!********************************************************************** !!===================================================================== !!0000 T0 Sc&b !!0 Q W00 Sc&bn00000 !!0O(ugr0 Ha12_smp.Jhd !! Ha12_smp.Jbl(per) !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!0 OD0e 00N[000000n0[&bW`000g0Y00 !! NL0_Z0HQKbg0Y0 !! 00000RK0W0f0w0nO04X@bg000000SD0f0 NU0D00nQ0 !! 0p0nM0~0Y00 !! ;ubn0Yg00000W00rqxn0}Y000xbY00h000k0j00 !! ~0Y00 !!00la00 B}0n0$R[L00000g0Y0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** Guidance( "W0p00O0J0_a0O0`0U0D0 ) ErrorBreakMode(1,0,1) KeyBreakMode(0) $layout = IsLayoutWindow() if $layout Message("00000h:yg0o0[Lg0M0~0[000",0) Message("0000B}NW0~0Y0",0) stop end if Page("P4") !!rn0p 0%file = "Ha12_smp.Jbl" 0%file = getfilepath( %file ) 0if( %file = "NONE" ) Message("Ha12_smp.JblL0d0K00~0[000x0B}NW0~0Y00",0 ) stop 0else try 0 SystemUnloadLibrary( %file ) exception case else end try try 0 SystemLoadLibrary( %file ) exception case else end try 0end if !!tXn0S_ Save_Env() %iro = GetBackColor() !! ̀ofrn0-[ %unit = GetCoordinateLengthUnit() !! XSMO|n0S_ CoordinateLengthUnit(.XSMO|=1, .XSp=0, .YSp=0, .XeT=1, .YeT=1 ) BackColor(4) ATOKMode( 1, 0 ) CursorType( 2 ) %workspace = GetWorkSpace() Init() do RgS() Guidance( "" ) Message( "B0j0_0o00Ҟg0Y00", 0 ) %x = 1 %y = 1 %Kbju = 2 do Kbjuh:y (%Kbju) $00(%Kbju) = FALSE if %Kbju = 1 then 000000n0ju() %Kbju = 2 else Nn0ju (%x, %y) %Kbju = 1 if ($flag <> 0) then exit do end if end if loop until [b() if $flag = 0 %ret = 000000() if( %ret = 1 ) exit do end if end if loop until $flag = 1 View( "Sc&b",1,0,1,0 ) DeleteView("Sc&b") WorkSpace(%workspace("h:y")) !!x[LMRn0tXk0;bY0 DeletePagePlane(,,,) BackColor(%iro) CoordinateLengthUnit( %unit ) ScrollHome() Recover_Env() WarningMode(1) Guidance( "" ) stop end !!===================================================================== !!0 pe T0 000000() !!0pei0 000000 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== function 000000 if $wpe(1) = $wpe(2) then %s = "_M00Q0g0Y0" elseif $wpe(1) > $wpe(2) then %s = $ TMR(1) & "n0" & $wpe(1) - $wpe(2) & "KbRa0g0Y0" else %s = $ TMR(2) & "n0" & $wpe(2) - $wpe(1) & "KbRa0g0Y0" end if 000000 = Alert( %s, 1, {{"B}0","E"}, {"0F0V", "O" }}) end function !!===================================================================== !!0 pe T0 [b() !!0pei0 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== function [b if ($wpe(1) + $wpe(2) = 64) or ($00(1) and $00(2)) then [b = TRUE end if if ($wpe(1) = 0) or ($wpe(2) = 0) then [b = TRUE end if end function !!===================================================================== !!0 pe T0 000000n0ju() !!0pei0 000000n0ju06R_Y00 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== sub 000000n0ju MouseCursorOff() for %i = 1 to 60 %x = $*QHQMO(%i, 1) %y = $*QHQMO(%i, 2) if nQ00(%x, %y, 1) then nO0 (%x, %y, 1) exit for end if next MouseCursorOn() if %i > 60 then message ("i0S0k00nQ0j0D0n0g000W0~0Y0") $00(1) = TRUE end if end sub !!===================================================================== !!0 pe T0 Nn0ju !!0pei0 Nn0ju06R_Y00 !!0eQ0 R0 %x !! %y !!0Q0 R0 j0W0 !!===================================================================== sub Nn0ju( %x, %y ) MouseCursorOn() do 0000S_ (%x, %y) if $flag = TRUE then exit do end if if $00(2) = TRUE then exit do end if if Exist($v(%x, %y)) then if nQ00(%x, %y, 2) then nO0 (%x, %y, 2) exit do end if end if loop MouseCursorOn() end sub !!===================================================================== !!0 pe T0 0000S_ !!0pei0 0000000n0MOn0S_Y00 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== sub 0000S_( %x, %y ) do WaitMouseButton?( 1, 1 ) if GetMouseFigArea = -1 then !! WYg0Y00 %operate = SelectItem({{"00W0~0Y0","P"},{"~0a0L0H0_0","C"}, \\ { "gRK00", "R" },{"000B}N","E"} }) select case %operate case 1 $00(2) = TRUE exit do case 3 $flag = 2 Message( "o0X00K0000vW0~0Y0",0) exit do case 4 $flag = 1 Message("0000B}NW0~0Y0",0) Guidance( "W0p00O0J0_a0O0`0U0D0" ) exit do end select end if %p = GetMousePoint() %y = Int(gety(%p) / 10) + 1 %x = Int(getx(%p) / 10) + 1 exit do loop end sub !!===================================================================== !!0 pe T0 w0cO0 !!0pei0 c[U00_0MOnk0c[rn0w0cO0 !!0eQ0 R0 %x,%yMOn0cO0^j !! %c0 wn0r !!0Q0 R0 j0W0 !!===================================================================== sub w0cO0( %x, %y, %c ) %p = #[%x * 10 - 5, %y * 10 - 5] %wr = wn0r( %c ) HatchPattern(1, %wr) Circle(%p, 4,,,1) end sub !!===================================================================== !!0 pe T0 w0mY0 !!0pei0 c[MOnn0w0mY0 !!0eQ0 R0 %x, %yw0mY0MOn !!0Q0 R0 j0W0 !!===================================================================== sub w0mY0( %x, %y ) if $v(%x, %y) then %p = #[%x * 10 - 5, %y * 10 - 5] SelectMode(5) SelectAperture(1) if SelectFig(, %p, %p) then Delete(0, 0) else alert ("debug:Vb_L0c[g0M0j0K0c0_0") end if end if end sub !!===================================================================== !!0 pe T0 wn0r( %player ) !!0pei0 wn0r0ԏY0 !!0eQ0 R0 %player00000(2:P[ / 1:B0j0_0) !!0Q0 R0 rc[b__0ԏY0 !!===================================================================== function wn0r( %player ) select case %player case 2 wn0r = "R255G255B255" !!}v case 1 wn0r = "R000G000B000" !!Ҟ end select end function !!===================================================================== !!0 pe T0 Kbjuh:y( %c ) !!0pei0 Kbju0h:yY00 !!0eQ0 R0 %ch:yY0000000 !!0Q0 R0 j0W0 !!===================================================================== sub Kbjuh:y( %c ) MouseCursorOff() OpenTextFrameName("C") DeleteAllText() INSERTTEXT ($ TMR(%c) & "n0ju") CloseTextFrame() ClearSelectFig() MouseCursorOn() end sub !!===================================================================== !!0 pe T0 nO0 !!0pei0 w0nO0 !!0eQ0 R0 %x,%yw0nO0^j !! %c nO0wn0r !!0Q0 R0 j0W0 !!===================================================================== sub nO0 %x, %y, %c w0mY0 (%x, %y) $v(%x, %y) = %c w0cO0(%x, %y, %c) $wpe(%c) = $wpe(%c) +1 if %c = 1 then %d = 2 else %d = 1 end if for %i = 1 to 8 %p = %x + $eT(%i, 1) %q = %y + $eT(%i, 2) %r = FALSE if Exist($v(%p, %q)) and $v(%p, %q) = %d then do %p = %p + $eT(%i, 1) %q = %q + $eT(%i, 2) if Exist($v(%p, %q)) then select case $v(%p, %q) case 0 exit do case %c %r = TRUE exit do end select else exit do end if loop end if if %r then %p = %x + $eT(%i, 1) %q = %y + $eT(%i, 2) do while Exist($v(%p, %q)) and $v(%p, %q) = %d w0mY0 (%p, %q) $v(%p, %q) = %c w0cO0(%p, %q, %c) $wpe(%c) = $wpe(%c) +1 $wpe(%d) = $wpe(%d) -1 %p = %p + $eT(%i, 1) %q = %q + $eT(%i, 2) loop end if next wpeh:y() end sub !!===================================================================== !!0 pe T0 wpeh:y !!0pei0 s(Wn0wpe0h:yY00 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== sub wpeh:y OpenTextFrameName("A") DeleteAllText() INSERTTEXT ($wpe(1)) CloseTextFrame() OpenTextFrameName("B") DeleteAllText() INSERTTEXT ($wpe(2)) CloseTextFrame() ClearSelectFig() MouseCursorOn() end sub !!===================================================================== !!0 pe T0 nQ00 !!0pei0 !!0eQ0 R0 %x,%y !! %c  !!0Q0 R0 j0W0 !!===================================================================== function nQ00(%x, %y, %c) if $v(%x, %y) = 0 then if %c = 1 then %d = 2 else %d = 1 end if for %i = 1 to 8 %p = %x + $eT(%i, 1) %q = %y + $eT(%i, 2) if Exist($v(%p, %q)) and $v(%p, %q) = %d then do %p = %p + $eT(%i, 1) %q = %q + $eT(%i, 2) if Exist($v(%p, %q)) then select case $v(%p, %q) case 0 exit do case %c nQ00 = TRUE %i = 9 !! exit for exit do end select else exit do end if loop end if next end if end function !!===================================================================== !!0 pe T0 init() !!0pei0 T0000Rg$P-[ !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== sub Init() DisplayMode( 0 ) WorkSpace(0) RecordView("Sc&b",0,0,0,,#[0,0],#[150,110],1) LinePattern( 1, 2, 0.1, "R000G000B000", 0, 1, 3, 1, 45, 90 ) !!}.z ActiveScreen( 1 ) !!qxhj0;ub !!%eW[(upe TextFrameStyle(1,3,20,,,,,,,,,,,,,,,,,,,,0) SplitScreen( 0, ) !!;ubRrR CoordinateWindow( 0 ) !!^jshsn0 LayoutWindow( 0 ) !!rqsshsn0 PartsWindow( 0 ) !!Tshsn0 ReferFigWindow( 0 ) !!SgqVb_shsn0 Scale( 1 ) !!}yph:y0^h:y !!%܈R ScreenMode( 1 ) !!;ubp !!%R SelectAperture( 3 ) !!1[{V SelectOneObjectMode( 1 ) !!NVb_c[n0 gR!qR SelectMode( 1 ) !!Vb_xbp SelectLockMode( 1 ) !!oxp SelectPriority( 1 ) !!Vb_c[n0i"}ju SelectRestriction( 0, ) !!xbVb_n06RP warningmode (0) editdisplaymode (0) $*QHQMO = {\\ {1,1},{1,8},{8,8},{8,1},{1,4},{1,5},{4,8},{5,8},{8,5},{8,4},\\ {5,1},{4,1},{1,3},{1,6},{3,8},{6,8},{8,6},{8,3},{6,1},{3,1},\\ {3,3},{3,4},{3,5},{3,6},{4,6},{5,6},{6,6},{6,5},{6,4},{6,3},\\ {5,3},{4,3},{2,3},{2,4},{2,5},{2,6},{3,7},{4,7},{5,7},{6,7},\\ {7,6},{7,5},{7,4},{7,3},{6,2},{5,2},{4,2},{3,2},{2,2},{2,7},\\ {7,7},{7,2},{1,2},{1,7},{2,8},{7,8},{8,7},{8,2},{7,1},{2,1}} $eT = {{-1,-1},{0,-1},{1,-1},{-1,0},{1,0},{-1,1},{0,1},{1,1}} $ TMR = {"P[", "B0j0_0"} View( "Sc&b",1,0,1,1) end sub !!===================================================================== !!0 pe T0 RgS !!0pei0 ;ubn0RgS0LF0 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== sub RgS DisplayMode( 0 ) DeletePagePlane(,,,) $flag = 0 !!1:-Ng0B}N 2:o0X00K0000vW0 $v = Zer(8,8) $v(4,4) = 1 $v(4,5) = 2 $v(5,4) = 2 $v(5,5) = 1 $wpe = {2,2} $00 = {FALSE, FALSE} HatchPattern(1,"R000G255B000",1,1,0) !!vn0 N0W Box(#[0,0],#[80,80],1) HatchPattern(1,"R255G255B255") !!vn0}r for %y = 1 to 7 Line(#[0,%y*10],#[80,%y*10]) next for %x = 1 to 7 Line(#[%x*10,0],#[%x*10,80]) next for %y = 4 to 5 for %x = 4 to 5 %wr = wn0r( $v( %x, %y ) ) HatchPattern(1, %wr ) Circle(#[%x*10-5, %y*10-5], 4,,,1) next next HatchPattern(1, "R000G000B000") Circle(#[90,10],4,,,1) HatchPattern(1, "R255G255B255") Circle(#[90,20],4,,,1) MakeTextFrame(#[100,13],1,3,"A") inserttext (" " ) CloseTextFrame() MakeTextFrame(#[100,23],1,3,"B") inserttext (" " ) CloseTextFrame() MakeTextFrame(#[100,33],1,10,"C") inserttext (" " ) CloseTextFrame() MakeTextFrame(#[90,53],1,10) InsertText("B}NW0_0D04XTo00") CloseTextFrame() MakeTextFrame(#[90,63],1,10) InsertText("VbY0]0000") CloseTextFrame() MakeTextFrame(#[90,73],1,10) InsertText("W0f0 NU0D00") CloseTextFrame() wpeh:y() DisplayMode( 1 ) ScrollHome() Redraw() end sub !!===================================================================== !!0 pe T0 getfilepath !!0pei0 0000n00000c[0LF0 !!0eQ0 R0 %file 0000LF00000n000 T !!0Q0 R0 %file c[W0_00000L0X[(WY000B00D0o0vc00000c[ !! W0_04XTk00000n000 T0ԏY0 !! "NONE"0000L0X[(WW0j0D04XT !!===================================================================== function getfilepath( %file ) if( ExistFile(%file) = TRUE ) getfilepath = %file else %macdir = GetOptionFile() %path = BreakdownPath( %macdir("x") ) %drive = %path("DRIVE") %dir = %path("DIRECTORY") %s_file = %drive&%dir&%file if( ExistFile( %s_file ) = TRUE ) 00getfilepath = %s_file else Message( %file&"0c[W0f0O0`0U0D0" ) %file = InputFile( , %file ) if( %file = NIL ) getfilepath = "NONE" else getfilepath = %file end if end if end if end function !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OUQavUU#U;NoU U"3AOU}) 1Udn U!(!6!!U!!!!_ #P#PU-#P/#Px#P#Pզ#P#P#P T%-%A%X%Uo%Ћ%С%б%U%%%%S #)))2)U4)})))U)))PU!P4P:PLPUfPqP}PPUPPPPUPU"5>@U/02P42PO2P{2P2P2P 4(444>4L4j4v44444444#7=7G7M7V7X7С7б7777:b:І:Й:б::Ϛ:: =>=W=e==ª===(I]g#BFBZBBBBBBDP,DP:DPp`0U0D ђfPURpOpBpEpWKMpDPA!Ta!IXAB%Й0EY(XQ.A`8a6ISLpYpUWTW0NPO`alayoutL7LᛔPaOߜ[DQlPESpGc400000h:yg0o0[Lg0M0~0[00!wX|\քT0000_B}NWYIXAX)8PzTPAštPTAHP12_smp.bsAf+i0eޡtJ!XFTIET A+!tQPR P P+! P%NpNґ P _ʴмL0d0K0x$)>TD PVњ P P_TAVSSpEPULJpAPL0ApeYtt^IX P P԰I$Og|APsВaV%_NײQהB!؇О2ƒBpC0CpaaNir9tnADPtRDÁENáIpuJ0i6hԒAPP=_}T̚XSMO|TՂTXSД!T¡TY|Se!xRR!x>QUpSrTPAAbRtWrKþwr+kpPcaPr#AI A`ᷩ`#AgAR/gScϓ$𔡒Ac,k5"0j0_0ҞgBKAP(tA)aAxU)|Z*|,aAy"_)t!!e(tAx/aKbju#j1tq+1`N[@r 1ᮡx1zAՂ)tQ+t)t80I1z!Djp=E)q1z!*x慳000000n0 8%/|0|D15#@ND+x.|/|*|K<=ěNHՂȑ QDD`A!SaRT$E\VQO^RAeS l3lRC`0C`X5"AzTh]#S~\l!S3~VE2 `=Sc&b%!R!%fR3Y5 ᙡ!ءdef" jrTo:$@$/C! @%6㑁%@b0qkPˣ%r$Jy6z7r$=vAHG@ɑP}X0kf@qv.S aLHp$c)1ARx} 2򁃱k$Ť} Qu$#8@=A\Z!ՅFLQNwp mQDaU ;$EȗAa_M00Q0P'1AsٗU癄 ;E, 1;LUp @J d  TM0mQD )AAnU @d9;̵ћ;AmQ =KbRahQUA5īYdGdAd:̾1> CPdI{MR1{VB [pTysPjqA=AbMs(mQ sPq9pSuUB})p95Auҟa30F0'ԌOp!tQ9P@ER4qR9p"UJ Hu1{YL$Q{dudH ĬL;mQlL;T9%m$dQّ1qT*5LA{hdRUL{$x9 PyPvQ o)&`^q8CGU6*$OSGOrr&a/q$@mQ8*39im$=428fJ4rP !aQ*QHQMP?PqG>eIPRS@^Y;aRtSV[>SQ hAėq@ȀqE^ AĮUH!;CuDiE8B@F@Lt8$*/dmEIqѼ>}1PvRwC>wa?@ȈT%8$/>Sג>?mQJXoVk>q>Y$JXaAo$t8_X9$ŔQMpAnx=_6Q0dnono5d=0B}aԏv*operCtdod%B /` @! Ų/" 01;$_E+6"`;qqA(TI 1њC;)O <`*+X qo0X0000v.!f($Dmxzr`}q)уB(1ѦaOx\?+ ?000⡩ x)t/Q;]Gl ID@N`+ŶW0pO0J0_a0`S0U-!#ʏ돤DPQtarPs@Ilյaܰ/Ia`ܰܰRwUj4` 8aqrYܰ!ܰq!/>q J8%?Z2)r*.4B:D>VJ!ϰ d%qw0c(g_cdϰ/iϰ! *psϰpnϰ,kϰ!pϰ uC1ձ{քx^} A1"DAaϰwU!)wn0r>SӱAqB)QPQ!Ht ET`HPqy1RcR*C1nfCPR`x#!rRD!H P/t5ue#m}26EČQ!P1)GnjPQHHRUSUEDԵPu$P1Q(IP uĥD(A%wU>(Qax,bqD+ 5B)=TxYAPqT$2+$LU,~w N/Ia*xYs+9DA;%A?H"<xy1+VHe(Y)mD*hAx +t|1 O@ebuC:Vb_L0c[g0M-K0c" v3,D=G"f"%pCy3 ey%Sd $G"WP (%JQފ$BZ$ |1R*H5)PG)4B)4`'a$%,AYID' D(0/G/B/*-f1tUC1Kbjuh:Eӱ[Q.1auTb:sF=[QB5ddWQBQO ORt N;$_T1[Q!\5hayL:fo8~a @% p1G{1HiDQIa TMA1uZQ<\0j%uÎ5oOR:âHt1ö=6cf @a\4Ru'͡R]ׄYTuRd!rYTӱ[A5!]EuIYXrZXVW4P!Ak͡Y\ZX͡\XQ 4DftDgB3pF@%feefai+ j 4n3"#ͱj%kQ1ft!&!6kQsas|Jkvau|1Y񨡫&!b*w|]jigkQQnftz4vpsjqDxj'EN!e|{w|}q:}pj1D ;{t|qqބ ft-ħj⢌q$$ o4U J1 pqu:I0kAj]ŔqѾ(R‹!gt˔(EΖҋȁ)uxhupq%}fq(DQ {w|,} 10D u{0!$ 0oeq0"50+#]$ŕ&*!)8uDETEGKU4%eZ0&!Ρd"4r4r9pwlФy45Ρ4Ρ$4 VѤсhq<2u${ yǑ9 } qD$,ѱ LA$D51. #ԈБI q7 ϓ+=$]ڕI@$D!X BDMڨEPܬTZ$uVfdWlܨp$vD[Ń$\P1]5yܬ}BVdaTLIZH2D fޤDDi+ H&!HkUlQi+lhqBޤi'(&! l۶(2LAQܨD,QLۨLyLDD,L qyS`5"&Wpe4#S`֑"38WV 8:;?1 ??_@uA7([A@5kClI$1i'qGrV!N(IO3b/ODo "trS |/DO@ !o"v$LD5%{&dAV'oD(K.9MoN/ϤPQg0oQ@TVnQ0UV)ng0ʐ|GaBg0HtߕI^Ht_Htqg0nGtoNpe![$HtuPprPpsQ5Ru(R-QUx@PqѲ<qIVDT{NQ|WR}_Pt\TuaTu_qe[ iV\ys] {PtxT}_gE[ Sd Pq"}l1ŤPpAPp؟+TpcџkHH᳄PppȀu5r̯kHѵTA*`] RQDc_}[ QV{1y] |DkH_1_Q"[ Sѭ lDQPqnДIu$EѶ P_1$`1v'+5лI:qDRD2+pWPcab%h 1AuVezDy[5ѐѸک#p'!)I+nt*ߑ 0oP>`AY@0 <UBDKV4 E .1Sc&btqJ\ \!Q)#Ve%\'U*,0%n5&:֑aL4"E4RBc&!qJqM?qR 0ĒGRĔBĔ b\eQhhQqkn-trZŮQAT4 V,SP: ,1 îA˱P9:ߍY>b |֭eTq۪ߪ쒭ДLcI,o&$*J:O441Ha41DA#8B<9%AT_ Gl4SyFD9įF4>@q11U,4&&W>3  P&)Xe>9!A,4AU94hQ<RX+qa>9BQEAB> g<(_>* <?>*R:QCp <J>*P-IBY< X+>9`BTQ'kI&$-W=N4"G1<6"HLC,!T8)GNv3Vk񫡃k(R%*m)o*\qhQ,o..-</o0*\12o-15o6r8o7.-\q;o:.-y>o3:AoB7Do?*Go<*AJo92XMoN1сPoO.-SoR.-VoER!YoZOk\oWLa_oTL1bocOeof7hoi:AkolRAnoKRq?H_Rxto`"Rw?x_:xz?{_"7x}?~_Ox?u_Ox ?r_OxoO-o7_:А_Roo'Q _"_(?_x_DxR-*?_:x+?_7x,?_xoD\.?_x/?@_xo\1?D_x2?_x3?@_xo\5?DQ_x6?_x7?D_Xx8?_Xx9?D]_x:?_x;?@_dx(ȍ'a '!Xa*QHQKMO& 'av1 (aX)/50 4_/?2/5/8/Li;/Li>/iށ^eT& 'a`& P!P['P!!B0j0_  TMR"D "Xa~X4V PEc< P!S_c&bcD Le!FeHJ, ! !h!RgS7 $o'D$ !K T!h#t!*T0P G EN6[ \؉]X!c!'k XXaflag&!B# TX!aZD02 TX'8X!X!v&×8' T'a#! %' T')"8X!< TX!$! i&%!"< Te<%<*! i,%!)8A#<Ă<<0! i2%!J.<)<٤ ۏX!6!wpe CLT7?ԓEԢ;Aѓ0  TXatPH TCA0JATR# " P!M!REG5BD#JC<C<C4 + $ U pX Q@I/ FE1HA3HتK6K8C4PT;O\?C8EIX!l,@ARCTABL p R_T`b\fTUTj\l\nXDAvŸÿւ#ƿ?\T!\TpXCT_?؟,ۿT#.yXAb ĩbB}NWD04X_To0?)g=o^IKFEMP)?UV]hxVbY0]0/00?xߢ?XITB;ĩtkAW0f0 NU? ? _rX"5t:h:[R ϐDUSLYO$XrSpRKL;HKg/g&tRJDWϑϐ\E2`8d`Agetf}iepa*0!h`Ak*eP23QGtnFGtJNH$Ib &C92R xM;3Gt|$rHGpTCGqP=GpKa1DR4IO+x1SkAs_"+QGp`Az-3P[-jIPUGpF/::`ZЕGp3VwGt(s`5c]F ESH9T[PXPx0c=[!O0`06d Gtt]3QtNPU0GtB1qX1ql+[Rs-hiOPGt3Qc(IԂAN96xq3Q(4)(5/{VDA_DOC`SRCAREA10jMACROAREA1T.LIBRARYEXTENDINFOVDA_DOC`PROJECT_MACRO_LIBRARY_AREAVDA_DOC`MainJSRV_SegmentInformation2CONTENTSINFOMATIONJSRV_SegmentInformation2lSc&b Sc&bn00000 *h_O>y00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  `MainSprDataSaveMainSc&bSprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`PROJECTCONTENTSINFOMATIONVDA_DOC`SRCAREA1MACROAREz15KhPROJECTKhMain KhPROJECT_MACRO_LIBRARY_AREA6KhSRCAREA1VMACROAREA1@LIBRARYEXTENDINFO$JSRV_SegmentInformation2!!********************************************************************** !!===================================================================== !!0000 T0 0000 !!0 Q W00 00000 !!0O(ugr0 j0W0 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!0yrN00ca0ёo0Qh0W00cQ0ёo0QV[h0Y000 !! i0a00K0n0ca0ёL0j0O0j0c0_0Bfpg0Ro0B}000 !! 00g0j0D0 Tpn04XTo00n0Ra0h0Y000 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !!rn0p %file = "ha12_smp.jbl" %file = getfilepath( %file ) if( $libfile = "NONE" ) Message("ha12_smp.jblL0d0K00~0[000x0B}NW0~0Y00",0 ) stop else $err_mode = GetErrorBreakMode() !! HQ-k0yR ErrorBreakMode(1, 0, 1) try 0 SystemUnloadLibrary( %file ) exception case else end try try 0 SystemLoadLibrary( %file ) exception case else end try %ret = ErrorCode() if( %ret <> 0 ) Message( "rha12_smp.jblL0pg0M0~0[00g0W0_0" ) ErrorBreakMode($err_mode) stop end if end if DisplayMode(0) $a_mode = GetATOKMode( 1 ) ATOKMode( 1, 0 ) DialogSize( 2 ) pushPara() $slide = ON EditDisplaymode(0) !! vpNcxMOn $dw = 60 !!E^ $dh = 4 !!ؚU0 %win_size = GetWindowSizes() $disp_x = %win_size( "WIDTH" ) $disp_x = Ip( ( $disp_x - $dw ) / 2 ) $disp_y = Ip( %win_size( "HEIGHT" ) / 2 ) - 4 %x = decimal(left(thistime, 2)) %y = decimal(mid(thistime, 4, 2)) %z = decimal(right(thistime, 2)) randomize (%x * %y / 2 + %z) $score1 = 10000 $score2 = 10000 %oya = 0 if $slide = ON ErrorBreakMode(0, 0, 0) FullScreen(1) ErrorBreakMode(1, 0, 1) $Scale = IsScale() Scale(0) end CursorType( 2 ) RecordView("POKER_VIEW",1,1,1,"P3",#[0,0],#[190,125],1) DisplayMode(1) View("POKER_VIEW", 1, 0, 1, 1) DeleteView("POKER_VIEW") initDisp("win") Message("000000000g0}iW00g0O0`0U0D0", 0) do initCard() if %oya = 0 then call game1(%oya, %stat, %mes) else call game2(%oya, %stat, %mes) end if if $score1 = 0 or $score2 = 0 then Message("'AME /VER", 0) if $score2 >< 0 then Message("B0j0_0n0_0ތیW0~0Y0", 1) else Message("NNk0R0~0W00F0", 1) end if exit do end if if Alert(%mes, 1, {{"}Q00","C"}, {"000","Q"}}) = 2 Message("x0B}NW0~0Y0",0) exit do end if initDisp(%stat) loop if $slide = ON ErrorBreakMode(0, 0, 0) FullScreen(0) ErrorBreakMode(1, 0, 1) Scale($Scale) end if popPara() ATOKMode( 1, $a_mode ) DialogSize( 3 ) stop end !!===================================================================== !!0 pe T0 pushPara() !!0pei0 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== function pushPara() $key_mode = GetKeyBreakMode() $warning = GetWarningMode() $lengthunit = GetCoordinateLengthUnit() $layout = IsLayoutWindow() if $layout LayoutWindow(0) end if KeyBreakMode(0) WarningMode(0) CoordinateLengthUnit(1,0,0,1,1) end function !!===================================================================== !!0 pe T0 popPara() !!0pei0 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== function popPara() ErrorBreakMode($err_mode) KeyBreakMode($key_mode) WarningMode($warning) CoordinateLengthUnit($lengthunit) if $layout LayoutWindow($layout) end if end function !!===================================================================== !!0 pe T0 game1( %oya, %stat, %mes ) !!0pei0 000LF000000P[ !!0eQ0 R0 %oya  !! %stat !! %mes  !!0Q0 R0 j0W0 !!===================================================================== sub game1(%oya, %stat, %mes) %rate = 1000 !! cQ0ё Message("0000M0~0Y0", 0) for %i = 1 to 5 call getcard(%gc2(%i)) call putcard(%gc2(%i), %i, 2, "O") call getcard(%gc1(%i)) call putcard(%gc1(%i), %i, 1, "U") next for %i = 1 to 2 call makeyaku2(%gc2) call makeyaku1(%gc1) next Message("000 R 000", 0) call keisan(%gc1, %total1, %msg1) call keisan(%gc2, %total2, %msg2) for %i = 1 to 5 call putcard(%gc1(%i), %i, 1, "O") next yakuDisp(%msg1, %msg2) if %total2 = %total1 and %total1 = 0 then %stat = "draw" %mes = "J0ND000g0AmW0~0Y0" elseif %total2 > %total1 then %stat = "win" %mes = "B0j0_0n0Ra0g0Y0" $score1 = $score1 - %rate $score2 = $score2 + %rate %oya = 1 else %stat = "lose" %mes = "B0j0_0n0Q0g0Y0" $score1 = $score1 + %rate $score2 = $score2 - %rate end if end sub !!===================================================================== !!0 pe T0 game2( %oya, %stat, %mes ) !!0pei0 000LF000000 !!0eQ0 R0 %oya  !! %stat !! %mes  !!0Q0 R0 j0W0 !!===================================================================== sub game2(%oya, %stat, %mes) %rate = 1000 !! cQ0ё if %oya = 1 then Message("g0Y00#000g0M00h0D0D0g0Y0m0", 0) else Message(Zen(%oya) & "#000n0g0Y005_c0f0O0`0U0D00", 0) end if for %i = 1 to 5 call getcard(%gc1(%i)) call putcard(%gc1(%i), %i, 1, "U") call getcard(%gc2(%i)) call putcard(%gc2(%i), %i, 2, "O") next for %i = 1 to 2 call makeyaku1(%gc1) call makeyaku2(%gc2) next Message("000 R 000", 0) call keisan(%gc1, %total1, %msg1) call keisan(%gc2, %total2, %msg2) for %i = 1 to 5 call putcard(%gc1(%i), %i, 1, "O") next yakuDisp(%msg1, %msg2) if %total2 = %total1 and %total1 = 0 then %stat = "draw" %mes = "J0ND000g0AmW0~0Y0" %oya = %oya + 1 elseif %total2 >= %total1 then %stat = "win" %mes = "B0j0_0n0Ra0g0Y0" $score1 = $score1 - %rate $score2 = $score2 + %rate %oya = %oya + 1 else %stat = "lose" %mes = "B0j0_0n0Q0g0Y0" $score1 = $score1 + %rate $score2 = $score2 - %rate %oya = 0 end if end sub !!===================================================================== !!0 pe T0 makeyaku1( %gc ) !!0pei0 0u>T\On0000Nc !!0eQ0 R0 %gc !!0Q0 R0 j0W0 !!===================================================================== sub makeyaku1(%gc) keisan(%gc, %total, %wmsg) if %total < 400 then makeyaku11(%gc) else Message("vKbo0NcW0~0[00g0W0_0", 0) end if end sub !!===================================================================== !!0 pe T0 makeyaku11( %gc ) !!0pei0 !!0eQ0 R0 %gc !!0Q0 R0 j0W0 !!===================================================================== sub makeyaku11(%gc) %chcnt = 0 for %i = 1 to 5 %n(%i) = %gc(%i) mod 16 if %n(%i) = 1 then %n(%i) = 14 end if %m(%i) = %gc(%i) div 16 next %p1 = 0 %p1idx = 0 %p2 = 0 %p2idx = 0 for %i = 2 to 5 if %n(%i-1) = %n(%i) then if %p1 = 0 or %x = 1 then %p1 = %p1 + 1 %x = 1 if %p1idx = 0 then %p1idx = %i - 1 end if else %p2 = %p2 + 1 if %p2idx = 0 then %p2idx = %i - 1 end if end if else %x = 0 end if next if %p1 = 1 and %p2 = 0 then !! 0000 for %i = 1 to 5 if %i < %p1idx or %i > %p1idx+1 then call getcard(%gc(%i)) %chcnt = %chcnt + 1 end if next elseif %p1 = 1 and %p2 = 1 then !! 0000 if %p1idx = 1 and %p2idx = 3 then call getcard(%gc(5)) %chcnt = %chcnt + 1 elseif %p1idx = 1 and %p2idx = 4 then call getcard(%gc(3)) %chcnt = %chcnt + 1 else call getcard(%gc(1)) %chcnt = %chcnt + 1 end if elseif %p1 = 2 and %p2 = 0 then !! 000000 for %i = 1 to 5 if %i < %p1idx or %i > %p1idx+2 then call getcard(%gc(%i)) %chcnt = %chcnt + 1 end if next else for %i = 2 to 5 if %m(%i-1) >< %m(%i) then exit for end if next for %j = %i to 5 call getcard(%gc(%j)) %chcnt = %chcnt + 1 next end if Message("vKbo0" & Zen(%chcnt) & "gNcW0~0W0_0", 0) end sub !!===================================================================== !!0 pe T0 makeyaku2( %gc ) !!0pei0 00000n0000Nc !!0eQ0 R0 %gc !!0Q0 R0 j0W0 !!===================================================================== sub makeyaku2(%gc) do CreateDialog (%input) LocationDialog (%input, $disp_x, $disp_y, $dw, $dh) SetDialogTitle(%input,"NcY000000xbW0f0O0`0U0D0") !!1gv CreateRadioButton (%input,"RB1", 1, 2, \\ {{"W0j0D0","N"},{"Y00","Y"}}, 2, 1) SetControlTitle(%input,"RB1",1,1,"gv") !!2gv CreateRadioButton (%input,"RB2", 11, 2, \\ {{"W0j0D0","N"},{"Y00","Y"}}, 2, 1) SetControlTitle(%input,"RB2",11,1,"gv") !!3gv CreateRadioButton (%input,"RB3", 21, 2, \\ {{"W0j0D0","N"},{"Y00","Y"}}, 2, 1) SetControlTitle(%input,"RB3",21,1,"gv") !!4gv CreateRadioButton (%input,"RB4", 31, 2, \\ {{"W0j0D0","N"},{"Y00","Y"}}, 2, 1) SetControlTitle(%input,"RB4",31,1,"gv") !!5gv CreateRadioButton (%input,"RB5", 41, 2, \\ {{"W0j0D0","N"},{"Y00","Y"}}, 2, 1) SetControlTitle(%input,"RB5",41,1,"gv") CreateOKButton(%input ,"ok" ,51,1,"vpNc") CreateCancelButton(%input,"can",51,3,"ypB}N") $dia = DeleteAfterShowDialog(%input) if ( ErrorCode() <> 0 ) or ( $dia = nil ) then %ans? = Alert("pvp0B}NW0~0Y0K0",1) if %ans? = 1 then if $slide = ON ErrorBreakMode(0, 0, 0) FullScreen(0) ErrorBreakMode(1, 0, 1) Scale($Scale) end if popPara() ATOKMode( 1, $a_mode ) DialogSize( 3 ) ATOKMode( 1, $a_mode ) DialogSize( 3 ) stop else continue do end if end if %ch(1) = $dia("RB1") %ch(2) = $dia("RB2") %ch(3) = $dia("RB3") %ch(4) = $dia("RB4") %ch(5) = $dia("RB5") for %i = 1 to 5 if %ch(%i) >< 1 then call getcard(%gc(%i)) call putcard(%gc(%i), %i, 2, "O") end if next exit do loop end sub !!===================================================================== !!0 pe T0 keisan( %gc, %total, %msg ) !!0pei0 y_k0d0D0f0n0ёMn0{0LF0 !!0eQ0 R0 %gc  !! %total !! %msg  !!0Q0 R0 j0W0 !!0yrN0000000000000000 : 900 + y_k0rS_Y00000n0T !! 0000000000 : 800 + y_k0rS_Y00000n0T !! 000000 : 700 + y_k0rS_Y00000n0T !! 00000 : 600 + 000000n0T !! 00000 : 500 + y_k0rS_Y00000n0T !! 00000 : 400 + y_k0rS_Y00000n0T !! 000000 : 300 + y_k0rS_Y00000n0T !! 0000 : 200 + y_k0rS_Y00000n0T !! 0000 : 100 + y_k0rS_Y00000n0T !!===================================================================== sub keisan(%gc, %total, %msg) %total = 0 for %i = 1 to 4 for %j = %i+1 to 5 %x = %gc(%i) mod 16 %y = %gc(%j) mod 16 if %x > %y then %w = %gc(%i) %gc(%i) = %gc(%j) %gc(%j) = %w end if next next for %i = 1 to 5 %n(%i) = %gc(%i) mod 16 if %n(%i) = 1 then %n(%i) = 14 end if %m(%i) = %gc(%i) div 16 next %p1 = 0 %p1idx = 0 %p2 = 0 %p2idx = 0 for %i = 2 to 5 if %n(%i-1) = %n(%i) then if %p1 = 0 or %x = 1 then %p1 = %p1 + 1 %x = 1 if %p1idx = 0 then %p1idx = %i - 1 end if else %p2 = %p2 + 1 if %p2idx = 0 then %p2idx = %i - 1 end if end if else %x = 0 end if next %mes(2) = "" %mes(3) = "" if %p1 = 1 and %p2 = 0 then !! 0000 %msg = "One Pair" %total = 100 + %n(%p1idx) * 2 elseif %p1 = 1 and %p2 = 1 then !! 0000 %msg = "Two Pairs" %total = 200 + %n(%p1idx) * 2 + %n(%p2idx) * 2 elseif %p1 = 2 and %p2 = 0 then !! 000000 %msg = "Three Cards" %total = 300 + %n(%p1idx) * 3 elseif %p1 = 2 and %p2 = 1 then !! 00000 %msg = "Full House" %total = 600 + %n(%p1idx) * 3 elseif %p1 = 1 and %p2 = 2 then !! 00000 %msg = "Full House" %total = 600 + %n(%p2idx) * 3 elseif %p1 = 3 then !! 000000 %msg = "Four Cards" %total = 700 + %n(%p1idx) * 4 else for %i = 2 to 5 if %m(%i-1) >< %m(%i) then exit for end if next if %i > 5 then %x = 1 !! 00000 else %x = 0 end if if %n(1) = 14 then %n(1) = 1 end if for %i = 2 to 5 if %n(%i-1) >< %n(%i)-1 and not(%n(%i-1) = 1 and %n(%i) = 10) then exit for end if next if %n(1) = 1 then %n(1) = 14 end if if %i > 5 then %y = 1 !! 00000 else %y = 0 end if if %x = 0 and %y = 1 then %total = 400 + %n(1) + %n(2) + %n(3) + %n(4) + %n(5) if %n(1) = 14 and %n(2) = 10 then %msg = "Royal Straight" else %msg = "Straight" end if elseif %x = 1 and %y = 0 then %msg = "Flush" %total = 500 + %n(1) + %n(2) + %n(3) + %n(4) + %n(5) elseif %x = 1 and %y = 1 then %total = 800 + %n(1) + %n(2) + %n(3) + %n(4) + %n(5) if %n(1) = 14 and %n(2) = 10 then %msg = "Royal Straight Flush" %total = %total + 100 else %msg = "Straight Flush" end if else %msg = "Buta" end if end if end sub !!===================================================================== !!0 pe T0 initCard() !!0pei0 0000m\00 !!0eQ0 R0 j0W0 !!0Q0 R0 j0W0 !!===================================================================== function initCard Message("0000R0~0Y00", 0) %x = 1 for %i = 1 to 13 for %j = 1 to 4 $cards(%x) = 16 * %j + %i %x = %x + 1 next next for %i = 1 to 51 %j = int(rand * 51) + 1 %w = $cards(%i) $cards(%i) = $cards(%j) $cards(%j) = %w next $cardsidx = 1 end function !!===================================================================== !!0 pe T0 initDisp( %stat ) !!0pei0 0000y_0J0ёh:yj0i00LF0 !!0eQ0 R0 %stat !!0Q0 R0 j0W0 !!===================================================================== function initDisp(%stat) if %stat="win" OR %stat="lose" DeletePagePlane( , 1, "BC", 0) scoreDisp($score1, #[35, 0]) scoreDisp($score2, #[35, 62]) else DeletePagePlane( , 1, "B", 0) end if clearCards($mine) clearCards($yours) end function !!===================================================================== !!0 pe T0 clearcards( %cards ) !!0pei0 !!0eQ0 R0 %cards !!0Q0 R0 j0W0 !!===================================================================== function clearCards(%cards) for %i=1 to 5 %cards(%i) = 0 next end function !!===================================================================== !!0 pe T0 scoreDisp( %score, %pos ) !!0pei0 !!0eQ0 R0 %score !!0Q0 R0 j0W0 !!===================================================================== function scoreDisp(%score, %pos) if GetinputPlane <> "C" InputPlane("C") end if %fig = %score/1000 + 58 CallReferFig(, %fig, , %pos) end function !!===================================================================== !!0 pe T0 yakudisp( %msg1, %msg2 ) !!0pei0 y_h:y !!0eQ0 R0 %yaku1 !! %yaku2 !!0Q0 R0 j0W0 !!===================================================================== sub yakuDisp(%msg1, %msg2) yakuFig(%msg1, #[134, 0]) yakuFig(%msg2, #[134, 62]) end sub !!===================================================================== !!0 pe T0 yakuFig( %str, %pos ) !!0pei0 !!0eQ0 R0 %str !! %pos !!0Q0 R0 j0W0 !!===================================================================== function yakuFig(%str, %pos) if GetinputPlane <> "B" InputPlane("B") end if if %str = "Royal Straight Flush" %str = "Royal Straight F" end if CallReferFig(%str, , , %pos) end function !!===================================================================== !!0 pe T0 getcard( %card ) !!0pei0 0000Ng_O0 !!0eQ0 R0 %card !!0Q0 R0 j0W0 !!===================================================================== sub getcard(%card) if $cardsidx <= 52 then %card = $cards($cardsidx) $cardsidx = $cardsidx + 1 else initCard() %card = $cards($cardsidx) $cardsidx = $cardsidx + 1 end if end sub !!===================================================================== !!0 pe T0 putcard( %card, %x, %y, %side ) !!0pei0 0000c[4X@bk0nO0 !!0eQ0 R0 %card !! %x,%y !! %side !!0Q0 R0 j0W0 !!===================================================================== sub putcard(%card, %x, %y, %side) if %side = "O" %type = %card div 16 !! 1:}p, 2:xp, 3:p, 4:r %num = %card mod 16 !! vpn0juS %fig = (%type-1)*13 + %num !! SgqVb_juS else %fig = %x + 53 !! sn0SgqVb_juS end if if %y = 1 %tmp = $mine(%x) $mine(%x) = %fig %pos = #[%x*33+4.4, 58.4] else %tmp = $yours(%x) $yours(%x) = %fig %pos = #[%x*33+4.4, 120.2] end if if %tmp > 0 ChangeReferSource(%tmp, %fig) else if GetinputPlane <> "B" InputPlane("B") end if CallReferFig( , %fig, , %pos) end if end sub !!===================================================================== !!0 pe T0 getfilepath !!0pei0 0000n00000c[0LF0 !!0eQ0 R0 %file 0000LF00000n000 T !!0Q0 R0 %file c[W0_00000L0X[(WY000B00D0o0vc00000c[ !! W0_04XTk00000n000 T0ԏY0 !! "NONE"0000L0X[(WW0j0D04XT !!===================================================================== function getfilepath( %file ) if( ExistFile(%file) = TRUE ) getfilepath = %file else %macdir = GetOptionFile() if exist(%macdir("x")) !! f[ %path = BreakdownPath( %macdir("x") ) else %path = BreakdownPath( %macdir(5) ) end if %drive = %path("DRIVE") %dir = %path("DIRECTORY") %s_file = %drive&%dir&%file if( ExistFile( %s_file ) = TRUE ) 00getfilepath = %s_file else Message( %file&"n0B00hx0c[W0f0O0`0U0D0" ) %file = InputFile( , %file ) if( %file = NIL ) getfilepath = "NONE" else getfilepath = %file end if end if end if end function !! *************Attention************ !!J0[io00S0n00000000000000srn0~0~0g000W0O0o09e YW0_0 !!000000,{ Nk0M^Y00S0h0L0g0M0~0Y00 !! !!_0`0W00S0n000000o0*h_O>y00000000L0\ObW0_00n0g0B000 !!S0n000000n0W\O)jo00*h_O>y00000000k00^^\W0~0Y00 !!_D0~0W0f00N Nn0agNk0 Ta0u[W0f0D0_0`0D0_0 Ng0T0)R(u NU0D0~0Y00 !!F0J0XD0D0_0W0~0Y00 !! !!`$S0n000000Ss0J0[iL09e YW0_0000000M^Y004XTo00!qQk0 !!f0Lc0f0 NU0D00 !! !!a$J0[iL09e YW0_000000o00J0[ih0*h_O>y00000000n0qQ T !!n0W\Oirh0j00~0Y00_c0f009e YW0_000000n0Q-k0o00N Nn0h:y0 !!Lc0f0 NU0D00 !! 0S0n000000o00*h_O>y00000000K00cOU00_0000000 !!)R(uW0f0\ObW0_00n0g0Y00 0 !! !!b$J0[iL09e YW0_000000k0Y00J0OUD0T0[0k0o00 _>yo0NRJ0T{H0 !!D0_0W0~0[000 !! !!c$ _>yo00S0n000000L0J0[in0O(uvvk0iTY00S0h0n0OD`DrDDDDDتDDDD GGeVepeeeeeee¦e &* hKh^hkhxhhhh'/`jPxjjPjPjP(/`kkkkjkkk) m8mOmamlmtm{mmmmmmjmmm*qq*q J̐ )!AGIZӖ1Pt PPSȰaD!$́sβ,ǐ!Ta!,qaWdw',--P1!/.h;,dG ǃWNްO5@ %St2 wpnriKzĶZ,!pd,A!97_υoá5QDȔ!8*!dpsp_R{,ԅ3aIYX>1q.+1-!@1D_,Yl(Wq!5dJ c ÙBQ̀%Lk!pIta"!NtU1+1Si(NWt]k$+"gh$'S}!scpao}y ~́Qk$+"h$1oJU a˔́t1bذx&*+1t1c ++1<1l(FPLSEа+Ĉh$1ʌߍٔ+1ܐ<ߖk$p(t)єPáSaĔ1l(q#+1  mCPRTTPӖ!΁!*RްVE5+) a!PA_R|6%8:ܹ|XЁtagЁch[Ѐ+1e4rj,t81YЏ+@a!'AME_ /VR4 +18څB\XAO+ 0jn0_0ތ+WY4_hNNk0RP_W00F!Z I t!lI _Hq qЗE=$#^A#q㩬"qб ,q I E}Q0!I_A_CD_0D?q`Q5T!P +X QvDx0B}ENIdT k Ԃ Ժ%o^(T⇇ I%A$hqЊ@ r ؗϘ#"-L(!X /L)+*\-LX%!XD_ZqA]Dᙋ!@S$@PaUmܰ(c0P>D)OQ@Swf Cd4@Q &d4K8qp+uhɰaB_4 `14p@ Bq8Y5(CMqkyDA2(MAp_N64O W2NpQ[TUwLngrMtpNH O@#"AǃWQrU̴Z1!YtLuYB$!M`pdU/cO1V"wPȁalyܰu$!tz1gмfONHd_eu kOPOnloheVHA\^_1vREv| {"{ྡ ( pܰpLȖi5P>"AerD5p_Q=BDROLDtOWn[XgdxOyo^|_aꁋ%iij,l?e=d$@A1PAI$.D$Q#!A2#,pY#2pDt01lۖ;mLgILPץV>"ץ_ahOZq%rq┱Ulpv┳Utߵ{pQ]#٧"xV%# #I~ Ads1&s01a  O ːa1̤?&raHd"d2Awp Q$+adJrcgJ0ND000g0AmQɑ`$``?&a6H0>ds1wYb1?GDFrNd"AB0j0_0n0Ra5R\D! n A*pfs=@o0pĩGX1!q#?aUy! "&$p')_aDZq-$ aD ձdl0s0z,/0QT4'"&$*Ϭp9Q; !%",/$CGJPX_}a$:ۥh>NAq$!hPF!|!$~%Do 䔤4 $ զd 3 $շd"8]Ǭ$(Qӥ ΡTQIզɱHiU٤4Dϒ$뾏!$F  F Y 58]!!3+F >*q5 F B1-q>H(Q%PDH{Ro!$![5gF P bQIi/5q/ u }2qտ7,q8]JlD$P `-qLD% `-q .5$cQ `!QOOm0`k@HkuFѡI`%f``GQg$`wUNő?cH MQѐ?hQiƑoqщ(7T?vKbo0NcDZ[0`Wg3OcEQ>3PYƑ_\-qT?8ecŇ"GQc%hn4baF% e$j#$eЧ)o#$t"$qʀA"$H* 1'#$) 7)S1w'NAI%cԴ2Oř*/X140'D&1"$Q#$@8/80'1) ʀ*(+kFpLpQS1&3A A <C&9$"al2#((PP& Ac(%/A6!2#E9)5#:AaLj?qB@5B@(*$; < KM>L?qJ@5J@/; %<SM SM?qR@5R@SaS;uS[qM$U!?qZu@5Zq@Ya-S ¤Y1Si4;$ah@ba TNpfa$pKS;C_H a(h@ aGd|Ncx)^S5Z%Gt&D?Df_HoQgP Cjdxlԁ%ƾnko\tpdxd|YUO9S(%~?0 Q(Q Q4qk0i郔pxRtްt$"δmJgT%q8봁%p$%qAĂ%dɂ$T%Q فY@ׇ\چ\҇TjHEİEčQ %;GQ p\!*xT @;!@p@@qyɔDA T\pQpY@$ a$*R;/ Qp3$wQEwT<ӡ;F qpJ(?quoťqp@Sh a]@?qoŬpW(R|AQ ԅ$Á$yE*d a p(?qq aE(Tq aɰP$?qżī* 떄 A pﺜż*mi4ݫY2*Ҙp?"p|ՁՔ|ԣG՜'|!I26+p҃P"A4td!/pdI9te>߱lBP㱿Jp;AՔH(i4 FՑQ"Gtq;LՔE$qOf!\!vqQg߱PEc_?1Aex mjĔAo{ՔL Nd!ԫ e!f!I QdŤIןx1ՔTA籿PQ@Be!QGf! ?l +{Y@dcm2AdєV V`]?b Vd!рe)[dJ5eo5u1=jdPf!tLd4q"s1 ){w{)}h%f婉1Ft1O`e 0Ea~0ro*䥐de!dd$q;1Hv1qf{Hp.q#$dܪ%n&(hqqY2U,] To,(p=-}>K0>>e!>Q0,>11!BD1E$>3.DDq0=ED2HEJ5G ?IHHpB1CF$R>BNBAa>{PIHJZQVRF\DDpBDe!w> ?Bh,e,C~pr\@uV-}BD.JCđDD,0EDE^ɚGϺ3DDPip[PQDUQįRNSlQĥTDDEBDJr>|AFuUl, HueoTj-}[CDDYXp0-1E$r`χr by$o r #r !r r {v$%"yz&$v$ 7ykH>r l?m]~ђ-}N~.[r qWv$qhr$]~1q`r L0v,qw]nxdyyuz.{v(q~mqrYO-}*v$qr$1ɻ{v$-qqH1w]qy!aI}qxdv$5y!񴨡a @r$~uХ*y\{H11~EЩX.Sq$a@*,)7Q&d -Ѫw]#$d$%l&l$'є&h1- fQI..0&d vQ2lMQE4l2lPQ7lQ2lSQ:lfHIVQf VlYQXd H fjDr]xI#fѭPfQVl$`Xd XdUE-`$'Vle*XdR/Xd%j$B[yړ92c3P1~X iis`xs}1\#aE! SAG մ}Q0000R0~0YK00})U}}UEQ(򈤦E} ~hI ~~hjē1h~q+~q&~Q#HX (ȹ-Ĉ8ɡqcJsΤIJ4$Q̚1Q,Hh풎UQ_ĪeĒoy~X j~ZIONT+!IsԩnTQ"TRNKDduQ{̈hсoqQrȨhw¤ĀO䢬a/;0Ⱦe5ahѱRxe5a/ʑz ȗq 7ir`%`457e D!spss]DUhhI !_!!"QQ,wb3IPp1PPzlsseP,zD L* T PPѠ!"Pc$Dc'ΤB4D,ѩ3DhrSOjEPI! =*PcsrϠpX FPUHD#dLSt]ڮfHh lDz,{H?_*fьȎԌΤhBdDѨaU `CAjC")D! Dmbϵ!Pysu }16t7cseQ)@d@I@ Doqq1mq 0 `0hхhH1pb]s1 _+00!QTrPUҽ. Q,5 $H @lhP Ts.c0I]1"X W0f^0gQ):feD:,f!xsj $,߱!qLF Rw@Iw !y$Lf} mqD V}19h"(L1kk{`L-]%DŽ,ѧ"1Y"K mq"%R"u*d$*dU')X T*j+,*dz‘:ѐ;!6$Fm1߱ (9  5 _ ;m5=?])5~HDB_1DX ,58)f3?jv_lhUMEV$T?HJ[K8)@[G/EfхdEmqT!فy00000000SprDataSaveSprDataSave  SprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveSprDataSaveMainSprDataSave  `MainSprDataSaveMain0000SprDataSaveSprDataSave.SprDataSaveMainSprDataSaveVDA_DOC`JSRV_SegmentInformation2z16pYhPROJECTpYhMain pYhPROJECTCONTENTSINFOMATIONVDA_DOC`PROJECT_MACRO_LIBRARY_AREA6pYhSRCAREA1jMMACROAREA1j(LIBRARYEXTENDINFO$!!********************************************************************** !!===================================================================== !!0000 T0 000 !!0 Q W00 0000 !!0O(ugr0 j0W0 !!0\O b 0 JUSTSYSTEM !!0R\OtX0 P[12 for Windows XP/Me/98/2000/NT4.0 !!0 Y f p0 j0W0 !!===================================================================== !!********************************************************************** !!0(C)20020*h_O>y00000000 !!********************************************************************** !! !! ----------- !! | 1| 2| 3| 4| !! |--+--+--+--| !! | 5| 6| 7| 8| !! |--+--+--+--| !! | 9|10|11|12| !! |--+--+--+--+-- !! |13|14|15|16|17| !! ------------- pushPara() %slide = ON $next_pos={{ 0, 2, 5, 0},{ 0, 3, 6, 1},{ 0, 4, 7, 2},{ 0, 0, 8, 3},\\ { 1, 6, 9, 0},{ 2, 7,10, 5},{ 3, 8,11, 6},{ 4, 0,12, 7},\\ { 5,10,13, 0},{ 6,11,14, 9},{ 7,12,15,10},{ 8, 0,16,11},\\ { 9,14, 0, 0},{10,15, 0,13},{11,16, 0,14},{12,17, 0,15},\\ { 0, 0, 0,16}} !! n0juS( N,S, N,]) 0:z $org= #[10, 20] !! p}1n0] N^j $disp = #[77, 9] !! hQSOVn0] N^j $plen = 15 !! p}n0N $unit = $plen+0.6 !! p}n00RH00 $repeat = 100 !! p00p00k0Y00h0M0n0p~0ԏW0Vpe $pieces = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0} !! p}n0MOn 0:zzM0 $space = 0 !! zzD0f0D004X@b Randomize(Decimal(Right(ThisTime, 2))) if %slide = ON ErrorBreakMode(0, 0, 0) FullScreen(1) ErrorBreakMode(1, 0, 1) %scaale = Scale() Scale(0) end if RecordView("15PZL_VIEW",1,1,1,"P1",#[0,0],#[104,88],1) DisplayMode(1) View("15PZL_VIEW", 1, 0, 1, 1) DeleteView("15PZL_VIEW") %pfile_pos = 1 !! Tgr{v2juS call ChangeParts(%file, %pfile_pos) ClearSelectFig() SelectMode(1) SelectOneObjectMode(0) do %pos = getPos() select case %pos case 1 to 17 !! p}yR if $pieces(%pos) > 0 !! c[MOnL0B0M0g0j0Q00p0yR call MovePiece(%pos) checkPieces() end if case 18 !! TgrNc do if Alert("Nn0u}k0fH0~0Y0K0") = 1 call ChangeParts(%file, %pfile_pos) if %file <> "wrong" exit do end if else exit do end if loop case 19 !! p00p00k0Y00 if $space > 0 if Alert("p00p00k0W0~0Y0K0") = 1 call ShufflePieces() end if end if case 20 !! B}00 if Alert("B}NW0~0Y0K0") = 1 exit do end if end select loop if %slide = ON ErrorBreakMode(0, 0, 0) FullScreen(0) ErrorBreakMode(1, 0, 1) Scale(%scale) end if popPara() DialogSize(3) stop end function pushPara() $err_mode = GetErrorBreakMode() ErrorBreakMode(1, 0, 1) $key_mode = GetKeyBreakMode() $warning = GetWarningMode() $lengthunit = GetCoordinateLengthUnit() $pwindow = IsPartsWindow() $cur_pfile = GetCurrentPartsFile() $layout = IsLayoutWindow() if $layout LayoutWindow(0) end if KeyBreakMode(0) DisplayMode(0) WarningMode(0) EditDisplayMode(0) CoordinateLengthUnit(1,0,0,1,1) DisplayPlane("ABCDEFGHIJKLMN") DialogSize(2) PartsWindow( 0 ) end function function popPara() DisplayMode(0) PartsWindow( 0 ) CurrentPartsFile($cur_pfile) PartsWindow( $pwindow ) ErrorBreakMode($err_mode) KeyBreakMode($key_mode) WarningMode($warning) DisplayMode(1) CoordinateLengthUnit($lengthunit) if $layout LayoutWindow($layout) end if end function function getPos() WaitMouseButton?(1, 1) !! ]L0J0U000~0g0~0d0 %pos = GetMousePoint %x = GetX(%pos) %y = GetY(%pos) if % x < 0 or %y < 0 !! WY getPos = -1 exit function end if if 80<=%x AND %x<=100 !! ztq if 35<=%y AND %y<=42.5 getPos = 18 !! change exit function elseif 45<=%y AND %y<=52.5 getPos = 19 !! shuffle exit function elseif 55<=%y AND %y<=62.5 getPos = 20 !! quit exit function end if end if %x = (%x-GetX($org)) div $unit %y = (%y-GetY($org)) div $unit if %x=4 AND %y=3 getPos = 17 elseif 0<=%x AND %x<4 AND 0<=%y AND %y<4 getPos = %y*4+%x+1 else getPos = 0 end if end function sub MovePiece(%pos) !! 1gn0p}0RK0Y0 %next = $next_pos(%pos) for %i=1 to 4 if %next(%i) = $space moveNext(%pos) exit sub end if next pieceXY(%pos, %x1, %y1) pieceXY($space, %x2, %y2) if %x1 = %x2 if %pos > $space %val = 4 else %val = -4 end if elseif %y1 = %y2 if %pos > $space %val = 1 else %val = -1 end if else exit sub end if do %src = $space + %val moveNext(%src) if %src = %pos exit do end if loop end sub function pieceXY(%pos, %x, %y) if %pos < 17 %x = (%pos-1) mod 4 %y = (%pos-1) div 4 else %x = 4 %y = 3 end if end function function moveNext(%pos) !! x0yR %des = convPos($space, "LU") !! yRHQ] N^j %num = $pieces(%pos) !! yRY00p}n0TjuS %fig(1) = $fig_num(%num) PutSelectFig(, %fig) Move(, %des) ClearSelectFig() $pieces($space) = %num $pieces(%pos) = 0 !! eW0O0g0M0_0B0M0 $space = %pos $count = $count+1 end function function checkPieces() for %i=1 to 16 if %i <> $pieces(%i) exit function end if next if $count < $repeat %mes = "J00]00W0~0W0_0" elseif $count < $repeat/5*6 %mes = "J0N" elseif $count < $repeat/5*7 %mes = "00~0Y0m0" elseif $count < $repeat/5*8 %mes = "J0u0U0~0g0W0_0" else %mes = "L0~007_D0N" end if Message(%mes, 0) end function function convPos(%pos, %mode) !! p}n0MOnK00^j0Bl00 if %pos = 17 %x = 4 %y = 3 else %x = (%pos-1) mod 4 %y = (%pos-1) div 4 end if if %mode = "LU" %x = GetX($org) + %x*$unit !! p}n0] N^j %y = GetY($org) + %y*$unit else if %mode = "MD" !! 000n0-N.Y^j %x = GetX($org) + %x*$unit + $plen /2 !! p}n0-N.Y^j %y = GetY($org) + %y*$unit + $plen /2 else %x = GetX($org) + %x*$unit + $plen !! p}n0S N^j %y = GetY($org) + %y*$unit + $plen end if convPos = #[%x, %y] end function sub ShufflePieces() shuffle() DeletePagePlane( , , "B", 0) !! Y0y0f0n0p}0mY0 put() !! k0W0_0p}0nO0 end sub function shuffle() !! p00p00k0Y00 Message("j00s0K0H0~0Y0", 0) %prev = 0 !! vMRk0RK0W0_04X@b for %i=1 to $repeat %next = $next_pos($space) !! B0D0f0D004X@bn0 %pos_num = 0 !! yRSj04X@bn0pe for %j=1 to 4 !! g'Yg0 N N]Sn0d0 %pos = %next(%j) !! jox[an04X@b if %pos>0 AND %pos<17 AND %pos<>%prev !! S N҉h0vMRk0RK0W0_0p}o0`00 %pos_num = %pos_num+1 %tmp(%pos_num) = %pos end if next %num = Int(Rand*10) mod %pos_num %pos = %tmp(%num+1) !! yRCQ %piece = $pieces(%pos) !! yRY00p} $pieces($space) = %piece $pieces(%pos) = 0 %prev = $space $space = %pos next $count = 0 end function sub ChangeParts(%file, %pos) Tgr-[("ha12_smp.ptm") %ret = Alert("15}(un0T.z%R0x0g0O0`0U0D0",1,{{"dp}","R"},{"P[Vg","H"}}) if %ret = 1 $pie = "red" else $pie = "hana" end if DeletePagePlane( , , "AB", 0) !! hQSOVh0Y0y0f0n0p}0mY0 InputPlane("A") CallParts( $pie&"hQSO",, , $disp) !! 17:.~\hQSOVn0TjuS $pieces = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 0} $space = 17 shuffle() put() end sub !!********************************************************************** !!pe Tgrn0{pSs0-[ !!eQR %file Tgr T !!********************************************************************** sub Tgr-[( %file ) !!&{v2n0n0x %pfAbsent= 999 for %pn= 1 to 100 try %pf = GetPartsFile(%pn) exception case "SearchError" %pfAbsent= %pn exit for end try if Exist(%pf("gr T")) = TRUE and %pf("gr T") <> "" %bdp= BreakDownPath (%pf("gr T")) if ErrorCode = 0 if Exact(%bdp("FILE"),%file,2) = TRUE CurrentPartsFile(%pn) exit sub end if end if else %pfAbsent= %pn end if next !!&Tgrn0{p %fileP = getfilepath( %file ) if( %fileP = "NONE" ) Message( %file & "0-[W0f0D0~0[000"&char(10)& \\ " Tgr T0-[Y00_L0B00~0Y00" ) exit sub end if if %pfAbsent = 999 %pfAbsent = 10 end if PartsFile( %fileP, %pfAbsent ) CurrentPartsFile( %pfAbsent ) end sub !!====================================================================== !!pe gr{p !!eQR %file gr T !!ԏ$P grL0X[(WY00 grn0} T !! X[(WW0j0D0 "NONE" !!====================================================================== function getfilepath( %file ) if( ExistFile(%file) = TRUE ) getfilepath = %file else %macdir = GetOptionFile() %path = BreakdownPath( %macdir("x") ) %drive = %path("DRIVE") %dir = %path("DIRECTORY") %s_file = %drive&%dir&%file if( ExistFile( %s_file ) = TRUE ) 00getfilepath = %s_file else Message ( %file&"n00000000c[W0f0O0`0U0D0" ) %fileO = InputFile( , %file ) if( %dir = NIL ) or ( %fileO = NIL ) getfilepath = "NONE" else getfilepath = %fileO end if end if end if end function function put() !! p}0TgrK00QW0f0nO0 InputPlane("B") %fnum = CountFigsPage(GetPage) %pie = $pie & "p}" for %pos=1 to 17 %num = $pieces(%pos) !! p}n0TjuS if %num > 0 %des = convPos(%pos, "LU") !! p}n0MOn CallParts( %pie & %num , , , #[105,100])!! ;ubYk0h:y Move(,%des) %fnum = %fnum + 1