SHARE
TWEET

Untitled

a guest Jul 20th, 2019 76 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. NEU
  2. Func Setup()
  3.    If GetMapID() <> 449 Then
  4.       Out("Zoning to Kamadan.")
  5.       RndTravel(449)
  6.    EndIf
  7.     If GetHeroCount() < 4 Then
  8.         Out("Add NPC.")
  9.         RndSleep(2000)
  10.         AddNpc(1)
  11.         RndSleep(700)
  12.         AddNpc(3)
  13.         RndSleep(700)
  14.         AddNpc(4)
  15.         RndSleep(700)
  16.  
  17.     EndIf
  18.     SwitchMode(0)
  19.     Out("Normal Mode.")
  20.     RndSleep(2000)
  21. EndFunc
  22.  
  23.  
  24. ______________________________________________________________________________________________________
  25. ALT
  26. Func Main()
  27.     Sleep(100)
  28.     While 1
  29.         Sleep(100)
  30.         If $boolRun Then
  31.             If $FirstRun == True Then
  32.                 $FirstRun = False
  33.                 If GetMapID() <> 819 Then ;
  34.                     Update("Mapping to Kama")
  35.                     TravelTo(819)
  36.                 EndIf
  37.  
  38.                 If GetHeroCount() < 4 Then
  39.                     RndSleep(2000)
  40.                     AddNpc(1)
  41.                     RndSleep(700)
  42.                     AddNpc(3)
  43.                     RndSleep(700)
  44.                     AddNpc(4)
  45.                     RndSleep(700)
  46.  
  47.                 EndIf
  48.  
  49. ;~              TOGGLERENDERING()
  50. ;~              Inventory()
  51.             EndIf
  52.             StartParty()
  53.         EndIf
  54.     WEnd
  55. EndFunc   ;==>Main
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top