COWbrowse

You are looking at a potion of mana

This potion will help to cast spells.

drink from the potion of mana

Then for information about spells:

read the command called cast

Created by thorn, last updated 31 Jan 2015

Code

if target of use then used;
if target of drink then used;

##used:
say 'msg',"[$init_obj] drinks from [$actor].";
if $init_obj's manamax > 0 then continue else initmmax;
if $init_obj's mana < 1 then givemana else nomana;

##initmmax:
set $init_obj's manamax to 1;

##givemana:
$mna = $init_obj's mna;
add 1 to $mna;
set $init_obj's mana to $mna;
sayto $init_obj,"You feel a bit of magical energy welling within you.";

##nomana:
sayto $init_obj,"You don't feel any different. Return and try again after casting some spells.";