This one was written before I was the awesome automatic EZ-B fish feeder @Jstarne
It needs the Confirmation script I posted earlier in the forum.
#______________________________________________________ #init $Requests=0 $Response=0
Say("Have you fed your fish today?") ControlCommand( "Script Manager", ScriptStartwait, "Confirmation" ) :start if ($Response="Yes") goto (affirmative) elseif ($Response="No") goto (Negative) Elseif ($Response="No Response") goto(no_user) Endif Halt()
:affirmative say("Well done, your fish must be feeling better.") $fishfed=1 Print ("Fishfed=$fishfed") halt()
:negative say("Get with the programme human or would you like me to starve, you, instead?") $fishfed=0 Print ("Fishfed=$fishfed") halt()
:no_user Print("Abandoning action.") Print ("Fishfed=$fishfed") $fishfed=0 halt()