|
- #module \
- Goatoh
-
- #defcfunc local \
- New \
- double p_initPosX,\
- double p_initPosY,\
- int p_initDirection
- posX.insNum = p_initPosX
- posY.insNum = p_initPosY
-
- scale.insNum = 2.
-
- ; 角度
- 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
- running.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 - scale.p_insId * 50, posY.p_insId + scale.p_insId * 26
- CelPut BUFFER_GOATOH_LEG, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId + scale.p_insId * 30, posY.p_insId + scale.p_insId * 26
- CelPut BUFFER_GOATOH_LEG, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId + scale.p_insId * 64, posY.p_insId - scale.p_insId * 12
- CelPut BUFFER_GOATOH_TAIL, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId, posY.p_insId
- CelPut BUFFER_GOATOH_TARSO, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId - scale.p_insId * 30, posY.p_insId + scale.p_insId * 30
- CelPut BUFFER_GOATOH_LEG, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId + scale.p_insId * 50, posY.p_insId + scale.p_insId * 30
- CelPut BUFFER_GOATOH_LEG, 0, scale.p_insId, scale.p_insId
-
- Pos posX.p_insId - scale.p_insId * 64, posY.p_insId - scale.p_insId * 20
- CelPut BUFFER_GOATOH_HEAD, 0, scale.p_insId, scale.p_insId, neckArg.p_insId
-
- Pos posX.p_insId - scale.p_insId * 64, posY.p_insId - scale.p_insId * 20
- CelPut BUFFER_GOATOH_FACE_CC, 0, scale.p_insId, scale.p_insId, neckArg.p_insId
-
- Interval@Goatoh p_insId
-
- Return
-
- #deffunc local \
- Interval \
- int p_insId
- If walking.p_insId {
- Walk@Goatoh p_insId
-
- If frame.p_insId \ 150 == 30 {
- MMPlay SOUND_MUMUMUMU
- }
- }
- Else: If running.p_insId {
- DoRun@Goatoh p_insId
- }
-
- If eating.p_insId {
- Eat@Goatoh p_insId
- }
-
- frame.p_insId++
-
- Return
-
- #global
|
