
inherit "obj/monster"; 

    
  reset(arg) {
    ::reset(arg);
  if (!arg) {

    set_name("green dragon");
    set_level(25); 
    set_size(5);
    set_hp(1000); 
    set_al(-100); 
    set_alias("dragon"); 
    set_alt_name("dragon");
    set_race("dragon"); 
    set_short("A green volcano Dragon"); 
    set_long("You see a big dangerous looking volcano dragon\n"+ 
               "hungrily staring at you.\n");
    set_gender(1+random(2));
    set_ac(15); 
    set_whimpy(5);
    load_chat(1,({
      "C hhhhhhhhhhhhh\n", 
      "The dragon sharpens its claws\n"}));
    set_spell_mess1("The dragon throws a green ball of lightning ");
    set_spell_mess2("The dragon throws a green ball of lightning at you");
    set_chance(2); 
    set_spell_dam(20+random(60)); 
    move_object(clone_object("players/whisky/island/obj/dragontail"),
    this_object()); 
    move_object(clone_object("players/whisky/island/obj/green_star"),
    this_object());
    move_object(clone_object("players/whisky/island/obj/g_skin"),
    this_object());
    init_command("wield tail"); 
}
}

