コピペ用文字種変更

全角キャピタライズ

---

【スクリプトエディタで開く】| クリップボードへコピー

#!/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)

---