Automator：乱数生成

AppleScript : 乱数生成 - GameSprit という記事を書いたので、この乱数を生成する AppleScript スクリプトを Automator のアクションとしてみました。


下図の通り、"下限値_上限値"という形式の入力値を与えると（ここでは「指定されたテキストを取得」というアクションで、テキストを与える）、その範囲内で乱数を生成します。

on run {input, parameters}
set output to my randomNum(input as string)
return output
end run

on randomNum(inp)
set org_delimi to text item delimiters of AppleScript

try
set text item delimiters of AppleScript to "_"
set s to text item 1 of inp
set e to text item 2 of inp
return random number from (s as integer) to (e as integer)

on error
return "error"
end try
set text item delimiters of AppleScript to org_delimi
end randomNum