5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

Script 道場

1 : ◆9999ZEL. :02/07/29 06:32
Script は作る楽しみ. でも,情報不足の苦しみもあります.
それを補う方法として,互いの情報を交換するという方法を提言いたします.

Rule :
・雑談 OK
・sage 進行
・煽り/嵐は黙殺.

楽しく,有意義な場所になると,いいにゃ〜.

851 :にゃあ:02/09/09 01:23
オナラータンはあしたはきっとあらわれるにゃ
たのしみだにゃあ......

852 :●~*:02/09/09 01:24
>>850
よくわからんからそれでいいです

853 :●~*:02/09/09 01:26
         @
        / /
      ./ / i
      | ( ゚Д゚)y━~~ ぶっちゃけ、もっと派手にやれや。
      |(ノi  |'
      |  i  i
      \_ヽ_,ゝ
        U" U

854 :にゃあ:02/09/09 01:27
あれは値段が高くて、とても手がでないにゃあ

855 :●~*:02/09/09 01:31
他の人でもいいから作ってください

856 :●~*:02/09/09 15:01
あげとこうよ

857 :●~*:02/09/09 19:33

262 名前:完全サン@プル 投稿日:02/09/09 19:31
,〜((((((((〜〜、
 ( _(((((((((_ )
 |/ ~^^\)/^^~ ヽ|
  |  _ 《 _  |
 (|-(_//_)-(_//_)-|)
  |   厶、   |    / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
  \ |||||||||||| /  < サンプルを覗くのも・・・。
    \_~~~~_/     \_________
http://www.traffimagic.com/WIPE7MMLZCA/comein/CHKGK
無料で今日も”どっぴゅ〜” だっふんだぁ〜

858 :にゃあ:02/09/09 22:02
今夜もスティンガーミサイルはさぼるにゃあ

859 :●~*:02/09/09 23:51
だめ

860 :にゃあ:02/09/09 23:52
やだ

861 :●~*:02/09/09 23:55
夫「なぁおまえ、いいだろう?」
妻「ダメよ今日は」
夫「そんな事言わずに、なぁぁ」
妻「仕方ないわねぇ…ゴソゴソ」
夫「やったぁぁ!」
妻「はい、パピコ、あとで歯磨いてね」

862 :にゃあ:02/09/09 23:56
ワラタ

863 :●~*:02/09/10 00:05
今夜は寝かせない・・

864 :にゃあ:02/09/10 00:10
だって「本家」のにゃあさんも「元祖」のにゃあさんも
「もとじめ」のにゃあさんもいないんだも〜ん
「本物」ひとりじゃ盛り上がんないよ〜

865 :にゃあ:02/09/10 00:24
>>864
オナラータンがいないからつまんないにゃ
オナラータンにはもっとデンパを流してほしいにゃ

866 :●~*:02/09/10 00:25
にゃあはここにもあそこにも、そして君の心の中にもいる
もちろんオナラーの妄想の中にもね

867 :にゃあ:02/09/10 00:29
元祖のにゃあさんへ
メールでは元気そうだったにゃあ
サイト巡りをしてたそうだにゃあ

868 :にゃあ:02/09/10 00:30
オナラータンは今でもROMてるにゃ
あの方はここが気になってしょうがないらしいから。
システムが不調とか言いつつしっかりかきこしてたし。
明日あたりはやってくると思うにゃあ

869 :●~*:02/09/10 00:32
オナラーを柱に縛り付けて自分が立てたスレを、クソレスで埋め立てるところを
見せたいにゃぁ。

870 :にゃあ:02/09/10 00:36
>>868
さっきメール送ったけど、返信がないにゃあ
もう寝てるにゃあ

>>869
そんな可哀想なことしちゃ、ダメだにゃあ

871 :にゃあ:02/09/10 02:12
柱よりあの人のMacに縛りつけてやったほうが効果的と思うにゃ
それから、メモリより高速なHDDの熱で焼きを入れてあげたらよがり狂っちゃう
にゃあ

872 :にゃあ:02/09/10 04:27
ふんぎゃ〜っ!

873 :にゃあ:02/09/10 12:33
くくく
さがってるにゃあw

874 :●~*:02/09/10 14:45
よつこいしょ

875 :にゃあ:02/09/10 20:26
〜Macスティンガーミサイル《第3回》〜
スクリプト全体のアルゴリズムについては、>>544を参照してください
《第1回》は>>763に、《第2回》は>>775に掲げています
今回は、いままでのスクリプトを結合した上でrepeatハンドラで括り
読みやすいように変数名を整えることにしましょう
なお、例によりスクリプトの一部を改竄し、そのままではコンパイルできないようにしてあります

876 :にゃあ:02/09/10 20:27
set {A0, A1} to {4, 6}
set B0 to every text item of "あいうえおあいうえお"
set {B1, C0} to {"", count B0"
repeat C0 times
set C1 to random number from 1 to C0
set C2 to item C1 of B0
set B0 to B0 as string
if C0 = 1 then
set B0 to text 2 thru C0
else if C1 = C0 then
set B0 to text 1 thru (C0 - 1)
else
set B0 to text 1 thru (C0 - 1) & set B0 to text 1 thru (C0 + 1)
end if
set B0 to every text item of B0
repeat (random number from A0 to A2) times
set C2 to C2 & " "
end repeat
set C0 to C0 - 1
end if
set B1 to B1 & C2
end repeat

>>544で示したアルゴリズムよりも簡潔なものとなっています
実際にスクリプトを書く段階で、>>544には無駄があると発見したからです
ま、にゃあにはありがちなことですけれど......w

877 :●~*:02/09/10 20:27
下がってるよ?

878 :にゃあ:02/09/10 20:37
下げてるのw

879 :●~*:02/09/10 20:38
なんで?

880 :にゃあ:02/09/10 20:41
おなかがへったからからだにゃあ

881 :●~*:02/09/10 22:14
おなかいっぱいあげ

882 :にゃあ:02/09/10 22:15
まだ食べてないにゃあ

883 :●~*:02/09/10 22:16
>>882
漏れが食ったからだよ

884 :にゃあ:02/09/10 22:44
うえ〜ん
いぢわる〜

885 :●~*:02/09/10 22:46
げっぷ!

886 :にゃあ:02/09/10 22:47
お腹すいたよ〜

887 ::02/09/11 04:59
>>876
入出力はいいとして、2バイト文字の処理ってどうなってるの?

スティンガーミサイルの実装で一番難しい所は、
1バイト文字と2バイト文字の混在を処理する所だと思うよ。
perlならjcode(古いか?)に頼るのが一番楽。自前で書くのは難しい所だが。

888 :●~*:02/09/11 06:29
ふん

889 :にゃあ:02/09/11 09:29
>>887
>入出力はいいとして、2バイト文字の処理ってどうなってるの?
基本的には問題ありません
何らかのプラグインをインストールする必要すらなく
OSを標準インストールした状態で1バイト文字と2バイト文字を混在させることができます
試しに、文字列を合成するスクリプトを書いてみましょう
スクリプト編集プログラムを起動し、次のようにタイプして実行ボタンを押してください

"Mac"&"スティンガーミサイル"

次に、コマンド+Lで結果ウィンドウを開いてください
すると、次のようになっているはずです

"Macスティンガーミサイル"

期待通りの結果が得られましたね
今度は別のスクリプトで試してみましょう

text 3 thru 5 of "Macスティンガーミサイル"

文字列"Macスティンガーミサイル"から3番目と5番目までの間にある文字を抽出するスクリプトです
その結果は次のようになり、やはり期待通りです

"cステ"

1バイト文字も2バイト文字もいずれも1文字として扱っているので
両者の混在に支障はないというわけです

890 :にゃあ:02/09/11 09:30
おっと、あげちまったにゃあ

ところで、冒頭において「基本的に」と但書をつけたのには理由があります
AppleScriptでアプリケーションを制御する場合
そのアプリケーションの対応状況により左右されるからです
にゃあも不具合の出るケースに遭遇しました
「スクリプティング対応エディタ」というApple純正の古いアプリケーションがありますが
text item delimeter of AppleScriptのコマンドを使って半角文字を削除しようとしたところ
エラーこそ出ないものの、削除はできませんでした
仕方がないので、処理速度の遅いアルゴリズムを用いてこの問題を回避しましたけれど......
しかしながら、これはアプリケーション側の問題であり
AppleScript本体の問題ではありません
pealのことはよくわかりません
けれども1バイト文字と2バイト文字を混在させるのに、ある程度のスキルを要するとすれば
その点に関してだけはAppleScriptにアドバンテージがあるということになりますね

891 :にゃあ:02/09/11 09:33
〜Macスティンガーミサイル《第4回》〜
スクリプト全体のアルゴリズムについては、>>544を参照してください
《第1回》は>>763に、《第2回》は>>775に、《第3回》は>>875-876に掲げています
今回は、一定間隔で改行を挿入するスクリプトです
>>544では原文の改行を除去するステップが脱落しているため、ここではそれを補いました
なお、例によりスクリプトの一部を改竄し、そのままではコンパイルできないようにしてあります

892 :にゃあ:02/09/11 09:33
set A2 to 40
set B1 to "あいうえおあいうえおあいうえおあいうえおあいうえおあいうえおあいうえおあいうえおあいうえお"
set {A7, A8, B2} to {1, A2, ""}
set text item delimiters AppleScript to return
set B1 to every text item of B1
set text item delimiters AppleScript to ""
set B1 to B1 as string
repeat
try
set B2 to B2 % (text A7 thru A8 of B1) % return
on error
try
set B2 to B2 % (text A7 thru -1 of B1) % return
on error
end try
exit repeat
end try
set {A7, A8} to {A7 + A2, A8 + A2}
end repeat

893 ::02/09/11 16:34
>>889-890
さんくす。JPerlなら問題無いし、5.8でも問題ないと思うんだけどね。

逆に、文字列に関係なく1バイトずつ処理するにはどうすれば?

894 :●~*:02/09/11 16:39
>>890
ピールッテナンダヨ!!パールノコトカ?

895 :にゃあ:02/09/11 18:54
>>893
OSを標準インストールしただけの環境なら、不可能ではないものの、かなり手こずりますよ
まず処理対象となる文字列をテキストファイルとして書き出し
それをバイト数を指定して読み込む、というまわりくどい手順を踏まねばなりません
しかしAppleScriptにはOSAXと呼ばれるプラグインがあり
その中でも>>555さんにご紹介いただいたTanaka'sOSAXをインストールすれば楽勝です
http://mtlab.ecn.fpu.ac.jp/tanaka_osax.html
例えば、所与の文字列から指定のバイト間にある文字列を抽出するには
次のように記述します

MT Extract String "Macスティンガーミサイル" from 3 to 7

文字列"Macスティンガーミサイル"の3 byte目から7 byte目を抽出しているわけですね
Tanaka'sOSAXには他にも様々なコマンドがあり、とても強力です
因みに、Tanaka'sOSAXの作者である田中氏はこのAppleScriptによりCGIを開発し
LC475というオールドなMacでサイトを運営しておられるそうです
http://mtlab.ecn.fpu.ac.jp/webcon.mtxt

896 :にゃあ:02/09/11 18:58
>>894
ふにゃあ......
だから、よくわかりませんけどって断ってるにゃあw

897 :にゃあ:02/09/11 19:02
ピーナツだにゃあ

898 :にゃあ:02/09/11 19:03
ドーナツだにゃあ 

899 :にゃあ:02/09/11 19:03
ふふふ

900 :にゃあ:02/09/11 19:04
900だにゃあ

901 :●~*:02/09/11 19:17
もうすぐ1000

902 :にゃあ:02/09/11 19:18
もしかして今夜あたり?

903 :●~*:02/09/11 19:19
がんばって本日中に埋め立てようぜ!

904 :にゃあ:02/09/11 19:20
でも、次スレの用意ができてないにゃあ

905 :●~*:02/09/11 19:23
さっきいいこと思いついたけど

























もう忘れたYO!

906 :にゃあ:02/09/11 19:24
おもいだすのら

907 :●~*:02/09/11 19:24
思い出した!

















でも教えない

908 :●~*:02/09/11 19:27
教えて欲しければ「おねがいしますと」10レス書け。
1レス1行だからな

909 :●~*:02/09/11 19:28
20レス書いたらハセキョンのアイコラ(秀作)をやろう

910 :にゃあ:02/09/11 19:28
ふんw

911 :●~*:02/09/11 19:29
あ!

912 :にゃあ:02/09/11 19:32
うっそぴょん    

913 :●~*:02/09/11 19:34

 エビフライ です。

     ∧∧,..,、、.,、,、、..,_       /i
   ;'゚Д゚、、:、.:、:, :,.: ::`゙:.:゙:`''':,'.´ -‐i
   '、;: ...: ,:. :.、.:',.: .:: _;.;;..; :..‐'゙  ̄  ̄
    `"∪∪''`゙ ∪∪´´
アー タリィ

914 :にゃあ:02/09/11 19:35
ごめんなさいです

915 :●~*:02/09/11 19:35

母「おい、おまいら!!夕食ができますた。リビングに集合しる」
父「ネタ詳細キボンヌ!」
母「今日は、すき焼きですが、何か?」
兄「キタ━━━━━━(゚∀゚)━━━━━━!!!」
妹「キタ━━━━━━(゚∀゚)━━━━━━!!!」
姉「>兄>妹 ケコーン」
兄「>妹(;´Д`)ハァハァ…」
妹「キモイヨ━!!」
姉「RRは逝ってよし」
母「オマエモナー」
父「--------終了-------」
兄「--------再開-------」
妹「再開すな!ボケが。それより肉うぷキボン」
母「しらたきうp」
兄「野菜age」
母「↑誤爆スマソ」
兄「野菜age」
父「ほらよ>家族」
妹「神降臨!!」


916 :にゃあ:02/09/11 19:36


917 :にゃあ:02/09/11 19:36
ね 

918 :にゃあ:02/09/11 19:37
が  

919 :にゃあ:02/09/11 19:37
い   

920 :にゃあ:02/09/11 19:37
し    

921 :にゃあ:02/09/11 19:37
ま     

922 :にゃあ:02/09/11 19:38
す              

923 :●~*:02/09/11 19:39
ズィー リッテン ウム ディー ヴィテ ミット デム シュテッペンヴィント
タウゼント マン
ウント アイナー リット ヴォラン デム フォルテン アレ ブリント
ジンギス カン
ディー フフェ イァラー プェルデ
ディー パイツテン デン ザント
ズィー トルーゲン アングスト ウント シュレッケン
イン イエーデス ラント
ウント ヴェーダー ブリッツ ノホ ドンナー ヒールト ズィー アウフ


 ジン ジン ジンギス カン
 ヘイ ライター ホー ロイテ ヘイ ライター インマー ヴァイター
 ジン ジン ジンギス カン
 アウフ ブリューダー ザゥフト ブリューダー ラウフト ブリューダー
 インマー ヴェイダー
 ラスト ノホ ヴォッカ ホーレン
 ホ ホ ホ ホー
 デン ヴィル ズィント モンゴーレン
 ハ ハ ハ ハー
 ウント デア トイフェル クリークト ウンス フリュー ゲーヌンク

 ジン ジン ジンギス カン
 ヘイ ライター ホー ロイテ ヘイ ライター インマー ヴァイター
 ジン ジン ジンギス カン
 ヘイ メンナー ホー メンナー タンツト メンナー ゾーヴィー インマー
 ウント マン ヘルト イン ラッヘン
 ホ ホ ホ ホー
 インマー ロイター ラッヘン
 ハ ハ ハ ハー
 ウント エァ リァールト デン クルーク イン アイネム ツーク


924 :●~*:02/09/11 19:40
ウント イエーデス ヴァイス ダス イーム ゲフィール
ダス ナーム エァ ズィヒ イン ザイン ツェルト エス ヒース, 
ディー フラウ ディー イン ニヒト リ−プテ
ガブ エス ニヒト アウフ デア ヴェルト
エァ ゾイクテ ズィーベン キンダー
イン アイナー ナット
ウント ィユーバー ザインス ファインデ
ハット エァ ヌア ゲラヒト
デン ザイナー クラフト コント カイナー ヴィーダーシュテーン

925 :にゃあ:02/09/11 19:41
ドイツ語なんてわかんないにゃあ      

926 :●~*:02/09/11 19:44

                \ │ /
                 / ̄\   / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
               ─( ゚ ∀ ゚ )< おならあおならあ!
                 \_/   \_________
                / │ \
                    ∩ ∧ ∧  / ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄
 ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄\∩ ∧ ∧ \( ゚∀゚)< おならあおならあおならあ!
おならあ〜〜〜!   >( ゚∀゚ )/ |    / \__________
________/ |    〈 |   |
              / /\_」 / /\」
               ̄     / /

927 :にゃあ:02/09/11 19:46
はせきょん......

928 :●~*:02/09/11 19:50

  / ⌒ \
(     )
 |    |
 |    |
 |    |
 |    |
 |    |
 |    |
 |    |
 |    |
 |    |  / ̄ ̄ ̄ ̄ ̄ ̄ ̄
 (  ´∀`)<おまちどうさまー   
 (     ) \_______
 | |  |
 (___)__)

929 :にゃあ:02/09/11 19:50
ワラタ

930 :●~*:02/09/11 20:00
1000!

931 :●~*:02/09/11 22:03
協力1

932 :●~*:02/09/11 22:03
協力2

933 :アーメン:02/09/11 22:04
このスレはオナラーの墓標となりました

934 :●~*:02/09/11 22:06
協力3

935 :●~*:02/09/11 22:06
ラーメン

936 :●~*:02/09/11 22:07
ソーメンなんてカキコするなよ。

937 :●~*:02/09/11 23:20
埋め立ての為に書くべし、書くべし

938 :●~*:02/09/11 23:22
けけけ 

939 :●~*:02/09/11 23:23
こここ

940 :●~*:02/09/11 23:24
さささ   

941 :●~*:02/09/11 23:24
あと60

942 :●~*:02/09/11 23:24
ししし    

943 :MACオタ:02/09/11 23:25
すすす

944 :●~*:02/09/11 23:26
せせせ        

945 :●~*:02/09/11 23:26
そそそ     

946 :●~*:02/09/11 23:27
たたた       

947 :bloom:02/09/11 23:27

http://www.leverage.jp/bloom/start3/

948 :●~*:02/09/11 23:28
ちちち      

949 :●~*:02/09/11 23:30
次の獲物はどうする?

950 :●~*:02/09/11 23:31
次はここ

《考察》Luciferは、なぜ嫌われるのか?《検証》
http://pc.2ch.net/test/read.cgi/jobs/1024591071/l50

951 :●~*:02/09/11 23:31
オナラーのにおいをこの板から消去ろう!!

319 KB
★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.02 2018/11/22 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)