Forage.mac for d00dz

[Zxeses]

Code: Select all

| Notes: Go to the POK, sit by the nexus stone
| run this script all day long


#turbo

Sub Main

   /declare x global
   :top
   
      /target pc
      
      /varset x $rand(5)
      /if n @x==0 /tell $arg(1,$target(name,clean)) Will you buff me?
      /if n @x==1 /tell $arg(1,$target(name,clean)) Do you have Sow?
      /if n @x==2 /tell $arg(1,$target(name,clean)) Can I have some plat?
      /if n @x==3 /tell $arg(1,$target(name,clean)) Can you spare some pp? I need to buy armor.
      /if n @x==4 /tell $arg(1,$target(name,clean)) Will you buy me a sword?
      /if n @x==5 /tell $arg(1,$target(name,clean)) Do you like me?
      /delay 10s
      /goto :top
      
/return

[MQSEQ]

What if they tell me they don't like me?

[Zxeses]

Code: Select all

#chat tell


sub Event_chat(how,who,what)


   /if @how==tell {
       /if "@what"~~"hate you" /tell @who whatever....
       /if "@what"~~"get lost" /tell @who n0 Way!
       }

/return

[El]

That explains the last few weeks. Sheesh.

[Elric]

Something I've been looking for! Now I can pass it out to all the folks who... oh.. wait. I think they all have it already.