FasdUAS 1.101.10 k l UO require TextInfo OSAX (http://www.bekkoame.ne.jp/~iimori/sw/TextInfoOSAX.html) l  l   use common library script   j 0 scriptdir scriptDir I .earsffdralis afdr m  afdrscr  from m  fldmfldu j  0 libscript libScript m  CommonLib.scpt j  0 commonlib CommonLib I  .sysoloadscptfile 4   file l b l c ! o 0 scriptdir scriptDir !m  TEXT o 0 libscript libScript"# "l#$% $l& & other common values%'( 'j) 0src )m* * rss_base.rdf(+, +j- 0out -m. . rss.rdf,/0 /j "1 0xsl 1m !2 2nikki_rss_summarize.xsl034 3l456 5l7 7 set paths689 8l(: :O(;< ;k'==>? >r@A @bBC BID 0 gethfspath getHFSPathDE EI F 0getenvgetEnvFG Gm H H NIKKI_DIR CmI I: Ao 0nikkidirnikkiDir?J Jr'KL Kb%MN MI#O 0 gethfspath getHFSPathOP PIQ 0getenvgetEnvQR RmS S XSL_DIR Nm#$T T: Lo 0xsldirxslDir <o 0 commonlib CommonLib9UV UlVWX WlY Y set extend funcsXZ[ Zh#.\ 0 thescript theScript \k]]^_ ^j` 0 xsltnamespace XSLTNamespace `ma a1+http://www.remus.dti.ne.jp/~a-satomi/asfunc_bc blcde dlf f" s:summary ֐ (v񕶍쐬)egh giij iIk 0summaryklm lo 0strmn no 0maxbytemaxByte jk:oopq prrs rm so 0xqtu tZvw vA xy xlz zn{| {m  nmbr |o 0str yl } }] ~ ~o 0maxbytemaxByte m ?Q wr m o 0xu r! c l I .fbcssummTEXT**** o 0str  in o 0x m  ctxt o 0 summarizedstr summarizedStr Z"1 ="% o"# 0 summarizedstr summarizedStr m#$  r(- c(+ o() 0str m)*  ctxt o 0 summarizedstr summarizedStr L2: I29 0cuttextcutText o34 0 summarizedstr summarizedStr o45 0maxbytemaxByteh l l _Y őoCg maxByte 𒴂镶 str ̂ې؂ ({ꕶ̃oCg UTF-8 ) i I 0cuttextcutText o 0str o 0maxbytemaxByte k l r b m   o 0str o 0str /) 󔒂ȂƂȂ肭삵Ȃc r J o 0ret r  o 0maxbytemaxByte o 0maxbytemaxByte r m o 0sum r n 1  txdl 1  ascr o 0tmp r m  n 1  txdl 1  ascr r& c$ l" n" 2 "  citm o 0str m"#  list o 0str l'' X's k7n r7: m78 o 0inc Z;P ?;F n;D 1BD  t2by l;B I;B .tInftInftRtnTEXT l;> c;> o;<~ ~0curitemcurItem m<=} } ctxt mDE|| rIL mIJ{{ oz z0incy ZQnx ?QV lQTw [QT oQRv v0sum oRSu u0incw oTUt t0maxbytemaxByte kY_ rY] mYZ ... n ;[\ oZ[s s0retr S^_rx kbn rbg [be obcq q0sum  ocdp p0inc oo o0sum n  rhn   lhk m  chk ohil l0curitemcurItem mijk k ctxtm  n ;lm oklj j0retny 0curitemcurItem o*+i i0str ltthghg rty ctw otuf f0ret muve e ctxt od d0ret rz oz{c c0tmp n 1|~b b txdl 1{|a a ascr `  l!" !L# #n$% $7_&' _ ctxt &m^^ 'l(] (I\)[ \.corecnte******** )oZ Z0ret[] %oY Y0ret "/) dȂ擪ɂ‚󔒂ĕԂc`*X *lWVWVX[+, +lUTUT,-. -l)L/S /n)L01 0I.LR2Q R 0xalan_c234 3b.556 5o./P P0xsldirxslDir 6o/4O O0xsl478 7b5<9: 9o56N N0nikkidirnikkiDir :o6;M M0src8;< ;b<C=> =o<=L L0nikkidirnikkiDir >o=BK K0out<?J ?oCHI I0 thescript theScriptJQ 1o).H H0 commonlib CommonLibS.@A @lGFGFABE BlDCDCE BCDE*.2FGBCA@?>=<;: A0 scriptdir scriptDir @0 libscript libScript ?0 commonlib CommonLib >0src =0out <0xsl ;0 thescript theScript :.aevtoappnull****DF alisBMiyuT."H+ScriptsL34v LibrarySfs oO$*!Miyu:Users:satomi:Library:ScriptsScripts MiyuUsers/satomi/Library/Scripts/ E9HI9 HkJJKL Kl8M8 M ̃CugpXNvǵA`ɈȉLq̎ -- use common library script property scriptDir : path to scripts folder from user domain property libScript : "CommonLib.scpt" property CommonLib : load script file ((scriptDir as string) & libScript) LNO Nl7676OPQ Pl5454QRS Rl3T3 TʃvpeBSUV Uj2W 20homedirhomeDir WI1XY 1.earsffdralis afdr Xm0 0 afdrcusrY/Z. / from Zm- - fldmfldu.V[\ [j ,] ,0tmpdirtmpDir ]I +^_ +.earsffdralis afdr ^m * * afdrtemp_)`( ) from `m ' ' fldmfldu(\ab aj&c &0sitesdirsitesDir cI%de %.earsffdralis afdr dm$ $ afdrsitee#f" # from fm! ! fldmfldu"bgh gj i 0xalan imj j ~/bin/xalanhkl kllmn mlnop olq q.( bash ‹ϐl擾 (envName: string)prs ri!tu tIv 0getenvgetEnvvw wo 0envnameenvName uL x xl y yc z{ zl| |I} .sysoexecTEXTTEXT }b~ ~m . ~/.bashrc; echo $ o 0envnameenvName {m  utxts l l E? ̒PSu (str: string, ptn: string, replace: string) i"% I  0replace o 0str o 0ptn o  0replace  k8 r c o 0str m  utxt o 0str r  c  o 0ptn m  utxt o 0ptn r  c  o   0replace m   utxt o 0replace l r n 1  txdl 1  ascr o 0tmp r o 0ptn n 1  txdl 1  ascr r# n! 2!  citm o 0str o 0thelisttheList r$) o$% 0replace n 1&(  txdl 1%&  ascr r*/ c*- o*+ 0thelisttheList m+,  TEXT o 0str r05 o01 0tmp n 124  txdl 112  ascr L68 o67 0str l l a[ ̐K\u (str: string, ptn: string(regex), replace: string, opt: string([ig])) i&) I 0 replaceregexp replaceRegExp o 0str o 0ptn o 0replace o 0opt k r l E o 0opt m i o 0iflagiFlag r  l  E  o 0opt m g o 0gflaggFlag r  I  .mGrpmGrpmInfTEXT o 0str  rgEx o 0ptn  iCas o 0iflagiFlag o 0res Z l ? n 1  mLen o 0res m k  r # m !  o 0 leftmatch leftMatch r$' m$%   o 0 rightmatch rightMatch   Q(E   r+< n+: 7,:  ctxt m02 l39 \39 l47 n47 157  mPos o45 0res m78 o+, 0str o 0 leftmatch leftMatch  R .ascrerr ********  QFd rI[ nIY !  7JY"#  ctxt "lNV$ $[NV%& %lOR' 'nOR() (1PR  mPos )oOP 0res &lRU* *nRU+, +1SU  mLen ,oRS 0res #;WX !oIJ 0str o 0 rightmatch rightMatch R .ascrerr ********- -Ze./0 .oef 0gflaggFlag /Liw1 1biv23 2bil45 4oij 0 leftmatch leftMatch 5ojk 0replace 3Ilu6 0 replaceregexp replaceRegExp678 7omn 0 rightmatch rightMatch89: 9ono 0ptn:;< ;oop 0replace<= =opq 0opt 0Lz> >bz?@ ?bz}AB Aoz{ 0 leftmatch leftMatch Bo{| 0replace @o}~ 0 rightmatch rightMatch LC Co 0strDE DlEFG FlH HLF P̍ڂƂ郊XgԂ (Xg̏ꍇ͂̂܂ܕԂ)GIJ Ii*-KL KIM 0 enclosetolist encloseToListMN No 0arg LZOPQ O=RS RnTU T1  pcls Uo 0arg SmV V list PL W Wo 0arg QL X Xl Y Yc Z[ Zo  0arg [m  listJ\] \l]^_ ^l` `E? POSIX Path Ԃ (arg: alias or string (HFS path/POSIX path))_ab ai.1cd cIe 0getpathgetPATHef fo 0arg dZ ghij g=kl ko 0arg lmm m hLn no 0argiop oC qr qo 0arg rm s s/pt tLu unvw v1  psxp wo 0arg jL x xnyz y1  psxp zl{ {c|} |o 0arg }m  alisb~ ~l~}~} l|| C= HFS Path Ԃ (arg: alias or string (HFS path/POSIX path)) i25 I{z {0 gethfspath getHFSPathy ox x0argyz k( r c ow w0arg mv v utxt ou u0argt Z( =  os s0arg m  L  c  o r r0arg m q q TEXT C op p0arg m /o L c ln c om m0arg ml l psxfn mk k TEXTo L"( c"' l"%j c"% o"#i i0arg m#$h h alisj m%&g g TEXTt lfefe ldd D> t@CԂ (arg: alias or string (HFS path/POSIX path)) i69 Icb c0 getfilename getFileNamea o` `0argab Z"_ C o^ ^0arg m / L I]\ ]0 replaceregexp replaceRegExp o[ [0arg m   .+/ m  Z m  Z\_ k" O r n 1Y Y pnam lX c oW W0arg mV V alisX oU U0filenamefileName mnull# Finder.app %(@  8)f($p]MACSalisZMiyuT."H+# Finder.app$LhC CoreServicesSgą ##˰#˯+Miyu:System:Library:CoreServices:Finder.app Finder.app Miyu&System/Library/CoreServices/Finder.app/T L " o !S S0filenamefileNameT lRQRQ lPP TN theFile ̓tH_Ԃ (theFIle: alias or string (HFS path/POSIX path)) i:= ION O(0getcontainerfoldergetContainerFolderM oL L0thefiletheFileMN Z$K C oJ J0thefiletheFile m / L IIH I0 replaceregexp replaceRegExp oG G0thefiletheFile m  [^/]+/?$ m  F m  FHK k$ O! r  c lE n mD D cfol lC c oB B0thefiletheFile mA A alisCE m@ @ alis o? ?0 thefolder theFolder m> L"$ o"#= =0 thefolder theFolder> l<;<;   l: :  (" ʏ_CAO (msg, btn: string)    i>A I98 9 0dialog o7 70msg6 o5 50btn68 k8 Z 43 = o2 20msg m  r  m  hello world! o1 10msg43 Z!"0/ !=#$ #o. .0btn $m% % "r&' &m( (OK 'o- -0btn0/ )* )I!,+* ,.sysobeepnulllong+**+, +I"1)-. ).sysodisAaleRTEXT -o"#( ( 0label.'/0 ' mesS /o$%& &0msg0%12 % btns 1J&)334$ 4o&'# #0btn$2"56 " dflt 5o*+! !0btn6 7  as A 7m,-  EAlTwarN,8 8R289 .ascrerr ********9:  errn :m45 ;< ;l<=> =l? ?(" x_CAO (msg, btn: string)>@A @iBEBC BID 0msgDEF Eo  0labelFGH Go 0msgHI Io 0btn CkFJJKL KZ MN M=OP Oo 0label PmQ Q Nr RS RmT T Message So 0label LUV UZWX W=YZ Yo 0msg Zm[ [ Xr\] \m^ ^ hello world! ]o 0msg  V_` _Z)ab a=cd co 0btn dme e br"%fg fm"#h hOK go 0btn`ij iI*/ .sysobeepnulllongjkl kI0?mn .sysodisAaleRTEXT mo01 0labelnop  mesS oo23 0msgpqr  btns qJ47sst to45 0btnruv  dflt uo89 0btnvw  as A wm:;  EAlTwarNlx xR@Fy .ascrerr ********yz  errn zmBCA{| {l|}~ }l VP XSLT ϊ by Xalan-Java (xsl, src, out: alias or string (HFS path/POSIX path))~ iFI I 0xalan_j o 0xsl o 0src o 0out k Z G  = o 0src m  =  o 0out m  L r I 0 getfilename getFileName o 0src o 0filenamefileName Z2 >! o 0xsl m   r$. n$, 1*,  strq I$* 0getpathgetPATH o%& 0xsl o 0xsl r3= n3; 19;  strq I39 0getpathgetPATH o45 0src o 0src r>H n>F 1DF  strq I>D 0getpathgetPATH o?@ 0out o 0out rIV nIT 1RT  strq lIR bIR nIP 1NP  psxp oIN 0tmpdirtmpDir mPQ !xalan_applescript_error_msg o 0err IWp .sysoexecTEXTTEXT bWl bWj bWh bWf bWd bWb bW` bW^ oW\ 0xalan m\]   o^_ 0xsl m`a   obc 0src mde   1>  ofg 0out mhi   2>  ojk 0err rq| cqz lqx Iqx .sysoexecTEXTTEXT bqt mqr  cat  ors 0out mxy  utxt o 0out r} c} l} I} .sysoexecTEXTTEXT b} m}  cat  o 0err m  utxt o 0err Z = o 0err m  L o 0out I 0msg b m  XSLT Error :  o 0filenamefileName o 0err m  Exit l l   UO XSLT ϊ by Xalan-C (xsl, src, out: string (HFS path), func: functionScript)   l   OI require XSLT Tools OSAX (http://www.latenightsw.com/freeware/XSLTTools/)    iJM I 0xalan_c o 0xsl o 0src o 0out o 0func kk Z G G  !  ="# "o 0xsl #m$ $ != %& %o 0src &m' ' =() (o 0out )m* * L+, +r%-. -I#/ 0 getfilename getFileName/0 0o 0src .o 0filenamefileName,12 1Z&=345 3=&+67 6n&)89 81')  pcls 9o&' 0func 7m)*  scpt 4r.6:; :I.4< 0 enclosetolist encloseToList<= =o/0 0func ;o 0func 5r9=>? >J9; ?o 0func2@ @Q>kABC AIAUDE .ScTlxslTutxt utxt D4AEF  file FoCD 0srcEGH  XMlS G4FJ~I ~ file IoHI} }0xslH|JK | XMlO J4KO{L { file LoMNz z0outKyMx y XMlf MoPQw w0funcx BRvNu v.ascrerr ******** Not t0erru CI]ksOr s0msgOPQ Pb^cRS Rm^aT T XSLT Error :  Soabq q0filenamefileNameQUV Uocdp p0errVWo WmdgX X ExitorYZ YlnmnmZ[\ [ll]l ]0* Abv[h (arg: alias or {alias, ...})\^_ ^iNQ`a `Ikbj k 0uploadbci coh h0argij aO de dI gff g.aevtodocnullalis foe e0argf emggnull߀ Transmit.app%( )f($@]TrAnalisNMiyuT."H+ Transmit.app'Y _NetworkSEb'Miyu:Applications:_Network:Transmit.app Transmit.app Miyu"Applications/_Network/Transmit.app/_hi hldcdcijk jlbabaklm ll`n` n! (num, max: number)mop oiRUqr qI_s^ _0 formatnumber formatNumberstu to] ]0numuv\ vo[ [0max\^ rkwwxy xrz{ zc|} |oZ Z0max }mY Y TEXT {oX X0maxy~W ~L n 7 V V ctxt l U ]  lT ISR S.corecnte******** oQ Q0maxRT mPPU mOO l N b  m 00000000 oM M0numNWpL lKJKJLIIjIHGFEDCBA@?>=<;:987 H0homedirhomeDir G0tmpdirtmpDir F0sitesdirsitesDir E 0xalan D0getenvgetEnv C 0replace B0 replaceregexp replaceRegExp A0 enclosetolist encloseToList @0getpathgetPATH ?0 gethfspath getHFSPath >0 getfilename getFileName =(0getcontainerfoldergetContainerFolder < 0dialog ;0msg : 0xalan_j 9 0xalan_c 8 0upload 70 formatnumber formatNumber alisMiyuT."H+$*satomioOT=0` UsersSS$*Miyu:Users:satomisatomi Miyu Users/satomi/ r alisnMiyuT."H+%W8TemporaryItems*!& CachesSè>%W8oO$*/Miyu:Users:satomi:Library:Caches:TemporaryItemsTemporaryItems Miyu*Users/satomi/Library/Caches/TemporaryItems/ ( alis$MiyuT."H+oOSitesFϻM satomiS oO$*Miyu:Users:satomi:Sites Sites MiyuUsers/satomi/Sites/ 6u543 60getenvgetEnv5221 10envnameenvName40 00envnameenvName/. /.sysoexecTEXTTEXT . utxt3 %j &-,+* - 0replace,))('& (0str '0ptn & 0replace+%$#"! %0str $0ptn # 0replace "0tmp !0thelisttheList   utxt  ascr  txdl  citm  TEXT*9&EO&EO&EO,EO,FO-EO,FO&EO,FO 0 replaceregexp replaceRegExp 0str 0ptn  0replace 0opt  0str 0ptn  0replace 0opt 0iflagiFlag 0gflaggFlag 0res 0 leftmatch leftMatch 0 rightmatch rightMatch    rgEx  iCas .mGrpmGrpmInfTEXT  mLen  ctxt  mPos 0 replaceregexp replaceRegExpEOEO EO,jeEOEO[\[Zk\Z,k2EWX hO[\[Z,,\62EWX hO%*+ %Y%%YL 0 enclosetolist encloseToList 0arg 0argV  pcls  list,Y&d 0getpathgetPATH 0arg 0argms  psxp  alis!Y ,EY &,E 0 gethfspath getHFSPath 0arg 0arg  utxt  TEXT  psxf  alis)&EO &Y &&Y&& 0 getfilename getFileName 0arg 0arg 0filenamefileName  0 replaceregexp replaceRegExp  alis  pnam#*+Y &,EUO (0getcontainerfoldergetContainerFolder 0thefiletheFile 0thefiletheFile 0 thefolder theFolder  0 replaceregexp replaceRegExp  alis  cfol%*+Y &,&EUO 0dialog 0msg 0btn 0msg 0btn 0label%( .sysobeepnulllong  mesS  btns  dflt  as A  EAlTwarN .sysodisAaleRTEXT  errn9EYhOEYhO*j Okv O)lhC 0msg 0label 0msg 0btn 0label 0msg 0btnQT[^eh .sysobeepnulllong  mesS  btns  dflt  as A  EAlTwarN .sysodisAaleRTEXT  errnGEYhOEYhOEYhO*j Okv O)lh 0xalan_j 0xsl 0src 0out 0xsl 0src 0out 0filenamefileName 0err  bool 0 getfilename getFileName 0getpathgetPATH  strq  psxp .sysoexecTEXTTEXT  utxt 0msg &hYhO*k+EO*k+,EYhO*k+,EO*k+,EOb,%,EOb%%%%%%%%j O%j &EOa%j &EOaY*a%am+ 0xalan_c 0xsl 0src 0out 0func~ 0xsl 0src 0out 0func 0filenamefileName ~0err$'}*|{zyxwvutsrqTXp } bool |0 getfilename getFileName { pcls z scpt y0 enclosetolist encloseToList x file w XMlS v XMlO u XMlft s.ScTlxslTutxt utxt r0errq p0msgl & &hYhO*k+EO, *k+EYjvEO*/*/*/ WX*a%am+oanml o 0uploadnkkj j0argmi i0arggh h.aevtodocnullalisl j Ugrfed g0 formatnumber formatNumberfccba b0num a0maxe`_ `0num _0max^]\ ^ TEXT ] ctxt \.corecnte********d&EO%[\[Zj i \Zi2EF[\ [0 thescript theScriptaZYX Z0 xsltnamespace XSLTNamespace Y 0summary X0cuttextcutTextWjVUT W 0summaryVSSRQ R0str Q0maxbytemaxByteUPONM P0str O0maxbytemaxByte N0x M0 summarizedstr summarizedStrLKJIH L nmbr K in J.fbcssummTEXT**** I ctxt H0cuttextcutTextT;kEO, lEYhOl &EO &EYhO*l+GFED G0cuttextcutTextFCCBA B0str A0maxbytemaxByteE@?>=<;: @0str ?0maxbytemaxByte >0ret =0sum <0tmp ;0curitemcurItem :0inc 9876543210 9 ascr 8 txdl 7 citm 6 list 5 kocl 4 cobj 3.corecnte******** 2 ctxt 1.tInftInftRtnTEXT 0 t2byD%EOjvEOEOjEO,EO,FO-&EOK[l khkEO&j ,jmEYhO 6FOYEO&6F[OYO&EO,FO[\[Zl\Zj 2EG/.-, /.aevtoappnull**** kL8-++.- H*)I(ST'&% *0getenvgetEnv )0 gethfspath getHFSPath (0nikkidirnikkiDir '0xsldirxslDir& % 0xalan_c,Mb!**k+k+%EO**k+k+%EUObb%b%b%b+ ascr ޭ