いろいろ

2023-06-26 00:36:52 +09:00
parent e06b289df6
commit 15e6b994f8
4 changed files with 109 additions and 27 deletions
@@ -2,4 +2,6 @@
 /main.ax
 /main.cpp
 /obj
+/modules/obj
+/modules/hscl.ini

@@ -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
@@ -1,17 +1,68 @@
 #module \
-Goatoh	bufferId, posX, posY, walking, eating, openingEyes, frame
+Goatoh

-#modinit \
-		int	p_bufferId,\
+#defcfunc local \
+New \
 		double	p_initPosX,\
-		double	p_initPosY
-	bufferId = p_bufferId
-	posX = p_initPosX
-	posY = p_initPosY
-	walking = False
-	eating = False
-	openingEyes = False
-	frame = 0
+		double	p_initPosY,\
+		int	p_initDirection
+	posX.insNum = p_initPosX
+	posY.insNum = p_initPosY
+
+	; 角度
+	arg.insNum = 0.
+
+	; 首の角度
+	neckArg.insNum = 0.
+
+	walkVel.insNum = 3.
+	walkAcl.insNum = 0.
+
+	runVel.insNum = 5.
+	runVel.insNum = 0.
+
+	direction.insNum = p_initDirection
+
+	walking.insNum = False
+	eating.insNum = False
+	openingEyes.insNum = False
+	openingMouth.insNum = False
+
+	frame.insNum = 0
+
+	insNum++
+
+	Return insNum - 1
+
+#deffunc local \
+Walk \
+		int	p_insId
+	If direction.p_insId = DIRECTION_LEFT {
+		posX.p_insId -= walkVel.p_insId * Cos (arg.p_insId)
+		posY.p_insId -= walkVel.p_insId * Sin (arg.p_insId)
+	}
+	Else {
+		posX.p_insId += walkVel.p_insId * Cos (arg.p_insId)
+		posY.p_insId += walkVel.p_insId * Sin (arg.p_insId)
+	}
+
+	Return
+
+#deffunc local \
+DoRun \
+		int	p_insId
+	Return
+
+#deffunc local \
+Eat \
+		int	p_insId
+	Return
+
+#deffunc local \
+Draw \
+		int p_insId
+	Pos posX.p_insId, posY.p_insId
+	CelPut BUFFER_GOATOH_TARSO

 	Return