« [NSRegularExpressionSearch]行末に<br>(BLOG投稿用) | トップページ | PDFのページの回転を確認する »

コピペ用文字種変更

全角キャピタライズ

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidCapitalizedCase to ocidText's capitalizedString()

set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidCapitalizedCase's stringByApplyingTransform:ocidNSStringTransform |reverse|:true)
set strResponseHalfwidth to ocidResponseHalfwidth as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strResponseHalfwidth) forType:(refMe's NSPasteboardTypeString)


全角化

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidText's stringByApplyingTransform:ocidNSStringTransform |reverse|:true)
set strResponseHalfwidth to ocidResponseHalfwidth as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strResponseHalfwidth) forType:(refMe's NSPasteboardTypeString)


半角キャピタライズ

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###半角にしてから
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidText's stringByApplyingTransform:ocidNSStringTransform |reverse|:false)
###小文字にして
set ocidCapitalizedCase to ocidResponseHalfwidth's capitalizedString()
set strCapitalizedCase to ocidCapitalizedCase as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strCapitalizedCase) forType:(refMe's NSPasteboardTypeString)



半角化

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###半角にしてから
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidText's stringByApplyingTransform:ocidNSStringTransform |reverse|:false)
set strResponseHalfwidth to ocidResponseHalfwidth as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strResponseHalfwidth) forType:(refMe's NSPasteboardTypeString)


半角小文字を大文字に

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###半角にしてから
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidText's stringByApplyingTransform:ocidNSStringTransform |reverse|:false)
###小文字にして
set ocidUpperCase to ocidResponseHalfwidth's uppercaseString()
set strUpperCase to ocidUpperCase as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strUpperCase) forType:(refMe's NSPasteboardTypeString)


半角大文字を小文字に

【スクリプトエディタで開く】|

#!/usr/bin/env osascript
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
#
(*

com.cocolog-nifty.quicktimer.icefloe
*)
#
----+----1----+----2----+-----3----+----4----+----5----+----6----+----7
##自分環境がos12なので2.8にしているだけです
use AppleScript version "2.8"
use framework "Foundation"
use framework "AppKit"
use scripting additions

property refMe : a reference to current application

##########################################
###ペーストボード
##########################################
####ペーストボード宣言
set ocidPasteboard to refMe's NSPasteboard's generalPasteboard()
####中に格納されているデータタイプを取得
set ocidPastBoardTypeArray to ocidPasteboard's types
log ocidPastBoardTypeArray as list
if (ocidPastBoardTypeArray's containsObject:"public.utf8-plain-text") is true then
  set ocidPublicText to ocidPasteboard's stringForType:(refMe's NSPasteboardTypeString)
else
return "テキストを取得出来ません"
end if
##########################################
###変換処理
##########################################
###半角にしてから
set ocidText to (refMe's NSString's stringWithString:ocidPublicText)
set ocidNSStringTransform to (refMe's NSStringTransformFullwidthToHalfwidth)
set ocidResponseHalfwidth to (ocidText's stringByApplyingTransform:ocidNSStringTransform |reverse|:false)
###小文字にして
set ocidLowerCase to ocidResponseHalfwidth's lowercaseString()
set strLowerCase to ocidLowerCase as text
##########################################
###ペーストボードに戻す
##########################################
ocidPasteboard's clearContents()
ocidPasteboard's setString:(strLowerCase) forType:(refMe's NSPasteboardTypeString)



|

« [NSRegularExpressionSearch]行末に<br>(BLOG投稿用) | トップページ | PDFのページの回転を確認する »

AppleScript NSPasteboard」カテゴリの記事