|
|
@@ -1,40 +1,69 @@ |
|
|
|
#include "hsp3dish.as" |
|
|
|
|
|
|
|
; バッファ |
|
|
|
#enum global BUFFER_GOATOH = 1 |
|
|
|
#enum global BUFFER_NIZIKA |
|
|
|
#enum global BUFFER_KUSA |
|
|
|
#enum global BUFFER_GOATOH_FACE_CC = 1 ; ゴートうの顔(閉眼,閉口) |
|
|
|
#enum global BUFFER_GOATOH_FACE_CO ; (閉眼,開口) |
|
|
|
#enum global BUFFER_GOATOH_FACE_OC ; (開眼,閉口) |
|
|
|
#enum global BUFFER_GOATOH_FACE_OO ; (開眼,開口) |
|
|
|
#enum global BUFFER_GOATOH_HEAD ; ゴートうの頭 |
|
|
|
#enum global BUFFER_GOATOH_LEG ; ゴートうの脚 |
|
|
|
#enum global BUFFER_GOATOH_TAIL ; ゴートうのしっぽ |
|
|
|
#enum global BUFFER_GOATOH_TARSO ; ゴートうの胴体 |
|
|
|
#enum global BUFFER_NIZIKA ; ニジカ |
|
|
|
#enum global BUFFER_BG ; https://www.pakutaso.com/20190249044post-18819.html |
|
|
|
|
|
|
|
; サウンド |
|
|
|
#enum global SOUND_MUMUMUMU = 0 ; ムムムム |
|
|
|
#enum global SOUND_BGM ; 夕餉の街並み(Copyright: Musmus) |
|
|
|
#enum global SOUND_EATING_KUSA ; クサタベテル!!! |
|
|
|
|
|
|
|
; 向き |
|
|
|
#enum global DIRECTION_LEFT = 1 |
|
|
|
#enum global DIRECTION_RIGHT |
|
|
|
|
|
|
|
#const global FPS 30 |
|
|
|
#const global LOOP_INTERVAL 1000 / FPS |
|
|
|
|
|
|
|
#include "./modules/goatoh.mod.hsp" |
|
|
|
|
|
|
|
|
|
|
|
#ifdef _DEBUG |
|
|
|
MmLoad "assets/mumumumu.wav", SOUND_MUMUMUMU |
|
|
|
MmLoad "assets/MusMus-BGM-097.mp3", SOUND_BGM, MM_REPEAT |
|
|
|
MmLoad "assets/eating-kusa.wav", SOUND_EATING_KUSA |
|
|
|
#else ; not _DEBUG |
|
|
|
MmLoad "mumumumu.wav", SOUND_MUMUMUMU |
|
|
|
MmLoad "MusMus-BGM-097.mp3", SOUND_BGM, MM_REPEAT |
|
|
|
MmLoad "eating-kusa.wav", SOUND_EATING_KUSA |
|
|
|
; デバッグ時は assets ディレクトリを参照する. |
|
|
|
ChDir "assets" |
|
|
|
#endif ; not _DEBUG |
|
|
|
|
|
|
|
; 背景 |
|
|
|
CelLoad "bg.jpg", BUFFER_BG |
|
|
|
|
|
|
|
; ゴートうバッファ |
|
|
|
CelLoad "goatoh-face-closed-closed.png", BUFFER_GOATOH_FACE_CC |
|
|
|
CelLoad "goatoh-face-closed-open.png", BUFFER_GOATOH_FACE_CO |
|
|
|
CelLoad "goatoh-face-open-closed.png", BUFFER_GOATOH_FACE_OC |
|
|
|
CelLoad "goatoh-face-open-open.png", BUFFER_GOATOH_FACE_OO |
|
|
|
CelLoad "goatoh-head.png", BUFFER_GOATOH_HEAD |
|
|
|
CelLoad "goatoh-leg.png", BUFFER_GOATOH_LEG |
|
|
|
CelLoad "goatoh-tail.png", BUFFER_GOATOH_TAIL |
|
|
|
CelLoad "goatoh-tarso.png", BUFFER_GOATOH_TARSO |
|
|
|
|
|
|
|
; ゴートうインスタンス生成 |
|
|
|
Goatoh = New@Goatoh (0., 0., DIRECTION_LEFT) |
|
|
|
|
|
|
|
; サウンド読込み |
|
|
|
MMLoad "mumumumu.wav", SOUND_MUMUMUMU |
|
|
|
MMLoad "MusMus-BGM-097.mp3", SOUND_BGM, MM_REPEAT |
|
|
|
MMLoad "eating-kusa.wav", SOUND_EATING_KUSA |
|
|
|
|
|
|
|
; BGM 再生 |
|
|
|
MmPlay SOUND_BGM |
|
|
|
MMPlay SOUND_BGM |
|
|
|
|
|
|
|
GMode GMODE_RGB0 ; アルファあり |
|
|
|
|
|
|
|
Repeat |
|
|
|
ReDraw False |
|
|
|
Color 255, 255, 255 |
|
|
|
BoxF |
|
|
|
|
|
|
|
Pos 0, 0 |
|
|
|
Color 0, 0, 0 |
|
|
|
Print "Hello, world!!" |
|
|
|
CelPut BUFFER_BG |
|
|
|
|
|
|
|
Draw@Goatoh Goatoh |
|
|
|
ReDraw True |
|
|
|
|
|
|
|
Await LOOP_INTERVAL |
|
|
|