HSPTV!メルマガアーカイブ

« 2007年06月 | メイン | 2007年08月 »

2007年07月25日

【講座】HSPよく使うフレーズ　第34回 総集編2

テレビじゃ野球が雨で中止のときとか、総集編的なものをやりますな。
このコーナーでも前回から総集編として、スクリプトを集めてみました。

すべてHSP3用で、たいていの場合コピー＆ペーストで動きます。
実際に試してみてください。

●第6回テキストファイルを読む

notesel buf
noteload "test.txt"
sdim tmp,1000
repeat notemax
noteget tmp,cnt
mes ""+cnt+":"+tmp
wait 1
loop
stop

[HSP3用 text1.hsp]

サンプル1
サンプル2
サンプル3
サンプル4

[test.txt]

●第7回　画像を回転する
screen 2,200,200
color 200,0,0
boxf
color 255,255,255
font "",50
mes "うすあじ"
mes "ソフト"
gsel 0
pos 200,200
gmode 0,200,200
repeat 629
color 255,255,255:boxf
r=0.01*cnt
grotate 2,0,0,r
redraw 1
await 1
redraw 0
loop
stop

[HSP3用 rote.hsp]

●第8回　EXEのファイル名を指定
#packopt name "sample"
#packopt xsize 200
#packopt ysize 100
mes "test"
stop

[HSP3 exetest.hsp]

●第9回 画像を変形する
dim x1,10
dim y1,10
dim x2,10
dim y2,10
x1.0=30,170,200,0
y1.0=0,0,200,200
x2.0=0,200,200,0
y2.0=0,0,200,200
screen 2,200,200
color 200,0,0:boxf
color 255,255,255
font "",40,2
mes "納豆は"
mes "ねばねば！"
mes "するぞー！"
gsel 0
gmode 200,200
gsquare 2,x1,y1,x2,y2
stop
[HSP3用 squ.hsp]

●　第10回　limit命令は便利
//limit.hsp
screen 0,640,480
cls 4
wsize=50
*top
title ""+x
x=mousex
x=limit(x,0,640-wsize)
redraw 0
color 0,0,0:boxf
color 0,255,0:boxf x,400,x+wsize,410
redraw 1
wait 1
goto *top

[HSP3用 limit.hsp]

それじゃ、いろいろ試して感想を聞かせてね！

(うすあじ)

投稿者 usuaji : 23:42

【講座】「教えて！おにたま！！」

<せんしゅう さんからのおたより>

今回ベータ版での変更での不具合なもので、ここでお聞きするのは
ご迷惑かと思いましたが、今までのものが動作しなくなってしまい、
それを吟味したサンプルを簡単に用意できないもので、失礼ながら
勉強不足な質問をさせていただきたいと思います。
ベータ版3.1b10より、sortvalが機能しなくなってしまいました。
その行にくるとシステムエラーで停止してしまいます。
実数配列となったということで、それに関わる変数を全て実数に変え、
intの変換もdoubleに変えるという作業も行ったのですが、sortvarの
行で止まってしまいます。そのほか旧バージョンから変更すべき点
などありますでしょうか？？

<こたえ>

お便りありがとうございます。
今回は、不具合についての質問ですが、他にも同じような現象で
悩んでいる人がいるかもしれませんので、取り上げてみました。
質問自体は、タイムリーなもので、今まさにHSP3.1の最終的な調整
を行なっているので、リリース版で不具合が起こってしまうと
多くの人が困る可能性もあります。

今回、質問にあったHSPDAプラグインのsortval命令ですが、これは
HSP3.1β10からDLLの定義ファイルである、「hspda.as」が変更され
ています。この、定義ファイルと実際のDLLファイルは、どちらも
バージョンを揃えておく必要があります。
「hspda.as」だけが新しかったり、逆に「hspda.dll」だけが新しい
状態であっても、正常に機能しないことがあります。

せんしゅうさんの場合も同様に、バージョンが合っていない可能性
があります。「hspda.as」ファイルは、HSPがインストールされて
いる場所の「commonフォルダ」内にあります。
ただし、これ以外にもスクリプトのソースが置かれているカレンド
フォルダに「hspda.as」ファイルがあると、そちらが優先されて
しまいます。

以上のことを確認して、もう一度試してみてください。
ちなみに、sortval命令は、整数型(int)でも実数型(double)でも
ソースすることが可能なはずです。

ここで説明した内容は、他のプラグインにも言えることなので、
バージョンが新しくなった時などは注意しておくといいですよ。

それでは、またまた。HSPに限らず、PCのコトや
プログラミング関係どんなことでもお便り待っていますね。

(おにたま)

投稿者 usuaji : 23:41

【よみもの】もーりおのつぶやき　第13回

みなさモ、こんにちモ。
舌足らずな牛、『もーりお』でフガフガ。

夏休みのせいか、親子連れが牧場に
たくさんくるモ。
ぼくのことを見るなり、わーわー泣き出すこどもに
はたはた迷惑してるモ。
ぼくはぼくなりに、草を食って毎日おだやかに
生きていきたいフガフガ。

o O（もーりおのつぶやき）
なきだすこどもに　わらう親
もうアイスもミルクもやらんモ　こらっ

意味：
泣いてるこどもをよそに　笑ってる親
そうまでしてなんでぼくの乳をしぼりたがるのか
牛はモーモー言うしかできないんだから
こっちの迷惑もちょっとは察してほしいモモ

もーりおは、つぶやくことが趣味モ。
感想を待ってるモ。

みんなもつぶやきたいことがあったら送ってほしいモ。
短歌や川柳なんかでもいいモ。
宛先は”うすあじ”( hsptv@hspcenter.com ）までだモモ～。

(ゆめゆめゆうか)

投稿者 usuaji : 23:40

HSPTV!メルマガ　第44号

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
HSPTV!メルマガ　第44号 N0.0044 2007/07/25 発行

編集長:うすあじ ( hsptv@hspcenter.com )
発行：HSPTV!(ONION software)
WEBサイト：http://hsp.tv/
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
登録解除などはこちら http://hsp.tv/play/service.html

■はじめに

こんにちは、うすあじです。

今回はニュースたっぷりですよ！

いっこめ。
ジャン!”コンテストページ公開中”
http://hsp.tv/contest2007/

正式なオープンは8/1の予定です。

いよいよコンテストの夏ですね。

にこめ！

ジャンジャン！”HSP3.1RC1版公開中”
http://www.onionsoft.net/hsp/hsp2beta.html

こちらも正式版は8/1の予定です。
RCてのは正式ちょっと前ってことだね。

さんこめ！

ジャンジャンジャン！”OpenHSP公開中”
http://www.onionsoft.net/hsp/openhsp/

ちょっと難しい話しになるけど、オープンな形で開発する
HSPというわけで、今後いろんなハードウェアでHSPが動くように
なるかもしれないね。

さらに！よんこめ！！

ジャンジャンジャンジャン！”HSPTVポーカー公開中”
HSP3.1RC1に含まれているHSPTVで楽しめる新作ソフトを配信中です。
興味のある人は、ぜひHSPTVを起動してみてください。

では、メルマガスタートです！

（うすあじ）
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■今回のインデックス

【よみもの】もーりおのつぶやき　第13回(ゆめゆめゆうか)

【講座】「教えて！おにたま！！」(おにたま)

【講座】HSPよく使うフレーズ　第34回(うすあじ)

【募集】メルマガ投稿募集中

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【よみもの】もーりおのつぶやき　第13回

みなさモ、こんにちモ。
舌足らずな牛、『もーりお』でフガフガ。

夏休みのせいか、親子連れが牧場に
たくさんくるモ。
ぼくのことを見るなり、わーわー泣き出すこどもに
はたはた迷惑してるモ。
ぼくはぼくなりに、草を食って毎日おだやかに
生きていきたいフガフガ。

o O（もーりおのつぶやき）
なきだすこどもに　わらう親
もうアイスもミルクもやらんモ　こらっ

意味：
泣いてるこどもをよそに　笑ってる親
そうまでしてなんでぼくの乳をしぼりたがるのか
牛はモーモー言うしかできないんだから
こっちの迷惑もちょっとは察してほしいモモ

もーりおは、つぶやくことが趣味モ。
感想を待ってるモ。

みんなもつぶやきたいことがあったら送ってほしいモ。
短歌や川柳なんかでもいいモ。
宛先は”うすあじ”( hsptv@hspcenter.com ）までだモモ～。

(ゆめゆめゆうか)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【講座】「教えて！おにたま！！」

<せんしゅう さんからのおたより>

今回ベータ版での変更での不具合なもので、ここでお聞きするのは
ご迷惑かと思いましたが、今までのものが動作しなくなってしまい、
それを吟味したサンプルを簡単に用意できないもので、失礼ながら
勉強不足な質問をさせていただきたいと思います。
ベータ版3.1b10より、sortvalが機能しなくなってしまいました。
その行にくるとシステムエラーで停止してしまいます。
実数配列となったということで、それに関わる変数を全て実数に変え、
intの変換もdoubleに変えるという作業も行ったのですが、sortvarの
行で止まってしまいます。そのほか旧バージョンから変更すべき点
などありますでしょうか？？

<こたえ>

お便りありがとうございます。
今回は、不具合についての質問ですが、他にも同じような現象で
悩んでいる人がいるかもしれませんので、取り上げてみました。
質問自体は、タイムリーなもので、今まさにHSP3.1の最終的な調整
を行なっているので、リリース版で不具合が起こってしまうと
多くの人が困る可能性もあります。

今回、質問にあったHSPDAプラグインのsortval命令ですが、これは
HSP3.1β10からDLLの定義ファイルである、「hspda.as」が変更され
ています。この、定義ファイルと実際のDLLファイルは、どちらも
バージョンを揃えておく必要があります。
「hspda.as」だけが新しかったり、逆に「hspda.dll」だけが新しい
状態であっても、正常に機能しないことがあります。

せんしゅうさんの場合も同様に、バージョンが合っていない可能性
があります。「hspda.as」ファイルは、HSPがインストールされて
いる場所の「commonフォルダ」内にあります。
ただし、これ以外にもスクリプトのソースが置かれているカレンド
フォルダに「hspda.as」ファイルがあると、そちらが優先されて
しまいます。

以上のことを確認して、もう一度試してみてください。
ちなみに、sortval命令は、整数型(int)でも実数型(double)でも
ソースすることが可能なはずです。

ここで説明した内容は、他のプラグインにも言えることなので、
バージョンが新しくなった時などは注意しておくといいですよ。

それでは、またまた。HSPに限らず、PCのコトや
プログラミング関係どんなことでもお便り待っていますね。

(おにたま)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【講座】HSPよく使うフレーズ　第34回 総集編2

テレビじゃ野球が雨で中止のときとか、総集編的なものをやりますな。
このコーナーでも前回から総集編として、スクリプトを集めてみました。

すべてHSP3用で、たいていの場合コピー＆ペーストで動きます。
実際に試してみてください。

●第6回テキストファイルを読む

notesel buf
noteload "test.txt"
sdim tmp,1000
repeat notemax
noteget tmp,cnt
mes ""+cnt+":"+tmp
wait 1
loop
stop

[HSP3用 text1.hsp]

サンプル1
サンプル2
サンプル3
サンプル4

[test.txt]

●第7回　画像を回転する
screen 2,200,200
color 200,0,0
boxf
color 255,255,255
font "",50
mes "うすあじ"
mes "ソフト"
gsel 0
pos 200,200
gmode 0,200,200
repeat 629
color 255,255,255:boxf
r=0.01*cnt
grotate 2,0,0,r
redraw 1
await 1
redraw 0
loop
stop

[HSP3用 rote.hsp]

●第8回　EXEのファイル名を指定
#packopt name "sample"
#packopt xsize 200
#packopt ysize 100
mes "test"
stop

[HSP3 exetest.hsp]

●第9回 画像を変形する
dim x1,10
dim y1,10
dim x2,10
dim y2,10
x1.0=30,170,200,0
y1.0=0,0,200,200
x2.0=0,200,200,0
y2.0=0,0,200,200
screen 2,200,200
color 200,0,0:boxf
color 255,255,255
font "",40,2
mes "納豆は"
mes "ねばねば！"
mes "するぞー！"
gsel 0
gmode 200,200
gsquare 2,x1,y1,x2,y2
stop
[HSP3用 squ.hsp]

●　第10回　limit命令は便利
//limit.hsp
screen 0,640,480
cls 4
wsize=50
*top
title ""+x
x=mousex
x=limit(x,0,640-wsize)
redraw 0
color 0,0,0:boxf
color 0,255,0:boxf x,400,x+wsize,410
redraw 1
wait 1
goto *top

[HSP3用 limit.hsp]

それじゃ、いろいろ試して感想を聞かせてね！

(うすあじ)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【募集】メルマガ投稿募集中

”HSPTV!メルマガ”への投稿をお待ちします。

募集するコーナーは

(1)「教えて！おにたま！！」

HSPの素朴な疑問をHSPの作者おにたま氏に聞いてみよう！
というコーナー。疑問。知りたいテクニックなどを直接聞く
チャンス。

(2)「もーりおのつぶやき」

つぶやき、短歌や川柳を受け付けてます。

メルマガに関する要望や感想、日常のお便りもお待ちしています。

全ての投稿は”うすあじ”( hsptv@hspcenter.com ）まで。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
[PR]オススメHSP3の本
・HSP3 リファレンスブック
・公認 HSPファンブック 楽しく始める／極める本
・逆引きHSP3プログラミング事典[応用編]
・逆引きHSP3プログラミング事典[基本編]
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■編集後記

ここで告知です！

★★★★★★★★★★★★★★★★

このメルマガの編集長募集！！

★★★★★★★★★★★★★★★★

編集長うすあじのパワーが落ちてきたので、
ここらで一つ編集長を換えてみようじゃないか？
という企画です。

1号が”2005/09/14 ”発行なので、そろそろ丸2年。
さすがにマンネリ化は避けられない状況です。

私こそは新しい編集長になる！！という方、
”編集長立候補”というタイトルでメールをください。
hsptv@hspcenter.com

”プロフィール”や”意気込み”が書いてあると当選確率アップですよ。

編集長の特典としては、
・メールマガジンの書き方が身に付く。
・約5000人いる読者にメッセージを届けられる。
・たまに読者プレゼントを主催すると編集長の持ちだし・・・
などの特典(？)があるよ！

7月末まで募集します。
元気のいい新編集長、まってるよ！

というわけで、次回は新編集長が決まるのか？
ミステリー的要素をはらみつつ、次回までお元気で。

(うすあじ)

■バックナンバーについて

バックナンバーの公開ページはこちら
http://www.hspcenter.com/hsptvm/

■解約方法

登録解除などはこちら
http://hsp.tv/play/service.html

■広告の掲載など

本メールマガジンの広告掲載のご相談は
”うすあじ”( hsptv@hspcenter.com ）までお願いします。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
編集長:うすあじ ( http://hspcenter.com/ )
記事の投稿、ご意見、ご希望はこちらまで hsptv@hspcenter.com

ONION software Copyright 2007(c) All rights reserved.
メルマガ本文の再配布・商利用、転載は禁止させて頂きます。
HSPのスクリプトサンプルは自由に再利用しても構いません。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

投稿者 usuaji : 23:38

2007年07月11日

【よみもの】もーりおのつぶやき　第12回

みなさモ、こんにちモ。
舌足らずな牛、『もーりお』でフガフガ。

夏休みまでもーちょっと！
みんなの予定はどーなっとるモモ？
夏休みの予定がたくさんある君はうらやましフガフガ。
今のうちに予定を考えるのが楽しみモモ～。

o O（もーりおのつぶやき）
あつい夏　もーりおの夏

意味：
今年こそ太陽が似合う牛になってみせるぜベイベ

ベイベってだれのことだモ。
言っててむなしくなるモモ。

もーりおは、つぶやくことが趣味モ。
感想を待ってるモ。
ひとりでつぶやいてると、たまに寂しいので
つっこんでくれるとかなり嬉しいモモ。

みんなもつぶやきたいことがあったら送ってほしいモ。
短歌や川柳なんかでもいいモ。
宛先は”うすあじ”( hsptv@hspcenter.com ）までだモモ～。

(ゆめゆめゆうか)

投稿者 usuaji : 01:27

【講座】「教えて！おにたま！！」

<匿名 さんからのおたより>

僕は今、ハノイノ塔の手数プログラムを組んでいます。この公式が
２のｎ乗引く１なのですが・・・・・・・・。塔の段数がｎです。
で、input命令でｎに代入させるのですが、その後の累乗の
プログラムがわかりません！！
教えてください。お願いします。

<こたえ>

お便りありがとうございます。
ハノイノ塔に限らず、累乗(xのy乗といった計算)を求めたい時が
あると思いますが、HSP3では標準の演算子には累乗がありません。
そのかわり、便利な数学関数が集められた「hspmath.as」という
モジュールが標準で用意されていますので、これを使って求める
ことができるようになっています。
これを使って、累乗を求めるサンプルは以下のようになります。

#include "hspmath.as"

a=pow(2,16) ; 2の16乗を求める
mes a ; 結果を表示
stop

「pow(x,y)」が「xのy乗」という意味になります。
通常の使用範囲内では、これで問題なく計算できるはずです。
この関数は、整数値を指定しても必ず実数を返すので注意して
ください。
「hspmath.as」には、この他にもπなどのよく使われる各種定数
をはじめ、ラジアンと度の変換や、実数の丸めや四捨五入など
便利な機能が含まれていますので、一度ソースを見てみると
いいでしょう。

それでは、またまた。HSPに限らず、PCのコトや
プログラミング関係どんなことでもお便り待っていますね。

(おにたま)

投稿者 usuaji : 01:27

【講座】HSPよく使うフレーズ　第33回 総集編1

長い連載やアニメでは、ネタが尽きて来ると総集編的なものを
やりますな。
このコーナーでも今回から総集編として、いままでの
スクリプトを集めてみました。

すべてHSP3用で、たいていの場合コピー＆ペーストで動きます。
実際に試してみてください。

[1]プレゼントの抽選を行う

;抽選スクリプト
randomize
wait 100
a=rnd (75)+1
mes a
stop

[2]複数の拡張子を指定する

dialog "jpg;*.jpeg;*.bmp;*.gif",16,"画像ファイル"
if stat=0:stop
picload refstr,0
mes refstr
stop

[3]時刻を表示する

(1)時刻表示 画面に表示

*top
redraw 0 ;描画モード0
color 255,255,255:boxf ;全画面を描画
color 0,0,0:pos 0,0 ;カラー設定、座標設定
mes "Time is "+gettime(4)+":"+gettime(5)+":"+gettime(6)
redraw 1 ;描画モード1
await 50 ;ウェイト
goto *top

(2)時刻表示 タイトルバーを使う

*top
title "Time is "+gettime(4)+":"+gettime(5)+":"+gettime(6)
await 50 ;ウェイト
goto *top

[4]ゲームっぽいキー入力

screen 0,200,400
color 0,0,0:boxf
color 0,255,0
mx=5:my=18
*top
;キー入力
getkey key_left,37 ;<-
getkey key_right,39 ;->
;座標変化
if key_left:mx-=1
if key_right:mx+=1
;座標チェック
if mx<0:mx=mxx
if mx>11:mx=mxx
mxx=mx:myy=my
;画面再描画
color 0,0,0:boxf
color 0,255,0
pos mx*16,my*16
mes "▲"
wait 10
goto *top

[5]ゲームっぽいキー入力2　弾がでる

screen 0,200,400
color 0,0,0:boxf
color 0,255,0
mx=5:my=18
*top
;キー入力
getkey key_left,37 ;<-
getkey key_right,39 ;->
getkey key_space,32 ;space
;座標変化
if key_left:mx-=1
if key_right:mx+=1
;座標チェック
if mx<0:mx=mxx
if mx>11:mx=mxx
mxx=mx:myy=my
;弾移動
if tf {
ty-=1
if ty<0:tf=0
}
;弾
if key_space and tf=0 :gosub *tamamake
;画面再描画
color 0,0,0:boxf
color 0,255,0
pos mx*16,my*16
mes "▲"
if tf:pos tx*16,ty*16:mes "｜"
wait 2
goto *top
*tamamake
tf=1:tx=mx:ty=my-1:return

(うすあじ)

投稿者 usuaji : 01:26

HSPTV!メルマガ　第43号

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
HSPTV!メルマガ　第43号 N0.0043 2007/07/11 発行

編集長:うすあじ ( hsptv@hspcenter.com )
発行：HSPTV!(ONION software)
WEBサイト：http://hsp.tv/
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
登録解除などはこちら http://hsp.tv/play/service.html

■はじめに

こんにちは、うすあじです。

そろそろHSP3.1が公開されたり、コンテストが始まったり
しそうですよ。

今年のコンテストは、どんなコンテストになるかな？
コンテストがどうなるかは参加するあなたしだいですよ！

そして”HSPよく使うフレーズ”は総集編です。

では、メルマガをどうぞ。

（うすあじ）
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■今回のインデックス

【よみもの】もーりおのつぶやき　第12回(ゆめゆめゆうか)

【講座】「教えて！おにたま！！」(おにたま)

【講座】HSPよく使うフレーズ　第33回(うすあじ)

【募集】メルマガ投稿募集中

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【よみもの】もーりおのつぶやき　第12回

みなさモ、こんにちモ。
舌足らずな牛、『もーりお』でフガフガ。

夏休みまでもーちょっと！
みんなの予定はどーなっとるモモ？
夏休みの予定がたくさんある君はうらやましフガフガ。
今のうちに予定を考えるのが楽しみモモ～。

o O（もーりおのつぶやき）
あつい夏　もーりおの夏

意味：
今年こそ太陽が似合う牛になってみせるぜベイベ

ベイベってだれのことだモ。
言っててむなしくなるモモ。

もーりおは、つぶやくことが趣味モ。
感想を待ってるモ。
ひとりでつぶやいてると、たまに寂しいので
つっこんでくれるとかなり嬉しいモモ。

みんなもつぶやきたいことがあったら送ってほしいモ。
短歌や川柳なんかでもいいモ。
宛先は”うすあじ”( hsptv@hspcenter.com ）までだモモ～。

(ゆめゆめゆうか)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【講座】「教えて！おにたま！！」

<匿名 さんからのおたより>

僕は今、ハノイノ塔の手数プログラムを組んでいます。この公式が
２のｎ乗引く１なのですが・・・・・・・・。塔の段数がｎです。
で、input命令でｎに代入させるのですが、その後の累乗の
プログラムがわかりません！！
教えてください。お願いします。

<こたえ>

お便りありがとうございます。
ハノイノ塔に限らず、累乗(xのy乗といった計算)を求めたい時が
あると思いますが、HSP3では標準の演算子には累乗がありません。
そのかわり、便利な数学関数が集められた「hspmath.as」という
モジュールが標準で用意されていますので、これを使って求める
ことができるようになっています。
これを使って、累乗を求めるサンプルは以下のようになります。

#include "hspmath.as"

a=pow(2,16) ; 2の16乗を求める
mes a ; 結果を表示
stop

「pow(x,y)」が「xのy乗」という意味になります。
通常の使用範囲内では、これで問題なく計算できるはずです。
この関数は、整数値を指定しても必ず実数を返すので注意して
ください。
「hspmath.as」には、この他にもπなどのよく使われる各種定数
をはじめ、ラジアンと度の変換や、実数の丸めや四捨五入など
便利な機能が含まれていますので、一度ソースを見てみると
いいでしょう。

それでは、またまた。HSPに限らず、PCのコトや
プログラミング関係どんなことでもお便り待っていますね。

(おにたま)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【講座】HSPよく使うフレーズ　第33回 総集編1

長い連載やアニメでは、ネタが尽きて来ると総集編的なものを
やりますな。
このコーナーでも今回から総集編として、いままでの
スクリプトを集めてみました。

すべてHSP3用で、たいていの場合コピー＆ペーストで動きます。
実際に試してみてください。

[1]プレゼントの抽選を行う

;抽選スクリプト
randomize
wait 100
a=rnd (75)+1
mes a
stop

[2]複数の拡張子を指定する

dialog "jpg;*.jpeg;*.bmp;*.gif",16,"画像ファイル"
if stat=0:stop
picload refstr,0
mes refstr
stop

[3]時刻を表示する

(1)時刻表示 画面に表示

*top
redraw 0 ;描画モード0
color 255,255,255:boxf ;全画面を描画
color 0,0,0:pos 0,0 ;カラー設定、座標設定
mes "Time is "+gettime(4)+":"+gettime(5)+":"+gettime(6)
redraw 1 ;描画モード1
await 50 ;ウェイト
goto *top

(2)時刻表示 タイトルバーを使う

*top
title "Time is "+gettime(4)+":"+gettime(5)+":"+gettime(6)
await 50 ;ウェイト
goto *top

[4]ゲームっぽいキー入力

screen 0,200,400
color 0,0,0:boxf
color 0,255,0
mx=5:my=18
*top
;キー入力
getkey key_left,37 ;<-
getkey key_right,39 ;->
;座標変化
if key_left:mx-=1
if key_right:mx+=1
;座標チェック
if mx<0:mx=mxx
if mx>11:mx=mxx
mxx=mx:myy=my
;画面再描画
color 0,0,0:boxf
color 0,255,0
pos mx*16,my*16
mes "▲"
wait 10
goto *top

[5]ゲームっぽいキー入力2　弾がでる

screen 0,200,400
color 0,0,0:boxf
color 0,255,0
mx=5:my=18
*top
;キー入力
getkey key_left,37 ;<-
getkey key_right,39 ;->
getkey key_space,32 ;space
;座標変化
if key_left:mx-=1
if key_right:mx+=1
;座標チェック
if mx<0:mx=mxx
if mx>11:mx=mxx
mxx=mx:myy=my
;弾移動
if tf {
ty-=1
if ty<0:tf=0
}
;弾
if key_space and tf=0 :gosub *tamamake
;画面再描画
color 0,0,0:boxf
color 0,255,0
pos mx*16,my*16
mes "▲"
if tf:pos tx*16,ty*16:mes "｜"
wait 2
goto *top
*tamamake
tf=1:tx=mx:ty=my-1:return

(うすあじ)
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
【募集】メルマガ投稿募集中

”HSPTV!メルマガ”への投稿をお待ちします。

募集するコーナーは

(1)「教えて！おにたま！！」

HSPの素朴な疑問をHSPの作者おにたま氏に聞いてみよう！
というコーナー。疑問。知りたいテクニックなどを直接聞く
チャンス。

(2)「もーりおのつぶやき」

つぶやき、短歌や川柳を受け付けてます。

メルマガに関する要望や感想、日常のお便りもお待ちしています。

全ての投稿は”うすあじ”( hsptv@hspcenter.com ）まで。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
[PR]オススメHSP3の本
・HSP3 リファレンスブック
・公認 HSPファンブック 楽しく始める／極める本
・逆引きHSP3プログラミング事典[応用編]
・逆引きHSP3プログラミング事典[基本編]
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
■編集後記

梅雨ですね。
そして夏ですね。

暑かったりじめじめしたり、体調が悪くなりやすい毎日なので、
注意して過ごしてくださいね。

コンテストの詳細は次回のメルマガでお知らせできると思います。

それでは、暑いけど、次回までお元気で！！

(うすあじ)

■バックナンバーについて

バックナンバーの公開ページはこちら
http://www.hspcenter.com/hsptvm/

■解約方法

登録解除などはこちら
http://hsp.tv/play/service.html

■広告の掲載など

本メールマガジンの広告掲載のご相談は
”うすあじ”( hsptv@hspcenter.com ）までお願いします。

━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
編集長:うすあじ ( http://hspcenter.com/ )
記事の投稿、ご意見、ご希望はこちらまで hsptv@hspcenter.com

ONION software Copyright 2007(c) All rights reserved.
メルマガ本文の再配布・商利用、転載は禁止させて頂きます。
HSPのスクリプトサンプルは自由に再利用しても構いません。
━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

投稿者 usuaji : 01:24