viewing paste Unknown #14834 | Athena

Posted on the
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147
b_town_in01,117,72,6    script  Betrunkener Assistent   679,{
function NotAll;
function CL;
 
        set @n$, "^32CD32[ Henry ]^000000";     // NPC Name
       
       
if ( vprof == 0) {
        mes @n$;
        mes "Sorry, ich muss gerade für den alten Opa arbeiten...";
        end;
        }
 
        mes @n$;
        mes "Hehehe, *hicks*.";
        next;
        mes @n$;
        mes "Oh Hallo Kunde!";
        mes "Ich hefe dem alten Trinker da bei seinen Experimenten.";
        next;
        mes @n$;
        mes "Ich fand heraus, dass man zwei verschiedene ^FF4500Double Power Runen^000000 fusionieren kann und somit eine";
        mes "^FF4500Mix Runen^000000 herstellen kann.";
        next;
        mes @n$;
        mes "Soll ich es mal für dich probieren?";
        if(select("Ja:Nein, danke") - 1) CL;
        next;
        mes @n$;
        mes "Welche Rune möchtest du herstellen?";
        mes "Wähle aus:";
        setarray .amount[0],1,1,5;
        switch(select("AgiDex Rune:AgiInt Rune:AgiLuk Rune:DexInt Rune:DexLuk Rune:DexStr Rune:IntLuk Rune:IntStr Rune:IntVit Rune:StrAgi Rune:StrLuk Rune:StrVit Rune:VitAgi Rune:VitDex Rune:VitLuk Rune")){
                case 1:
                        set .@g,30100;
                        setarray .array[0],30108,30109,12712;
                        break;
                case 2:
                        set .@g,30101;
                        setarray .array[0],30108,30110,12712;
                        break;
                case 3:
                        set .@g,30102;
                        setarray .array[0],30108,30111,12712;
                        break;
                case 4:
                        set .@g,30104;
                        setarray .array[0],30109,30110,12712;
                        break;
                case 5:
                        set .@g,30105;
                        setarray .array[0],30109,30111,12712;
                        break;
                case 6:
                        set .@g,30107;
                        setarray .array[0],30109,30112,12712;
                        break;
                case 7:
                        set .@g,30114;
                        setarray .array[0],30110,30111,12712;
                        break;
                case 8:
                        set .@g,30116;
                        setarray .array[0],30110,30112,12712;
                        break;
                case 9:
                        set .@g,30117;
                        setarray .array[0],30110,30113,12712;
                        break;
                case 10:
                        set .@g,30119;
                        setarray .array[0],30112,30108,12712;
                        break;
                case 11:
                        set .@g,30120;
                        setarray .array[0],30112,30111,12712;
                        break;
                case 12:
                        set .@g,30122;
                        setarray .array[0],30112,30113,12712;
                        break;
                case 13:
                        set .@g,30123;
                        setarray .array[0],30113,30108,12712;
                        break;
                case 14:
                        set .@g,30124;
                        setarray .array[0],30113,30109,12712;
                        break;
                case 15:
                        set .@g,30125;
                        setarray .array[0],30113,30111,12712;
                        break;
        }
        for(.@i = 0; .@i < getarraysize(.array); .@i++){
                        NotAll;
                        }
                if(countitem(.array[.@i])<.amount[.@i]){
                        NotAll;
                }
        next;
        mes @n$;
        mes "*Hicks*!";
        mes "Whoa du hast ja alle Items gefunden!";
                next;
        mes @n$;
        mes "Möchtest du die Runen nun fusionieren?";
        if(select("Ja:Nein, noch nicht") - 1) CL;
        next;
        for(.@i = 0; .@i < getarraysize(.array); .@i++){
                delitem .array[.@i], .amount[.@i];
        }
        specialeffect 505 ;
        getitem .@g, 1;
        if(rand(0,100) == 1){
                atcommand "@die";
                specialeffect 450;
        }else{
        specialeffect 65, "Betrunkener Assistent";
        specialeffect 131, "Betrunkener Assistent";
        specialeffect 192, "Betrunkener Assistent";
        specialeffect 305, "Betrunkener Assistent";
        specialeffect2 305;
        specialeffect2 380;
        }
        mes @n$;
        mes "Hier hast du deine ^FF4500Mix Rune^000000.";
                end;
       
NotAll:
        next;
        mes @n$;
        mes "Dafür benötige ich:";
        for(.@i = 0; .@i < getarraysize(.array); .@i++){
                mes .amount[.@i] + "x " + getitemname(.array[.@i]);
        }
        next;
        mes @n$;
        mes "Ja ich brauche Bier zum arbeiten! *Hicks*";
        end;
       
CL:
        next;
        mes @n$;
        mes "Dann halt nicht. *Würg*";
                end;
}
Viewed 280 times, submitted by unknown.