日 - 5月 16, 2004
ゲーセンのコギャルに「興奮」、発射
元気でよろしい！
島根県警浜田署は１０日、ゲームセンターにいた女子高生にXXをかけたとして暴行容疑で同県温泉津町の無職の男（３６）を逮捕した。「興奮してやった」と容疑を認めているという。
調べでは、男は１０日午後３時４０分ごろ、浜田市のショッピングセンターで、ゲームをしていた女子高生２人のスカートにXXをかけた疑い。
２人から被害を聞いた警備員が浜田署に通報。同容疑者が同様の行為を以前にもしたことを知る署員がいたことや、似顔絵などから同容疑者が浮上。ＪＲ浜田駅付近で帰宅しようとしていた奥原容疑者を発見したという。
調べでは、男は１０日午後３時４０分ごろ、浜田市のショッピングセンターで、ゲームをしていた女子高生２人のスカートにXXをかけた疑い。
２人から被害を聞いた警備員が浜田署に通報。同容疑者が同様の行為を以前にもしたことを知る署員がいたことや、似顔絵などから同容疑者が浮上。ＪＲ浜田駅付近で帰宅しようとしていた奥原容疑者を発見したという。
Posted at 02:26 PM
日 - 4月 18, 2004
泥水かぶせた「自動車」憎く、大量のタイヤを破裂
自力救済はダメなんだよー！
英国の裁判所はこのほど、水たまりを通過した車両に泥水をかけられたことなどに激怒、駐車中の乗用車やトラックら計５４８台のタイヤ約２０００個を鋭利なネジ回しで次々と破裂させていた３７歳男性に、１年４カ月の禁固刑を言い渡した。男は自転車愛好家だった。
ロイター通信によると、自転車に乗っている最中、車両に引き倒される寸前までの体験を味わったことも自動車や運転手への憎悪を募らせる結果になっていた。１０日間にわたる犯行だった。
ロイター通信によると、自転車に乗っている最中、車両に引き倒される寸前までの体験を味わったことも自動車や運転手への憎悪を募らせる結果になっていた。１０日間にわたる犯行だった。
Posted at 09:59 AM
水 - 4月 14, 2004
ごめんなさい、のぞいてしまいました。
２０ドルって何や？
ごめんなさい、のぞいてしまいました――。そんな内容のメモと２０ドル札がこのほど、米アーカンソー州マウンテンホームに住む女性のアパートで見つかった。
現地の警察によると、メモはコンピューターで書かれたらしい。捜査中ということで内容は公表されていないが、アパートの窓から女性をのぞいたことを謝っているという。
「まあ、変な事件だね」と警察官は話している。
現地の警察によると、メモはコンピューターで書かれたらしい。捜査中ということで内容は公表されていないが、アパートの窓から女性をのぞいたことを謝っているという。
「まあ、変な事件だね」と警察官は話している。
Posted at 11:13 PM
金 - 2月 20, 2004
74歳女を売春で送検
世も末だー！
大阪府警天王寺署は20日までに、売春防止法違反の疑いで、大阪府南部に住む74歳の女を書類送検した。
調べでは、女は今年１月19日午後５時ごろ、大阪市天王寺区のＪＲ天王寺駅前の地下街で、警戒中だった40代の私服警察官に6000円で売春を誘った疑い。「以前の客と似ていたので間違えて誘った」と容疑を認めているという。
同署によると、女は2001年春ごろから同駅周辺や地下街で高齢男性を中心に声をかけ、ホテル代も含めて１回につき6000—１万円の報酬を受け取っていた。これまでに200万円ほど稼ぎ、同居する病気がちの息子の医療費や借金の返済に充てていたという。
生活保護を受けるなど困窮し、同駅近くのベンチに座っていたところを男に声を掛けられ、報酬として金を受け取ったことがきっかけになったという。「楽をしてもうけられる」と月に数回売春していた。
調べでは、女は今年１月19日午後５時ごろ、大阪市天王寺区のＪＲ天王寺駅前の地下街で、警戒中だった40代の私服警察官に6000円で売春を誘った疑い。「以前の客と似ていたので間違えて誘った」と容疑を認めているという。
同署によると、女は2001年春ごろから同駅周辺や地下街で高齢男性を中心に声をかけ、ホテル代も含めて１回につき6000—１万円の報酬を受け取っていた。これまでに200万円ほど稼ぎ、同居する病気がちの息子の医療費や借金の返済に充てていたという。
生活保護を受けるなど困窮し、同駅近くのベンチに座っていたところを男に声を掛けられ、報酬として金を受け取ったことがきっかけになったという。「楽をしてもうけられる」と月に数回売春していた。
Posted at 08:56 PM
木 - 2月 5, 2004
赤ちゃんに「Ver2.0」と命名
こどもの命名は親のエゴですから…
ミシガン州ホランド―― 当地の自営業ジョン・ブレイク・キューザックさんと妻ジェイミーさんに息子が生まれたのは１月２７日のこと。キューザックさんは念願の息子に、「ジョン・ブレイク・キューザック・2.0」と命名した。
自分のデザイン会社を営業するキューザックさんは、自称「エンジニア・オタク」。地元紙に対して、「『ジョン・ブレイク』以外にちょっと変わった名前をつけてあげたかった」と説明した。
キューザックさんによると、息子に「バージョン２」と付けるのを思いついたのは数カ月前。以来、妻の説得を懸命に続け、出産１週間前にやっとＯＫをもらったという。
妻ジェイミーさんは「子供部屋の内装は何をテーマにするかとか、ほかのことは全部私が決めたから、名前は彼に決めさせてあげようと思った」と話している。
夫妻は当然、「2.0」くんの出産報告を電子メールで家族や友人に送った。その中でキューザックさんは「バージョン２には、バージョン１の色々な機能のほかに、ジェイミーの機能も追加されています」と書いたという。
自分のデザイン会社を営業するキューザックさんは、自称「エンジニア・オタク」。地元紙に対して、「『ジョン・ブレイク』以外にちょっと変わった名前をつけてあげたかった」と説明した。
キューザックさんによると、息子に「バージョン２」と付けるのを思いついたのは数カ月前。以来、妻の説得を懸命に続け、出産１週間前にやっとＯＫをもらったという。
妻ジェイミーさんは「子供部屋の内装は何をテーマにするかとか、ほかのことは全部私が決めたから、名前は彼に決めさせてあげようと思った」と話している。
夫妻は当然、「2.0」くんの出産報告を電子メールで家族や友人に送った。その中でキューザックさんは「バージョン２には、バージョン１の色々な機能のほかに、ジェイミーの機能も追加されています」と書いたという。
Posted at 09:42 AM
土 - 1月 31, 2004
段ボール粉砕機に巻き込まれ…死亡？
オーイ！ 気づいてやれよ、若いの。
２９日午後５時ごろ、横浜市鶴見区大黒町、倉庫会社「日本埠頭（ふとう）倉庫横浜事業所」から、「段ボールを粉砕する機械で圧縮処理された紙片に、血痕が付いている」と１１０番通報があった。
鶴見署員が調べたところ、紙片の中から人の遺体の一部や、粉砕作業をしていた横浜市緑区寺山町、会社員吉川那須男さん（７６）の免許証の破片などが見つかった。同署では、吉川さんが１人で作業中、誤って機械に巻き込まれたとみて調べている。
調べによると、吉川さんはこの日、午前８時ごろから同僚の男性（２３）と２人で作業を開始。約３０分間の休憩をとった男性が午前１１時ごろに戻ると、吉川さんの姿が見えなくなっていたという。
鶴見署員が調べたところ、紙片の中から人の遺体の一部や、粉砕作業をしていた横浜市緑区寺山町、会社員吉川那須男さん（７６）の免許証の破片などが見つかった。同署では、吉川さんが１人で作業中、誤って機械に巻き込まれたとみて調べている。
調べによると、吉川さんはこの日、午前８時ごろから同僚の男性（２３）と２人で作業を開始。約３０分間の休憩をとった男性が午前１１時ごろに戻ると、吉川さんの姿が見えなくなっていたという。
Posted at 09:15 AM
金 - 1月 30, 2004
運転士がトイレに行って電車に乗り遅れ、運転打ち切り
今日の教訓「トイレは休み時間に済ませておきませう」
２８日午前６時ごろ、奈良市のＪＲ奈良駅で、同駅発新三田行き快速電車に同乗する予定の運転士が乗り遅れたため、電車は次の木津駅（京都府木津町）で運転を打ち切った。計２本が運休、約５０人に影響した。
ＪＲ西日本によると、運転士は木津—京橋駅間の運転を担当する予定だったが、「急にトイレに行きたくなり、間に合わなかった」と話しているという。
ＪＲ西日本によると、運転士は木津—京橋駅間の運転を担当する予定だったが、「急にトイレに行きたくなり、間に合わなかった」と話しているという。
Posted at 11:36 AM
木 - 1月 22, 2004
全裸で店に乱入、車盗まれ逃げられず
中途半端はいけません
米ワシントン州スポーカンで１４日未明、悪ふざけを試みた３人の若者が、帽子と靴だけというほぼ全裸の格好でレストラン「デニーズ」に乱入したが、同レストランで食事を済ませて出て行った男に車を盗まれる事件があった。
３人は、車中に自分の着ていた衣服を置き、いつでも逃げられるようにエンジンをかけたまま、レストランに入っていた。若者らは車を盗まれた後、警察が来るまで駐車場に止めてあった他の車の後ろに隠れていたという。
地元署は、「彼らは、（捕まるのを恐れて）隠れていたのではなく、（裸の自分自身を）隠したかったのだと思う」と話している。
警察は、若者が全裸だったことについては「冷やかしのつもり」だったと見て、罪には問わない方針。「いつも、市民には車のエンジンをかけっぱなしでその場を離れてはいけないと言っているのに」との苦言も呈した。
３人は、車中に自分の着ていた衣服を置き、いつでも逃げられるようにエンジンをかけたまま、レストランに入っていた。若者らは車を盗まれた後、警察が来るまで駐車場に止めてあった他の車の後ろに隠れていたという。
地元署は、「彼らは、（捕まるのを恐れて）隠れていたのではなく、（裸の自分自身を）隠したかったのだと思う」と話している。
警察は、若者が全裸だったことについては「冷やかしのつもり」だったと見て、罪には問わない方針。「いつも、市民には車のエンジンをかけっぱなしでその場を離れてはいけないと言っているのに」との苦言も呈した。
Posted at 06:16 PM
火 - 12月 23, 2003
指定したアプリを非表示にしる
choose from list
例：
tell application "Finder"
activate
set applist to application processes
set nameList to {}
repeat with obj in applist
if (file of obj as text) does not contain ":System:Library:" then ¬
set nameList to nameList & name of obj
end repeat
choose from list nameList with prompt ¬
"非表示にするアプリを選択しる" with multiple selections allowed
set ans to result
if ans = false then return
repeat with obj in ans
set visible of application process (obj as text) to false
end repeat
end tell
※複数選択もできるじょ。
tell application "Finder"
activate
set applist to application processes
set nameList to {}
repeat with obj in applist
if (file of obj as text) does not contain ":System:Library:" then ¬
set nameList to nameList & name of obj
end repeat
choose from list nameList with prompt ¬
"非表示にするアプリを選択しる" with multiple selections allowed
set ans to result
if ans = false then return
repeat with obj in ans
set visible of application process (obj as text) to false
end repeat
end tell
※複数選択もできるじょ。
Posted at 12:16 AM
月 - 12月 22, 2003
IEのキャッシュをデリる
delete file
≪なにがし≫
例：
tell application "Finder"
delete file "IE Cache.waf" of folder "MS Internet Cache" of folder ¬
"Caches" of folder "Library" of home
end tell
※そのまま実行しるだけ
tell application "Finder"
delete file "IE Cache.waf" of folder "MS Internet Cache" of folder ¬
"Caches" of folder "Library" of home
end tell
※そのまま実行しるだけ
Posted at 04:29 PM
ドロップしたテキストファイルの中身をクリップボードにコピーする。
set the clipboard
to
result
例：
on open dropitems
set obj to item 1 of dropitems
open for access obj
read obj
set the clipboard to result
close access obj
end open
※これもデスクトップに常駐させておくと何かと便利だじょ。
on open dropitems
set obj to item 1 of dropitems
open for access obj
read obj
set the clipboard to result
close access obj
end open
※これもデスクトップに常駐させておくと何かと便利だじょ。
Posted at 01:31 PM
ドロップしたファイル／フォルダのエイリアスを作る
make
alias
at
≪どこそこ≫
例：
on open dropitems
tell application "Finder"
if not (exists folder "AliasFiles" of desktop) then
make new folder at desktop
set newfolder to result
set name of newfolder to "AliasFiles"
end if
repeat with obj in dropitems
make alias at folder "AliasFiles" of desktop to obj
end repeat
open folder "AliasFiles" of desktop
end tell
end open
※もし「AliasFiles」フォルダがなければ新規に作成するじょ。
on open dropitems
tell application "Finder"
if not (exists folder "AliasFiles" of desktop) then
make new folder at desktop
set newfolder to result
set name of newfolder to "AliasFiles"
end if
repeat with obj in dropitems
make alias at folder "AliasFiles" of desktop to obj
end repeat
open folder "AliasFiles" of desktop
end tell
end open
※もし「AliasFiles」フォルダがなければ新規に作成するじょ。
Posted at 01:21 PM
日 - 12月 21, 2003
Dropletを作成しる
「アプリケーション」で保存しる
例：
on open droppedItem
tell application "Finder"
repeat with obj in droppedItem
set x to name of obj
set mdate to modification date of obj
set y to date string of mdate
set name of obj to x & return & y
end repeat
end tell
end open
作成したドロップレットにファイルなんかを落とすと
最終変更日が付け足されるじょ。
※ファイルだと属性が変更されるので実用的ではないじょ。
フォルダ向けか？
※要はスクリプトを使えば、改行した名前も付けられるってことでする。
on open droppedItem
tell application "Finder"
repeat with obj in droppedItem
set x to name of obj
set mdate to modification date of obj
set y to date string of mdate
set name of obj to x & return & y
end repeat
end tell
end open
作成したドロップレットにファイルなんかを落とすと
最終変更日が付け足されるじょ。
※ファイルだと属性が変更されるので実用的ではないじょ。
フォルダ向けか？
※要はスクリプトを使えば、改行した名前も付けられるってことでする。
Posted at 03:24 PM
土 - 12月 20, 2003
「泥棒だ」と通報した本人、大麻所持で逮捕
単なるラリパッパ
サウスオーストラリア州アデレードで、「自宅に泥棒が入った」と警察に通報した男が、通報したおかげで逆に自分が逮捕されるという騒ぎがあった。泥棒が盗もうとしていたのが、自宅栽培の大麻だったからだ。
警察の調べによると、家主の男性（２３）は自宅の２部屋で大麻草１６本を栽培していたという。盗みに入った男４人とともに、家主の男性もその場で逮捕された。
家主の男性はベッドの下に隠れながら通報電話をかけてきたという。「（家主が）何を考えていたのかさっぱりわからない。おそらく自分で作った大麻を吸いすぎていたのでは」と地元警察のスポークスマンはコメントしている。
警察の調べによると、家主の男性（２３）は自宅の２部屋で大麻草１６本を栽培していたという。盗みに入った男４人とともに、家主の男性もその場で逮捕された。
家主の男性はベッドの下に隠れながら通報電話をかけてきたという。「（家主が）何を考えていたのかさっぱりわからない。おそらく自分で作った大麻を吸いすぎていたのでは」と地元警察のスポークスマンはコメントしている。
Posted at 10:48 PM
スクリプトの基本はハンドラなのだ。
on run ー
例：
on run
display dialog "てきとうに数字を入力しる" default answer ""
set ans to result
try
set Str1 to text returned of ans
set x to calc(Str1 as text)
display dialog "1から" & Str1 & "まで足したら、" & x & ¬
"だぴょーん。" as text
end try
end run
on calc(n)
set y to 0
repeat with i from 1 to n
set y to y + i
end repeat
return y
end calc
※runハンドラの途中で、calcハンドラを呼び出しているんだじょ。
数値の扱いと計算を分けて記述しているのだ。
on run
display dialog "てきとうに数字を入力しる" default answer ""
set ans to result
try
set Str1 to text returned of ans
set x to calc(Str1 as text)
display dialog "1から" & Str1 & "まで足したら、" & x & ¬
"だぴょーん。" as text
end try
end run
on calc(n)
set y to 0
repeat with i from 1 to n
set y to y + i
end repeat
return y
end calc
※runハンドラの途中で、calcハンドラを呼び出しているんだじょ。
数値の扱いと計算を分けて記述しているのだ。
Posted at 06:25 PM
Calendar
| 日 | 月 | 火 | 水 | 木 | 金 | 土 |
Categories
Archives
XML/RSS Feed
Statistics
Total entries in this blog:
Published On: 9 12, 2004 06:36 PM
Published On: 9 12, 2004 06:36 PM