>fight_prog 5~ say Waah! ~ >time_prog 75~ if istime (21) = 7 yawn sleep else if isasleep($i) wake endif endif ~ >rand_prog 3~ if rand (50) pmote crawls around on the floor. else cry endif ~ >greet_prog 5~ if sex ($n) == 2 say ma ma? else say da da? endif ~ |