>nayaらぼ掲示板過去ログ

Dish.js版ぷちゲースクリプトについて
  投稿者:naya  投稿日:2022年 2月18日(金)00時24分12秒
 
みなさんどうもこんにちは。管理人のnayaです。

いつもぷちゲースクリプトをご愛顧いただきありがとうございます。

今年になりぷちゲースクリプトの開発環境を最新版のHSP3.6に移行する
ように検討してきたのですがー、

Dish.js版ぷちゲースクリプトをHSP3.6付属のHSP3 Dish Helper
で変換すると、画面が正常に表示されない、またはセーブ機能を利用しよ
うとするとゲームが固まるなどの不具合が発生します。

画面表示の不具合には対応できたのですが、セーブ機能の問題は現状、ど
うしても解決することができませんでした。

そのような訳となりますのでぷちゲースクリプトの更新を見送ることになり
ました。最新版のぷちゲースクリプトはver1.2.2のままとなります。

もしDish.js版ぷちゲースクリプトを利用されている方がおられましたら
HSP3.5付属のHSP3Dish Helperを使用していただく様にお願いいたします。

それでは、「ぷちゲースクリプト」と「wbeep.dll」をこれからもどうぞ
よろしくお願いいたします。

2022年新年のご挨拶
  投稿者:naya  投稿日:2022年 1月 1日(土)00時58分1秒
 
みなさま新年あけましておめでとうございます。
管理人のnayaです。
本年もnayaらぼとぷちゲースクリプトをどうぞよろしくお願いいたします。

Merry Christmas!
  投稿者:naya  投稿日:2021年12月24日(金)21時07分59秒
 
メリークリスマスです~。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2021年 7月26日(月)20時10分50秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」の更新をお知らせいたします。

【更新内容】
ver1.2.2
・"readme.txt"の誤りを訂正

説明テキスト"readme.txt"に一部誤りがありましたので訂正しました。
その他の変更点はございません。

それでは、これからも「ぷちゲースクリプト」と「wbeep.dll」を
どうぞよろしくお願いいたします。

スクリプト投稿「シンプルADVサンプル用メニューボタン処理追加スクリプト」
  投稿者:naya  投稿日:2021年 4月28日(水)22時33分25秒
 
皆さんどうもこんにちは。管理人のnayaです。

前回投稿しましたぷちゲースクリプト用のADVゲームのサンプルスクリプト
でタブレット入力に対応する改造用のスクリプトを投稿します。

以下のスクリプトをstart.txt内に追加してメニューボタンを表示する場合
に@gosub *cloopの代わりに@gosub *cloop2を読みだして使用してください。

このスクリプトは自由に改造、使用していただいて構いません。


;1.以下の位置にメニューボタン画像のロードを追加します。

;ボタン画像とメッセージウィンドウ画像のロード
@pload "mbtn.png", 3


;2.*cloop処理の下あたりに以下のスクリプトを追加します。

;メッセージを表示して入力を待つ2(メニューボタン対応)
*cloop2
@int %5, stick
@int %6, mousex
@int %7, mousey
@wait 5

@draw 0

@cls 0, 0, 0

@pos 0, 0
@pput 0, 0

@ifs %1, !, "", *put_mes2
@ifs %2, !, "", *put_mes2
@ifs %3, !, "", *put_mes2
@ifs %4, !, "", *put_mes2
@goto *put_mes_skip2
*put_mes2
@pos 80, 432
@pput 2, 32
@pos 88, 440
@mes %1
@pos 88, 468
@mes %2
@pos 88, 496
@mes %3
@pos 88, 524
@mes %4
*put_mes_skip2

@pos 664, 8
@pput 3, 1

@draw 1

@if %5, =, 0, *cloop2
@int %0, =, 0
@if %5, =, 256, *menu_btn_chk
*menu_btn_chk_back
@if %5, !=, 512, *cloop2_quit
@int %0, =, 1
@goto *cloop2_quit

*cloop2_quit
@sound "se01.wav"
@wait 30
@return


;3.スクリプトの最後にこちらの処理を追加します。

;メニューボタン選択チェック
*menu_btn_chk
;メニューボタンの左上座標
@if %6, <, 664, *menu_btn_chk_skip
@if %6, >, 791, *menu_btn_chk_skip
;メニューボタンの右下座標
@if %7, <, 8, *menu_btn_chk_skip
@if %7, >, 55, *menu_btn_chk_skip
@int %5, =, 512
*menu_btn_chk_skip
@goto *menu_btn_chk_back


;↓メニューボタン画像("mbtn.png")

スクリプト投稿「シンプルADVサンプル」
  投稿者:naya  投稿日:2021年 4月28日(水)19時39分12秒
 
みなさんこんにちは~。

ぷちゲースクリプト用のADVゲームのサンプルスクリプトを投稿します。
本スクリプトは実行ファイル版とDish.js版の両方に対応しています。
最新版のぷちゲースクリプトで実行してください。

Dish.js版で実行する場合はテキストエディタでstart.txtをUTF-8Nの形式
で保存してからHSP3Dish Helper(hsp3dh.exe)でメモリサイズを64以上に
設定して変換します。

サンプルで使用する素材ファイルはこちらからDLしてください。
http://nayalabo.g1.xrea.com/file/sozai/sozai1.zip

このスクリプトは自由に改造、使用していただいて構いません。


;初期設定
@title "『シンプルADVサンプル』"
@screen 800, 600
@color 255, 255, 255
@font 2, 24, 33
@cls 0, 0, 0


;ボタン画像とメッセージウィンドウ画像のロード
@pload "btn.png", 1
@pload "mw.png", 2


*init
;変数の初期化
;%0(クリックしたボタン番号(1-3))
;%1-4(文章&ボタンのテキスト)
;%5(マウスボタン状態)
;%6(マウスのX座標)
;%7(マウスのY座標)
;%8(exe版とDish.js版の判別用)
;%10(進行度)
@int %0, =, 0
@str %1, =, ""
@str %2, =, ""
@str %3, =, ""
@str %4, =, ""
@int %5, =, 0
@int %6, =, 0
@int %7, =, 0
@int %8, ver
@str %8, mid, %8, 0, 1
@str %10, =, 0


;BGMの再生
@bgm "bgm01.ogg"


;ページ毎の処理
*page000
;表示するイベントCG
@pload "title.png", 0
;表示する文章を設定
@str %1, =, ""
@str %2, =, ""
@str %3, =, ""
@str %4, =, ""
;入力待ち処理を読み出す
@gosub *cloop

*page001
;表示するイベントCG
@pload "title.png", 0
;表示する選択肢を設定
@str %1, =, "初めから"
@str %2, =, "つづきから"
@str %3, =, "ゲームを終了する"
;選択肢待ち処理を読み出す
@gosub *sloop
;選択されたボタン毎に分岐
@if %0, =, 1, *page002
@if %0, =, 2, *data_load
@if %0, =, 3, *page005
@goto *page001

*page002
@pload "cg01.png", 0
@str %1, =, "ADVゲームのサンプルです。"
@str %2, =, "このスクリプトを改造してあなただけの"
@str %3, =, "アドベンチャーゲームを作ってみましょう!"
@str %4, =, "▼"
@gosub *cloop
;進行度の更新
@int %10, =, 1
;左クリックで次のページへ移動する
@if %0, =, 0, *page003
;右クリックでシステムメニューに移動する
@gosub *sys_menu
@goto *page002

*page003
@pload "cg02.png", 0
@str %1, =, "選択肢以外の場面で右クリックすると"
@str %2, =, "ゲーム進行度をファイルに保存する"
@str %3, =, "システムメニューが表示されます。"
@str %4, =, "▼"
@gosub *cloop
@int %10, =, 2
@if %0, =, 0, *page004
@gosub *sys_menu
@goto *page003

*page004
@pload "bgblk.png", 0
@str %1, =, "最初に戻る"
@str %2, =, "ゲームを終了する"
@str %3, =, ""
@gosub *sloop
@if %0, =, 1, *page002
@if %0, =, 2, *page005
@goto *page004

*page005
;ゲームの終了
@title "ゲームを終了しました"
@end


;セーブメニュー
*sys_menu
@pload "bgblk.png", 0
@str %1, =, "セーブする"
@str %2, =, "キャンセル"
@str %3, =, "タイトルに戻る"
@gosub *sloop
@if %0, =, 1, *data_save
@if %0, =, 2, *sys_menu_out
@if %0, =, 3, *init
@goto *sys_menu
*sys_menu_out
@return


;ゲームデータの保存
*data_save
@if %8, =, 9, *data_save_js
@vsave "save1", 10
@goto *data_save_end
*data_save_js
@save "save1", 10
*data_save_end

@pload "bgblk.png", 0
@str %1, =, "ゲームデータを保存しました"
@str %2, =, "▼"
@str %3, =, ""
@str %4, =, ""
@gosub *cloop
@goto *sys_menu_out


;ゲームデータのロード
*data_load
@if %8, =, 9, *data_load_js
@vload %10, "save1"
@goto *data_load_end
*data_load_js
@load %10, "save1"
*data_load_end

@int %0, stat
@if %0, =, -1, *not_save_data
;進行度に対応したページに移動する
@if %10, =, 0, *page000
@if %10, =, 1, *page002
@if %10, =, 2, *page003

*not_save_data
;ゲームデータが見つからない時の処理
@pload "bgblk.png", 0
@str %1, =, "ゲームデータがありません"
@str %2, =, "▼"
@str %3, =, ""
@str %4, =, ""
@gosub *cloop
@goto *page000


;メッセージを表示して入力を待つ
*cloop
@int %5, stick
@wait 5

;画面更新処理
@draw 0

@cls 0, 0, 0

;イベントCGの表示
@pos 0, 0
@pput 0, 0

;メッセージの表示
@ifs %1, !, "", *put_mes
@ifs %2, !, "", *put_mes
@ifs %3, !, "", *put_mes
@ifs %4, !, "", *put_mes
@goto *put_mes_skip
*put_mes
@pos 80, 432
@pput 2, 32
@pos 88, 440
@mes %1
@pos 88, 468
@mes %2
@pos 88, 496
@mes %3
@pos 88, 524
@mes %4
*put_mes_skip

@draw 1
;マウス左クリックで戻る
@int %0, =, 0
@if %5, =, 256, *cloop_quit
@if %5, !=, 512, *cloop
@int %0, =, 1
@goto *cloop_quit

;読み出し元に戻る
*cloop_quit
;決定音を再生する
@sound "se01.wav"
@wait 30
@return


;選択肢を表示して選択されるまで待つ
*sloop
@int %5, stick
@int %6, mousex
@int %7, mousey
@wait 10

;画面更新処理
@draw 0

@cls 0, 0, 0
@pos 0, 0
@pput 0, 0

;ボタンの表示
@ifs %2, =, "", *put_btn_skip1
@pos 176, 144
@pput 1, 16
@pos 184, 156
@mes %1
*put_btn_skip1
@ifs %2, =, "", *put_btn_skip2
@pos 176, 224
@pput 1, 16
@pos 184, 236
@mes %2
*put_btn_skip2
@ifs %3, =, "", *put_btn_skip3
@pos 176, 304
@pput 1, 16
@pos 184, 316
@mes %3
*put_btn_skip3

@draw 1
;マウス左クリックでボタン選択チェックを行う
@if %5, =, 256, *btn_chk

@goto *sloop

;読み出し元に戻る
*sloop_quit
;ボタン選択時に決定音を再生する
@if %0, =, 0, *sloop_snd_skip
@sound "se01.wav"
*sloop_snd_skip
@wait 30
@return


;ボタン選択チェック
*btn_chk
@int %0, =, 0
@ifs %1, =, "", *btn_chk_skip1
;ボタン1の左上座標
@if %6, <, 176, *btn_chk_skip1
@if %6, >, 623, *btn_chk_skip1
;ボタン1の右下座標
@if %7, <, 144, *btn_chk_skip1
@if %7, >, 191, *btn_chk_skip1
@int %0, =, 1
*btn_chk_skip1
@ifs %2, =, "", *btn_chk_skip2
;ボタン2の左上座標
@if %6, <, 176, *btn_chk_skip2
@if %6, >, 623, *btn_chk_skip2
;ボタン2の右下座標
@if %7, <, 224, *btn_chk_skip2
@if %7, >, 271, *btn_chk_skip2
@int %0, =, 2
*btn_chk_skip2
@ifs %3, =, "", *btn_chk_skip3
;ボタン3の左上座標
@if %6, <, 176, *btn_chk_skip3
@if %6, >, 623, *btn_chk_skip3
;ボタン3の右下座標
@if %7, <, 304, *btn_chk_skip3
@if %7, >, 351, *btn_chk_skip3
@int %0, =, 3
*btn_chk_skip3
@goto *sloop_quit

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2021年 4月28日(水)19時35分3秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」の更新をお知らせします。

【更新内容】
ver1.2.1
・@vload命令の不具合を修正

@vload命令でファイル名を直接指定した場合にロードが失敗する
不具合を修正しました。


それでは、これからも引き続き「ぷちゲースクリプト」と「wbeep.dll」を
どうぞよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2021年 2月24日(水)20時00分55秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」更新のお知らせです。

【更新内容】
ver1.2.0
・画像表示関連の命令を修正&画像の半透明表示に対応
・実行ファイルのアイコン画像を変更

画像処理関連の命令(@pic、@pload、@pput、@cload、@cput等)
の内部処理をDish.js版ぷちゲースクリプトに合わせて最適化する
と共に@pput、@cput命令での画像の半透明表示に対応しました。

それでは、これからも「ぷちゲースクリプト」と「wbeep.dll」を
どうぞよろしくお願いいたします~。

2021年新年のご挨拶
  投稿者:naya  投稿日:2021年 1月 4日(月)01時27分52秒
 
みなさま新年あけましておめでとうございます。
本年もnayaらぼをどうぞよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2020年 9月 2日(水)17時45分4秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.9
・@vsave、@vload命令の追加

Dish.js版ぷちゲースクリプトと同じ形式で指定した番号の変数だけを
保存&読み込みする@vsave、@vload命令を追加しました。

※最新版のDish.js版ぷちゲースクリプトでは@saveと@vsave、@loadと@vloadは
同じ命令として処理されます。

それでは、これからも「wbeep.dll」と「ぷちゲースクリプト」をよろしく
お願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2020年 8月28日(金)00時38分16秒
 
どうもみなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.8
・@bgm命令にてOGG形式の再生に対応
・@int命令に演算子(pad)を追加

@bgm命令にてOGG形式の再生に対応しました。
@int命令に演算子pad(ジョイスティック状態の取得)を追加しました。

それでは、これからも引き続き「wbeep.dll」と「ぷちゲースクリプト」をどうぞ
よろしくお願いいたします♪。

2020年新年のご挨拶
  投稿者:naya  投稿日:2020年 1月 1日(水)18時24分19秒
 
みなさま新年あけましておめでとうございます。
管理人のnayaです。
本年もマイペースに活動していきますのでnayaらぼをどうぞよろしくお願いいたします。

スクリプト投稿「MML再生スクリプト[米津玄師 Lemon]」
  投稿者:naya  投稿日:2019年10月26日(土)18時21分32秒
 
皆さんどうもこんにちは。管理人のnayaです。
今回は、米津玄師さんの楽曲「Lemon」のMML再生スクリプトを投稿します。
以下のスクリプトを「start.txt」にコピペしてから最新版のぷちゲースクリプト
で実行してください。
このスクリプトは原曲に著作権がありますので再生して楽しむだけにしてください。
権利上の問題が報告された場合は直ちにこの投稿を削除させていただきます。


@screen 512, 384
@color 255, 96, 96
@font 2, 16, 0

@int %0, =, 0
@str %1, =, "#♪#♪米津玄師「Lemon」#♪#♪"
@str %2, =, "♪#♪#米津玄師「Lemon」♪#♪#"
@str %3, =, "MML作成:naya"
@str %4, =, "作成日:2019/10/25"

@wbeep 8, 2, 10

@setmml "T75L64R4["
@addmml "O5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3R"
@addmml "O5RO3RO3RO5RO3RO3RO5BO3RO3RO6C+O3RO3RO6D+O4D+O3BO6D+O4D+O3BO5BO4D+O3BO5G+O4D+O3BO5G+O4D+O3BO5G+O4D+O3BO6C+O4D+O3BO6C+O4D+O3BO5A+O4C+O3A+O5A+O4C+O3A+O5F+O4C+O3A+O5D+O4C+O3A+"
@addmml "O5D+O4C+O3A+O5D+O4C+O3A+O5A+O4C+O3A+O5A+O4C+O3A+O5G+O3G+O3EO5G+O3G+O3EO5F+O3G+O3EO4BO3G+O3EO4BO3G+O3EO4BO3G+O3EO5F+O3G+O3EO5F+O3G+O3EO5D+O3F+O3D+O5D+O3F+O3D+O5D+O3F+O3D+O5D+O3F+O3D+"
@addmml "O5D+O3F+O3D+O5D+O3F+O3D+O5C+O3F+O3D+O5D+O3F+O3D+O5EO3BO3G+O5EO3BO3G+O5EO3BO3G+O5EO3BO3G+O5BO3BO3G+O5BO3BO3G+O5A+O3BO3G+O5BO3BO3G+O5F+O3F+O3D+O5F+O3F+O3D+O5F+O3F+O3D+O5F+O3F+O3D+"
@addmml "O5EO3F+O3D+O5EO3F+O3D+O5D+O3F+O3D+O5EO3F+O3D+O5FO3G+O3FO5FO3G+O3FO5FO3G+O3FO5FO3G+O3FO5BO3G+O3FO5BO3G+O3FO5A+O3G+O3FO5G+O3G+O3FO5GO3A+O3GO5GO3A+O3GO5GO3A+O3GO5GO3A+O3G"
@addmml "O5GO2DO3RO5GO2DO3RO5BO2DO3RO6C+O2DO3RO6D+O2G+O3RO6D+O2G+O3RO5BO2G+O3RO5G+O2G+O3RO5G+O4D+O3BO5G+O4D+O3BO6C+O4D+O3BO6C+O4D+O3BO5A+O2F+O3RO5A+O2F+O3RO5F+O2F+O3RO5D+O2F+O3R"
@addmml "O5D+O4C+O3A+O5D+O4C+O3A+O5A+O4C+O3A+O5A+O4C+O3A+O5G+O2EO3RO5G+O2EO3RO5F+O2EO3RO4BO2EO3RO4BO3G+O3EO4BO3G+O3EO5F+O3G+O3EO5F+O3G+O3EO5D+O1BO3RO5D+O1BO3RO5D+O1BO3RO5D+O1BO3R"
@addmml "O5D+O3F+O3DO5D+O3F+O3DO5C+O3F+O3DO5D+O3F+O3DO5EO2EO3RO5EO2EO3RO5EO2EO3RO5EO2EO3RO5D+O3BO3G+O5D+O3BO3G+O5EO3BO3G+O5F+O3BO3G+O5D+O1BO3RO5D+O1BO3RO5F+O1BO3RO5F+O1BO3R"
@addmml "O5BO3F+O3D+O5BO3F+O3D+O6D+O3F+O3D+O6D+O3F+O3D+O6C+O2F+O3RO6C+O2F+O3RO6C+O2F+O3RO6C+O2F+O3RO6C+O4C+O3A+O5BO4C+O3A+O5BO4C+O3A+O5BO4C+O3A+O5BO2BO3RO5BO2BO3RO5BO3F+O3RO5BO3F+O3R"
@addmml "O5RO4D+O3BO5RO4D+O3BO5BO3F+O3RO6C+O3F+O3RO6D+O2G+O3RO6D+O2G+O3RO5BO3D+O3RO5G+O3D+O3RO5G+O3G+O3RO5G+O3G+O3RO6C+O3D+O3RO6C+O3D+O3RO5A+O2F+O3RO5A+O2F+O3RO5F+O3C+O3RO5D+O3C+O3R"
@addmml "O5D+O3F+O3RO5D+O3F+O3RO5A+O3C+O3RO5A+O3C+O3RO5G+O2EO3RO5G+O2EO3RO5F+O2BO3RO4BO2BO3RO4BO3EO3RO4BO3EO3RO5F+O2BO3RO5F+O2BO3RO5D+O1BO3RO5D+O1BO3RO5D+O2F+O3RO5D+O2F+O3R"
@addmml "O5D+O2BO3RO5D+O2BO3RO5C+O2F+O3RO5D+O2F+O3RO5EO2EO3RO5EO2EO3RO5EO2BO3RO5EO2BO3RO5BO3EO3RO5BO3EO3RO5A+O2BO3RO5BO2BO3RO5F+O1BO3RO5F+O1BO3RO5F+O2F+O3RO5F+O2F+O3R"
@addmml "O5EO2BO3RO5EO2BO3RO5D+O2F+O3RO5EO2F+O3RO5FO2DO3RO5FO2DO3RO5FO2FO3RO5FO2FO3RO5BO3C+O3RO5BO3C+O3RO5A+O2G+O3RO5G+O2G+O3RO5F+O2D+O3RO5F+O2D+O3RO5F+O2A+O3RO5F+O2A+O3R"
@addmml "O5F+O3D+O3RO5F+O3D+O3RO5BO2A+O3RO6C+O2A+O3RO6D+O2G+O3RO6D+O2G+O3RO5BO3D+O3RO5G+O3D+O3RO5G+O3G+O3RO5G+O3G+O3RO6C+O3D+O3RO6C+O3D+O3RO5A+O2F+O3RO5A+O2F+O3RO5F+O3C+O3RO5D+O3C+O3R"
@addmml "O5D+O3F+O3RO5D+O3F+O3RO5A+O3C+O3RO5A+O3C+O3RO5G+O2EO3RO5G+O2EO3RO5F+O2BO3RO4BO2BO3RO4BO3EO3RO4BO3EO3RO5F+O2BO3RO5F+O2BO3RO5D+O1BO3RO5D+O1BO3RO5D+O2F+O3RO5D+O2F+O3R"
@addmml "O5D+O2BO3RO5D+O2BO3RO5C+O2F+O3RO5D+O2F+O3RO5EO2EO3RO5EO2EO3RO5EO2BO3RO5EO2BO3RO5F+O3EO3RO5F+O3EO3RO5EO2BO3RO5F+O2BO3RO5D+O1BO3RO5D+O1BO3RO5F+O2F+O3RO5F+O2F+O3R"
@addmml "O5BO2BO3RO5BO2BO3RO6D+O2F+O3RO6D+O2F+O3RO6C+O2D+O3RO6C+O2D+O3RO6C+O2A+O3RO6C+O2A+O3RO6C+O3D+O3RO5BO3D+O3RO5BO2A+O3RO5BO2A+O3RO5BO2G+O3RO5BO2G+O3RO5BO3D+O3RO5BO3D+O3R"
@addmml "O5BO3G+O3RO5BO3G+O3RO5BO3BO3RO5BO3BO3RO5G+O3BO3G+O5G+O3BO3G+O5G+O3BO3G+O5A+O3BO3G+O5BO3BO3G+O5BO3BO3G+O5A+O3BO3G+O5G+O3BO3G+O5F+O3D+O2BO5F+O3D+O2BO6D+O3D+O2BO6D+O3D+O2B"
@addmml "O6D+O3D+O2BO6D+O3D+O2BO6D+O3D+O2BO6D+O3D+O2BO6C+O3C+O2A+O6C+O3C+O2A+O6C+O3C+O2A+O6D+O3C+O2A+O6EO3C+O2A+O6EO3C+O2A+O6D+O3C+O2A+O6C+O3C+O2A+O5BO3F+O3D+O5BO3F+O3D+O6C+O3F+O3D+O6C+O3F+O3D+"
@addmml "O5F+O3F+O3D+O5F+O3F+O3D+O5F+O3F+O3D+O5F+O3F+O3D+O5EO3BO3G+O5EO3BO3G+O5EO3BO3G+O5F+O3BO3G+O5GO3BO3G+O5GO3BO3G+O5F+O3BO3G+O5EO3BO3G+O5D+O3D+O3CO5D+O3D+O3CO5BO3D+O3CO5BO3D+O3C"
@addmml "O5BO3D+O3CO5BO3D+O3CO5BO3D+O3CO5BO3D+O3CO5A+O2BO2G+O5A+O2BO2G+O5A+O2BO2G+O5A+O2BO2G+O5G+O3C+O2A+O5G+O3C+O2A+O5A+O3C+O2A+O5A+O3C+O2A+O5BO3F+O3D+O5BO3F+O3D+O5BO3F+O3D+O5BO3F+O3D+"
@addmml "O6C+O1BO3RO6D+O1BO3RO6C+O1BO3RO5BO1BO3RO5G+O2EO3RO5BO2EO3RO5BO2EO3RO5BO2EO3RO6D+O3BO3G+O6F+O3BO3G+O6F+O2EO3RO6F+O2EO3RO6C+O1BO3RO5BO1BO3RO5BO1BO3RO5BO1BO3R"
@addmml "O6C+O2F+O3D+O6D+O2F+O3D+O6C+O1BO3RO5BO1BO3RO5G+O2F+O3RO5BO2F+O3RO5BO2F+O3RO5BO2F+O3RO6D+O3C+O3A+O6F+O3C+O3A+O6F+O2F+O3RO6F+O2F+O3RO6C+O2G+O3RO5BO2G+O3RO5BO2G+O3RO5BO2G+O3R"
@addmml "O6C+O4D+O3BO6D+O4D+O3BO6C+O2G+O3RO5BO2G+O3RO5G+O2EO3RO5BO2EO3RO5BO2EO3RO5BO2EO3RO6D+O3BO3G+O6F+O3BO3G+O6F+O2EO3RO6F+O2EO3RO6G+O1BO3RO6F+O1BO3RO6F+O1BO3RO6F+O1BO3R"
@addmml "O6F+O3F+O3D+O6BO3F+O3D+O6BO1BO3RO6BO1BO3RO6A+O2F+O3RO6F+O2F+O3RO6F+O2F+O3RO6D+O2F+O3RO6D+O4C+O3A+O6F+O4C+O3A+O6F+O2F+O3RO6C+O2F+O3RO6C+O2G+O3RO5BO2G+O3RO5BO2G+O3RO5BO2G+O3R"
@addmml "O6C+O4D+O3BO6D+O4D+O3BO6C+O2G+O3RO5BO2G+O3RO5G+O2EO3RO5BO2EO3RO5BO2EO3RO5BO2EO3RO6D+O3BO3G+O6F+O3BO3G+O6F+O2EO3RO6F+O2EO3RO6C+O1BO3RO5BO1BO3RO5BO1BO3RO5BO1BO3R"
@addmml "O5BO2F+O3D+O5BO2F+O3D+O6C+O1BO3RO6D+O1BO3RO6EO1A+O3RO6EO1A+O3RO6D+O1A+O3RO6D+O1A+O3RO6C+O3GO3D+O5A+O3GO3D+O5A+O1A+O3RO5A+O1A+O3RO5BO1G+O3RO5BO1G+O3RO5BO1G+O3RO5BO1G+O3R"
@addmml "O5BO3D+O2BO5BO3D+O2BO5BO1G+O3RO5A+O1G+O3RO5G+O2C+O3RO5G+O2C+O3RO5A+O2C+O3RO5A+O2C+O3RO5BO3BO3G+O5BO3BO3G+O6C+O2C+O3RO6C+O2C+O3RO5BO1G+O3RO5BO1G+O3RO5F+O1G+O3RO5F+O1G+O3R"
@addmml "O5D+O3D+O2BO5F+O3D+O2BO5F+O1G+O3RO5F+O1G+O3RO5G+O3BO3G+O6C+O3BO3G+O6C+O3BO3G+O6C+O3BO3G+O5A+O4C+O3A+O5BO4C+O3A+O5BO4C+O3A+O5BO4C+O3A+O5BO2FO1FO5BO2FO1FO5BO2FO1FO5BO2FO1F"
@addmml "O5RO4D+O3BO5RO4D+O3BO5BO2FO1FO5A+O2FO1FO5G+O3C+O2C+O5G+O3C+O2C+O5A+O3C+O2C+O5A+O3C+O2C+O5BO3BO3G+O5BO3BO3G+O6C+O3C+O2C+O6C+O3C+O2C+O5BO2G+O1G+O5BO2G+O1G+O5F+O2G+O1G+O5F+O2G+O1G+"
@addmml "O5BO3D+O2BO6C+O3D+O2BO6C+O2G+O1G+O6C+O2G+O1G+O6D+O4EO3BO6EO4EO3BO6EO4EO3BO6EO4EO3BO6C+O4F+O4C+O5BO4F+O4C+O5BO4F+O4C+O5BO4F+O4C+O5BO3BO3F+O5BO3BO3F+O5BO3BO3F+O5BO3BO3F+"
@addmml "O5BO3BO3F+O5BO3BO3F+O5BO3BO3F+O5BO3BO3F+O5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3R"
@addmml "O5RO3RO3RO5RO3RO3RO5RO3RO3RO5RO3RO3R]"

@playmml

*main
@wait 5

@draw 0
@cls 0, 0, 0
@pos 16, 16
@int %0, +, 1
@int %0, \, 20
@if %0, >, 10, *ani2
@mes %1
@goto *ani3
*ani2
@mes %2
*ani3
@mes ""
@mes %3
@mes %4
@draw 1

@goto *main

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2019年 7月24日(水)19時20分5秒
 
みなさんお元気ですか。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.7
・Dish.js版ぷちゲースクリプトに@save、@load命令を追加

Dish.js版ぷちゲースクリプトで変数の保存と読み込みができるようになりました。
詳しい利用方法はアーカイブ内のpgs_dish_js.txtをご覧ください。

それでは、これからも引き続き「wbeep.dll」と「ぷちゲースクリプト」をどうぞ
よろしくお願いいたします。

「wbeep.dll用簡易MMLコンバーター」についてのお知らせ
  投稿者:naya  投稿日:2019年 6月 1日(土)02時26分18秒
 
みなさんこんばんは。管理人のnayaです。

昨日に公開しました「wbeep.dll用簡易MMLコンバーター」の最新版で
実行ファイルがセキュリティソフトで誤検出される問題が発生しました。

その後、ファイルを充分にチェックし、回避措置を講じたうえで再アップロード
しましたので、昨日にファイルをダウンロードされた方は旧ファイルを削除して
から、nayaらぼサイトより最新のアーカイブをダウンロードしてご利用ください。


お手数おかけして申し訳ありません。それではよろしくお願いいたします。

「wbeep.dll用簡易MMLコンバーター」更新のお知らせ
  投稿者:naya  投稿日:2019年 5月31日(金)20時35分31秒
 
みなさんこんにちは。管理人のnayaです。

「wbeep.dll用簡易MMLコンバーター」を更新しました。
最新版はnayaらぼサイトのトップページからダウンロードできます。

【更新内容】
MML変換時の不具合を修正

wbeep.dll用簡易MMLコンバーターでチャンネル2のMMLデータが正常に変換されない
場合がある不具合を修正しました。


それでは、これからも引き続き「wbeep.dll」と「ぷちゲースクリプト」をよろしく
お願いいたします。

新年のご挨拶
  投稿者:naya  投稿日:2019年 1月 1日(火)19時43分28秒
 
みなさん新年あけましておめでとうございます。管理人のnayaです。
本年もnayaらぼとぷちゲースクリプトをよろしくお願いいたします。

スクリプト投稿「Dish.js版ぷちゲースクリプト用数値入力サンプル」
  投稿者:naya  投稿日:2018年12月14日(金)18時36分6秒
 
皆さんこんにちは。

Dish.js版ぷちゲースクリプト用の数値入力のサンプルスクリプトです。
pgs_dish_js\dataフォルダ内のstart.txtに以下のスクリプトをコピー
して保存し、HSP3Dish Helperで出力されたHTMLファイルをブラウザで
開いて実行してください。
エンターキーを押すか、マウスで数値以外の横の位置をクリックすると
入力した値が表示されます。
このスクリプトは自由に改造、使用していただいて構いません。


@title "数値入力サンプル"
@font 2, 16, 1
@color 255, 255, 255
@cls 0, 0, 0

;表示開始位置X
@int %0, =, 64
;表示開始位置Y
@int %1, =, 64
;初期数値(文字列)
@str %2, =, "0000"
;カーソル位置
@int %3, =, 0

*main
@wait 10
@int %5, stick, 10
@int %6, mousex
@int %7, mousey
@int %8, =, 0
@gosub *cur_mouse
@if %5, =,   1, *cur_left
@if %5, =,   4, *cur_right
@if %5, =,   2, *cur_up
@if %5, =,   8, *cur_down
@if %5, =,  32, *cur_enter
@if %5, =, 256, *cur_click
*cur_back
@draw 0
@gosub *put_num
@gosub *put_cur
@draw 1
@goto *main

*cur_up
@str %90, mid, %2, %3, 1
@int %90, -, 1
@if %90, >=, 0, *cur_up_skip
@int %90, =, 9
*cur_up_skip
@str %2, write, %90, %3, 0
@goto *cur_back

*cur_down
@str %90, mid, %2, %3, 1
@int %90, +, 1
@int %90, \, 10
@str %2, write, %90, %3, 0
@goto *cur_back

*cur_left
@if %3, <=, 0, *cur_back
@int %3, -, 1
@goto *cur_back

*cur_right
@if %3, >=, 3, *cur_back
@int %3, +, 1
@goto *cur_back

*cur_enter
@draw 0
@str %90, =, "入力した数は"
@str %90, +, %2
@str %90, +, "です。"
@pos 0, 0
@mes %90
@draw 1
@pause
@goto *main

*cur_mouse
@int %90, =, %0
@if %6, <, %90, *cur_mouse_over
@int %90, +, 64
@if %6, >, %90, *cur_mouse_over
@int %6, -, %0
@int %6, /, 16
@int %3, =, %6
@if %3, <, 4, *cur_mouse_back
@int %3, =, 3
*cur_mouse_back
@return
*cur_mouse_over
@int %8, =, 1
@return

*cur_click
@if %8, =, 1, *cur_enter
@int %90, =, %0
@int %90, +, 24
@if %7, <, %90, *cur_up
@if %7, >, %90, *cur_down
@goto *cur_back

*put_num
@int %90, =, 0
*put_num_loop
@str %93, mid, %2, %90, 1
@int %91, =, %90
@int %91, *, 16
@int %91, +, %0
@int %92, =, %1
@int %92, +, 16
@pos %91, %92
@gosub *mes_num
@int %90, +, 1
@if %90, <, 4, *put_num_loop
@return

*mes_num
@if %93, !=, 0, *mes_num_skip1
@mes "0"
@return
*mes_num_skip1
@if %93, !=, 1, *mes_num_skip2
@mes "1"
@return
*mes_num_skip2
@if %93, !=, 2, *mes_num_skip3
@mes "2"
@return
*mes_num_skip3
@if %93, !=, 3, *mes_num_skip4
@mes "3"
@return
*mes_num_skip4
@if %93, !=, 4, *mes_num_skip5
@mes "4"
@return
*mes_num_skip5
@if %93, !=, 5, *mes_num_skip6
@mes "5"
@return
*mes_num_skip6
@if %93, !=, 6, *mes_num_skip7
@mes "6"
@return
*mes_num_skip7
@if %93, !=, 7, *mes_num_skip8
@mes "7"
@return
*mes_num_skip8
@if %93, !=, 8, *mes_num_skip9
@mes "8"
@return
*mes_num_skip9
@if %93, !=, 9, *mes_num_skip10
@mes "9"
*mes_num_skip10
@return

*put_cur
@int %90, =, %3
@int %90, *, 16
@int %90, +, %0
@int %91, =, %1
@pos %90, %91
@mes "▲"
@int %91, +, 32
@pos %90, %91
@mes "▼"
@return

「Dish.js版ぷちゲースクリプト」の画面表示について
  投稿者:naya  投稿日:2018年12月14日(金)18時32分46秒
 
こんにちは。管理人のnayaです。

Dish.js版ぷちゲースクリプトにて、@draw 0から@draw 1までの間の処理が多い
時に画像が正常に表示されなくなる事があります。

対処方法として、@cput命令などを利用したマップ表示など、@draw命令間での
複雑な処理を避けることで表示が崩れるのを回避することができます。

また、出力されたpgs_dish_js.htmlをテキストディタなどで開き、以下の部分
のENV.HSP_LIMIT_STEPの値を増やすことで正常に表示されるようになる場合が
あります。

    Module.preRun.push(function() {
        ENV.HSP_WX = "512";//スクリプトの動作解像度
        ENV.HSP_WY = "384";
        ENV.HSP_SX = "512";//表示解像度
        ENV.HSP_SY = "384";
        ENV.HSP_AUTOSCALE = "0";//スケーリングモード
        ENV.HSP_FPS = "0";//フレームレート
        ENV.HSP_LIMIT_STEP = "5000";//ブラウザに処理を返すまでの実行ステップ数
    });

それではよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年12月14日(金)18時31分16秒
 
みなさんお元気ですか。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.6
・Dish.js版ぷちゲースクリプトの追加

Dish.js版ぷちゲースクリプトを利用することでWebGLをサポートしたWEBブラウザ
上で動作するミニゲームを作成することができるようになりました。
※ファイルの出力にはHSP3最新版が必要です。

通常版のぷちゲースクリプトのstart.txtを最小限の修正をすることで、ブラウザ
上でぷちゲースクリプトを動かすことができます。

それでは、来年も「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願いいたします。

サイト移転のお知らせ
  投稿者:naya  投稿日:2018年10月 2日(火)21時57分31秒
 
みなさんこんにちは。管理人のnayaです。

まずは、この度の北海道胆振東部地震により被害にあわれた皆様に謹んで
お見舞いを申し上げます。


今までnayaらぼサイトを公開させていただいてたYahoo!ジオシティーズの
サービス終了に伴いnayaらぼサイトを移転しましたのでお知らせいたします。


(新)nayaらぼサイトアドレス
http://nayalabo.g1.xrea.com/index.html

(旧)nayaらぼサイトアドレス
http://www.geocities.jp/naya_labo/index.html


それではこれからもnayaらぼをどうぞよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年 8月29日(水)18時23分24秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.5
・パックファイルの読み込み処理の不具合を修正

パックファイル内に特定のファイル名の画像ファイルが含まれていると
スクリプトのロード時にエラーが発生する不具合を修正しました。

それでは、引き続き「wbeep.dll」と「ぷちゲースクリプト」をよろしく
お願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年 7月27日(金)18時04分4秒
 
みなさんこんにちは。管理人のnayaです。

「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.4
・@font命令の不具合を修正

@font命令でフォントスタイルの「袋文字」か「影文字」を一度指定すると
その後、スタイルを変更しても効果が解除されない不具合を修正しました。

それでは、引き続き「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願い
いたします。

「プロデル用wbeep.dllサンプルプログラム」
  投稿者:naya  投稿日:2018年 5月17日(木)19時28分6秒
 
みなさんこんにちは。管理人のnayaです。
日本語プログラミング言語プロデルでwbeep.dllを利用できることが確認できました。
以下はwbeep.dll付属のサンプルプログラムをプロデル用に移植したものです。
まずは保存先のフォルダを作成し、wbeep.dllをこのフォルダにコピーします。
そして、プロデルデザイナ上でプログラムを新規作成してから、以下のプログラムを
コピー&ペーストして保存先のフォルダに”保存してから”実行してください。

ーーーここから下がプログラムです。
wBeepCloseは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepClose」)を作る
wBeepCloseの戻り値型は、整数
wBeepCloseの引数型一覧は、{}
wBeepGetPosは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepGetPos」)を作る
wBeepGetPosの戻り値型は、整数
wBeepGetPosの引数型一覧は、{}
wBeepOpenは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepOpen」)を作る
wBeepOpenの戻り値型は、整数
wBeepOpenの引数型一覧は、{整数}
wBeepPauseは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepPause」)を作る
wBeepPauseの戻り値型は、整数
wBeepPauseの引数型一覧は、{}
wBeepPlayは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepPlay」)を作る
wBeepPlayの戻り値型は、整数
wBeepPlayの引数型一覧は、{}
wBeepResetは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepReset」)を作る
wBeepResetの戻り値型は、整数
wBeepResetの引数型一覧は、{}
wBeepSetEventは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepSetEvent」)を作る
wBeepSetEventの戻り値型は、整数
wBeepSetEventの引数型一覧は、{整数,整数}
wBeepSetMmlは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepSetMml」)を作る
wBeepSetMmlの戻り値型は、整数
wBeepSetMmlの引数型一覧は、{文字列,整数}
wBeepSetSeは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepSetSe」)を作る
wBeepSetSeの戻り値型は、整数
wBeepSetSeの引数型一覧は、{バイナリデータ,整数}
wBeepSetToneは、ネイティブ関数(ファイル名「wbeep.dll」、関数名「wBeepSetTone」)を作る
wBeepSetToneの戻り値型は、整数
wBeepSetToneの引数型一覧は、{整数,整数}

sdata1は、{440, 220, 110, 55}
sdata2は、{988, 988, 988, 988, 0, 0, 1975, 1975, 1975, 1975, 0, 0}

se2というバイナリデータを作る
12回、カウンタに1からカウントして繰り返す
se2にsdata2(カウンタ)を整数として書き込む
繰り返し終わり

wBeepOpenを{8*1024}で呼び出して結果とする
もし 結果が 0でないなら 終了する。

wBeepSetToneを{2,10}で呼び出して結果とする

ーーー[TEST_BGM(c)2011-2018 naya]
mmlbufは、「T110L64R4[[]」
mmlbufは、mmlbuf&「O5DO3GO4RO5DO3GO4RO5DO3GO4RO5DO3GO4RO5EO3GO4CO5EO3GO4RO5EO3GO4RO5EO3GO4R」
mmlbufは、mmlbuf&「O5F+O3GO4RO5F+O3GO4RO5F+O3GO4RO5F+O3GO4RO5GO3GO4CO5GO3GO4RO5GO3GO4RO5GO3GO4R」
mmlbufは、mmlbuf&「O5F+O3AO4RO5F+O3AO4RO5F+O3AO4RO5F+O3AO4RO5AO3AO4CO5AO3AO4RO5AO3AO4RO5AO3AO4R」
mmlbufは、mmlbuf&「O5BO3AO4RO5BO3AO4RO5BO3AO4RO5BO3AO4RO5AO3AO4CO5AO3AO4RO5AO3AO4RO5AO3AO4R」
mmlbufは、mmlbuf&「O5DO3BO4RO5DO3BO4RO5DO3BO4RO5DO3BO4RO5EO3BO4CO5EO3BO4RO5EO3BO4RO5EO3BO4R」
mmlbufは、mmlbuf&「O5F+O3BO4RO5F+O3BO4RO5F+O3BO4RO5F+O3BO4RO5GO3BO4CO5GO3BO4RO5GO3BO4RO5GO3BO4R」
mmlbufは、mmlbuf&「O5F+O3AO4RO5F+O3AO4RO5F+O3AO4RO5F+O3AO4RO5EO3AO4CO5EO3AO4RO5EO3AO4RO5EO3AO4R」
mmlbufは、mmlbuf&「O5DO3AO4CO5DO3AO4RO5DO3AO4CO5DO3AO4RO5DO3AO4CO5DO3AO4RO5DO3AO4CO5DO3AO4R[]]」

wBeepSetMmlを{mmlbuf,mmlbufの文字数}で呼び出して結果とする

メイン画面を表示する
待機する

メイン画面とは
ウィンドウを継承する
はじめの手順
初期化する
ーー貼り付けた部品に対する操作をここに書きます
タイマー1というタイマーを作る
タイマー1の時間になった時の手順は、時間になった
タイマー1の間隔を50に変える
タイマー1を開始する
終わり
初期化する手順
ーー自動生成された手順です。ここにプログラムを書き加えても消える場合があります
この内部領域大きさを{320,240}に変える
この種類を「固定」に変える
この最大化ボタンを×に変える
この内容を「WBEEP.DLLテスト」に変える
ボタン1というボタンを作る
その位置と大きさを{0,0,96,28}に変える
その内容を「SE1」に変える
ボタン2というボタンを作る
その位置と大きさを{96,0,96,28}に変える
その内容を「SE2」に変える
その移動順を1に変える
終わり

時間になった手順
wBeepPlayを{}で呼び出して結果とする
終わり

閉じる時の手順
wBeepCloseを{}で呼び出して結果とする
終わり

ボタン1がクリックされた時の手順
wBeepGetPosを{}で呼び出してppとする
ppは、(((pp+1)/2)*2)+1
4回、カウンタに1からカウントして繰り返す
もし sdata1(カウンタ)は、0でないなら
wBeepSetEventを{pp,sdata1(カウンタ)}で呼び出して結果とする
もし終わり
ppは、pp+2
繰り返し終わり
終わり

ボタン2がクリックされた時の手順
wBeepSetSeを{se2,12}で呼び出して結果とする
終わり

終わり

「wbeep.dll」更新のお知らせ 
 投稿者:naya  投稿日:2018年 5月17日(木)19時06分43秒
 
みなさんこんにちは。管理人のnayaです。

「wbeep.dll」を更新しました。

【更新内容】
ver1.7.2
・MML再生時のテンポの処理を修正

MML再生時にテンポの値が大きい場合の内部処理を修正しました。


それでは、引き続き「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願い
いたします。

「wbeep.dll」更新のお知らせ
  投稿者:naya  投稿日:2018年 5月12日(土)23時06分52秒
 
みなさんこんにちは。管理人のnayaです。

「wbeep.dll」を更新しました。

【更新内容】
ver1.7.1
・MMLデータにループがない場合の再生の不具合を修正
・BCC++5.5用インクルードファイルの記述ミスを修正

wbeep.dllのMML再生に関する不具合を修正しました。
大変申し訳ありませんが、修正した最新版のものに差し替えてご利用ください。


それでは、これからも「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願いいたします。

「wbeep.dll用簡易MMLコンバーター」公開のお知らせ
  投稿者:naya  投稿日:2018年 5月11日(金)18時20分3秒
 
みなさんこんにちは。管理人のnayaです。

最大3チャンネルまでのMMLテキストデータをwbeep.dllで再生可能な単音の
MMLファイルに変換するコンバーター「wbeep.dll用簡易MMLコンバーター」
を公開しました。
nayaらぼホームページからダウンロードできます。

本ソフトを利用することで、自分で作曲したMMLデータ等を変換して比較的
簡単にwbeep.dllで再生できるようになりました。

それでは、これからも「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願いいたします。

スクリプト投稿「MML再生スクリプト[Ys2 -Ice Ridge of Noltia-]」
  投稿者:naya  投稿日:2018年 5月 7日(月)21時39分39秒
 
皆さんこんにちは。
日本ファルコムのアクションRPG「Ys2」より「-Ice Ridge of Noltia-」のMML再生スクリプトです。
バージョン1.1.3以降の最新版のぷちゲースクリプトで実行してください。
本スクリプトは原曲に著作権がありますので再生して楽しむだけにしてください。
著作権上、問題が報告された場合は直ちにこの投稿を削除させていただきます。

@screen 512, 384
@color 0, 0, 0
@font 2, 16, 0

@mes "[Ys2 -Ice Ridge of Noltia-]"
@mes "Copyright(c) Nihon Falcom Corporation"

@wbeep 8, 1, 10

@setmml "T110L64R2["
@addmml "O4RO2CO3CO4RRO3CO4RO2CO3CO4RO2CO3CO4CO3CO3CO4E-RO3CO4GO2CO3CO4B-O2CO3CO5DO2CO3CO5DRO3CO5DO2CO3CO5DO2CO3CO5DO3CO3CO5DRO3E-O5DO2CO3GO5DO2CO3B-"
@addmml "O5DO1B-O4DO5DRO4DO5DO1B-O4DO5DO1B-O4DO5GO3CO4DO5GRO4DO5GO1B-O4DO5GO1B-O4DO5FO1B-O4CO5FRO4CO5FO1B-O4CO5FO1B-O4CO5CO3CO3FO5CRO3FO5CO1B-O3FO5CO1B-O3F"
@addmml "O5DO1A-O3GO5DRO3GO5DO1A-O3GO5DO1A-O3GO5DO3CO3GO5DRO3GO5DO1A-O3GO5DO1A-O3GO5DO1A-O3GO5DRO3GO5DO1A-O3GO5DO1A-O3GO5E-O3CO3A-O5DRO3GO5E-O1A-O3A-O5FO1A-O3B-"
@addmml "O5DO1GO3GO5DRO3GO5RO1GO3GO5DO1GO3GO5DO3CO3GO5DRO3GO5GO1GO3GO5FO1GO3GO5GO1GO3GO5GRO3GO5GO1GO4DO5GO1GO4CO5GO3CO4DO5GRO4DO5GO1GO4DO5GO1GO4D"
@addmml "O5DO2CO3GO5DRO3GO5DO2CO3GO5DO2CO3GO5DO3CO3GO5DRO3GO5DO2CO3GO5DO2CO3GO5CO2CO3GO5CRO3GO5CO2CO3GO5CO2CO3GO5CO3CO3GO5CRO3GO5CO2CO3GO5CO2CO3G"
@addmml "O5E-O2CO4CO5E-RO4CO5E-O2CO4CO5FO2CO4DO5FO3CO4DO5FRO4DO5GO2CO4E-O5GO2CO4E-O5FO2CO4DO5FRO4DO5FO2CO4DO5E-O2CO4CO5E-O3CO4CO5E-RO4CO4B-O2CO3GO4B-O2CO3G"
@addmml "O5CO1A-O3GO5CRO3GO5CO1A-O3GO5CO1A-O3GO5CO3CO3GO5CRO3GO5CO1A-O3GO5CO1A-O3GO5GO1A-O3GO5FRO3GO5GO1A-O3GO5GO1A-O3GO5GO3CO5CO5GRO4B-O5GO1A-O5CO5GO1A-O5C"
@addmml "O5GO1A-O5CO5GRO5CO5GO1A-O5CO5GO1A-O5CO5GO3CO5CO5GRO5CO5GO1A-O5CO5GO1A-O5CO4A-O1A-O3FO4B-RO3GO5CO1A-O3A-O5DO1A-O3B-O5E-O3CO4CO5DO3CO3B-O5CO3CO3A-O4B-O3CO3G"
@addmml "O5CO2FO3A-O5CRO3A-O5CO2FO3A-O5CO2FO3A-O5CO3CO3A-O5CRO3A-O5CO2FO3A-O5CO2FO3A-O4A-O2FO3FO4B-RO3GO5CO2FO3A-O5DO2FO3B-O5E-O3CO4CO5E-RO4CO5E-O2FO4CO5E-O2FO4C"
@addmml "O5CO2FO3A-O5DRO3B-O5E-O2FO4CO5FO2FO4DO5GO3CO4E-O5GRO4E-O5GO2FO4E-O5GO2FO4E-O5GO2FO4A-O5GRO4A-O5GO2FO4A-O5GO2FO4A-O5GO3CO4A-O5GRO4A-O5FO2FO4A-O5E-O2FO4A-"
@addmml "O5FO2GO4A-O5FRO4A-O5FO2GO4A-O5GO2GO4B-O5GO3CO4B-O5GRO4B-O5GO2GO4B-O5GO2GO4B-O5GO2GO4B-O5GRO4B-O5GO2GO4B-O5GO2GO4B-O4FO3CO3A-O4FRO3A-O4FO2GO3A-O4GO2GO3B-"
@addmml "O4GO1GO3B-O4GRO3B-O4GO1GO3B-O4GO1GO3B-O4GO3CO3B-O4GRO3B-O4GO1GO3B-O4GO1GO3B-O4GO3CO3B-O4GRO3B-O4GO1GO3B-O4GO3CO3B-O4GO3CO3B-O4GO3CO3B-O4GO3CO3B-O4GO3CO3B-"
@addmml "O5CO2CO3GO5CRO3GO5CO2CO3GO5CO2CO3GO5CO3CO3GO5CRO3GO4B-O2CO3FO5CO2CO3GO4GO2CO3CO4GRO3CO4GO2CO3CO4GO2CO3CO4GO3CO3CO4GRO3CO4GO2CO3CO4GO2CO3C"
@addmml "O5CO1A-O3GO5CRO3GO5CO1A-O3GO5CO1A-O3GO5CO3CO3GO5CRO3GO5CO1A-O3GO5DO1A-O3GO5E-O1A-O4CO5E-RO4CO5E-O1A-O4CO5DO1A-O4CO5DO3CO4GO5DRO4GO5CO1A-O4GO5CO1A-O4G"
@addmml "O5DO1B-O4FO5DRO4FO5DO1B-O4FO5DO1B-O4FO5DO3CO4FO5DRO4FO5CO1B-O4E-O5DO1B-O4FO4B-O1B-O4DO4B-RO4DO4B-O1B-O4DO4B-O1B-O4DO4B-O3CO4DO4B-RO4DO4BO1B-O4DO4BO1B-O4D"
@addmml "O4BO1GO4DO4BRO4DO4BO1GO4DO4BO1GO4DO5CO3CO4E-O5CRO4E-O5DO1GO4FO5DO1GO4FO5DO1GO4FO5DRO4FO5FO1GO4A-O5FO1GO4A-O5E-O3CO4GO5E-O3CO4GO5DO3CO4FO5DO3CO4F"
@addmml "O5CO2CO3GO5CRO3GO5CO2CO3GO5CO2CO3GO5CO3CO3GO5CRO3GO4B-O2CO3FO5CO2CO3GO4GO2CO3CO4GRO3CO4GO2CO3CO4GO2CO3CO4GO3CO3CO4GRO3CO4GO2CO3CO4GO2CO3C"
@addmml "O5CO1A-O3GO5CRO3GO5CO1A-O3GO5CO1A-O3GO5CO3CO3GO5CRO3GO5CO1A-O3GO5DO1A-O3GO5E-O1A-O4CO5E-RO4CO5E-O1A-O4CO5FO1A-O4DO5FO3CO4DO5FRO4DO5GO1A-O4E-O5GO1A-O4E-"
@addmml "O5FO1B-O4DO5FRO4DO5FO1B-O4DO5FO1B-O4DO5FO3CO4DO5FRO4DO5FO1B-O4DO5FO1B-O4DO5B-O1B-O4FO5B-RO4FO5B-O1B-O4FO5B-O1B-O4FO5B-O3CO4FO5B-RO4FO5B-O1B-O4FO5B-O1B-O4F"
@addmml "O6CO2CO4GO6CRO4GO6CO3CO4GO6CO2CO4GO6CO2CO4GO6CRO4GO6CO3CO4GO6CO2CO4GO6CO2CO4GO6CRO4GO6CO3CO4GO6CO2CO4GO6CO3CO4GO6CO3CO4GO6CO3CO4GO6CO3CO4G"
@addmml "O5CO1A-O3A-O5CRO3A-O5CRO3E-O5CRO3A-O5CO1A-O3A-O5CO2E-O4CO5CO3CO4E-O5CRRO5CRO4E-O5CRO4E-O5CRO4CO5CRO4E-O5CRO4A-O5DRO4A-O5E-O3CO4A-O5FO3CO4A-"
@addmml "O5DO1B-O3B-O5DRO3B-O5DRO3GO5DRO3B-O5DO1B-O3B-O5DO2FO4BO5DO3CO4FO5DRRO5DRO4FO5DRO4FO5DRO4DO5DRO4FO5GRO4B-O5FRO4B-O5E-O3CO4B-O5DO3CO4B-"
@addmml "O5E-O2CO4CO5E-RO4CO5E-RO4E-O5E-RO4GO5E-O2CO5CO5E-O3CO5CO5E-O3CO5CO5E-RO5CO5E-RRO5E-RRO5E-RRO5E-RRO4GRRO4FRRO4E-O3CO4DO4DO3CO4C"
@addmml "O4E-O2CO3GO4E-RO3GO4E-RO3GO4E-RO3GO4E-O3CRO4E-O3CRO4E-O2CRO4E-RRO4E-O2FRO4E-O2E-RO4E-O2CRO4E-O2E-RO4E-O3CRO4E-O1B-RO4E-O3CRO4E-O3CR"
@addmml "O3A-O1A-O3A-O3A-RO3A-O3A-RO3E-O3A-RO3A-O3A-O1A-O3A-O3A-O2E-O4CO3A-O3CO4E-O3A-RRO3A-RO4E-O3A-RO4E-O3A-RO4CO3A-RO4E-O3A-RO4A-O3A-RO4A-O3B-O3CO4A-O4CO3CO4A-"
@addmml "O4DO1B-O3B-O4DRO3B-O4DRO3GO4DRO3B-O4DO1B-O3B-O4DO2FO4BO4DO3CO4FO4DRRO4E-RO4FO4E-RO4FO4E-RO4DO4E-RO4FO4FRO4B-O4FRO4B-O4FO3CO4B-O4FO3CO4B-"
@addmml "O4FO2CO4CO4FRO4CO4FRO4E-O4E-RO4GO4E-O2CO5CO4E-O3CO5CO4E-O3CO5CO4E-RO5CO4E-RRO4E-RRO4E-RRO4E-RRO4E-RRO4E-RRO4DO3CO4DO4E-O3CO4C"
@addmml "O4FO2CO3GO4DRO3GO4E-RO3GO4FRO3GO4DO3CRO4E-O3CRO4FO2CRO4DRRO4E-O2FRO4FO2E-RO4DO2CRO4E-O2E-RO4FO3CRO4GO1B-RO4A-O3CRO4B-O3CR"
@addmml "O5CO1A-O3A-O5CRO3A-O5CRO3E-O5CRO3A-O5CO1A-O3A-O5CO2E-O4C O5CO3CO4E-O5CRRO5CRO4E-O5CRO4E-O5CRO4CO5CRO4E-O5CRO4A-O5DRO4A-O5E-O3CO4A-O5FO3CO4A-"
@addmml "O5DO1B-O3B-O5DRO3B-O5DRO3GO5DRO3B-O5DO1B-O3B-O5DO2FO4BO5DO3CO4FO5DRRO5DRO4FO5DRO4FO5DRO4DO5DRO4FO5GRO4B-O5FRO4B-O5E-O3CO4B-O5DO3CO4B-"
@addmml "O5E-O2CO4CO5E-RO4CO5E-RO4E-O5E-RO4GO5E-O2CO5CO5E-O3CO5CO5E-O3CO5CO5E-RO5CO5E-RRO5E-RRO5E-RRO5E-RRO4GRRO4FRRO4E-O3CO4DO4DO3CO4C"
@addmml "O4E-O2CO3GO4E-RO3GO4E-RO3GO4E-RO3GO4E-O3CRO4E-O3CRO4E-O2CRO4E-RRO4E-O2FRO4E-O2E-RO4E-O2CRO4E-O2E-RO4E-O3CRO4E-O1B-RO4E-O3CRO4E-O3CR"
@addmml "O3A-O1A-O3A-O3A-RO3A-O3A-RO3E-O3A-RO3A-O3A-O1A-O3A-O3A-O2E-O4CO3A-O3CO4E-O3A-RRO3A-RO4E-O3A-RO4E-O3A-RO4CO3A-RO4E-O3A-RO4A-O3A-RO4A-O3B-O3CO4A-O4CO3CO4A-"
@addmml "O4DO1B-O3B-O4DRO3B-O4DRO3GO4DRO3B-O4DO1B-O3B-O4DO2FO4BO4DO3CO4FO4DRRO4E-RO4FO4E-RO4FO4E-RO4DO4E-RO4FO4FRO4B-O4FRO4B-O4FO3CO4B-O4FO3CO4B-"
@addmml "O4E-O2CO3CO4DRO3CO4CRO3CO4CO2CO3CO4CO3CRO4CO2DRO4CO2CRO4CRRO4CO3CRO4CO2E-RO4CO2DRO4CO2E-RO4CO3CRO4CO3CRO4CO3CRO4CO3CR"
@addmml "O3BO3CO3GO3BRO3GO3BRO3GO4CO3CO3AO4CRO3AO4CRO3AO4DO3CO3BO4DRO3BO4DO3CO3BO4DRO3BO4DRO3BO4E-O3CO4CO4E-RO4CO4E-RO4CO4FO3CO4DO4FO3CO4D]"

@playmml

*main
@wait 5
@goto *main

スクリプト投稿「wbeep.dll再生機能テスト」
  投稿者:naya  投稿日:2018年 5月 7日(月)21時33分53秒
 
皆さんこんにちは。
ぷちゲースクリプトのバージョン1.1.3で追加されたwbeep関連機能のサンプルです。
バージョン1.1.3以降の最新版のぷちゲースクリプトで実行してください。
このスクリプトは自由に改造、使用していただいて構いません。

#tag key 0

@screen 512, 384
@color 0, 0, 0
@font 2, 16, 0

@mes "[-NIGHT CHASER- SHOOTING GAME BGM] "
@mes "Copyright(c)2011-2018 naya"
@mes "キーを押すと効果音を鳴らします。"

@wbeep 8, 2, 10

@setmml "T110L64R2O5RO3RO2RO5RO3RO2RO5RO3RO2RO5RO3RO2R"
@addmml "[O5GO3BO2EO5GO3BO2EO5EO3BO2EO5EO3BO2EO5DO3BO4CO5DO3BO2EO5EO3BO2EO5EO3BO2EO5EO3BO2EO5EO3BO2EO5EO3BO2EO5EO3BO2E"
@addmml "O5DO3BO4CO5DO3BO2EO5EO3BO2EO5EO3BO2EO5GO4DO2EO5GO4DO2EO5EO4DO2EO5EO4DO2EO5DO4DO4CO5DO4DO2EO5EO4DO2EO5EO4DO2EO5EO4CO2EO5EO4CO2EO5AO4CO2EO5AO4CO2E"
@addmml "O5GO4CO4CO5GO4CO2EO5EO4CO4CO5EO4CO2EO5GO3BO2DO5GO3BO2DO5EO3BO2DO5EO3BO2DO5DO3BO4CO5DO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2D"
@addmml "O5DO3BO4CO5DO3BO2DO5EO3BO2DO5EO3BO2DO5GO4CO2DO5GO4CO2DO5EO4CO2DO5EO4CO2DO5DO4CO4CO5DO4CO2DO5EO4CO2DO5EO4CO2DO5EO4DO2DO5EO4DO2DO5AO4DO4CO5AO4DO2D"
@addmml "O5GO4DO4CO5GO4DO2DO5EO4DO4CO5EO4DO2DO5GO4EO2CO5GO4EO2CO5EO4EO2CO5EO4EO2CO5DO4EO4CO5DO4EO2CO5EO4EO2CO5EO4EO2CO5EO4EO2CO5EO4EO2CO5EO4EO2CO5EO4EO2C"
@addmml "O5DO4EO4CO5DO4EO2CO5EO4EO2CO5EO4EO2CO5GO4EO2CO5GO4EO2CO5EO4EO2CO5EO4EO2CO5DO4EO4CO5DO4EO2CO5EO4EO2CO5EO4EO2CO5EO4DO2CO5EO4DO2CO5AO4DO2CO5AO4DO2C"
@addmml "O5GO4CO4CO5GO4CO2CO5EO4CO4CO5EO4CO2CO5GO3BO2DO5GO3BO2DO5EO3BO2DO5EO3BO2DO5DO3BO4CO5DO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2DO5EO3BO2D"
@addmml "O5DO3BO4CO5DO3BO2DO5EO3BO2DO5EO3BO2DO5GO3AO2DO5GO3AO2DO5EO3AO2DO5EO3AO2DO5DO3AO4CO5DO3AO2DO5EO3AO4CO5EO3AO2DO5EO3AO2DO5EO3AO2DO5AO3AO4CO5AO3AO2D"
@addmml "O5GO3AO4CO5GO3AO2DO5EO3AO4CO5EO3AO2D]"

@playmml

*main
@int %key, stick
@if %key, =, 0, *se_skip
@gosub *se
*se_skip

@wait 5
@goto *main

*se
@int %100, =, 440
@int %101, =, 0
@int %102, =, 220
@int %103, =, 0
@int %104, =, 110
@int %105, =, 0
@sound 100, 6
@return

「wbeep.dll」の公開と「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年 5月 7日(月)21時31分21秒
 
みなさんこんにちは。管理人のnayaです。

WAVEデバイスを利用して単音ビープの効果音やMML音楽を鳴らすDLL
「wbeep.dll」を公開しました。

「ぷちゲースクリプト」を更新しました。
【更新内容】
ver1.1.3
・拙作の単音BEEPサウンドDLL「wbeep.dll」の同梱
・@bgm、@sound命令にwbeep.dll関連機能を追加
・@wbeep、@setmml、@addmml、@playmml命令を追加


単音BEEPサウンドDLL「wbeep.dll」の公開にあわせてぷちゲースクリプトに
DLLを同梱してwbeep関連の機能を追加しました。

@bgm、@sound命令でwbeep.dllを利用してMMLファイルと効果音の再生が
できるようにしました。

wbeepサウンドをオープンして使用できるようにする@wbeep命令を追加しました。
mmlバッファを初期化してMML文字列を書き込む@setmml命令を追加しました。
mmlバッファにMML文字列を追加する@addmml命令を追加しました。
mmlバッファに書き込まれたMMLを再生する@playmml命令を追加しました。
※MMLの文法については「wbeep.dll」アーカイブ内のreadme.txtをご覧ください。

上記の命令の追加によりメディアファイルがなくてもスクリプト単体で効果音や
BGMを再生できるようになりましたのでミニゲームなどで使えると思います。

単音BEEPサウンドはレトロチックで低機能ですが、工夫次第で魅力的なBGMを
鳴らすことができるので、気軽に楽しんで使っていただけると嬉しいです。

それでは、引き続きスクリプトの投稿などもお待ちしておりますので、
これからも「wbeep.dll」と「ぷちゲースクリプト」をよろしくお願いいたします。

スクリプト投稿「@int命令新機能テスト」
  投稿者:naya  投稿日:2018年 4月27日(金)18時37分46秒
 
皆さんこんにちは。
最新版のぷちゲースクリプトで追加された演算機能のサンプルです。
バージョン1.1.2以降のぷちゲースクリプトで実行してください。
このスクリプトは自由に改造、使用していただいて構いません。

#tag cnt 0
#tag px  1
#tag py  2
#tag cx  3
#tag cy  4
#tag h   5
#tag gx  6
#tag gy  7
#tag ga  8
#tag gd  9
#tag stt 10

@screen 512, 384
@color 255, 255, 255

@int %cnt, =, 0
@int %cx, =, 256
@int %cy, =, 192
@int %h, =, 128

*main

@int %px, cos, %cnt
@int %px, *, %h
@int %px, /, 1024
@int %px, +, %cx

@int %py, sin, %cnt
@int %py, *, %h
@int %py, /, 1024
@int %py, +, %cy

@int %gx, =, %px
@int %gx, -, %cx
@int %gy, =, %py
@int %gy, -, %cy

@int %ga, ang, %gx, %gy
@int %gd, dist, %gx, %gy

@int %cnt, +, 1
@int %cnt, \, 360

@draw 0

@cls 0, 0, 0

@font 2, 16, 0
@pos 0, 0
@str %stt, =, "角度="
@str %stt, +, %ga
@mes %stt
@str %stt, =, "距離="
@str %stt, +, %gd
@mes %stt

@font 2, 32, 0
@int %px, -, 16
@int %py, -, 16
@pos %px, %py
@mes "●"

@draw 1

@wait 1

@goto *main

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年 4月27日(金)18時32分40秒
 
みなさんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.2
・@int命令に演算子(abs、sin、cos、ang、dist、asc)を追加
・@str命令に演算子(write)を追加
・@gettext、@settext命令の追加

@int命令に新しい演算機能を追加しました。
abs(絶対値を取得)
sin(サイン値を取得)
cos(コサイン値を取得)
ang(基準点(0,0)からの角度を取得)
dist(基準点(0,0)からの距離を計算する)
asc(半角文字のアスキーコードを返す)

@str命令に新しい演算機能を追加しました。
write(文字列を上書き、挿入する)

バイナリバッファ内のテキストデータから指定行の文字列を取り出す@gettext命令を追加しました。
バイナリバッファ内のテキストデータから指定行に文字列を上書きする@settext命令を追加しました。

それでは、これからも引き続き「ぷちゲースクリプト」をよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2018年 4月23日(月)19時19分0秒
 
みなさんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.1
・使用できる変数の数を300個までに増加
・システム命令#tag命令を追加
・変数内の数値を番号として変数を操作する機能を追加
・ゲーム画面のフルスクリーン表示に対応
・セーブデータの暗号化に対応

スクリプトで使用できる変数の数を300個までに増やしました。
変数に名前を付けて操作できるシステム命令#tag命令を追加しました。
"%%0"と"%"を連続して指定することで変数内の数値を番号とした別の変数を操作する機能を追加しました。
@screen命令でゲーム画面をフルスクリーン表示に切り替えることができるようになりました。
@save&@load命令でセーブデータを暗号化して利用できるようになりました。

これからもマイペースに更新していきますので、「ぷちゲースクリプト」をよろしくお願いいたします。

新年のご挨拶
  投稿者:naya  投稿日:2018年 1月 1日(月)18時12分57秒
 
新年あけましておめでとうございます。
管理人のnayaです。
本年もnayaらぼとぷちゲースクリプトをよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2017年11月20日(月)18時14分1秒
 
みなさんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.1.0
・開発環境を最新版のHSP3.5へ移行
・HSPLet版の同梱を終了
・起動時の"Loading..."を表示しないように変更
・実行ファイルのアイコン画像を変更

開発環境のバージョンアップに伴ない、いくつかの修正を施しました。
それでは、これからも「ぷちゲースクリプト」をよろしくお願いします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2017年 6月 6日(火)18時30分10秒
 
みなさんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.0.9 ・@getstr命令の不具合を修正

@getstr命令で文字データが正しく読み込めない不具合を修正しました。

それでは、これからも「ぷちゲースクリプト」をよろしくお願いします。

あけましておめでとうございます
  投稿者:naya  投稿日:2017年 1月 2日(月)17時58分23秒
 
新年あけましておめでとうございます。
本年もnayaらぼとぷちゲースクリプトをよろしくお願いします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2016年11月 3日(木)20時43分28秒
 
みなさんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.0.8 ・@sel命令の表示処理の不具合を修正
              ・@save、@load命令で0-9までの番号だけでもセーブ、ロードできるように修正
              ・アプリケーションの起動時、画面に"Loading..."と表示されるように変更

@sel命令で画面のサイズによってカーソルが消えなくなる不具合を修正しました。
@save、@load命令で番号だけでセーブ、ロードができるようになりました。
アプリケーションの起動時に"Loading..."と表示されるようにしました。

それでは、これからも「ぷちゲースクリプト」をよろしくお願いします♪。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2016年 6月17日(金)19時22分26秒
 
皆さんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.0.7 ・@alloc、@getstr、@setstr命令の追加
              ・@font命令にフォントスタイル(袋文字、影文字)を追加

バイナリバッファを初期化する@alloc命令を追加しました。
バイナリバッファから文字列を取り出す@getstr命令を追加しました。
バイナリバッファへ文字列を書き込む@setstr命令を追加しました。
@font命令で使用できるフォントスタイルに袋文字と影文字を追加しました。

これからも「ぷちスク」をよろしくお願いします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2016年 4月28日(木)21時55分13秒
 
皆さんお久しぶりです。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.0.6 ・@pload命令、@pput命令の追加

画像をバッファにロード、表示する@pload命令、@pput命令を追加しました。

これからも「ぷちスク」をよろしくお願いします。

新年のご挨拶
  投稿者:naya  投稿日:2016年 1月 1日(金)17時28分20秒
 
皆さん、あけましておめでとうございます。
管理人のnayaです。

今年もマイペースに更新していきますので、nayaらぼと
「ぷちゲースクリプト」をよろしくお願いいたします。

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2015年12月27日(日)22時56分24秒
 
皆さんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
2015/12/27 ver1.0.5
・内部処理の高速化
・@cload命令、@cput命令の追加
・@bload、@peek、@poke命令の追加
・@pic命令でパックファイル内にある一部のファイルがロードできない不具合を修正

スクリプトの解析処理の見直しにより実行ファイルを高速化しました。
@pic命令よりも高速に画像を表示する@cload命令、@cput命令を追加しました。
バイナリデータを参照、書き込みする@bload、@peek、@poke命令を追加しました。
パックファイル内のPNG形式の画像がロードできない不具合を修正しました。

それでは、来年も「ぷちスク」をよろしくお願いします。

スクリプト投稿「100-Meter Dash」
  投稿者:naya  投稿日:2015年12月22日(火)19時06分30秒
 
こんにちは。
[←]キーと[→]キーを交互に連打して100mを走るゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 0, 0, 0
@int %0 ,=, 0

*start
@int %1, =, %0
@gosub *time
@str %9, =, "RECORD "
@str %9, +, %8
@mes %9
@mes "PRESS ENTER KEY"
@pause 32

@int %1 ,=, 0
@int %2 ,=, 0
@cls
@mes "READY..."
@wait 200
@mes "GO!"
@wait 100
*main
@draw 0
@cls
@pos %2, 32
@mes "P"
@pos 100, 32
@mes "|GOAL"
@gosub *time
@str %9, =, "TIME "
@str %9, +, %8
@pos 0, 0
@mes %9
@draw 1
@int %4, stick
@if %4, =, 1, *run
@if %4, =, 4, *run
*run_back
@if %2, >, 100, *goal
@wait 5
@int %1 ,+, 50
@goto *main

*run
@if %3, =, %4, *run_back
@int %3, =, %4
@int %2, +, 1
@goto *run_back

*time
@int %5, =, %1
@int %5, /, 60000
@int %6, =, %1
@int %6, /, 1000
@int %6, \, 60
@int %7, =, %1
@int %7, \, 1000
@int %7, /, 10
@str %8, =, %5
@str %8, +, ":"
@str %8, +, %6
@str %8, +, ":"
@str %8, +, %7
@return

*goal
@str %9, =, "TIME "
@if %0, =, 0, *first_run
@if %1, >=, %0, *record_skip
*first_run
@int %0, =, %1
@str %9, =, "NEW RECORD "
*record_skip
@gosub *time
@str %9, +, %8
@cls
@mes %9
@goto *start

スクリプト投稿「タイニーシューティング」
  投稿者:naya  投稿日:2015年12月17日(木)18時39分4秒
 
こんにちは。シンプルなシューティングゲームです。
[←]キー、[→]キーで移動、[スペース]キーで弾を発射します。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255
@int %3, =, 0
@cls 0, 0, 0

*start
@if %2, <, %3, *hsc_skip
@int %3, =, %2
*hsc_skip
@str %12, =, "HI-SCORE:"
@str %12, +, %3
@pos 0, 0
@mes %12
@pos 8, 96
@mes "[PRESS ENTER KEY]"
@pause 32
@int %0, =, 48
@int %1, =, 112
@int %2, =, 0

*main
@draw 0
@cls 0, 0, 0
@pos %0, %1
@mes "△"
@gosub *enemy_move
@gosub *shot_move
@gosub *put_score
@draw 1
@int %13, stick, 5
@if %13, &, 1, *move_left
@if %13, &, 4, *move_right
@if %13, &, 16, *shot
*move_back
@gosub *enemy
*enemy_back
@wait 5
@goto *main

*move_left
@if %0, <=, 0, *move_back
@int %0, -, 16
@goto *move_back

*move_right
@if %0, >=, 112, *move_back
@int %0, +, 16
@goto *move_back

*shot
@if %4, =, 1, *move_back
@int %4, =, 1
@int %5, =, %0
@int %6, =, %1
@goto *move_back

*shot_move
@if %4, =, 0, *sm_skip
@int %6, -, 16
@if %6, >=, 0, *so_skip
@int %4, =, 0
@return
*so_skip
@if %5, =, %8, *sh_check
@goto *sh_skip
*sh_check
@if %6, =>, %9, *sh_skip
@int %7, -, 1
@int %4, =, 0
@if %7, >, 0, *sh_skip
@int %2, +, %10
*sh_skip
@pos %5, %6
@mes "|"
*sm_skip
@return

*enemy
@if %7, >, 0, *enemy_skip
@int %7, rnd, 3
@int %7, +, 1
@int %10, =, %7
@int %10, *, 100
@int %8, rnd, 8
@int %8, *, 16
@int %9, =, 0
@int %11, =, 0
*enemy_skip
@return

*enemy_move
@if %7, =, 0, *em_skip
@int %11, +, 1
@if %11, <, 3, *eh_skip
@int %11, =, 0
@int %9, +, 16
@if %9, <, 128, *eo_skip
@int %7, =, 0
@return
*eo_skip
@if %0, =, %8, *eh_check
@goto *eh_skip
*eh_check
@if %1, !, %9, *eh_skip
@goto *restart
*eh_skip
@pos %8, %9
@mes "◎"
*em_skip
@return

*put_score
@pos 0, 0
@str %12, =, "SCORE:"
@str %12, +, %2
@mes %12
@return

*restart
@draw 1
@cls
@pos 32, 48
@mes "GAME OVER"
@goto *start

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2015年12月14日(月)18時46分8秒
 
皆さんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」を更新しました。

【更新内容】
ver1.0.4 ・パックファイルに対応(パックファイル作成ツールを同梱)

スクリプトファイル"start.txt"と画像ファイル、効果音ファイルを
1つのファイルにまとめるパックファイルに対応しました。
"start.txt"と画像ファイルは簡易暗号化処理されますので、ゲーム
を公開する時に便利です。

それでは、これからも「ぷちスク」をよろしくお願いします<(_ _)>

スクリプト投稿「トレジャールーム」
  投稿者:naya  投稿日:2015年12月12日(土)18時45分53秒
 
こんにちは。
カーソルキーで移動して財宝を見つけるゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@int %0, =, 5
@int %3, rnd, 6
@int %4, rnd, 6

*main
@gosub *drawmap
*keyloop
@int %5, stick, 0
@if %5, =, 1, *move_left
@if %5, =, 2, *move_up
@if %5, =, 4, *move_right
@if %5, =, 8, *move_down
@wait 5
@goto *keyloop
*move_back
@gosub *drawmap
@if %1, !, %3, *check_skip
@if %2, !, %4, *check_skip
@goto *gameclear
*check_skip
@int %6, rnd, 4
@if %6, =, 0, *trap
@goto *main

*drawmap
@draw 0
@cls 0, 0, 0
@color 255, 255, 255
@pos 0, 0
@str %5, =, "LIFE="
@str %5, +, %0
@mes %5
@int %6, =, 0
@int %7, =, 16
*putloop
@pos %6, %7
@mes "□"
@int %6, +, 16
@if %6, <, 96, *putloop
@int %6, =, 0
@int %7, +, 16
@if %7, <, 112, *putloop
@int %8, =, %1
@int %8, *, 16
@int %9, =, %2
@int %9, *, 16
@int %9, +, 16
@pos %8, %9
@mes "●"
@draw 1
@return

*move_left
@if %1, =, 0, *main
@int %1, -, 1
@goto *move_back

*move_up
@if %2, =, 0, *main
@int %2, -, 1
@goto *move_back

*move_right
@if %1, =, 5, *main
@int %1, +, 1
@goto *move_back

*move_down
@if %2, =, 5, *main
@int %2, +, 1
@goto *move_back

*trap
@color 255, 0, 0
@pos 0, 112
@mes "罠だ!!"
@wait 50
@int %0 , -, 1
@if %0, !, 0, *main
@str %5, =, ".GAME.OVER.."
@goto *gameend

*gameclear
@color 255, 255, 0
@str %5, =, "あなたは財宝を発見しました。"
@goto *gameend

*gameend
@cls
@mes %5
@mes "キーを押すと終了します。"
@pause
@end

初心者向けぷちスク講座公開のお知らせ
  投稿者:naya  投稿日:2015年12月10日(木)18時37分14秒
 
皆さんこんにちは。管理人のnayaです。
nayaらぼサイトにて初心者向けのぷちスク講座を公開しています。
ゲームプログラミングが初めてという方は是非ご覧になってください。

それでは、これからもぷちスク(ぷちゲースクリプト)をよろしくお願いします。

スクリプト投稿「ClickMan -Returns-」
  投稿者:naya  投稿日:2015年12月 8日(火)19時35分24秒
 
こんにちは。
ClickManの続編です。ゲーム性が少しだけアップしています。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 0, 255, 0
@int %0, =, 0

*main
@int %1, rnd, 288
@int %2, rnd, 208
@int %3, =, %1
@int %3, +, 31
@int %4, =, %2
@int %4, +, 31
@int %5, =, 0
@draw 0
@cls 0, 0, 0
@pos %1, %2
@font 2, 32, 0
@mes "■"
@font 2, 16, 0
@str %8, =, "SCORE:"
@str %8, +, %0
@pos 0, 0
@mes %8
@if %6, <, 2, *combo_skip
@pos 224, 0
@str %8, =, %6
@str %8, +, "COMBO!"
@mes %8
*combo_skip
@draw 1
*mouseloop
@int %9, mousex
@int %10, mousey
@int %11, stick
@if %9, <, %1, *mouseover
@if %10, <, %2, *mouseover
@if %9, >, %3, *mouseover
@if %10, >, %4, *mouseover
@if %11, and, 256, *hit
*mouseover
@wait 10
@int %5, +, 1
@if %5, <, 10, *mouseloop
@int %6, =, 0
@goto *main

*hit
@int %6, +, 1
@int %7, =, %6
@int %7, *, 10
@int %0, +, %7
@goto *main

スクリプト投稿「対戦型ボクシング」
  投稿者:naya  投稿日:2015年12月 6日(日)13時22分18秒
 
こんにちは。
昔あったオモチャのような対戦型のボクシングゲームです。
プレイヤー1は[スペース]キー、2は[↑]キーでパンチします。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 0, 0, 0
@int %0, =, 0
@int %1, =, 0
@int %3, =, 0
@int %4, =, 0

*start
@str %5, =, "(  o)  "
@str %6, =, "  (o  )"
@gosub *put_scr
@mes "FIGHT!!"
@wait 50

*main
@str %5, =, "(  o)  "
@str %6, =, "  (o  )"
@int %2, stick, 0
@if %2, &, 16, *p1_punch
@int %3, -, 1
@if %3, >=, 0, *p1_punch_back
@int %3, =, 0
*p1_punch_back
@if %2, &, 2, *p2_punch
@int %4, -, 1
@if %4, >=, 0, *p2_punch_back
@int %4, =, 0
*p2_punch_back
@gosub *put_scr
@wait 4
@goto *main

*put_scr
@draw 0
@cls 255, 255, 255
@color 0, 0, 255
@pos 32, 0
@mes %5
@color 255, 0, 0
@pos 88, 0
@mes %6
@color 0, 0, 0
@pos 0, 16
@draw 1
@return

*p1_punch
@str %5, =, "(  o)=o"
@int %3, +, 10
@if %3, <, 30, *p1_punch_back
@int %3, =, 0
@int %0, rnd, 5
@if %0, =, 0, *p1_win
@goto *p1_punch_back

*p2_punch
@str %6, =, "o=(o  )"
@int %4, +, 10
@if %4, <, 30, *p2_punch_back
@int %4, =, 0
@int %1, rnd, 5
@if %1, =, 0, *p2_win
@goto *p2_punch_back

*p1_win
@str %5, =, "(  o)=o"
@str %6, =, "  (x  )"
@gosub *put_scr
@mes "PLAYER1 WIN"
@goto *restart

*p2_win
@str %5, =, "(  x)  "
@str %6, =, "o=(o  )"
@gosub *put_scr
@mes "PLAYER2 WIN"

*restart
@mes "[Enter]キーでもう一度"
@pause 32
@goto *start

「ぷちゲースクリプト」更新のお知らせ
  投稿者:naya  投稿日:2015年12月 4日(金)19時43分20秒
 
皆さんこんにちは。管理人のnayaです。
「ぷちゲースクリプト」をver1.0.2に更新しました。

【更新内容】
ver1.0.2 ・@sel命令、@selmode命令の追加

選択肢を表示して選択後にラベルへ移動する命令を追加しました。
これで簡単にアドベンチャーゲームを作ることができると思います。

それでは、これからも「ぷちゲースクリプト」をよろしくお願いします<(_ _)>

スクリプト投稿「進撃の冒険者」
  投稿者:naya  投稿日:2015年12月 3日(木)18時35分13秒
 
こんにちは。
運まかせのシンプルなRPG風ゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255

*start
@int %0, = , 0
@int %1, = , 20

*main
@gosub *put_status
@mes "キーを押すと前に進みます。"
@pause
@int %0, +, 1
@if %0, >, 20, *game_clear
@int %2, rnd, 6
@int %2, +, 1
@if %2, !, 6, *heal_skip
@int %1, =, 20
@gosub *put_status
@mes "HPが回復した。"
@pause
*heal_skip
@if %2, <, 3, *damage_skip
@int %3, rnd, 6
@int %3, +, 1
@int %1, -, %3
@if %1, >=, 0, *safe_skip
@int %1, =, 0
*safe_skip
@gosub *put_status
@mes "モンスターと遭遇して"
@mes "ダメージを受けた!"
@pause
*damage_skip
@if %1, <, 1, *game_over
@wait 5
@goto *main

*put_status
@str %10, =, "歩いた距離="
@str %10, +, %0
@str %11, =, "HP="
@str %11, +, %1
@cls 0, 0, 0
@mes %10
@mes %11
@return

*game_clear
@str %3, =, "目的地にたどり着きました!"
@goto *quit

*game_over
@str %3, =, "ゲームオーバー"

*quit
@cls
@mes %3
@mes "キーを押すと終了します。"
@wait 20
@pause
@end

スクリプト投稿「ゾンビバスター」
  投稿者:naya  投稿日:2015年11月30日(月)18時25分31秒
 
こんにちは。
増え続けるゾンビをスペースキーで倒すゲームです。
ゾンビの数が100体を超えるとゲームオーバーです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 0, 0
@cls 0, 0, 0

*start
@int %0, =, 1
@int %1, =, 0
@mes "[Enter]キーを押すと始まります。"
@pause 32

*main
@int %2, stick, 0
@if %2, =, 16, *shoot
@goto *shoot_skip
*shoot
@int %1, +, 1
@int %0, -, 1
@if %0, >, 0, *shoot_skip
@int %0, =, 0
*shoot_skip
@int %4, +, 1
@if %4, <, 10, *grow_skip
@int %4, =, 0
@int %2, rnd, 2
@int %2, +, 1
@int %0, +, %2
*grow_skip
@if %0, >, 100, *gameover
@draw 0
@cls 0, 0, 0
@str %3, =, "ゾンビの数="
@str %3, +, %0
@mes %3
@str %3, =, "倒したゾンビの数="
@str %3, +, %1
@mes %3
@draw 1
@wait 2
@goto *main

*gameover
@mes "GAME OVER"
@mes "[Enter]キーを押すと終了します。"
@wait 20
@pause 32
@end

スクリプト投稿「トゲトゲジャンプ」
  投稿者:naya  投稿日:2015年11月28日(土)18時44分14秒
 
こんにちは。
動く障害物を[↑]キーでジャンプして避けるゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255
@cls 0, 0, 0

*start
@int %0, =, 0
@int %1, =, 80
@int %2, =, 48
@int %3, =, -8
@int %4, =, 48
@int %5, =, 0
@mes "スペースキーを押してスタート"
@pause 16

*main
@draw 0
@cls 0, 0, 0
@pos 0, 48
@mes "____________________"
@pos %1, %2
@mes "O"
@pos 0, 0
@str %8, =, SCORE:
@str %8, +, %0
@mes %8
@pos %3, %4
@mes "*"
@draw 1
@int %5 , -, 1
@if %5, >, 0, *jump_back
@int %2, =, 48
@int %6, stick, 5
@if %6, =, 2, *jump
*jump_back
@if %7, =, 0, *hurdle
@if %7, =, 1, *hurdle_left
@if %7, =, 2, *hurdle_right
*hurdle
@int %7, rnd, 20
@if %7, !, 0, *hurdle_back
@int %7, rnd, 2
@int %7, +, 1
@int %3, =, 0
@if %7, =, 2, *hurdle_back
@int %3, =, 152
*hurdle_back
@int %0, +, 1
@wait 4
@goto *main

*jump
@int %5, =, 5
@int %2, -, 16
@goto *jump_back

*hurdle_left
@if %3, <, 0, *hurdle_over
@int %3, -, 8
@if %1, !, %3, *hurdle_back
@if %2, !, %4, *hurdle_back
@goto *gameover

*hurdle_right
@if %3, >, 144, *hurdle_over
@int %3, +, 8
@if %1, !, %3, *hurdle_back
@if %2, !, %4, *hurdle_back
@goto *gameover

*hurdle_over
@int %7, =, 0
@int %3, =, -8
@goto hurdle_back

*gameover
@cls
@mes "GAME OVER"
@str %8, =, SCORE:
@str %8, +, %0
@mes %8
@goto *start

スクリプト投稿「フラッシュ暗算」
  投稿者:naya  投稿日:2015年11月27日(金)19時04分48秒
 
こんにちは。
次々と表示される5つの数字の合計を答えるゲームです。
難易度を下げたいときは99の部分を9に変えてみてください。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 0, 255, 0
@cls 0, 0, 0

*init
@int %0, =, 0
@int %1, =, 0
@int %2, =, 0
@int %3, =, 0
@mes "キーを押すと始まります。"
@pause
@font 2, 32, 17

*main
@int %0, rnd, 99
@int %0, +, 1
@cls 0, 0, 0
@pos 144, 96
@mes %0
@wait 100
@int %1, +, %0
@int %2, +, 1
@if %2, >=, 5, *answer
@goto *main

*answer
@font 2, 16, 0
@cls 0, 0, 0
@mes "答えを入力してください。"
@input %3
@if %1, =, %3, *hit
@str %4, =, "不正解です。"
@goto *restart

*hit
@str %4, =, "正解です。"

*restart
@cls
@mes %4
@goto *init

スクリプトの動かし方
  投稿者:naya  投稿日:2015年11月26日(木)19時00分0秒
 
皆さんこんにちは。管理人のnayaです。
初心者の方のためにぷちゲースクリプトで掲示板の投稿スクリプト
を動かす方法をご紹介します。

1.nayaらぼサイトからぷちゲースクリプト1.0(pgs1_0.zip)を
  ダウンロードします。
2.ダウンロードしたファイルを解凍ソフトで解凍します。
3.解凍してできたフォルダの中にある"start.txt"をメモ帳などの
  テキストエディタで開きます。
4.ブラウザで掲示板のスクリプト部分を選択してから右クリック
  してメニューを開いて[コピー] をクリックします。
5.メモ帳で[編集] メニューの [すべて選択] をクリックしてから
  [編集] メニューの [貼り付け] をクリックします。
6.テキストが掲示板のスクリプトに置きかえられたのを確認して
  から[ファイル] メニューの [上書き保存] をクリックします。
7.メモ帳を終了して、"start.txt"と同じフォルダの"pgs1_0.exe"
  をダブルクリックして起動します。

以上でスクリプトを実行できます。それでは楽しんでくださいね(^o^)。

スクリプト投稿「アステロイドベルト」
  投稿者:naya  投稿日:2015年11月26日(木)18時29分19秒
 
こんにちは。
隕石を回避するゲームです。[↑]キーと[↓]キーを使用します。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255
@cls 0, 0, 0

*init
@int %0, =, 0
@int %1, =, 0
@int %3, =, 320
@int %4, rnd, 4
@int %4, *, 16
@mes "スペースキーを押してスタート"
@wait 20
@pause 16

*main
@int %2, stick
@if %2, =, 2, *move_up
@if %2, =, 8, *move_down
*move_back
@goto *meteor
*meteor_back
@draw 0
@cls 0, 0, 0
@pos 16, %0
@mes ">"
@pos %3, %4
@mes "◆"
@int %1, +, 1
@draw 1
@wait 3
@goto *main

*move_up
@if %0, =, 0, *move_back
@int %0, -, 16
@goto *move_back

*move_down
@if %0, =, 48, *move_back
@int %0, +, 16
@goto *move_back

*meteor
@int %3, -, 16
@if %3, >=, 0, *meteor_back
@if %0, =, %4, *gameover
@int %3, =, 320
@int %4, rnd, 4
@int %4, *, 16
@goto *meteor_back

*gameover
@cls 0, 0, 0
@mes "-GAME OVER-"
@str %5, =, "SCORE:"
@str %5, +, %1
@mes %5
@goto *init

スクリプト投稿「ガンマン」
  投稿者:naya  投稿日:2015年11月25日(水)20時13分1秒
 
こんにちは。
「撃て!」と表示された瞬間にスペースキーを押すゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255

*start
@int %0, rnd, 200
@int %0, +, 200
@int %1, =, 0
@int %2, =, 0
@cls 0, 0, 0
@mes "..."
*standby
@wait 1
@int %1, +, 1
@if %1, <, %0, *standby
@int %1, =, 0
@mes "撃て!"
@int %2, stick, 0
*fire
@wait 1
@int %2, stick, 0
@if %2, &, 16, *win
@int %1, +, 1
@if %1, >, 20, *lose
@goto *fire

*win
@str %3, =, "あなたの勝ち"
@goto *restart

*lose
@str %3, =, "あなたの負け"

*restart
@mes %3
@mes "キーを押してもう一度"
@wait 20
@pause
@goto *start

スクリプト投稿募集のお知らせ
  投稿者:naya  投稿日:2015年11月25日(水)19時49分22秒
 
皆さんこんにちは。管理人のnayaです。
当掲示板ではぷちゲースクリプト用のスクリプトの投稿を募集しています。

特に規定はありませんが、スクリプト(テキスト)のみで実行できるもので
掲示板の見やすさを考慮して、スクリプトのテキストサイズは2Kバイト程で
お願いします。

それでは、投稿お待ちしております。

スクリプト投稿「ClickMan」
  投稿者:naya  投稿日:2015年11月24日(火)19時29分50秒
 
こんにちは。
ただひたすらクリックするゲーム(^_^)です。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255

*init
@int %0, =, 0

*main
@str %1, =, "クリックした回数="
@str %1, +, %0

@cls 0, 0, 0
@pos 80, 96
@mes %1

@pause 256
@int %0, +, 1

@wait 1
@goto *main

スクリプト投稿「○×ゲーム」
  投稿者:naya  投稿日:2015年11月22日(日)17時57分9秒
 
こんにちは。
○か×かを当てるゲームです。
このスクリプトは自由に改造、使用していただいて構いません。

@font 2, 16, 0
@color 255, 255, 255

*start
@cls 0, 0, 0
@int %0, rnd, 2

@pos 0, 0
@mes "○か×を選んでください。"
@mes "○=0キー、×=1キー"

;キー入力チェック(キーコード[0]=48or96、[1]=49or97)
*keyloop
@int %1, key, 48
@int %2, key, 96
@int %1, or, %2
@if %1, =, 1, *maru
@int %1, key, 49
@int %2, key, 97
@int %1, or, %2
@if %1, =, 1, *batsu
@wait 2
@goto keyloop

*maru
@if %0, =, 0, *hit
@goto *miss

*batsu
@if %0, =, 1, *hit
@goto *miss

*hit
@mes "当たり!"
@goto *restart

*miss
@mes "ハズレ"

*restart
@mes "[Enter]キーを押してください。"
@pause
@goto *start

掲示板を設置しました。
  投稿者:naya  投稿日:2015年11月21日(土)02時31分19秒
 
皆さんこんにちは。管理人のnayaです。
nayaらぼサイト開設に合わせて掲示板を設置しましたので、
ぷちゲースクリプトの情報交換の場としてご利用ください。
もちろん、ぷちゲースクリプト以外の話題でも構いませんので、
楽しんで利用していただけると嬉しいです。

Copyright © 2015-2024 nayaらぼ(新), All Rights Reserved.