奇迹宝石的添加
一、在items.scp中添加下面代码
[item31023]
name=奇迹宝石
questscript=MemberInfo
description=
class=12
quality=5
startquest=30010//这里不能修改
reqlevel=1
quality=1
buyprice=1000000
bonding=4
classes=07FF
model=29691
level=1
races=0FF
stackable=1
maxcount=1
material=-1
pagetext=1
language=1
二、在pages.scp中添加下面代码
[page1]
text=<HTML>
text=<BODY>
text=<H1align="center">WelcometoWorldofDarkness</H1>
text=<BR/>
text=<IMGsrc="Interface\Cursor\GatherHerbs"align="left"/>
text=<IMGsrc="Interface\Cursor\GatherHerbs"align="right"/>
text=<Palign="center">Greetings,<BR/>$N</P>
text=<BR/>
text=<IMGsrc="Interface\WorldMap\WorldMap-Icon"align="right"/>
text=<Palign="left">WelcomeToourserver.<BR/>Wehopeyouenjoyithere.<BR/>IfyouwantTogetinTouch<BR/>withus,ThenJoinushere:</P>
text=<BR/>
text=<IMGsrc="Interface\Glues\CharacterCreate\UI-RotationRight-Big-Up"align="left"/>
text=<Palign="right">ROBBS:roworld.no-ip.info</P>
text=<Palign="right">roworld.xicp.net</P>
text=<BR/>
text=<BR/>
text=<Palign="left">NowhaveagoodTimeexploringand<BR/>experiencingWorldOfWarcraft<BR/>withyournew$r$c.</P>
text=<BR/>
text=<IMGsrc="Interface\TalentFrame\PaladinProtection-TopLeft"align="left"/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=<BR/>
text=</BODY>
text=</HTML>
text=
三、在quests.scp中添加下面代码
[quest30010]
name=帮助系统
levels=1255
reward_xp=0
desc=欢迎使用帮助系统
details=支持我们
zone=0
[quest30011]
name=〖随身出售〗
levels=00
reward_xp=0
zone=0
[quest30012]
name=〖随身银行〗
levels=00
reward_xp=0
zone=0
[quest30013]
name=〖记忆位置〗
levels=00
reward_xp=0
zone=0
[quest30014]
name=〖传送服务〗
levels=00
reward_xp=0
zone=0
[quest30015]
name=〖游戏好友〗
levels=00
reward_xp=0
zone=0
[quest30016]
name=〖卡号自救〗
levels=00
reward_xp=0
zone=0
[quest30017]
name=〖使用说明〗
levels=00
reward_xp=0
zone=0
[quest30018]
name=〖原地复活〗
levels=00
reward_xp=0
zone=0
四、在creatures.scp中添加下面代码
[creature31023]//这里不能修改
name=随身NPC
questscript=MemberMan//这里不能修改
flags1=08480046
guild=玩家NPC
npcflags=04002
npctext0_0=你好，$N，玩家随身NPC。
qtgids0=50000
attack=191210.1
bounding_radius=0.208
civilian=1
combat_reach=2.21
damage=0.81.2
equipmodel=07439242133000
faction=35
level=10
loottemplate=54
maxhealth=334
maxmana=220
model=1287
money=12600
speed=0.96
type=7[/post]
namespaceevalMemberInfo{}
procMemberInfo::QueryQuest{objplayerquestid}{
SendQuestsList$player$obj3001130012300133001430015300163001730018
}
procMemberInfo::QuestSelect{objplayerquestid}{
SendGossipComplete$player
switch$questid{
30011{setguaid[GetSelection$player]
if{[GetSelection$player]=="0"}{SendGossip$player$obj{npctext1}{text0"请选择一个怪物,尸体或npc,距离必须4码以内才能使用随身银行!!";return
}}
if{[GetSelection$player]!="0"}{VendorList$player$guaid}}
30012{setguaid[GetSelection$player]
if{[GetSelection$player]=="0"}{SendGossip$player$obj{npctext1}{text0"请选择一个怪物,尸体或npc,距离必须4码以内才能使用随身银行!!";return
}}
if{[GetSelection$player]!="0"}{BankerList$player$guaid}}
30013{SetBindpoint$player;SendGossip$player$obj{npctext1}{text7"恭喜你，位置记忆成功.?返回主菜单..."}}
30014{
MemberMan::QuestHello$obj$player}
30015{SendGossip$player$obj{npctext1}{text0"暂不开放"}}
30016{setss[GetBindpoint$player]
setmap[lindex$ss0]
setx[lindex$ss1]
sety[lindex$ss2]
setz[lindex$ss3]
Teleport$player$map$x$y$z}
30017{setfiles"ARK/Memberhelp.txt";if{[fileexists$files]==1}{HelpInfo::readfile$player$obj$files}}
30018{Resurrect$player}
default{SendGossip$player$obj{npctext1}{text0"building..."}
}
}
}
procMemberInfo::GossipSelect{objplayeroption}{
Say$player0"\nMemberInfo::GossipSelect"
}
procMemberInfo::QuestAccept{objplayerquestid}{
#Say$player0"\nMemberInfo::QuestAccept"
}
procMemberInfo::QuestChooseReward{objplayerquestidchoose}{
Say$player0"\nMemberInfo::QuestChooseReward"
}
procMemberInfo::QuestHello{objplayer}{
Say$player0"\nMemberInfo::QuestHello"
}
procMemberInfo::OnOpen{objplayerlootid}{
Say$player0"\nMemberInfo::OnOpen"
}
;#-=-=-=-=-=-=-=-=-=-=-=-=-
;
namespaceevalMemberMan{}
procMemberMan::QuestStatus{objplayer}{setreply7;return$reply}
procMemberMan::GossipHello{objplayer}{MemberMan::QuestHello$obj$player}
procMemberMan::QuestHello{objplayer}{
Point::pointset$playerMemberMan"MainMenu"
SendSwitchGossip$player$obj1
SendGossip$player$obj{npctext1}\
{text1"------------------"}\
{text1"城市传送"}\
{text3"副本传送1"}\
{text3"副本传送2"}\
{text3"副本传送3"}\
{text3"副本传送4"}\
{text2"战场传送"}\
{text1"------------------"}\
{text7"请把我的炉石绑定在这里!?"}\
{text7"请帮我激活所有的飞行点!?"}
}
procMemberMan::GossipSelect{objplayeroption}{
SendSwitchGossip$player$obj1
setmenu[Point::pointread$playerMemberMan]
switch$menu{
"MainMenu"{switch$option{
1{
Say$obj0"欢迎使用玩家帮助系统——传送NPC,请问您要去哪个城市？"
Point::pointset$playerMemberMan"Teleport"
SendSwitchGossip$player$obj1
SendGossip$player$obj{npctext1}\
{text0"返回主菜单..."}\
{text5"1传送到暴风城---1金"}\
{text5"2传送到铁炉堡---1金"}\
{text5"3传送到达纳苏斯---1金"}\
{text5"4传送到奥格瑞玛---1金"}\
{text5"5传送到雷霆崖---1金"}\
{text5"6传送到幽暗城---1金"}\
{text5"7传送到棘齿城---1金"}\
{text5"8传送到藏宝海湾---1金"}
Emote$obj$player163
}