>rand_prog 3~ if rand(50) ponder else pmote scratches his head thoughtfully. endif ~ >give_prog 75~ if rand (25) mpjunk $o else if objtype($o) == 10 identify $o give $o $n endif endif ~ |