viewing paste Unknown #499 | C#

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
//===========================================================================================
// The idea is to make the right spell to unfreeze the magician. When you select the 
// correct answers of the variable is assigned a qe_ma. Total 7 "issues." In the end if 
// the variable qe_ma is 7, the quest is made, and the magician through the loss of 
// frozen thawed NPCs and NPC appears defrosted. And so, in general.
// It is necessary to make the frozen NPCs, who was in the code that could talk
// simultaneously with only one person.
//============================================================================================
// Thank you for your help. =)
//============================================================================================
 
prt_fild08,54,59,4  script  Iced mage::ice_mage2    924,{
    if (evilmage == 1) goto L_1;
    if (smognah == 1) goto pristupim;
    set $@razgovor,1;
    set .name$,strcharinfo(0);
    mes "The magician is frozen. But still it seems that he is still alive."; // The quest is not yet available.
    close;
    pristupim:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "So that means you are. Now we'll unfreeze ..."; // The quest begins
    next;
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "We must remember the spell ..."; // Here we must recall correctly spell. The correct answers marked: set qe_ma, qe_ma +1;
    next;
    menu "Fulgura tollat. Fulgura fervet...",L_11,"Aqua non tollat. Aqua reddit...",L_12,"Luminum ascendit et materiam...",L_13;
    L_11:   goto qe2;
    L_12:   goto qe2;
    L_13:   set qe_ma,qe_ma+1;  goto qe2; // The correct answer.
    qe2:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Fulgura tollat. Fulgura fervet...",L_21,"Aqua non tollat. Aqua reddit...",L_22,"Luminum ascendit et materiam...",L_23;
    L_21:   set qe_ma,qe_ma+1;  goto qe3; // The correct answer.
    L_22:   goto qe3;
    L_23:   goto qe3;
    qe3:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Fulgura tollat. Fulgura fervet...",L_31,"Aqua non tollat. Aqua reddit...",L_32,"Luminum ascendit et materiam...",L_33;
    L_31:   goto qe4;
    L_32:   set qe_ma,qe_ma+1;  goto qe4; // The correct answer.
    L_33:   goto qe4;   
    qe4:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Aqua",L_41,"Ignis",L_42,"Fulgura",L_43;
    L_41:   set qe_ma,qe_ma+1;  goto qe5; // The correct answer.
    L_42:   goto qe5;
    L_43:   goto qe5;
    qe5:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Aqua",L_51,"Ignis",L_52,"Fulgura",L_53;
    L_51:   goto qe6;
    L_52:   set qe_ma,qe_ma+1;  goto qe6; // The correct answer.
    L_53:   goto qe6;
    qe6:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Aqua",L_61,"Ignis",L_62,"Fulgura",L_63;
    L_61:   goto qe7;
    L_62:   goto qe7;
    L_63:   set qe_ma,qe_ma+1;  goto qe7; // The correct answer.
    qe7:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "...";
    next;
    menu "Let the ice melt!",L_71,"Etiam scutum rumpet glaciem...",L_72,"Scutum glasiem rumpet Ignis...",L_73,"Ice, I want you broke...",L_74,"Das Eis taut auf!",L_75;
    L_71:   goto qe8;
    L_72:   set qe_ma,qe_ma+1;  goto qe8; // The correct answer.
    L_73:   goto qe8;
    L_74:   goto qe8;
    L_75:   goto qe8;
    qe8:
    if(qe_ma != 7) goto break_magic;
    hideonnpc "ice_mage2";
    hideoffnpc "norm_mage2";
    hideonnpc "ice_mage";
    hideoffnpc "norm_mage";
    set $rasmorozilsya,1;
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "Is it possible that I got ..."; // Frosted mage disappears in its place there is just a mage.
    set qe_ma,0;
    close2;
        sleep2 30000;
        set $@razgovor,0;
        hideonnpc "norm_mage2";
        hideoffnpc "ice_mage2";
        hideonnpc "norm_mage";
        hideoffnpc "ice_mage";
        end;
    break_magic:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "Oh, did not work. Need to try again ...";
    set qe_ma,0;
    close;
    L_1:
    mes "^00aa00["+strcharinfo(0)+"]^000000";
    mes "Strangely, I like it thawed.";
}
Viewed 881 times, submitted by Guest.