viewing paste simple item trader script | 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
prontera,160,178,5  script  asdjhkajd   1_F_MARIA,{
    mes "I can trade various item into TCG";
    next;
    switch( select(
        "50 Poring Coin + 5M Zeny = 1 TCG",
        "1 Tao Gunka Card + 5M Zeny = 10 TCG",
        "1 Ifrit Card + 5M Zeny = 20 TCG",
        "1 Sealed Gloom Card = 30 TCG"
//      "1 FBH Card = 40 TCG", // what is FBH ???
        ) ) {
            case 1:
                mes "Trade";
                mes "50 Poring Coin + 5M Zeny = 1 TCG";
                mes "Confirm ?";
                next;
                if ( select ( "Yes", "No" ) == 2 ) close;
                if ( countitem(Poring_Card) < 50 || Zeny < 5000000 ) {
                    mes "You do not have enough materials";
                    close;
                }
                delitem Poring_Card, 50;
                Zeny -= 5000000;
                getitem TCG_Card, 1;
                mes "Here you go";
                close;
            case 2:
                mes "Trade";
                mes "1 Tao Gunka Card + 5M Zeny = 10 TCG";
                mes "Confirm ?";
                next;
                if ( select ( "Yes", "No" ) == 2 ) close;
                if ( countitem(Tao_Gunka_Card) < 1 || Zeny < 5000000 ) {
                    mes "You do not have enough materials";
                    close;
                }
                delitem Tao_Gunka_Card, 1;
                Zeny -= 5000000;
                getitem TCG_Card, 10;
                mes "Here you go";
                close;
            case 3:
                mes "Trade";
                mes "1 Ifrit Card + 5M Zeny = 20 TCG";
                mes "Confirm ?";
                next;
                if ( select ( "Yes", "No" ) == 2 ) close;
                if ( countitem(Ifrit_Card) < 1 || Zeny < 5000000 ) {
                    mes "You do not have enough materials";
                    close;
                }
                delitem Ifrit_Card, 1;
                Zeny -= 5000000;
                getitem TCG_Card, 20;
                mes "Here you go";
                close;
            case 4:
                mes "Trade";
                mes "1 Sealed Gloom Card = 30 TCG";
                mes "Confirm ?";
                next;
                if ( select ( "Yes", "No" ) == 2 ) close;
                if ( countitem(Sealed_Gloom_Card) < 1 ) {
                    mes "You do not have enough materials";
                    close;
                }
                delitem Sealed_Gloom_Card, 1;
                getitem TCG_Card, 30;
                mes "Here you go";
                close;
        }
}
Viewed 2090 times, submitted by AnnieRuru.