HSP - Hot Soup Processor [11]

1 名前：名前は開発中のものです。 mailto:sage [2006/03/24(金) 18:31:39 ID:jNg23CIj] 　　　　　　 (　 ,,,) 　　　　　 　 .( 　,,)　　　　　　スクリプト言語 HotSoupProcessor について 　　　　　　　 ( ,,).　　　 　 　 ゲーム製作の視点から、また〜りと語り合うスレ。 　　　　　, -──- ､ 　　　　（,;::-──-; ）-､ 　　 　 .|｀￣￣￣´;;|ヽ l　　　* 質問する前に検索してみる事 　　　　 l;　　　　:::;;;l-' /　　　* ｦﾁ、ﾈﾀなどはスレ違い 　　　 ,-ヽ───.'-､´..　　　* 歴代スレ、関連サイトは >>2-4 あたり 　　　 ヽ ──── ' 　　ONION software　（本家） 　　　www.onionsoft.net/ 20 名前：名前は開発中のものです。 mailto:sage [2006/03/29(水) 23:29:16 ID:n9UbnrpM] 奴が乗り込んできたっぽい書き込みしようと思ったが面倒になったｗ 21 名前：名前は開発中のものです。 mailto:sage [2006/03/29(水) 23:43:24 ID:+dlqW33I] >>20 何言ってんの？？ どうしてやる前からあきらめてるんですか！！！！！！！ もう少しがんばってください！！！！！ …。 22 名前：名前は開発中のものです。 mailto:sage [2006/03/29(水) 23:45:08 ID:n9UbnrpM] (；´∀｀） 23 名前：名前は開発中のものです。 [2006/03/30(木) 18:34:41 ID:NoQIIUZZ] mp3ストリーミングを保存するソフトを作ってるんだが、 送られてきたストリーミングデータをmp3に戻すにはどうすればいいんだ？ 24 名前：名前は開発中のものです。 mailto:sage [2006/03/30(木) 20:05:15 ID:62MhinYG] mp3のフォーマットを調べそのとおりに並べるだけ。 25 名前：名前は開発中のものです。 mailto:sage [2006/03/30(木) 20:25:10 ID:NoQIIUZZ] わかった。やってみる 26 名前：名前は開発中のものです。 [2006/03/30(木) 22:17:31 ID:EnYLjVFU] deleteコマンドで複数指定した場合一つでも存在してないと エラーでちゃうんですがエラーを出さなくする方法教えてください。 お願いします。 27 名前：名前は開発中のものです。 mailto:sage [2006/03/30(木) 23:08:59 ID:6gmQzrCL] >>26 HSPスクリプトエディタで"delete"と書いて、カーソルをそこにあわせたあと F1キーを押すといいと思うよ。 28 名前：名前は開発中のものです。 [2006/03/30(木) 23:29:29 ID:EnYLjVFU] Helpでは調べたのですがよくわかりませんでした。 29 名前：名前は開発中のものです。 mailto:sage [2006/03/30(木) 23:43:57 ID:yQFpnf4G] >>26 delete命令を実行する前に exist命令でファイルの有無を確認するようにしてください。 30 名前：名前は開発中のものです。 mailto:sage [2006/03/30(木) 23:54:44 ID:6gmQzrCL] >>26 deleteコマンドで複数指定ってとこが良くわからないけど これワイルドカード指定できるのか？ とりあえず、エラーの発生自体を抑制したいなら、 onerror 〜 でエラートラップでもすれば？ あんまり良くないんだけど。 31 名前：名前は開発中のものです。 [2006/03/31(金) 00:26:26 ID:ix+YnEXv] onerror *test delete "c:\\test\\est.txt" *test exist "c:\\test\\test.txt" こんな感じでおｋですか？ 32 名前：名前は開発中のものです。 [2006/03/31(金) 00:36:06 ID:ix+YnEXv] できました。ありがとうございます。 33 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 00:40:20 ID:kdG6PPEB] >>31 なんでやねん！　onerrorもexistも使いどころが全然違う。 …ちょっとなごんだが。(´ω`) そのスクリプトみたいに、消すファイルの名前がちゃんとわかってる状況なら エラートラップの必要もなくて、 fname="c:\\test\\test.txt" exist fname 　　　　　　　　　　　　　//指定ファイルがあるかどーかチェック if (strsize != -1) : delete fname　//あるんなら削除。ないなら、何もしない。 ちう流れ。　(´ω`)　…ってできたってか。 34 名前：名前は開発中のものです。 [2006/03/31(金) 01:02:18 ID:ix+YnEXv] pos 0,100:button gosub "開始",*start pos 65,100: button gosub "終了",*shut stop *start onerror *test delete "c:\\test\\1.txt" delete "c:\\test\\2.txt" delete "c:\\test\\3.txt" delete "c:\\test\\4.txt" delete "c:\\test\\1.bmp" delete "c:\\test\\2.doc" *test dialog "おそらく削除は完了しました。",0,"REMOVER" stop *shut end これで問題ありませんでした。 35 名前：名前は開発中のものです。 [2006/03/31(金) 01:03:51 ID:ix+YnEXv] この部分 delete "c:\\test\\1.txt" delete "c:\\test\\2.txt" delete "c:\\test\\3.txt" delete "c:\\test\\4.txt" delete "c:\\test\\1.bmp" delete "c:\\test\\2.doc" を外部TXTファイルからこのリストを読み込ませることできますか？ 36 名前：名前は開発中のものです。 [2006/03/31(金) 01:11:14 ID:ix+YnEXv] やっぱり>>34じゃできませんでしたorz 37 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 01:14:50 ID:kdG6PPEB] >>34 そのスクリプトだと、例えば"1.txt"がない場合、 "2.txt"以降はスルーされるんじゃないか？ >>35 外部TXTファイルから云々は notesel バッファ変数 noteload 外部ファイル名 行数 = notemax repeat 行数 noteget fname,cnt （削除処理） loop て感じで。(´ω`) おがんばり 38 名前：名前は開発中のものです。 [2006/03/31(金) 01:18:32 ID:ix+YnEXv] スルーさせないにはどうすればいいのでしょうか？ 39 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 01:29:37 ID:kdG6PPEB] >>38 エラートラップについては忘れてクレ。むしろ使うな。 話戻ってしまうけど、参考までに(´ω`) goto *main #deffunc exdelete str _EDfname exist _EDfname if (strsize !=-1): delete _EDfname return *main pos 0,100:button gosub "開始",*start ;(中略） *start exdelete "c:\\test\\1.txt" exdelete "c:\\test\\2.txt" ;（以下略） 40 名前：名前は開発中のものです。 [2006/03/31(金) 01:42:57 ID:ix+YnEXv] 改善したら見事どうさしました。 ありがとうございます。 txtから読み込みをする方はできませんでしたが 41 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 01:55:26 ID:kdG6PPEB] >>40 ヒントどころか、ほぼ答えだったんだが。　ガッツが足りないな。 「exdelete」の羅列のところを書き換え。 notesel tmpdat noteload "filelist.txt" l= notemax repeat l noteget fname,cnt exdelete fname loop んで、filelist.txtには c:\\test\\1.txt c:\\test\\2.txt （以下略） とか書いて保存。 丸写しだけで終わらず、理解できるようおがんばり。(´ω`)y-~~ 42 名前：名前は開発中のものです。 [2006/03/31(金) 08:37:23 ID:ix+YnEXv] *main notesel tmpdat noteload "filelist.txt" l= notemax repeat l でやりましたが今度は無反応になってしまいます。 どこを改善すればいいのでしょうか？ noteget fname,cnt exdelete loop こうしましたが 43 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 09:21:28 ID:kdG6PPEB] /* >>42　何をしたか良く分からんけど、exdeleteのファイル名の指定がないのはイカンね。 説明のしかたが悪かったかね… (´ω`) すまんの 34のスクリプトを、簡単な形に修正。 削除するﾌｧｲﾙの名前を１行に１つずつ記述したfilelist.txtが、別途必要ですよ。*/ ;（exdelete定義はヤメタ） pos 0,100:button gosub "開始",*start pos 65,100: button gosub "終了",*shut stop *start notesel tmpdat ;　　　　　削除ﾌｧｲﾙﾘｽﾄTXTを読み込むﾊﾞｯﾌｧを指定 noteload "filelist.txt" ; ﾊﾞｯﾌｧにﾘｽﾄTXT読み込み★ l= notemax ;　　　　　　　ﾘｽﾄTXTの行数を得る repeat l ;　　　　　　　　ﾘｽﾄTXTの行数分、repeat〜loop内の操作を繰り返し noteget fname,cnt ; 　　　・(1)ﾘｽﾄTXTの行(削除するﾌｧｲﾙの記述)を読んで、fnameに代入 exist fname ; 　　　　　　・(2)削除するﾌｧｲﾙ(fname)の有無をﾁｪｯｸ if (strsize != -1) : delete fname ;・(3)ﾌｧｲﾙが存在しなくない(＝ある)なら削除 loop ;　　　　　　　　　　上記(1)〜(3)の操作を繰り返し dialog "おそらく削除は完了しました。",0,"REMOVER" return *shut end /* ★のとこ、スクリプトと同じディレクトリという前提だったけど パスが違うとかなら、noteload "c:\\test\\filelist.txt" とかに適宜変更しておくれ。*/ 44 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 11:57:00 ID:mNS7a+zX] HSPで作成したRPG系のゲームでソース付きで公開されてるのってありますか？ 45 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 13:13:45 ID:JmQPEuV6] >>44 ttp://hspcenter.com/ 46 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 16:58:52 ID:3MCLXpRh] >>44 そろそろｳｻﾞｲよ 47 名前：名前は開発中のものです。 [2006/03/31(金) 17:56:43 ID:R9oOhD9q] TXTの読み込みを教えてもらったものですが私は>>44ではありません。 フォルダの中身ごとってHSP削除できるんですか？ 48 名前：名前は開発中のものです。 [2006/03/31(金) 18:29:24 ID:obbSzcGS] うろ覚えだがAPI使ったらできるはず。 本家の旧ベータ掲示板を検索したら出ると思う 49 名前：名前は開発中のものです。 [2006/03/31(金) 18:35:37 ID:R9oOhD9q] いろいろ探してみましたが自分の検索力では見つけることができませんでした。 50 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 18:38:12 ID:JmQPEuV6] >>49 じゃあ検索力の勉強してこい。 ここはHSPｽﾚだぜ 51 名前：名前は開発中のものです。 [2006/03/31(金) 18:44:09 ID:R9oOhD9q] google yahoo 本家のHSP3、HSP2の過去ログを検索しました。 52 名前：名前は開発中のものです。 [2006/03/31(金) 19:01:59 ID:obbSzcGS] 検索語は？ 53 名前：名前は開発中のものです。 [2006/03/31(金) 19:02:47 ID:obbSzcGS] ちょｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ 現行ログにあったぞｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗｗ 54 名前：名前は開発中のものです。 [2006/03/31(金) 19:11:16 ID:R9oOhD9q] え？ありましたか？アドレス教えていただけないでしょうか？ 55 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 19:13:09 ID:4KvmnZPf] ここで答えを待つよりもっと試行錯誤したらどうか 56 名前：名前は開発中のものです。 [2006/03/31(金) 19:18:05 ID:R9oOhD9q] 2006/3/17(Fri) 10:30:56|NO.14 以前オフィシャルのHSP3掲示板に「フォルダ削除」で書き込みした　さえです＾＾ パソコンに向かって毎日脳をフル活動させながらプログラムの勉強をしてます。（爆発しそうｗ） さて、新しいHSP3掲示板が出来たというので早速拝見しに来ました♪ 要望として少しばかり発言させていただきます＾＾ �@レス入力画面が最初どこにあるかわかりませんでした。 　スレッドの片隅にでもレス入力画面（ここ）にリンクがあったら良いと思います。 �ATakaさんもおっしゃってましたが、マスコット選択無しがあった方が良いかと思います。 　マスコットのサイズももう少し小さめで、内容文が中央、あるいはやや左より　の方が 　見やすくなるのではないでしょうか・・ �B新着一覧画面ですが、スレッドの表示よりレスの表示を少し右にずらすと、質問（スレッド）が 　見やすくなるかなぁって思いました。 　あるいは、スレッド欄をクリックすると、最新一覧が表示される（ツリー型）方法は 　どうでしょうか？・・ 　あと、たぶんスレッドよりレスの方が多くなるかと思いますが、レス記事をクリックすると 　その対象スレッドのレス記事位置にリンクされていた方が良いかと思いました。 説明不足で理解できない所があったらすみません＾＾； 今後は、こちらの方にもお世話になると思いますのでどうぞよろしくお願いしますぺこ ↑この書き込みのことですか？ 57 名前：名前は開発中のものです。 [2006/03/31(金) 19:21:24 ID:R9oOhD9q] すいません。間違えました。 #include "sysval.as"> #include "gblconst.as"> #include "kernel32.as"> #include "user32.as"> #include "shell32.as"> #include "ole32.as"> #include "exfiledir.as"> pos 200,50 button "削除する",*del button "閉じる",*owari stop *del delfolder "C:\\Program Files\\Common Files\\V2" a=statif a=0 : dialog"削除できました" if a=1 : dialog"失敗しました" stop *owari end これのことでしょうか？ フォルダ自体の削除ではなくフォルダの中身のみ削除なのですが. 58 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 19:29:14 ID:Be/MrU4p] フォルダ内のファイル検索して削除。 59 名前：名前は開発中のものです。 [2006/03/31(金) 19:34:19 ID:R9oOhD9q] >>57 でやるとエラーがでてしまいます。 60 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 19:38:56 ID:Be/MrU4p] でるよ。 61 名前：名前は開発中のものです。 [2006/03/31(金) 19:42:50 ID:R9oOhD9q] #include "sysval.as" #include "gblconst.as" #include "kernel32.as" #include "user32.as" #include "shell32.as" #include "ole32.as" #include "exfiledir.as" pos 200,50 button "削除する",*del button "閉じる",*owari stop *del delfolder "C:\\test\\test" a=stat if a=0 : dialog"削除できました" if a=1 : dialog"失敗しました" stop *owari end これで出なくなりましたが内容のみの削除の方法がわかりません。 62 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 20:10:43 ID:Be/MrU4p] ヒント：＞＞５８ 63 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 20:18:51 ID:27wjaeTy] 最大ヒント わからないことがあったら、 はてなの人力検索使えｗ 64 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 20:54:39 ID:6IGzSiKr] 　てか、HSPのヘルプで「一覧」を検索すればdirlistが出てくるわけだが。 65 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 20:58:02 ID:4KvmnZPf] フォルダごと削除してからまたフォルダ作り直せば フォルダの日付変わっちゃうけど 66 名前：名前は開発中のものです。 mailto:sage [2006/03/31(金) 23:24:33 ID:kdG6PPEB] >>47 〜 mkdir はあるけど、rmdir はないのな。 というか自作アンインストーラでも作っているのか？ HSPでのスクリプティング(その他いろいろ)に、かなり不慣れなようにお見受けするが。 自分で使うアプリならかまわないのだけど、もし公開する予定があるなら、 失礼かもしらんけど、そんなキミの実行ファイルに 不特定のファイルやフォルダの削除をされるのは、個人的に不安を禁じえない。(;´ω`) なので、削除する方法を求めるより、削除しないで済ませる方向で考えてほしいと思った。 67 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 00:47:34 ID:Y0ti8SSr] a 68 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 01:18:30 ID:D7s0sDRt] 3/32 orz 69 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 01:25:22 ID:liMA6BYm] 3/32 記念ﾊﾟﾋﾟｺ 70 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 01:48:23 ID:b1HPRQwV] おお、3/32。 71 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 08:41:53 ID:zmwpUXRN] アンデフの地上物との撃ち分けってどうやればできる？ 72 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 09:40:12 ID:VA6CArFE] a="あ\nい\" listbox list,100,a a="う\nえ" としてもlistboxの中身が更新されない…orz 73 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 10:25:10 ID:b26b9IU2] ふーん... 中身更新する命令ちゃんとあるよ。ウソじゃないよ。 74 名前：名前は開発中のものです。 mailto:objprm [2006/03/32(土) 12:08:28 ID:A5UdFXDI] >>73 　あの命令はオブジェクトIDで指定だからなぁ。何気なくオブジェクトを追加したりすると、IDが ズレて意図した動作にならなかったり。オブジェクトに名前をつけて管理できればよいのだが。 75 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 12:26:12 ID:yvj15ypb] オブジェクト作ったあと、statにオブジェクトIDがかえるんじゃないっけ？ それ使えば、管理は楽だぞ 76 名前：名前は開発中のものです。 mailto:sage [2006/03/32(土) 16:14:15 ID:Xt0aqNzz] おお、objprmか。 >>73-75ｔｈｘ 77 名前：71 mailto:sage [2006/03/32(土) 16:30:56 ID:zmwpUXRN] スマソ誤爆だ 78 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 11:40:45 ID:QH5fW2Ln] HSPの成分解析結果 : 　40%は苦労で出来ています。 　38%は着色料で出来ています。 　8%は雪の結晶で出来ています。 　7%は夢で出来ています。 　4%は祝福で出来ています。 　3%は赤い何かで出来ています。 Hot Soup Processorの成分解析結果 : 　86%は純金で出来ています。 　10%は不思議で出来ています。 　1%はアルコールで出来ています。 　1%は夢で出来ています。 　1%は世の無常さで出来ています。 　1%は毒電波で出来ています。 79 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 13:48:46 ID:80BY/ixY] これランダム生成だからつまんなくね？ 80 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 16:32:49 ID:P6XLNsWB] >>79 では、ランダムではないのを作ってみては？ 81 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 17:09:03 ID:aD646VFr] ランダムつーか、 一つの単語に対して常に一定の結果を出すはずだが… 82 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 17:38:15 ID:mdRFUjdU] ランダムじゃなかったらただの辞典じゃないか 83 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 18:51:24 ID:vFR2yPpK] hgimgのサンプルのロボデータを完全に3dAceで見る方法誰かしりませんか? 胴体の一部しかでない 84 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 19:37:32 ID:QOw+CTfP] hsp3の数学関数マニュアルに載ってねーな どんどん隠蔽ひどくなってるw 85 名前：名前は開発中のものです。 mailto:sage [2006/04/02(日) 21:03:58 ID:8/EmiGso] リファレンスのlength3の誤植も直ってないな 86 名前：名前は開発中のものです。 mailto:sage [2006/04/03(月) 01:55:12 ID:39ZKOTf0] 単にマニュアルの整備が後回しになってるだけじゃね？ 隠蔽って…する意味ないし。 87 名前：名前は開発中のものです。 [2006/04/03(月) 19:42:42 ID:jmgw6SmT] すいません、今「１２歳からはじめるHSP」で勉強しているのですが テキスト通りに打ってもエラーがでます。。 X=10 *HAJIME if X>0: X=X-1 :else :goto *OWARI mes X wait 5 goto HAJIME *OWARI mes "ループ終了" stop 私が使ってるのはHSP3.0でこの本は2.6の解説をしてます。 何が原因でしょうか？ 88 名前：名前は開発中のものです。 mailto:sage [2006/04/03(月) 19:45:04 ID:RTK1r/R4] goto HAJIME *がついてません、エラーが出た場合行数に注目 以下訂正 X=10 *HAJIME if X>0: X=X-1 :else :goto *OWARI mes X wait 5 goto *HAJIME *OWARI mes "ループ終了" stop 89 名前：名前は開発中のものです。 [2006/04/03(月) 19:48:53 ID:jmgw6SmT] >>88 できました！有難う御座います。 6行目に「*」は書いてないのですが、これは3.0と2.6の違いですかね？ 90 名前：名前は開発中のものです。 mailto:sage [2006/04/03(月) 21:21:23 ID:XKVGGd1N] 3.0も2.6もそこは同じ。 本にそう書いてあるなら恐らくは誤植か 91 名前：89 mailto:sage [2006/04/03(月) 21:41:20 ID:5ZeaF/lc] >>90 そうですか、有り難う御座いました。 頑張って勉強してみます。 92 名前：名前は開発中のものです。 mailto:sage [2006/04/03(月) 23:16:17 ID:e7vzIC+p] ちょいと質問。HSP3.0で repeat c a = peek(print_text, cnt) ←ここ 　　　・ 　　　・ 　　　・ loop この行でエラー「変数名が指定されてない」になるんだけど、何か間違ってる？ 何が違ってるのかわからんorz 93 名前：名前は開発中のものです。 mailto:sage [2006/04/03(月) 23:47:44 ID:5GuHSigl] >>92 ﾓﾚもHSP3.0は全然触ってないが… デバッグウィンドウを見る限り 変数は明確に初期化しないと4バイトしか確保されないみたいやね。 94 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 00:11:40 ID:lp8IWw8M] HSP3だと、実際にエラーが発生したスクリプトの行と、 エラーメッセージに報告されるエラー行が一致してないことがあるから、 そのへんも疑ってみそ。 その場合、報告された行より前にある命令文が原因なんだが。 95 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 00:27:57 ID:InBujAxF] >>92 変数print_textのサイズはいくつで cntは何の時にエラーになるとかぐらい書けよ なんで、想像しないと分からないような聞き方すんだよ >>93 >変数は明確に初期化しないと4バイトしか確保されないみたいやね。 読み取りの場合サイズの拡張はされないからな 96 名前：92 mailto:sage [2006/04/04(火) 00:55:42 ID:C0af3Zzg] レスマジ有難う。 >>93 これは問題なしでした（多分……）。 一応print_textはsdimで100文字分確保してます。 >>94 コレ結構辛いですよね。 早く改善して欲しい……というのはユーザーのエゴか？ あと、実際のエラー行はこの行よりも後なんだけど この行をコメントアウトすると出なくなるのでここがエラーじゃないかと思ってます。 >>95 スマソ('A`) print_textは上で書いたとおりで cntは0ではねられてしまうんです print_textには一応テストとして TEST を代入してあります 97 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 01:21:30 ID:lp8IWw8M] >>96 …となると、あと変数cの値と、 実際のエラー行までの内容が分からないとな。長すぎてもウザいが…省略しすぎ。 sdim print_text,100 print_text="test" repeat c:a=peek(print_text, cnt):loop だけだとエラーにならないから、>>92 の質問の答えとしては ここまでに提示されたスクリプトについては「間違ってない」としか言えない。 98 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 01:24:58 ID:dDnQNPP3] print_text = "TEST" c = 10 repeat c a = peek(print_text, cnt) // ←ここ mes a loop stop 異常なし。あとは周辺に全角スペースとかタイポを探してみればどうか。 99 名前：92 mailto:sage [2006/04/04(火) 10:11:50 ID:C0af3Zzg] 重ね重ねスマソ。 全部やると邪魔なので、別に作ってみた。 これでもpeekではねられてしまう。 別のファイルに --- #module #deffunc test_mes str p_text sdim a,100 c = strlen(p_text) repeat c a = peek(p_text, cnt) ←エラー行 mes a loop return #global --- を記述してメインのスクリプトでインクルード。 メインループの所で --- test_mes "TEST" --- を実行。 何か間違いがあったらよろしければご教授下さいorz >>98 その類の文字は見つかりませんですた。 100 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 10:26:04 ID:InBujAxF] >>96 >あと、実際のエラー行はこの行よりも後なんだけど >この行をコメントアウトすると出なくなるのでここがエラーじゃないかと思ってます。 なんで、エラーの原因分かってないのに勝手に削除したのを見せるんだ・・・ >cntは0ではねられてしまうんです それは、どこでcntを見たの？ 実際にエラーになる前後だけ抜き出してテストしたの？ それでもエラーになるなら そのテストしたスクリプトをコピペしてくれ 原因を削除されたの見せられても分かるはずねーべ 101 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 11:04:38 ID:dDnQNPP3] >>99 バグかは分からんが、#deffuncのstrはpeekできないのかも。とりあえず、 #module #deffunc test_mes str p_text s = p_text //【追加】 sdim a,100 c = strlen(p_text) repeat c a = peek(s, cnt) //【p_textをsに変更】 mes a loop return #global test_mes "TEST" stop これで通るはず。あとバージョン依存とかは未調査れす。 102 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 11:17:08 ID:InBujAxF] うお、テレビ見ながら書いてたら・・・ 99のを試してみたら 101の人と同じ結論に・・・ 最初から#deffuncのstrって書いとけばもっと早く・・・ 103 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 11:50:24 ID:InBujAxF] #deffuncのパラメータで確保した配列は通常と違うな ｂ="TEST" test_mes b にしてarray　p_textとした場合は a = peek(p_text, cnt) は問題なくなるけど foreach p_textってやっても要素分のループはされないで１回で抜けちゃう 仕様っぽいけど扱いにくい気が・・・ 104 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 12:08:01 ID:InBujAxF] あ、勘違いしてた #deffunc array　p_text って元が文字列型なら文字列か・・・ foreachが使えないのは正常だった って事は #deffunc ｓｔｒ の場合だと peek("TEST", cnt)な感じでintなんかと同じような事なのかな >>99 つー事で test_mes命令の中で配列に移すか test_mes命令実行の前に配列に入れて配列として受け取るか って事だ 105 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 13:24:44 ID:bynZN5DE] すいません参考書の通り *HAJIME rnd R,10 mes R wait 5 goto *HAJIME と、打ったのですがエラーになります。 どうしてでしょうか？ 106 名前：105 mailto:sage [2006/04/04(火) 13:26:46 ID:bynZN5DE] あっ、HSP3.0で 参考書は2.6を解説してます。 107 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 13:34:25 ID:dDnQNPP3] >>106 HSP3だと命令から関数に変わったのがあるから、命令とか関数ごとに[F1]キー押して確認しながらやるよろし。 ここではrndが関数なので、R = rnd(10) 108 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 13:43:07 ID:bynZN5DE] >>107 有難う御座います。 やはり2.6と3.0では、少し違ってるんですね。 気をつけます。 109 名前：92 mailto:sage [2006/04/04(火) 13:57:47 ID:C0af3Zzg] >>100-104 ご教授頂いた方法でやった所、動作しました。 質問しているのに的確に必要な情報を出せなくてすみませんでしたorz どうも有難うございました。 110 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 14:31:18 ID:bynZN5DE] 続いて申し訳ないんですが HSP3.0には、palcopyという命令はないのでしょうか？ 2.6の参考書には書いてあるのですが、F1で調べてみても 見つかりませんといわれました。。 buffer 1,,,1 picload "janken.bmp" screen 0,320,260,1 palcopy 1 gmode 2 pos 30,0 :gcopy 1,0,0,200,180 stop このように使いたいのですが、エラーになります。 111 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 14:48:36 ID:0KEBcRWI] >>110 palcopyは3.0になって消えた。代用になる関数も無いらしい。 こんなのがあったんで貼っておく ＞HSPラウンジ「HSP3でのpalcopyの代替命令は？」 ＞ttp://dream.freespace.jp/perl-bin/puma/lng/joyful.cgi?print+log4/05050005.txt ところで、3.0リファレンスにあるdefcfuncのサンプルを そのままコピーして実行してもエラーになるのは何故なんだ・・・ 112 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 14:51:35 ID:bynZN5DE] >>111 有難う御座います。 113 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 15:43:21 ID:InBujAxF] >>111 goto *start #defcfunc half int a return a/2 *start mes half(10) stop ・#defcfuncは直接実行される場所には書けない ・関数なので、half()　括弧でパラメータを渡す(配列)から値を読み出す感覚） ・使うときは#defcfunc定義より下の行で使うのが条件 114 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 15:59:59 ID:InBujAxF] ちょい修正 >・#defcfuncは直接実行される場所には書けない #module #defcfunc half int a return a/2 #global にすれば使用行前ならどこでも書ける 関数って便利に感じるけどサブルーチンに飛んでるのと同じようなものだからなぁ ほとんど#defineに乗り換えた（まだ処理速度気にするような物は作れてないが・・・） 115 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 18:24:51 ID:lp8IWw8M] >>109 公式の、旧ＨＳＰ３掲示板 のログ（とくに過去ログ3）を "#deffunc について" で検索すると、もう少し踏み込んで検証した結果がみつかる。 あわせて、"mref"命令のヘルプにも目を通して、 ユーザー命令/関数の引数を参照する時の注意点として知っておくと良いかと。 116 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 18:31:24 ID:IK5j7QUB] (,,ﾟДﾟ)∩先生質問です HSP3.0で複数のAVIファイルをパックしたいんですが パックしたファイルを再生出来ません。 作成したEXEファイルはAVIファイルも含んだ大きさになっています。 更に、AVIファイルを実行ファイルのカレントに置くと正常に再生されます。 オサルなもんでイマイチ解決策が分からないんですが これはどういう事なんでしょう？ 117 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 21:58:40 ID:MQbHZb6i] つまりＨＳＰはＡＶＩをパックできないというわけ。 midもできなかったような、、、 118 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 22:06:50 ID:5f2AODM1] 正確にいえば、パックはできるけれど直利用が× ファイルとして存在してないといけない 119 名前：116 mailto:sage [2006/04/04(火) 22:36:32 ID:IK5j7QUB] >>117 >>118 なるほど。 じゃ、AVIファイルを使用して、且つ そのAVIファイルを出来る限り隠匿したい場合はどうすれば？ 暗号化したものを読み込みバッファに対して復号かける とかになるんでしょうか？ 120 名前：名前は開発中のものです。 mailto:sage [2006/04/04(火) 22:39:13 ID:MQbHZb6i] aviを暗号化か大変そうだ・・・

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef