Administrateur
Hokage
Nombre de messages : 544
Age : 33
Date d'inscription : 30/03/2007
 | Sujet: Script : Dragon wings (quete)  Dim 30 Aoû - 11:21 | |
| Bonjour a tous, J'ai pris la décision de vous délivrez un script par semaine de mon ancien serveur, des scripts que j'ai moi même confectionné, c'est pourquoi chaque dimanche je vous invite a partagé mes créations et pourquoi pas, les votres aussi  La derniere fois c'etait les annonceurs cette fois j'ai préféré donner une petite quete, meme si cela n'est pas grand chose, c'est tout de même embetant de faire des quetes (je parle en connaissance de cause et certain administrateur me comprendront  ). Merci encore une fois de laisser les 3ère lignes ^^ : - Code:
-
//==================Dragon wings================
// Par Boudignot Mickael pour Apocalypse
// http://apocalypses.free.fr
izlude_in.gat,128,57,3 script Dragon wings 939,{
mes "[Dragon wings]";
mes "Salut, tu es la pour la quête de les ^CC0033 Dragon wings ^000000 je presume!";
next;
menu "Item Requis.",L_REQUIS,"Fair l'item.",L_CREE,"Heu non sa ira...",L_EXIT;
L_REQUIS:
mes "[Dragon wings]";
mes "Tu devra ,pour cette quette me raporter les items suivant";
mes "^CC6633 100 Dentures from Dragon Mask ^000000";
mes "^CC6633 20 Dragons Horn ^000000";
mes "^CC6633 5 Dragons Scale ^000000";
mes "^CC6633 20 Emperiums ^000000";
mes "^CC6633 5 000 000 ^000000";
next;
menu "Je vais les chercher.",Acc,"Non ,c'est trop dur...",EXIT;
Acc:
mes "[Dragon wings]";
mes "Tres bien, Bonne chance!";
close;
EXIT:
mes "[Dragon wings]";
mes "C'est bien dommage, une prochaine fois peut-etre.";
mes "A bientot!";
close;
L_CREE:
mes "[Dragon wings]";
mes "As-tu tout les items ,je regarde !";
if(countitem(7266)<100)goto NoMake;
if(countitem(7265)<20)goto NoMake;
if(countitem(1036)<5)goto NoMake;
if(countitem(714)<20)goto NoMake;
if(Zeny<5000000) goto Nozeny;
next;
mes "[Dragon wings]";
mes "Laisse moi quelques secondes..";
delitem 7266, 100;
delitem 7265, 20;
delitem 1036, 5;
delitem 1036, 20;
set Zeny,Zeny-5000000;
getitem 8013, 1; // <-- A modifier
mes "[Dragon wings]";
mes "Voila ton hat j'espere qu'il te plairas !";
close;
NoMake:
next;
mes "[Dragon wings]";
mes "Je suis desole mais tu n'as pas tous les items.";
mes "Reviens quand tu les auras tous !";
close;
Nozeny:
mes "[Dragon wings]";
mes "Désolé mais tu n'as pas assez de Zenys.";
mes "Reviens quans tu les auras.";
close;
L_EXIT:
mes "[Dragon wings]";
mes "Ha ,j'espere quand meme que tu reviendras me voir!";
mes "A bientot!";
close;
} Si vous voulez changer l'objet a donner, ou si l'id ne correspond pas, vous devez modifier le "getitem 8013, 1;" et mettez à la place de 8013 votre item que vous désirez donner. Voila c'est tout pour le moment...  | |
|
arkimonde
Chuunin
Nombre de messages : 144
Age : 28
Date d'inscription : 24/06/2008
| | Sujet: Re: Script : Dragon wings (quete) Lun 31 Aoû - 0:08 | |
| tu peux nous donner litem aussi? | |
|
