Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- exro,146,169,4 script exRO Armee 415,{
- set @npc$,"[ ^000088General Eisenhower^000000 ]";
- set @name$,"^0000FF" + strcharinfo(0) + ".^000000";
- if (soldat == 0){
- mes @npc$;
- mes "Hallo " + @name$;
- mes "Willkommen beim Rekrutierungsbüro";
- mes "der Midgard Befreiungsarmee.";
- mes "Ich bin hier der Oberbefehlshaber.";
- next;
- mes @nps$;
- mes "Es gibt bei uns 14 verschiedene";
- mes "Dienstgrade. Je nach Dienstgrad";
- mes "steigt dein Sold der dir täglich";
- mes "ausbezahlt wird.";
- next;
- mes @nps$;
- mes "Deinen Dienstgrad kannst du erhöhen";
- mes "indem du Monster erlegst und dafür";
- mes "Punkte erhälst. Pro Monster bekommst du einen Punkt.";
- next;
- mes @npc$;
- mes "Also " + @name$;
- mes "Bist du interessiert der Midgard";
- mes "Befreiungsarmee beizutreten?";
- menu "Ja !",l_ja,"Nein.",l_nein;
- } else {
- mes gettimestr("%y%m%d",21);
- set sold_isday,gettimestr("%y%m%d",21);
- if (sold_isday > sold_saveday){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Dein heutiger Sold: " + .sold[rang] + " Zeny";
- mes "Zusätzlich: " + .epoints[rang] + " Event Punkte.";
- dispbottom ""+.epoints[rang]+" Event Punkte erhalten!";
- set #EPOINTS,#EPOINTS+.epoints[rang];
- set zeny, zeny + .sold[rang];
- set sold_saveday,gettimestr("%y%m%d",21);
- close;
- } else {
- mes @npc$;
- mes "Guten Tag " + @name$;
- mes "Du hast deinen Sold heute bereits erhalten.";
- mes "Wie kann ich dir weiterhelfen?";
- next;
- menu "Mein Status",stat,"Ränge",bb,"Quest",STUFEN_QUEST;
- next;
- stat:
- mes @npc$;
- mes "Aktueller Rang: ^ff0000" + .rang$[rang] + "^000000";
- mes "Aktuelle Punktzahl: " + grad + " Punkte";
- if (grad >= 0 && grad <= 99) mes "Nächster Rang: bei 100 Punkte";
- if (grad >= 100 && grad <= 999) mes "Nächster Rang: bei 1.000 Punkte";
- if (grad >= 1000 && grad <= 1999) mes "Nächster Rang: bei 2.000 Punkte";
- if (grad >= 2000 && grad <= 4999) mes "Nächster Rang: bei 5.000 Punkte";
- if (grad >= 5000 && grad <= 19999) mes "Nächster Rang: bei 10.000 Punkte";
- if (grad >= 10000 && grad <= 29999) mes "Nächster Rang: bei 30.000 Punkte";
- if (grad >= 30000 && grad <= 59999) mes "Nächster Rang: bei 60.000 Punkte";
- if (grad >= 60000 && grad <= 119999) mes "Nächster Rang: bei 120.000 Punkte";
- if (grad >= 120000 && grad <= 249999) mes "Nächster Rang: bei 250.000 Punkte";
- if (grad >= 250000 && grad <= 499999) mes "Nächster Rang: bei 500.000 Punkte";
- if (grad >= 500000 && grad <= 999999) mes "Nächster Rang: bei 1.000.000 Punkte";
- if (grad >= 1000000 && grad <= 1999999) mes "Nächster Rang: bei 2.000.000 Punkte";
- if (grad >= 2000000 && grad <= 3999999) mes "Nächster Rang: bei 4.000.000 Punkte";
- if (grad >= 4000000 && grad <= 5999999) mes "Nächster Rang: bei 6.000.000 Punkte";
- if (grad >= 6000000 && grad <= 9999999) mes "Nächster Rang: bei 10.000.000 Punkte";
- mes " ";
- if (armee_quest == 0) mes "Noch keine Stufen Quest erledigt.";
- if (armee_quest == 1) mes "Stufen Quest ^FF0000Rekrut^000000 erledigt.";
- if (armee_quest == 2) mes "Stufen Quest ^FF0000Soldat^000000 erledigt.";
- close;
- bb:
- mes @npc$;
- mes "15.Rekrut";
- mes "14.Soldat";
- mes "13.Fahnenjunker";
- mes "12.Fähnrich";
- mes "11.Oberfähnrich";
- mes "10.Leutnant";
- mes "09.Oberleutnant";
- mes "08.Hauptmann";
- mes "07.Major";
- mes "06.Oberstleutnant";
- mes "05.Oberst";
- mes "04.Brigadegeneral";
- mes "03.Generalmajor";
- mes "02.Generalleutnant";
- mes "01.General";
- close;
- }
- }
- l_ja:
- next;
- mes @npc$;
- mes "Nu denn " + @name$;
- mes "Willkommen in der Midgard";
- mes "Befreiungsarmee.";
- set soldat,1;
- set rang,0;
- set aktiv,1;
- close;
- l_nein:
- mes @npc$;
- mes "Dann machs mal gut, bis zum nächsten Mal.....";
- close;
- OnNPCKillEvent:
- if (soldat == 0) end;
- if (aktiv == 1) { set grad,grad + 1; } else { end; }
- if (grad == 100) { set rang,1; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 1000) { set rang,2; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 2000) { set rang,3; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 5000) { set rang,4; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 10000) { set rang,5; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 30000) { set rang,6; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 60000) { set rang,7; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 120000) { set rang,8; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 250000) { set rang,9; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 500000) { set rang,10; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 1000000) { set rang,11; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 2000000) { set rang,12; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 4000000) { set rang,13; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 6000000) { set rang,13; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; goto SQL_ENTRY; }
- if (grad == 10000000) { set rang,14; announce "Der Spieler " + strcharinfo(0) + " wurde soeben zum " + .rang$[rang] + " befördert.",BC_ALL; set aktiv,0; goto SQL_ENTRY; }
- SQL_ENTRY:
- if (query_sql("select `char_id` from `armee` where `char_id` = '"+getcharid(0)+"'",.@ignore)) {
- query_sql("update armee `points` set `points` = '"+ grad +"' where `char_id` = '"+getcharid(0)+"'",.@ignore);
- query_sql("update armee `rang` set `rang` = '"+ .rang$[rang] +"' where `char_id` = '"+getcharid(0)+"'",.@ignore);
- }else{
- query_sql("insert into armee (char_id,account_id,name,points,rang) values ('"+getcharid(0)+"','"+getcharid(3)+"','"+strcharinfo(0)+"','"+ grad +"','" + .rang$[rang] +"')",.@ignore);
- }
- end;
- STUFEN_QUEST:
- if (grad >= 100 && armee_quest == 0){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- next;
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 1000 && armee_quest == 1){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Soldaten starten?";
- next;
- menu "Ja bitte",Quest_2,"Nein.",-;
- close;
- }
- if (grad >= 2000 && armee_quest == 3){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 5000 && armee_quest == 4){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 10000 && armee_quest == 5){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 30000 && armee_quest == 6){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 60000 && armee_quest == 7){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 120000 && armee_quest == 8){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 250000 && armee_quest == 9){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 500000 && armee_quest == 10){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 1000000 && armee_quest == 11){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 2000000 && armee_quest == 12){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 4000000 && armee_quest == 13){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- if (grad >= 6000000 && armee_quest == 14){
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Möchtest du die Quest für Rekruten starten?";
- menu "Ja bitte",Quest_1,"Nein.",-;
- close;
- }
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Derzeit sind für dich keine weiteren Quest vorhanden.";
- close;
- Quest_1:
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Wir brauchen ein paar Zutaten um die Armee zu versorgen. Sei doch bitte so net und besorge uns 10 ^FF0000Unripe Apple^000000.";
- next;
- if( Select( "Ich habe sie bei mir", "Ok, bis gleich." ) == 2 )
- close;
- if (countitem(619) >= 10){
- mes @npc$;
- mes "Oh Super !! Hier deine Belohnung. Wir bedanken uns.";
- set armee_quest,1;
- getitem 5035,1;
- delitem 619,10;
- dispbottom "250 Event Punkte erhalten!";
- set #EPOINTS,#EPOINTS+250;
- //SQL Eintrag und Abfrage
- if (query_sql("select `account_id` from `excoins` where `account_id` = '"+getcharid(3)+"'",.@ignore)) {
- query_sql("UPDATE `excoins` SET `epoints` = `epoints` + '250' WHERE `account_id` = '"+getcharid(3)+"'",.@ignore);
- }
- close;
- }
- mes @npc$;
- mes "Mhhh... ich kann keine sehen. Bist du dir sicher?";
- close;
- Quest_2:
- if (armee_quest < 1) goto NOQUEST;
- if (aq_sango == 0 && aq_pietro == 1){
- mes @npc$;
- mes "Pietro sagte du hast ihm geholfen, du solltest noch Sango aufsuchen.";
- close;
- }
- if (aq_sango == 1 && aq_pietro == 0){
- mes @npc$;
- mes "Sango sagte du hast ihm geholfen, du solltest noch Pietro aufsuchen.";
- close;
- }
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "2 unserer Krieger benötigen hilfe, sei doch so nett und suche sie auf. Komm zu mir zurück wenn du ihre Aufgaben erledigt hast.";
- next;
- mes @npc$;
- mes "Hilf bitte ^FF0000Sango^000000 in der ^FF0000Pyramide^000000";
- mes "und ^FF0000Pietro^000000 befindet sich im ^FF0000Geffen Dungeon^000000";
- next;
- if( Select( "Ich habe alles erledigt", "Ok, bis gleich." ) == 2 )
- close;
- if (aq_sango == 1 && aq_pietro == 1){
- mes @npc$;
- mes "Oh Super !! Hier deine Belohnung. Wir bedanken uns.";
- set armee_quest,2;
- getitem 5006,1;
- getitem 5596,1;
- getitem 26005,1;
- dispbottom "1000 Event Punkte erhalten!";
- set #EPOINTS,#EPOINTS+1000;
- //SQL Eintrag und Abfrage
- if (query_sql("select `account_id` from `excoins` where `account_id` = '"+getcharid(3)+"'",.@ignore)) {
- query_sql("UPDATE `excoins` SET `epoints` = `epoints` + '1000' WHERE `account_id` = '"+getcharid(3)+"'",.@ignore);
- }
- close;
- }
- mes @npc$;
- mes "Mhhh... ich habe noch keine positive Rückmeldung bekommen. Bist du dir sicher?";
- close;
- Quest_3:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_4:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_5:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_6:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_7:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_8:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_9:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_10:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_11:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_12:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_13:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_14:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_15:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_16:
- if (armee_quest < 1) goto NOQUEST;
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Diese Option ist noch nicht verfügbar";
- close;
- Quest_NO:
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Komm später wieder.";
- close;
- NOQUEST:
- mes @npc$;
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Du hast diese Quest bereits absolviert, oder dein Rang ist noch nicht hoch genug.";
- close;
- OnInit:
- setarray .rang$[0],"Lehrling","Rekrut","Soldat","Fahnenjunker","Fähnrich","Oberfähnrich","Leutnant","Oberleutnant","Hauptmann","Major","Oberstleutnant","Oberst","Brigadegeneral","Generalmajor","Generalleutnant","General";
- setarray .sold[0],100,1000,10000,15000,20000,25000,30000,35000,40000,45000,50000,60000,70000,80000,90000,100000;
- setarray .epoints[0],1,5,10,15,20,25,30,35,40,45,50,60,70,80,90,100;
- end;
- }
- moc_pryd05,222,41,4 script Sango 468,{
- if (aq_sango > 0){
- mes "[^778899 Sango ^000000]";
- mes "Nochmals danke für deine Hilfe.";
- close;
- }
- if (armee_quest < 1){
- mes "[^778899 Sango ^000000]";
- mes "Ich habe zu tun, stör mich nicht.";
- close;
- }
- mes "[^778899 Sango ^000000]";
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Du wurdest vom Kommandanten geschickt um mir zu helfen?";
- next;
- mes "[^778899 Sango ^000000]";
- mes "Das freut mich sehr. Ich wurde ausgeschickt um von diesem Minorous Nose Ringe zu bekommen.";
- next;
- mes "[^778899 Sango ^000000]";
- mes "Ich denke wir könnten sie aufteilen. Bring mir die Hälfte von dem was ich benötige.";
- mes "250 Nose Ringe und wir können hier weg.";
- next;
- if( Select( "Ich habe sie bei mir", "Ok, bis gleich." ) == 2 )
- close;
- if (countitem(941) >= 250){
- delitem 941,250;
- mes "[^778899 Sango ^000000]";
- mes "Oh Super !! Ich sage dem Kommandanten bescheid. Wir bedanken uns.";
- set aq_sango,1;
- close;
- }
- mes "[^778899 Sango ^000000]";
- mes "Du willst mich doch wohl nicht auf den Arm nehmen? Such Nose Ringe...";
- close;
- }
- gef_dun01,161,93,4 script Pietro 470,{
- if (aq_pietro > 0){
- mes "[^778899 Pietro ^000000]";
- mes "Nochmals danke für deine Hilfe.";
- close;
- }
- if (armee_quest < 1){
- mes "[^778899 Pietro ^000000]";
- mes "Ich habe zu tun, stör mich nicht.";
- close;
- }
- mes "[^778899 Pietro ^000000]";
- mes "Hallo " + .rang$[rang] + " " + @name$;
- mes "Du wurdest vom Kommandanten geschickt um mir zu helfen?";
- next;
- mes "[^778899 Pietro ^000000]";
- mes "Super. Ich wurde ausgeschickt um von den Nightmares Horseshoes zu holen.";
- next;
- mes "[^778899 Pietro ^000000]";
- mes "Ich habe besseres als das zu tun. Geh und suche mir 500 Horseshoes. Bring sie zu mir und ich";
- mes "sage dem Kommandanten das du mir eine große Hilfe warst.";
- next;
- if( Select( "Ich habe sie bei mir", "Ok, bis gleich." ) == 2 )
- close;
- if (countitem(944) >= 500){
- delitem 944,500;
- mes "[^778899 Pietro ^000000]";
- mes "Das wurde auch mal Zeit !! Ich sage dem Kommandanten bescheid. Wir bedanken uns.";
- set aq_pietro,1;
- close;
- }
- mes "[^778899 Pietro ^000000]";
- mes "Verarschen kann ich mich auch alleine...";
- close;
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement