
inherit "obj/monster"; 
    
  reset(arg) {
    ::reset(arg);
  if (!arg) {

    set_name("blue dragon");
    set_level(30); 
    set_size(5);
    set_hp(1500); 
    set_al(-200); 
    set_alias("dragon"); 
    set_alt_name("volcano dragon");
    set_race("dragon"); 
    set_short("A blue 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(9); 
    set_whimpy(8);
    load_chat(1,({
      "C hhhhhhhhhhhhh\n", 
      "The dragon sharpens its claws\n"}));
    set_spell_mess1("The dragon throws a blue ball of lightning at you");
    set_spell_mess2("The dragon throws a blue ball of lightning at you");
    set_chance(2); 
    set_spell_dam(30+random(80));
    move_object(clone_object("players/whisky/island/obj/dragontail"),
    this_object());
    move_object(clone_object("players/whisky/island/obj/blue_star"),
    this_object()); 
    move_object(clone_object("players/whisky/island/obj/b_skin"),
    this_object());
}
}

