path: root/npc/items/arcmage.txt

// TMW-2 script.
// Author:
//    Jesusalva
// Description:
//    Card boxsets, shout out for arcmage.org

// Create a random card, with rares
function	script	MakeRandomArcmageCard	{
    array_push(.@arcmagecards, NatureCard);
    array_push(.@arcmagecards, NinjaCard);
    array_push(.@arcmagecards, MageCard);
    array_push(.@arcmagecards, DruidCard);
    array_push(.@arcmagecards, ClericCard);
    array_push(.@arcmagecards, KnightCard);
    array_push(.@arcmagecards, HeroCard);
    array_push(.@arcmagecards, NecromancerCard);

    .@r=rand(0,10000);
    // 5% chances of a rare card
    // Actually only 1/3 of this rate is effective
    // Therefore real chances are of about 1.67%
    if (.@r < 500) {
        array_push(.@arcmagecards, SpeedCard);
        array_push(.@arcmagecards, ReflectCard);
        array_push(.@arcmagecards, PowerCard);
        array_push(.@arcmagecards, WallCard);
    }
    getitem any_of(.@arcmagecards), 1;
    return;
}