User Tools

Site Tools


scriptlib:betatestwolf

This is an old revision of the document!


/*
 * Special script for Beta test *
 */

const ACTOR_CDEFID = 7813;
const ANIMATION = "CombatIdle";
const SPEAK_CHANCE = 33;
const EMOTE_CHANCE = 33;

phrases <- [
    "Bark!",
    "*grumbles*",
    "Don't talk to that shroomie, talk to me!",
    "You! Are you here for the beta test?"
];

function say_something() {
    local cid = inst.cids(ACTOR_CDEFID)[0];
    if(randmodrng(0, 100) <= SPEAK_CHANCE) {
        inst.emote(cid, ANIMATION);
        inst.creatureChat(cid, "s/", phrases[randmodrng(0, phrases.len())]);
    }
    inst.queue(say_something, 10000);
}

inst.queue(say_something, 1000);
scriptlib/betatestwolf.1431788184.txt.gz · Last modified: 2015/05/16 15:56 by emerald