REVO2700 jpFileName Q} Japanese file name import |T U Osaka,Japanese U Lucida Grande U Lucida Grande,Japanese U Lucida Grande,Unicode cREVGeneral breakpointconditions breakpoints breakpointstates stackfileversion 2.7 cREVGeometryCache stackID 1007 @ } cREVGeometryCacheIDs 1182061580844 10041239366709884 10071182061707454 1006 cREVGeometrycache order *1182061580844
1182061707454
1239366709884
total 3
Field )` <
cREVGeometry Master,scaleBottomObjectSide BottomMaster,movehDistance falseMaster true Master,scaleBottomObjectRef cardMaster,scaleBottomAbsolute trueMaster,scaleBottom trueMaster,expectedRect
60,26,312,261Master,scalebottomDistance -105Master,movevDistance falseMaster,scaleRightAbsolute trueMaster,scaleRight trueMaster,scalerightDistance -73Master,scaleRightObjectRef card Master,scaleRightObjectSide RightMaster,cardRanking 2Master,scaleleftDistance Master,scaletopDistance cREVGeneral revUniqueID
1182061580844 eg,SJIS0000
0S0n\0U0U0g0OY0n[0
e0W0DiPod shuffle0o0` 00Zv00F0_0L0c0f0W0~0F0{0i0n\0U0U00S00~0g0n00Z0KSJR0n0000g0Y00g00N-0oOY0_0c0w004GB0n[0g0g Y'1,000f100ni}0O[X0g0M0~0Y0lR0kT00[0f0ep0n0000000i}0W00~0Y0 0U00ks0W0O
h
z
}
H
q0[0p000K00
u;g v0jej_0VoiceOver20g0iPod shuffle0L0B0j0_0kq0W0K0Q0~0Y00000b0Y0`0Q0g00D0~t0D0f0D0fT
0000000T
00]0W0f0000000nT
RM0X0geY0H0f0O00~0Y0i}0000000Y000~0c0_0Oe0W0Del0nv{X40g0Y0 0U00ks0W0O
+
Button ex lon mouseUp
set cursor to watch
put "choose file with prompt" "e"e&return into asScript
put "set openFile to result"&return after asScript
put "try"&return after asScript
put "read openFile" & return after asScript
put "on error"&return after asScript
put "close access openFile"&return after asScript
put "display dialog ""e&"Error is occured.""e&return after asScript
put "return"&return after asScript
put "end try"&return after asScript
--put asScript
do asScript as appleScript
if the result is "execution error" then exit to top
put the result into tSJISText
delete char 1 of tSJISText
delete char -1 of tSJISText
if tSJISText contains numtochar(13) then \
replace numtochar(13) with numtochar(10) in tSJISText
set the unicodeText fld 1 to uniencode(tSJISText,Japanese)
end mouseUp
r$ 0 #eg,0000T
S J I S00000
cREVGeometry Master,moveVObjectSide bottomMaster,movehDistance -169Master trueMaster,moveVObjectRef cardMaster,moveHObjectRef cardMaster,moveVAbsolute true
Master,moveV trueMaster,expectedRect 114,271,310,294Master,scalebottomDistance Master,movevDistance -80Master,moveHObjectSide rightMaster,scalerightDistance Master,cardRanking 2Master,scaleleftDistance Master,moveHAbsolute trueMaster,scaletopDistance
Master,moveH true cREVGeneral
scriptChecksum 3~e handlerList mouseUpscriptSelection char 588 to 587 revUniqueID
1182061707454
bookmarks scripteditorvscroll 0scripteditorselection 586 tempScript prevHandler mouseUpscript ]on mouseUp
put "choose file with prompt" "e"e&return into asScript
put "set openFile to result"&return after asScript
put "try"&return after asScript
put "read openFile" & return after asScript
put "on error"&return after asScript
put "close access openFile"&return after asScript
put "display dialog ""e&"Error is occured.""e&return after asScript
put "return"&return after asScript
put "end try"&return after asScript
do asScript as appleScript
put the result into tSJISText
set the unicodeText fld 1 to uniencode(tSJISText,Japanese)
end mouseUp
Button ex on mouseUp
put "choose file with prompt" "e"e&return into asScript
put "set openFile to result"&return after asScript
put "try"&return after asScript
put "read openFile" & return after asScript
put "on error"&return after asScript
put "close access openFile"&return after asScript
put "display dialog ""e&"Error is occured.""e&return after asScript
put "return"&return after asScript
put "end try"&return after asScript
-- put asScript
do asScript as appleScript
if the result is "execution error" then exit to top
put the result into tUTF8Text
delete char 1 of tUTF8Text
delete char -1 of tUTF8Text
set the unicodeText fld 1 to uniencode(tUTF8Text,UTF8)
end mouseUp
nD 0 #eg,0000T
U T F 800000
cREVGeometry Master,moveVObjectSide bottomMaster,movehDistance -173Master trueMaster,moveVObjectRef cardMaster,moveHObjectRef cardMaster,moveVAbsolute true
Master,moveV trueMaster,movevDistance -48Master,scalebottomDistance Master,expectedRect 114,271,310,294Master,moveHObjectSide rightMaster,scalerightDistance Master,cardRanking 2Master,scaletopDistance Master,moveHAbsolute trueMaster,scaleleftDistance
Master,moveH true cREVGeneral
scriptChecksum 3~e handlerList mouseUpscriptSelection char 588 to 587scripteditorvscroll 0
bookmarks revUniqueID
1239366709884scripteditorselection 566 prevHandler mouseUp tempScript script ]on mouseUp
put "choose file with prompt" "e"e&return into asScript
put "set openFile to result"&return after asScript
put "try"&return after asScript
put "read openFile" & return after asScript
put "on error"&return after asScript
put "close access openFile"&return after asScript
put "display dialog ""e&"Error is occured.""e&return after asScript
put "return"&return after asScript
put "end try"&return after asScript
do asScript as appleScript
put the result into tSJISText
set the unicodeText fld 1 to uniencode(tSJISText,Japanese)
end mouseUp