#!/usr/bin/env ruby
eval 'm=Hash.new(p=0);'+ARGF.read.downcase.gsub(/[a-z][a-z0-9]*|./,
     'wash' => 'system("clear");',
     'wait' => 'sleep(0.1);',
     'walk' => 'p+=1;',
     'hop' => 'p-=1;',
     'run' => 'p+=5;',
     'leap' => 'p-=5;',
     'stumble' => 'p+=rand(9);',
     'trip' => 'p-=rand(9);',
     'eat' => 'm[p]+=1;',
     'feast' => 'm[p]+=5;',
     'think' => 'm[p]+=rand(9); m[p]+=rand(9); m[p]+=rand(9); m[p]+=rand(9); m[p]+=rand(9); m[p]+=rand(9);',
     'poop' => 'm[p]-=1;',
     'diarrhea' => 'm[p]-=5;',
     'die' => 'm[p]=0;',
     'revive' => 'm[p]=255;',
     'speak' => 'putc m[p];',
     'crawl' => 'puts;',
     'learn' => 'm[p]=STDIN.getbyte if !STDIN.eof;',
     'scream' => 'print m[p];',
     'calculate' => 'm[p]*=m[p];',
     'program' => 'puts "Hello, world!";',
     'task' => '(',
     'goal' => ')while((m[p]&=255)!=0);')