Setting up 3.5.0 as trunk

lib/world/trg/46.trg

@@ -0,0 +1,79 @@
+#4600
+Exit Anthill - 4600, 4627~
+2 c 100
+out~
+wait 2
+%send% %actor% You make your way out off the anthill
+%echoaround% %actor% %actor.name% leaves out.
+%teleport% %actor% 3229
+%force% %actor% look
+%echoaround% %actor% %actor.name% just crawled out of the anthill.
+~
+#4601
+Enter Anthill - 4601~
+1 c 100
+en~
+if %cmd.mudcommand% == enter && anthill /= %arg%
+   %send% %actor% You enter the anthill.
+   %echoaround% %actor% %actor.name% enters the anthill.
+   %teleport% %actor% 4600
+   %force% %actor% look
+   %echoaround% %actor% %actor.name% just came in.
+   end
+else
+   %send% %actor% enter what?!
+end
+~
+#4602
+Queen Cry for Help - 4633~
+0 al 100
+~
+if %attacking_queen%
+  return 0
+else
+  %echo% The queen cries out loudly, 'GUARDS! HELP ME! I'M UNDER ATTACK!'
+  %at% 4632 %echo% The Queen is calling for help from the east.
+  return 1
+  set attacking_queen %actor%
+  global attacking_queen
+end
+~
+#4603
+Make Guards go East - 4632~
+0 ae 100
+The Queen is calling for help from the east.~
+wait 1
+east
+~
+#4604
+Queen say Help - 4633~
+0 h 100
+~
+if (%actor.vnum% == 4632)
+  wait 5
+  say HELP! HELP! I'm being attacked.... HEEEELP!
+end
+~
+#4605
+Make Guards Attack - 4632~
+0 d 0
+HELP! HELP! I'm being attacked~
+if (%actor.vnum% == 4633)
+  emote joins the battle!
+  assist queen
+end
+~
+#4606
+Reset attacking_queen - 4633~
+0 af 100
+~
+unset %attacking_queen%
+~
+#4607
+Guard Rescue Queen - 4632~
+0 k 50
+~
+wait 1
+rescue queen
+~
+$~