FasdUAS 1.101.10 k l l   Blog Current Song.scpt l   by Erik Rasmuseen   l b\ http://www.erik-rasmussen.com/blog/2006/11/08/applescript-for-blogging-current-itunes-song/ l l l VP You will have to change the following line to send the information to your blog j 0baseurlbaseURL m C=http://www.yourblog.com/pathToTrackTunes/tracktunes.php?add=1 j 0tempfiletempFile m  .currentTrack l !" !l=# #O=$% $Q<&' &k3(()* )Z+, +H- -l. .I/ .coredoexboolobj /1  pTrk ,L*01 0r!23 2l4 4e5 5n67 61  pArt 71  pTrk 3o 0 this_artist189 8r"*:; :l"(< <e"(= =n"(>? >1%'  pnam ?1"%  pTrk ;o 0 this_track9@ @r+3AB Al+1C Ce+1D Dn+1EF E1.0  pAlb F1+.  pTrk Bo 0 this_album 'R .ascrerr ******** %mGGnull߀) iTunes.app@Y ^N``&)(Xؐ(hookalisL Macintosh HD:H+) iTunes.app9"mT\ Applications˨m8<)$Macintosh HD:Applications:iTunes.app iTunes.app Macintosh HDApplications/iTunes.app/"HI Hl>J JQ>KLM KkANNOP OrAHQR QbAFST SbADUV UoAB 0 this_artist VmBCW W  -  ToDE 0 this_track Ro 0unique_track_idPXY XrIZZ[ ZbIV\] \lIP^ ^cIP_` _lINa aIINb .earsffdralis afdr bmIJ  afdrcusr `mNO  ctxt ]oPU 0tempfiletempFile [o 0 target_fileYcd cr[gef eI[cg 0read_from_filegh ho\_ 0 target_file fli io 0previous_trackdj jZhklm k=hqno nchmpq plhkr rohk 0previous_track qmkl  ctxt ocmpst slmnu uomn 0unique_track_id tmno  ctxt lLtvv vmtu  boovfals mkywwxy xIyz 0 write_to_filez{| {oz{ 0unique_track_id|}~ }o{~ 0 target_file~ m~  boovfalsy r n I 0 encode_text o 0 this_artist f o 0 this_artist r n I 0 encode_text o 0 this_track f o 0 this_track r n I 0 encode_text o 0 this_album f o 0 this_album L I .sysoexecTEXTTEXT b b b b b b b b m  curl -d -G " o 0baseurlbaseURL m &t= o 0 this_track m &a= o 0 this_artist m &al= o 0 this_album m " LR .ascrerr ******** o 0err MI .sysodlogaskrTEXT o 0errI l i I 0read_from_file o 0 target_file Q> k r c l o 0 target_file m  ctxt l o 0 target_file r  l  I  .rdwropenshorfile 4  file o 0 target_file l o 0open_target_file L I 0 strip_zeros I .rdwrread******** l o 0open_target_file R~ .ascrerr ********~ k'> Q';} I*2|{ |.rdwrclosnull**** 4*.z z file o,-y y0 target_file{ Rxwv x.ascrerr ********wv}u L<> m<=t t boovfalsu lsrsr i Iqp q0 write_to_file oo o 0 this_data on n0 target_filem ol l0 append_datamp QY k: r c lk oj j0 target_filek mi i ctxt lh og g0 target_fileh r  l f I e e.rdwropenshorfile 4 d d file o c c0 target_fileba b perm m` ` boovtrueaf l_ o^ ^0open_target_file_ Z']\ = o[ [0 append_data mZ Z boovfals l #Y I#X X.rdwrseofnull**** lW oV V0open_target_fileWU T U set2  mSSTY]\   I(1R  R.rdwrwritnull****  o()Q Q 0 this_data P P refn l*+O o*+N N0open_target_fileOML M wrat m,-K K rdwreof L  I27JI J.rdwrclosnull**** l23H o23G G0open_target_fileHIF L8: m89E E boovtrueF RDCB D.ascrerr ********CB kBY QBVA IEM@? @.rdwrclosnull**** 4EI> > file oGH= =0 target_file? R<;: <.ascrerr ********;:A9 LWY  mWX8 8 boovfals9!" !l7676"#$ #l5%5 %B< remove stupid 0x00 characters from strings read from a file$&' &i() (I4*3 40 strip_zeros*+2 +o1 1 0 this_text23 )k/,,-. -r/0 /m1 1 0l20 2o/ /0 stripped_text0.34 3X,5.6 5Z'78-, 7?9: 9l;+ ;l<* <I)=( ).sysoctonshorTEXT =o' ' 0 this_char(*+ :m&& 8r#>? >b!@A @lB% Bo$ $0 stripped_text% Ao # # 0 this_char ?lC" Co! !0 stripped_text"-, . 0 this_char 6o 0 this_text4D DL-/E El-.F Fo-. 0 stripped_text'GH GlHIJ IlK K.( this sub-routine is used to encode textJLM LiNO NIP 0 encode_textPQ Qo  0 this_text OkJRRST SrUV Ul W WmX X*$abcdefghijklmnopqrstuvwxyz0123456789 VlY Yo 0standard_charactersTZ[ Zr\] \l^ ^o 0standard_characters ]l_ _o 0acceptable_characters[`a `r bc bm d d cle eo 0 encoded_textafg fX Gh i hZBjk l jF+mn mEop olq qo 0acceptable_characters po  0 this_char n>")rs rc"%tu to"#  0 this_char um#$  TEXT sc%(vw vm%&x x  wm&'  TEXT kr.3yz yl .1{ {l.1| |b.1}~ }l./ o./ 0 encoded_text ~o/0 0 this_char zl o 0 encoded_text lr6B c6@ l 6> l6> b6> l67 o67 0 encoded_text I7= 0 encode_char o89 0 this_char m>?  TEXT l o 0 encoded_text 0 this_char io 0 this_textg LHJ lHI oHI 0 encoded_textM l l 5/ this sub-routine is used to encode a character i I 0 encode_char o 0 this_char kQ r c o 0 this_char m  TEXT o 0 this_char r  l  l  I  .sysoctonshorTEXT o 0 this_char l o 0 ascii_num ASCII_num r( l & J& m 0 m 1 m 2 m 3 m 4 m 5 m 6 m 7 m 8 l  m 9 m A m B m C m D m E m" F l o 0hex_list r)7 n)5 4*5  cobj l-4 [-4 l-2 _-2 o-. 0 ascii_num ASCII_num m.1 m23 l)* o)* 0hex_list o 0x r8F n8D 49D  cobj l<C [<C l<A `<A o<= 0 ascii_num ASCII_num m=@ mAB l89 o89 0hex_list o 0y LGQ cGP lGN bGN bGL mGJ % oJK 0x oLM 0y mNO  TEXT      0baseurlbaseURL 0tempfiletempFile 0read_from_file 0 write_to_file 0 strip_zeros 0 encode_text 0 encode_char .aevtoappnull****  0read_from_file 0 target_file  0 target_file 0open_target_file  ctxt  file .rdwropenshorfile .rdwrread******** 0 strip_zeros .rdwrclosnull****?!&EO*/j EO*j k+WX */j WXhOf 0 write_to_file 0 this_data 0 target_file 0 append_data 0 this_data 0 target_file 0 append_data 0open_target_file  ctxt  file  perm .rdwropenshorfile  set2 .rdwrseofnull****  refn  wrat  rdwreof  .rdwrwritnull**** .rdwrclosnull****Z<&EO*/el EOf jl YhO Oj OeWX  */j WX hOf ) 0 strip_zeros 0 this_text 0 this_text 0 stripped_text 0 this_char1  kocl  cobj .corecnte******** .sysoctonshorTEXT0EO'[l khj j %EYh[OYO O~} 0 encode_text||{ { 0 this_text~zyxwv z 0 this_text y0standard_characters x0acceptable_characters w0 encoded_text v 0 this_char Xdutsrxqp u kocl t cobj s.corecnte******** r TEXT q bool p0 encode_char}KEOEOEO:[l kh &&& %EY*k+%&E[OYO onml o0 encode_charnkkj j 0 this_charmihgfe i 0 this_char h0 ascii_num ASCII_num g 0hex_list f0x e0ydcba d TEXT c.sysoctonshorTEXTb a cobjlR&EOj EOaaavEOaa"k/EOaa#k/EOa%%& `_^] `.aevtoappnull**** k!  H\\_^[ [0errGZYXWVUTSRQWPONMLKJIHGFE Z pTrk Y.coredoexboolobj X pArt W0 this_artist V pnam U0 this_track T pAlb S0 this_albumRQ P0unique_track_id O afdrcusr N.earsffdralis afdr M ctxt L0 target_file K0read_from_file J0previous_track I0 write_to_file H0 encode_text G.sysoexecTEXTTEXT F0err E.sysodlogaskrTEXT]:1*,j  hYhO*,,EEO*,,EEO*,,EEWX hUO%%EOj &b%E`O*_k+E`O_&&fYL*_fm+O)k+EO)k+EO)k+EOab%a%%a%%a%%a%j W X j ascr ޭ