scene1.txt

大型3D游戏设计制作详析及源代码对于想了解游戏设计的程序来说

; －－－－－－－－－－－－－－－－－－－－
PROC 42
; 厨房进入客厅
CLOSEINPUTS
DISABLEACTOR 牛二
DISABLEACTOR 厨师
FADEOUT
LOADSCENE 客厅 客厅mask 3
FADEIN
ACTIVEACTOR 牛二 188 270 1
SHIFTACTOR 牛二 MID
OPENINPUTS
GOTO hall
END
; －－－－－－－－－－－－－－－－－－－－
PROC 25
; 客厅到地下室入口
CLOSEINPUTS
SET_ANGEL 22.0 31.0
DISABLEACTOR 牛二
FADEOUT
LOADSCENE 地道入口 地道入口mask 5
FADEIN
ACTIVEACTOR 牛二 240 450 2
SHIFTACTOR 牛二 BIG
OPENINPUTS
END
; －－－－－－－－－－－－－－－－－－－－
PROC 52
; 地下室入口进入客厅
CLOSEINPUTS
SET_ANGEL 29.5 21.0
DISABLEACTOR 牛二
FADEOUT
LOADSCENE 客厅 客厅mask 3
FADEIN
ACTIVEACTOR 牛二 640 340 0
SHIFTACTOR 牛二 MID
OPENINPUTS
GOTO hall
END
; －－－－－－－－－－－－－－－－－－－－
PROC 312
; 地下室入口进入地下室5
STOPMUSIC
FADEOUT
DISABLEACTOR 牛二
LOADSCENE 地下室5 blankmask 6
FADEIN
LOADMUSIC dixiashi.mp3
PLAYMUSIC
ACTIVEACTOR 虫老大 184 319 0
ENABLE_AUTO_ATTACK 虫老大
WAYPOINT 虫老大 (50,460) (184,319) LOOP
ACTIVEACTOR 虫老二 580 359 0
ENABLE_AUTO_ATTACK 虫老二
WAYPOINT 虫老二 (221,476) (580,359) LOOP
ACTIVEACTOR 牛二 209 144 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 65
; 地下室5回到入口房间
DISABLEACTOR 虫老大
DISABLEACTOR 虫老二
STOPMUSIC
FADEOUT
LOADSCENE 地道入口 地道入口mask 5
FADEIN
LOADMUSIC simple3.mp3
PLAYMUSIC
ACTIVEACTOR 牛二 581 259 0
SHIFTACTOR 牛二 BIG
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC 67
; 地下室5到地下室6
DISABLEACTOR 牛二
DISABLEACTOR 虫老大
DISABLEACTOR 虫老二
FADEOUT
LOADSCENE 地下室6 blankmask 7
FADEIN
ACTIVEACTOR 虫老五 551 327 0
ENABLE_AUTO_ATTACK 虫老五
WAYPOINT 虫老五 (119,342) (551,327) LOOP
ACTIVEACTOR 牛二 100 307 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 76
; 地下室6到地下室5
CLOSEINPUTS
DISABLEACTOR 虫老五
DISABLEACTOR 牛二
FADEOUT
LOADSCENE 地下室5 blankmask 6
FADEIN
ACTIVEACTOR 虫老大 44 188 0
ENABLE_AUTO_ATTACK 虫老大
WAYPOINT 虫老大 (182,247) (69,172) LOOP
ACTIVEACTOR 虫老二 184 319 0
ENABLE_AUTO_ATTACK 虫老二
WAYPOINT 虫老二 (50,460) (184,319) LOOP
ACTIVEACTOR 牛二 605 347 0
SHIFTACTOR 牛二 MID
OPENINPUTS
END
; －－－－－－－－－－－－－－－－－－－－
PROC 78
; 地下室6到地下室7
DISABLEACTOR 牛二
DISABLEACTOR 虫老五
FADEOUT
LOADSCENE 地下室7 blankmask 8
FADEIN
ACTIVEACTOR 虫阿三 551 327 0
ENABLE_AUTO_ATTACK 虫阿三
WAYPOINT 虫阿三 (738,210) (241,380) LOOP
ACTIVEACTOR 牛二 334 299 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 87
; 地下室7到地下室6
DISABLEACTOR 牛二
DISABLEACTOR 虫阿三
FADEOUT
LOADSCENE 地下室6 blankmask 7
FADEIN
ACTIVEACTOR 虫老五 551 327 0
ENABLE_AUTO_ATTACK 虫老五
WAYPOINT 虫老五 (119,342) (551,327) LOOP
ACTIVEACTOR 牛二 640 339 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 89
; 地下室7到地下室8
DISABLEACTOR 牛二
DISABLEACTOR 虫阿三
FADEOUT
LOADSCENE 地下室8 blankmask 9
FADEIN
ACTIVEACTOR 虎头怪 722 384 0
ENABLE_AUTO_ATTACK 虎头怪
ACTIVEACTOR 牛二 491 137 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 98
; 地下室8到地下室7
DISABLEACTOR 牛二
DISABLEACTOR 虎头怪
FADEOUT
LOADSCENE 地下室7 blankmask 8
FADEIN
ACTIVEACTOR 虫阿三 551 327 0
ENABLE_AUTO_ATTACK 虫阿三
WAYPOINT 虫阿三 (738,210) (241,380) LOOP
ACTIVEACTOR 牛二 744 230 0
SHIFTACTOR 牛二 MID
END
; －－－－－－－－－－－－－－－－－－－－
PROC 110
; 室外到柴房
CLOSEINPUTS
FADEOUT
DISABLEACTOR 栓柱
LOADSCENE 柴房 柴房mask 10
FADEIN
ACTIVEACTOR 牛二 214 453 0
SHIFTACTOR 牛二 BIG
WALKSPEED FAST
OPENINPUTS
END
; －－－－－－－－－－－－－－－－－－－－
PROC 101
; 柴房到室外
CLOSEINPUTS
FADEOUT
LOADSCENE garden gardenmask 1
FADEIN
ACTIVEACTOR 牛二 160 414 0
USERCONTROL 牛二
SHIFTACTOR 牛二 SMALL
OPENINPUTS
ACTIVEACTOR 栓柱 380 350 2
WALKSPEED SLOW
WAYPOINT 栓柱 (430,166) (302,198) (420,383) (80,486) LOOP
END
; －－－－－－－－－－－－－－－－－－－－
PROC 7
IF 牛二.生命力 >= 3 THEN NOOP ELSE SAY 老掌柜 管家 “咱家的祖传萝卜呢……</p>我找了好久都找不到。” ENDIF
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC 9
; 空事件，什么都不作
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_sz1
SAY %1 %2 <size=12>“你斗鸡欠俺的钱到底还不还了？我要告你爹去！”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_sz2
SAY %1 %2 <size=12>“你家老王好久没做佛跳墙了，那东西真好吃！你让他再做一</p>次吧。”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_sz3
SAY %1 %2 <size=12>“听说村东头王家的小丫头很漂亮啊，你见过没有？俺娘说要给</p>俺说亲去呢。”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_sz4
SAY %1 %2 <size=12>“牛二，听说你家新买了只斗鸡‘小强’，咱们啥时候斗斗看？”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_gj1
SAY %1 %2 <size=12>“少爷，您了解咱家地下室么？你以为咱家地下室是什么人都能</p>去的么？”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_gj2
SAY %1 %2 <size=12>“少爷，您的武功练的如何了？要不要老奴和你切磋切磋？”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_gj3
SAY %1 %2 <size=12>“少爷，您不能再一天到晚斗鸡啦……”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cz1
SAY %1 %2 <size=12>“(虫语)碌碌拉拉叽里咕噜呵呵哈哈……”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cz2
SAY %1 %2 <size=12>“今年过节不收礼，收礼只收脑白金……”
WAITKEY
SAY %2 %1 <size=12>“-_-bb</p>..............”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cz3
SAY %1 %2 <size=12>“俺家还有个远门亲戚在什么之江，叫求实虫，你见过没有？”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cs1
IF %2.装备 HAS <size=11>貌似一把普通的<color=255>菜刀</p><color=16777215>没什么特别的。 THEN GOTO talk_cs2 ELSE NOOP ENDIF
CLOSEINPUTS
SPEAK .\\speak\\z-1
SAY %1 %2 <size=12>“少爷，你可曾看见我的菜刀？”
WAITKEY
SPEAK  .\\speak\\z-2
SAY %2 %1 <size=12>“怎么，你当厨子的居然把吃饭家伙都给弄丢啦？”
WAITKEY
SPEAK  .\\speak\\z-3
SAY %1 %2 <size=12>“少爷，你就别奚落我了，还等着干活儿呢。你看给我这急的……”
WAITKEY
SPEAK  .\\speak\\z-4
SAY %2 %1 <size=12>“好了好了，我留个心，你先忙别的吧。”
WAITKEY
SHUTUP
OPENINPUTS
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cs2
LOST <size=11>貌似一把普通的<color=255>菜刀</p><color=16777215>没什么特别的。
CLOSEINPUTS
SPEAK .\\speak\\z-5
SAY %2 %1 <size=12>“给你，是不是这把？”
WAITKEY
SPEAK  .\\speak\\z-6
SAY %1 %2 <size=12>“少爷！这可是我家传菜刀，幸好！！5555555，我对你的崇拜如</p>滔滔江水…………555555555555”
WAITKEY
SPEAK  .\\speak\\z-7
SAY %2 %1 <size=12>“行了行了……”
WAITKEY
SPEAK  .\\speak\\z-8
SAY %1 %2 <size=12>“为了表达我对你的感激之情，这个拿去！”
WAITKEY
SHUTUP
CALL find_佛跳墙 CALLEND
SAY %1 %2 <size=12>“我这里还有我家祖传的一本书，俺也看不懂，少爷您拿去看看吧。”
WAITKEY
SHUTUP
LEARN 牛二 杀猪刀法 生命力 -48
WAITKEY
LEARNEND
ACTOR_NEXT_TALKING %1 talk_cs3
OPENINPUTS
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC talk_cs3
SAY %1 %2 <size=12>“少爷，您今天想吃点啥子？俺老黄给你做去。”
WAITKEY
SHUTUP
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC 300
; 找到萝卜事件在地图上的关联脚本
CALL find_萝卜 CALLEND
NEXTEVENT 1
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC find_萝卜
FIND 萝卜 <size=12>丢在地上的<color=255>祖传胡萝卜</p><color=16777215>俺就想不通一个萝卜，</p>咋能这么多年不坏呢 生命力 10
WAITKEY
FINDCLOSE
RET 
END
; －－－－－－－－－－－－－－－－－－－－
PROC 301
; 找到仙酒事件在地图上的关联脚本
CALL find_仙酒 CALLEND
NEXTEVENT 1
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC find_仙酒
FIND 仙酒 <size=12>酒窖里找来的<color=255>仙酒</p><color=16777215>俺闻了闻就觉得浑身来</p>劲,肯定是好东西 魔法力 2
WAITKEY
FINDCLOSE
RET 
END
; －－－－－－－－－－－－－－－－－－－－
PROC 302
; 找到佛跳墙事件在地图上的关联脚本
CALL find_佛跳墙 CALLEND
NEXTEVENT 1
RET
END
; －－－－－－－－－－－－－－－－－－－－
PROC find_佛跳墙
FIND 佛跳墙 <size=10>厨子老黄做的<color=255>佛跳墙</p><color=16777215>老黄最擅长这道菜了就算你</p>真是佛恐怕也要狗急跳墙 生命力 200
WAITKEY
FINDCLOSE
RET 
END