if reacting to arrives then check_task;
if target of push then reset_pusher;
if reacting to wish then check_task;
if reacting to sings then continue_training;

##reset_pusher:
mani $init_obj's pocket set basic_training to "";
print "[$actor] says 'Oh my.. I have forgotten if you have had training or not. Next time you come in here (or wish) I will probably give you a basic task";
// TODO: delete the 'basic task' object inside the player;

##check_task:
mani $init_obj's pocket get basic_training to $playertask;
if $playertask ne "" then continue_training else start_training;

##start_training:
print "[$actor] says 'Ah [$init_obj] .. welcome to cow.";
//find $actor, 76282;
$found_id = 76282;
if $found_id > 0 then give_first_task else no_tasks;

##give_first_task:
$playersname = $init_obj's name;
$player_id = $init_obj; // remember this as the CALLs below stomp over init_obj;
copy $found_id;
$start_task = $new_id;
update $start_task = "extra='for $playersname',pwd='',creator=$actor";
mani $init_obj's pocket set basic_training to "started";
call "drop $start_task";
call "give $start_task to $player_id";
runsub continue_training;

##continue_training:
print "[$actor] says 'I see you still have a task to complete'";
// the task inside the player will react to this 'prompt';
msg $init_obj,0,0,0, "prompt","";


##no_tasks:
sayto $init_obj, "[$actor] appears distracted and has no tasks to give you";