Scripts » Warp NPC in Lua(C++ kommt noch)

#1 | Warp NPC in Lua(C++ kommt noch) datum

05.10.2008 18:22 (zuletzt bearbeitet: 05.10.2008 18:25)

Ich poste hier mal einen Warper der zu den aktuellen ARCemu Revs passt:

function NPC_main_menu(pUnit, player)
pUnit:GossipCreateMenu(3543, player, 0)
pUnit:GossipMenuAddItem(0, "Porte mich", 0, 0)
pUnit:GossipSendMenu(player)
end

function NPC_on_gossip_talk(pUnit, event, player)
NPC_main_menu(pUnit, player)
end

function NPC_on_gossip_select(pUnit, event, player, id, intid, code)

if(intid == 0) then
pUnit:GossipCreateMenu(3543, player, 0)
pUnit:GossipMenuAddItem(2, "Sturmwind", 4, 0)
pUnit:GossipMenuAddItem(2, "Ironforge", 5, 0)
pUnit:GossipMenuAddItem(2, "Player Treff", 6, 0)
pUnit:GossipMenuAddItem(2, "Silvermoon", 7, 0)
pUnit:GossipMenuAddItem(2, "name", 8, 0)
pUnit:GossipMenuAddItem(2, "name", 9, 0)
pUnit:GossipMenuAddItem(2, "name", 10, 0)
pUnit:GossipMenuAddItem(2, "name", 11, 0)
pUnit:GossipSendMenu(player)
end

if(intid == 4) then
player:Teleport(0, -9005, 869, 29,621)
player:GossipComplete()
end

if(intid == 5) then
player:Teleport(0, -4981,25, -881,542, 502,66)
player:GossipComplete()
end

if(intid == 6) then
player:Teleport(566, 2281,72, 1761,27, 1189,7)
player:GossipComplete()
end

if(intid == 7) then
player:Teleport(530, 9400.486328, -7278.376953, 14.206780)
player:GossipComplete()
end

if(intid == 8) then
player:Teleport(, , , ) // Koordinate eintrage(ICHTIG Anstatt , einen Punkt in den coord setzen)
player:GossipComplete()
end

if(intid == 9) then
player:Teleport(0, -4981,25, -881,542, 502,66) // Koordinate eintrage(ICHTIG Anstatt , einen Punkt in den coord setzen)
player:GossipComplete()
end

if(intid == 10) then
player:Teleport(566, 2281,72, 1761,27, 1189,7) // Koordinate eintrage(ICHTIG Anstatt , einen Punkt in den coord setzen)
player:GossipComplete()
end

if(intid == 11) then
player:Teleport(530, 9400.486328, -7278.376953, 14.206780) // Koordinate eintrage(ICHTIG Anstatt , einen Punkt in den coord setzen)
player:GossipComplete()
end

end

RegisterUnitGossipEvent(NPC ID, 1, "NPC_on_gossip_talk")
RegisterUnitGossipEvent(NPC ID, 2, "NPC_on_gossip_select")

Antworten

#2 | RE: Warp NPC in Lua(C++ kommt noch) datum

05.10.2008 18:27

du klaust den npc von ac-web !!!

Antworten

#3 | RE: Warp NPC in Lua(C++ kommt noch) datum

10.10.2008 16:33

1.
Nein
2.
Wie kommst du darauf
3.
im gegensatz zu neidischen Personen hier ^ Kann ich Lua scripten. Und diese Person soll es besser machen!!
|

Antworten

#4 | RE: Warp NPC in Lua(C++ kommt noch) datum

10.10.2008 16:40

ACh ja
der von ac... sieht so aus

function On_Gossip(unit, event, player) <--- Fehler: bei neuen Cores kommt erst pUnit:GossipCreateMenu; 2. Es heißt bei sachen zum Player immer pUnit
unit:GossipCreateMenu(100, player, 0)
unit:GossipMenuAddItem(0,"Alliance Locations", 0, 0) <--- Der ersteller wusste nich das die zahl vor "Allainz Locations" das bild im Gossip Menu bestimmt
unit:GossipSendMenu(player)
end

function Gossip_Submenus(unit, event, player, id, intid, code) <--- Das coder is überflüssig da er es nich mal definiert hat
if(intid == 0) then
unit:GossipCreateMenu(101, player, 0)
unit:GossipMenuAddItem(0,"Darnasuss", 50, 0) <--- zu hohe intids führen zu Bugs
unit:GossipMenuAddItem(0,"Ironforge", 51, 0)
unit:GossipMenuAddItem(0,"Stormwind", 52, 0)
unit:GossipMenuAddItem(0,"Exodar", 53, 0)
unit:GossipSendMenu(player)
end
if(intid == 50) then
player:Teleport(1, 9985.907227, 1971.155640, 1326.815674)
end
if(intid == 51) then
player:Teleport(0, -5028.265137, -825.976563, 495.301575)
end
if(intid == 52) then
player:Teleport(0, -9100.480469, 406.950745, 92.594185)
end
if(intid == 53) then
player:Teleport(530, -4072.202393, -12014.337891, -1.277277)
end
<----------------- Functions ende nicht mit end deklariert

RegisterUnitGossipEvent(5, 1, "On_Gossip")
RegisterUnitGossipEvent(5, 2, "Gossip_Submenus")

Antworten

#5 | RE: Warp NPC in Lua(C++ kommt noch) datum

10.10.2008 16:51 (zuletzt bearbeitet: 10.10.2008 16:53)

Lua ist ja nur ne Kurzfrisige Lösung c++ ist besser ich habe alle NPC immer in C++ gemacht.
Zum Thema Script klauen damit nerven nur die nicht selber scripten können und sich nicht auskennen.

Hier mal ein NPC wie er bei mir zum Einsatz kommt. (das C++ kann mann als Basis benutzen ich habe viele case freigelassen für Erweiterungen)
Mach einen guten NPC draus der ist sauber aber speziel für unseren Server aber es ist eine gute Basis.

#include "StdAfx.h"
#include "Setup.h"

#ifdef WIN32
#pragma warning(disable:4305)
#endif

#define BACK_BUTTON

#ifdef BACK_BUTTON
#define SendQuickMenu(textid) objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), textid, Plr); \
Menu->SendTo(Plr);

#else

#define SendQuickMenu(textid) objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), textid, Plr); \
Menu->AddItem(0, "I was looking for something else.", 0); \
Menu->SendTo(Plr);

#endif

class SCRIPT_DECL WarpNPC3 : public GossipScript
{
public:
void Destroy()
{
delete this; }

void GossipHello(Object* pObject, Player * Plr, bool AutoSend)

{
GossipMenu *Menu;
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Allianz Staedte",2); // Meneu Alli Städte
Menu->AddItem(1,"Horde Staedte",4); // Meneu Horde Städte
Menu->AddItem(1,"Neutrale Orte",3); // Meneu Shattrath Städte
Menu->AddItem(1,"Levelgebiete",1); // Meneu LevelGebiete
Menu->AddItem(1,"Playertreffs",5); // Meneu Playertreff
if(AutoSend)
Menu->SendTo(Plr);
}
void GossipSelectOption(Object* pObject, Player* Plr, uint32 Id, uint32 IntId, const char * Code)
{
Creature * pCreature = (pObject->GetTypeId()==TYPEID_UNIT)?((Creature*)pObject):NULL;
GossipMenu * Menu;
switch(IntId)
{
case 0:
GossipHello(pObject, Plr, true);
break;
case 1: // Meneu Level Gebiete
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Allianz",7); // Meneu Allianz
Menu->AddItem(1,"Horde",8); // Meneu Horde
Menu->AddItem(1,"Umkaempft",9); // Meneu Umkämpft
Menu->SendTo(Plr);
break;
case 2: // Meneu Alli Städte
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Sturmwind",10); // Data
Menu->AddItem(1,"Eisenschmiede",11); // Data
Menu->AddItem(1,"Darnassus",12); // Data
Menu->AddItem(1,"Exodar",13); // Data
Menu->SendTo(Plr);
break;
case 3: // Meneu neutrale Orte
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Hoellenfeuerportal",15); // Data
Menu->AddItem(1,"Shattrath",16); // Data
Menu->AddItem(1,"Beutebucht",17); // Data
Menu->SendTo(Plr);
break;
case 4: // Meneu Horde Städte
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Unterstadt",20); // Data
Menu->AddItem(1,"Silbermond",21); // Data
Menu->AddItem(1,"Orgrimar",22); // Data
Menu->AddItem(1,"Donnerfels",23); // Data
Menu->SendTo(Plr);
break;
case 5: // Meneu Playertreffs
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Playertreff Nistgipfel",25); // Data
Menu->SendTo(Plr);
break;
case 7:
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Der Wald von Elwynn 1-10",35); // Data
Menu->AddItem(1,"Westfall 10-20",36); // Data
Menu->AddItem(1,"Huegelland 20-30",37); // Data
Menu->SendTo(Plr);
break;
case 8:
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Durotar 1-10",40); // Data
Menu->AddItem(1,"Das Brachland 10-2",41); // Data
Menu->AddItem(1,"Huegelland 20-30",42); // Data
Menu->SendTo(Plr);
break;
case 9:
objmgr.CreateGossipMenuForPlayer(&Menu, pObject->GetGUID(), 2593, Plr);
Menu->AddItem(1,"Schlingendorntal 30-45",45); // Data
Menu->AddItem(1,"Die verwuesteten Lande 45-55",46); // Data
Menu->AddItem(1,"Die oestlichen Pestlaender53-60",47); // Data
Menu->AddItem(1,"Zangarmarschen 60-64",48); // Data
Menu->AddItem(1,"Nagrand 64-67",49); // Data
Menu->AddItem(1,"Nethersturm 67-70",50); // Data
Menu->AddItem(1,"Krater von Azshara 70-100",51); // Data
Menu->SendTo(Plr);
break;
case 10:
Plr->SafeTeleport(0,0,-8971,559,94,0); //"Sturmwind"
break;
case 11:
Plr->SafeTeleport(0,0,-5048,-811,496,0); //"Eisenschmiede"
break;
case 12:
Plr->SafeTeleport(1,0,9945,2312,1337,0); //"Darnassus"
break;
case 13:
Plr->SafeTeleport(530,0,-4000,-11861,1,0); //"Exodar"
break;
case 15:
Plr->SafeTeleport(530,0,-248,940,85,0); // "Hoellenfeuerportal"
break;
case 16:
Plr->SafeTeleport(530,0,-1525,5313,9,0); // "Shattrath"
break;
case 17:
Plr->SafeTeleport(0,0,-14262,311,30,0); // "Beutebucht"
break;
case 20:
Plr->SafeTeleport(0,0,1887,219,59,0); // "Unterstadt"
break;
case 21:
Plr->SafeTeleport(530,0,9339,-7275,14,0); // "Silbermond"
break;
case 22:
Plr->SafeTeleport(1,0,1678,-4317,62,0); // "Orgrimar"
break;
case 23:
Plr->SafeTeleport(1,0,-1285,176,132,0); // "Donnerfels"
break;
case 25:
Plr->SafeTeleport(0,0,249,-2151,119,0); //"Playertreff Nistgipfel"
break;
case 35:
Plr->SafeTeleport(0,0,-9465,16,65,0); // "Der Wald von Elwynn 1-10"
break;
case 36:
Plr->SafeTeleport(0,40,-10631,1153,39,0); // "Westfall 10-20"
break;
case 37:
Plr->SafeTeleport(0,0,-852,-576,20,0); // "Hügelland 20-30"
break;
case 40:
Plr->SafeTeleport(1,0,341,-4684,30,0); // "Durotar 1-10"
break;
case 41:
Plr->SafeTeleport(1,0,-340,-1965,93,0); // "Das Brachland 10-25"
break;
case 42:
Plr->SafeTeleport(0,0,-28,-899,56,0); //"Hügelland 20-30"
break;
case 45:
Plr->SafeTeleport(0,0,-11616,-57,13,0); // "Schlingendorntal 30-45"
break;
case 46:
Plr->SafeTeleport(0,0,-11188,-2702,15,0); // "Die verwuesteten Lande 45-55"
break;
case 47:
Plr->SafeTeleport(0,0,3130,-3401,140,0); // "Die oestlichen Pestlaender53-60"
break;
case 48:
Plr->SafeTeleport(530,0,1587,8607,-32,0); // "Zangarmarschen 60-64"
break;
case 49:
Plr->SafeTeleport(530,0,-526,8440,48,0); // "Nagrand 64-67"
break;
case 50:
Plr->SafeTeleport(530,0,2323,2636,129,0); // "Nethersturm 67-70"
break;
case 51:
Plr->SafeTeleport(37,0,1073,-34,319,0); // "Krater von Azshara 70-100"
break;
}
}
};

void SetupWarpNPC3(ScriptMgr * mgr)
{
GossipScript * war = (GossipScript*) new WarpNPC3();
mgr->register_gossip_script(200501,war);
}

Antworten

#6 | RE: Warp NPC in Lua(C++ kommt noch) datum

10.10.2008 20:37 (zuletzt bearbeitet: 10.10.2008 20:45)

Wenn ihr das davor setzt können nur alli leute den Port benutzen:

if(Plr->getRace()== 11||Plr->getRace()== 3||Plr->getRace()== 7||Plr->getRace()== 1||Plr->getRace()== 4)

Mit diesem nur Horde Leutz:

if(Plr->getRace()== 10||Plr->getRace()== 2||Plr->getRace()== 6||Plr->getRace()== 8||Plr->getRace()== 5)

das ist ein Rassen check ob man die richtige hat
ganz nützlich

Würde dann so aussehen :

case 7: //Ogg
{

//Rassencheck
if(Plr->getRace()== 11||Plr->getRace()== 3||Plr->getRace()== 7||Plr->getRace()== 1||Plr->getRace()== 4)
{

//Teleport the player.
Plr->EventTeleport( 1, 1371.068970, -4370.801758, 26.052483);
}else{
pCreature->SendChatMessage(CHAT_MSG_MONSTER_SAY, LANG_UNIVERSAL, "Sorry, dazu hast du die falsche Rasse");
}
Plr->Gossip_Complete();
}break;

Ich halte Event Teleport für sicherer und bugfreier^^

Antworten

#7 | RE: Warp NPC in Lua(C++ kommt noch) datum

01.11.2008 00:29

ey Sry, ey könntest du mir nen NPC machen.

Der sollte so Funktionieren:

Wenn ein spieler hilfe braucht, das man dann drauf clicken kann : I whould talk to a GM, dann Teleportiert er sich zu GM insel oder sonst wo hin wo halt die GM's sind chillout zone oder so^^

Halt nen GM helper NPC oder sowas in der art ;)

Wir suchen noch Aktive Developer/Admins !

Server Website

Antworten

#8 | RE: Warp NPC in Lua(C++ kommt noch) datum

02.11.2008 15:06

jop MACH ICH

Antworten

#9 | RE: Warp NPC in Lua(C++ kommt noch) datum

05.12.2008 21:11

hi könntes mir auch einen machen bei 2.4.3 ^^
Ich würde dir dan die Worldports und so geben :D :D :D

Antworten

#10 | RE: Warp NPC in Lua(C++ kommt noch) datum

21.02.2010 12:46

hey, wie siehts eigl. aus wenn man Setup.cpp Setup.h und WarpNpc.cpp hat?

wie mach ich das als .dll ?

ich meine bei C++ ist das doch eine .dll datei der WarNpc oder?

Ich hab keine ahnung von C++ aber nen kumpel hat mir die 3 dateien gemacht und jetzt weiß ich damit nichts anzufangen ...

MfG,
DiZzE

Antworten

#11 | RE: Warp NPC in Lua(C++ kommt noch) datum

22.06.2013 10:08 (zuletzt bearbeitet: 22.06.2013 10:09)

jop MACH ICH

______________________________________________________________
WOW Gold|Wow Gold Kaufen|Diablo 3 Gold|Guild Wars 2 Gold

Antworten