View/Edit #6565:@PlaceFish

Name(s): @PlaceFish

1:  if (!(player in {@this.trusts}))
2:    return player:tell("Sorry, only ", $su:name_list(this.Trusts), " can place the fish.")
3:  endif
4:  this.fish = this.NoFish
5:  for x in (this.fishstats)
6:    stuff = x in this.fishstats
7:    suspend(0)
8:    for x in [1..x[5]]
9:      suspend(0)
10:     ran = {random(10), random(10)}
11:     this.fish[ran[1]][ran[2]] = {@this.fish[ran[1]][ran[2]], stuff}
12:   endfor
13: endfor
14: this:shoutout(player.name, " pushes a big red button, and all the fish swim to new locations.")
15: "Last modified by downtempo (#6397) on Tue Apr 29 16:27:26 2003 MDT."

Verb arguments: none none none
Verb perms: Readable NOT-Debug
Verb owned by: James (#6397)

You are not logged in.