API tools faq
paste
toribio

toribio

toribio
Sep 23rd, 2010
258
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 12.49 KB | None | 0 0
raw download clone embed print report
  1. -- http://mafia-empire.com
  2. onGameInit = function(l_1_0)
  3.     l_1_0.friendlyDoorCfg = common.ShopScripts.FriendlyDoor.Cfg
  4.  
  5.     registerForMachineMessages(l_1_0)
  6.     DelayBuffer:Insert(FreeRideStart2, {l_1_0}, 100, 1, false)
  7.  
  8.     game.datastore:SetString("DerekStatus", "Opened")
  9.     game.datastore:SetString("CharlieStatus", "Opened")
  10.     game.datastore:SetString("BruskyStatus", "Opened")
  11.     game.datastore:SetString("VitoA1Status", "Home")
  12.     game.datastore:SetString("VitoA2Status", "Home")
  13.     game.datastore:SetString("VitoA3Status", "Home")
  14.     game.datastore:SetString("VitoB12Status", "Home")
  15.     game.datastore:SetString("FrancescaStatus", "Home")
  16.     game.datastore:SetString("VitoVillaStatus", "Home")
  17.  
  18.     guid = base.ScriptMachine:getScriptGuid(l_1_0.scriptId)
  19. end
  20.  
  21.  
  22. onEvent = function(l_2_0, l_2_1)
  23.  
  24.     if l_2_1:GetType() == enums.EventType.HUMAN and l_2_1:GetMessage() == enums.HumanMessages.ON_OWNER_CHANGE and l_2_1:GetReceiverGUID() == player:GetGuid() then
  25.  
  26.         if player:GetOwner() == hunter then
  27.             idStart = DelayBuffer:Insert(Escape, {l_2_0}, 4000, 1, false, "Escaper")
  28.         end
  29.         if player:GetOwner() == escaper then
  30.             idStart = DelayBuffer:Insert(Hunt, {l_2_0}, 4000, 1, false, "Hunter") do
  31.                 return
  32.             end
  33.             if l_2_1:GetMessage() == enums.ActorMessages.ACTIVATE and l_2_1:HasName("OnDeActivate") then
  34.                 if l_2_1:GetReceiverGUID() == joe:GetGuid() then
  35.                     player:UnregisterFollower(joe)
  36.                     joe:UnregisterFromMessages()
  37.                 end
  38.                 if l_2_1:GetReceiverGUID() == henry:GetGuid() then
  39.                     player:UnregisterFollower(henry)
  40.                     henry:UnregisterFromMessages()
  41.                 end
  42.             end
  43.         end
  44.     end
  45.  
  46.     if l_2_1:GetType() == enums.EventType.BASEMESSAGE then
  47.         if l_2_1:GetMessage() == 1 then
  48.             FreeRideStart2(l_2_0)
  49.         else
  50.             if l_2_1:GetMessage() == 2 then
  51.                 CreateActionJoe(l_2_0)
  52.                 CreateActionHenry(l_2_0)
  53.             end
  54.         end
  55.     end
  56.  
  57.     if l_2_1:HasName("StartMe") then
  58.         StartMe(l_2_0)
  59.     end
  60.  
  61.     if l_2_1:HasName("StopMe") then
  62.         StopMe(l_2_0)
  63.     end
  64.  
  65.     if l_2_1:HasName("StartHenry") then
  66.         StartHenry(l_2_0)
  67.     end
  68.  
  69.     if l_2_1:HasName("StopHenry") then
  70.         StopHenry(l_2_0)
  71.     end
  72. end
  73.  
  74. Escape = function(l_3_0)
  75.     if soJde ~= nil then
  76.         soJde:UserData():Terminate()
  77.     end
  78.     pozice = Math:newVector()
  79.     pozice:set(-1526.6199951171875, 549.156005859375, -20.683700561523438)
  80.     joe:GetInOutCar(escaper, 1, false, false)
  81.     escaper:DestroyController()
  82.     escaper:CreateController("car_escaper")
  83.     escaper:EscapeMode()
  84.     escaper:InitializeAIParams(enums.CarAIProfile.PIRATE, 1)
  85.     escaper:MoveTo(pozice, STOP)
  86.     game.navigation:RegisterIconEntity("Escaper", 4, 2, "0051010001", true)
  87. end
  88.  
  89. Hunt = function(l_4_0)
  90.     if soJde ~= nil then
  91.         soJde:UserData():Terminate()
  92.     end
  93.     joe:GetInOutCar(hunter, 1, false, false)
  94.     hunter:DestroyController()
  95.     hunter:CreateController("car_hunter")
  96.     hunter:InitializeAIParams(enums.CarAIProfile.PIRATE, 1)
  97.     hunter:HuntCar(escaper)
  98.     hunter:HuntMode(enums.CarHuntMode.ALONG)
  99.     game.navigation:RegisterIconEntity("Hunter", 7, 2, "0051010002", true)
  100. end
  101.  
  102. FreeRideStart2 = function(l_5_0)
  103.     ai.relationships:SetRelationship(enums.AI_SIDE.PLAYER, enums.AI_TYPE.FRIEND, enums.AI_SIDE.GANG, enums.AI_TYPE.CLEMENTE, 10)
  104.     ai.relationships:SetRelationship(enums.AI_SIDE.GANG, enums.AI_TYPE.CLEMENTE, enums.AI_SIDE.PLAYER, enums.AI_TYPE.FRIEND, 10)
  105.     joe = nil
  106.     henry = nil
  107.     hunter = nil
  108.     escaper = nil
  109.     id = CommandBuffer:Insert(l_5_0, {
  110.    
  111.         function(l_1_0)
  112.             if game.datastore:GetNumber("missionPart") < 4 then
  113.                 return game.sds:ActivateStreamMapLine("free_summer_load")
  114.             else
  115.                 return game.sds:ActivateStreamMapLine("free_winter_load")
  116.             end
  117.         end,
  118.         function(l_2_0)
  119.             if game.datastore:GetNumber("missionPart") == 1 then
  120.                 game.gfx:SetWeatherTemplate("DTFreeRideDay")
  121.                 season = "summer"
  122.             else
  123.                 if game.datastore:GetNumber("missionPart") == 2 then
  124.                     game.gfx:SetWeatherTemplate("DTFreeRideDayRain")
  125.                     season = "summer"
  126.                 else
  127.                     if game.datastore:GetNumber("missionPart") == 3 then
  128.                         game.gfx:SetWeatherTemplate("DTFreerideNight")
  129.                         season = "summer"
  130.                     else
  131.                         if game.datastore:GetNumber("missionPart") == 4 then
  132.                             game.gfx:SetWeatherTemplate("DTFreeRideDayWinter")
  133.                             season = "winter"
  134.                         else
  135.                             if game.datastore:GetNumber("missionPart") == 5 then
  136.                                 game.gfx:SetWeatherTemplate("DTFreeRideDaySnow")
  137.                                 season = "winter"
  138.                             else
  139.                                 if game.datastore:GetNumber("missionPart") == 6 then
  140.                                     game.gfx:SetWeatherTemplate("DTFreeRideNightSnow")
  141.                                     season = "winter"
  142.                                 end
  143.                             end
  144.                         end
  145.                     end
  146.                 end
  147.             end
  148.         end,
  149.         function(l_3_0)
  150.             game.game:SaveGame(1)
  151.             return game.game:GetSaveGameSyncObject()
  152.         end,
  153.         function(l_4_0)
  154.             hunter = nil
  155.             escaper = nil
  156.             player = game.game:GetActivePlayer()
  157.             player:InventoryAddMoney(450000)
  158.             player:InventoryAddWeapon(5, 92)
  159.             player:InventoryAddWeapon(11, 200)
  160.             player:InventoryAddWeapon(13, 120)
  161.             player:InventoryAddWeapon(20, 6)
  162.             player:RegisterToMessages(guid, enums.EventType.HUMAN, enums.HumanMessages.ENTER_VEHICLE)
  163.             player:RegisterToMessages(guid, enums.EventType.HUMAN, enums.HumanMessages.ON_OWNER_CHANGE)
  164.             startPos = Math:newVector()
  165.             hunterPos = Math:newVector()
  166.             escaperPos = Math:newVector()
  167.             startPos:set(69.634696960449219, 909.0770263671875, -19.633600234985352)
  168.             hunterPos:set(129.1719970703125, 910.93402099609375, -22.049999237060547)
  169.             escaperPos:set(129.156005859375, 923.583984375, -22.469999313354492)
  170.             player:SetPos(startPos)
  171.             game.shop:SetAllShopExplored()
  172.             game.wardrobe:AddSuit("VITKSL_COAT", 1, false)
  173.             game.wardrobe:AddSuit("VITKSL2_COAT", 1, false)
  174.             game.wardrobe:AddSuit("VITOD1_COAT", 1, false)
  175.             game.wardrobe:AddSuit("VITOD2_COAT", 0, false)
  176.             game.wardrobe:AddSuit("VITOL1_COAT", 1, false)
  177.             game.wardrobe:AddSuit("VITOL2_COAT", 1, false)
  178.             game.game:ChangePlayerModel("vitksl2", -1)
  179.             game.garage:CheatAddCar("Ascot_BaileyS200_pha", true)
  180.             game.garage:CheatAddCar("Berkley_Kingfisher_pha", true)
  181.             game.garage:CheatAddCar("Hot_Rod_1", true)
  182.             game.garage:CheatAddCar("Hot_Rod_2", true)
  183.             game.garage:CheatAddCar("Hot_Rod_3", true)
  184.             game.garage:CheatAddCar("Houston_Wasp_pha", true)
  185.             game.garage:CheatAddCar("ISW_508", true)
  186.             game.garage:CheatAddCar("Jeep", true)
  187.             game.garage:CheatAddCar("Jeep_civil", true)
  188.             game.garage:CheatAddCar("Jefferson_Futura_pha", true)
  189.             game.garage:CheatAddCar("Jefferson_provincial", true)
  190.             game.garage:CheatAddCar("Lassiter_69", true)
  191.             game.garage:CheatAddCar("Lassiter_75_pha", true)
  192.             game.garage:CheatAddCar("Milk_Truck", true)
  193.             game.garage:CheatAddCar("Potomac_Indian", true)
  194.             game.garage:CheatAddCar("Quicksilver_Windsor_pha", true)
  195.             game.garage:CheatAddCar("Quicksilver_Windsor_Taxi_pha", true)
  196.             game.garage:CheatAddCar("Shubert_34", true)
  197.             game.garage:CheatAddCar("Shubert_38", true)
  198.             game.garage:CheatAddCar("Shubert_Armoured", true)
  199.             game.garage:CheatAddCar("Shubert_Beverly", true)
  200.             game.garage:CheatAddCar("Shubert_Frigate_pha", true)
  201.             game.garage:CheatAddCar("Shubert_Hearse", true)
  202.             game.garage:CheatAddCar("Shubert_Panel", true)
  203.             game.garage:CheatAddCar("Shubert_PickUp", true)
  204.             game.garage:CheatAddCar("Shubert_Taxi", true)
  205.             game.garage:CheatAddCar("Shubert_Truck_CT", true)
  206.             game.garage:CheatAddCar("Shubert_Truck_SG", true)
  207.             game.garage:CheatAddCar("Shubert_Truck_SP", true)
  208.             game.garage:CheatAddCar("Smith_200_p_pha", true)
  209.             game.garage:CheatAddCar("Smith_200_pha", true)
  210.             game.garage:CheatAddCar("Smith_coupe", true)
  211.             game.garage:CheatAddCar("Smith_Mainline_pha", true)
  212.             game.garage:CheatAddCar("Smith_Stingray_pha", true)
  213.             game.garage:CheatAddCar("Smith_Truck", true)
  214.             game.garage:CheatAddCar("Smith_V8", true)
  215.             game.garage:CheatAddCar("Smith_Wagon_pha", true)
  216.             game.garage:CheatAddCar("Trautenberg_Grande", true)
  217.             game.garage:CheatAddCar("Ulver_NewYorker", true)
  218.             game.garage:CheatAddCar("Ulver_NewYorker_p", true)
  219.             game.garage:CheatAddCar("Walker_Rocket", true)
  220.             game.garage:CheatAddCar("Walter_Coupe", true)
  221.             game.garage:CheatAddCar("Chaffeque", true)
  222.             game.garage:CheatAddCar("Elysium", true)
  223.             game.garage:CheatAddCar("Roller", true)
  224.             game.garage:CheatAddCar("Waybar", true)
  225.             return game.sds:ActivateStreamMapLine("free_joe_load")
  226.         end,
  227.         function(l_5_0)
  228.             return game.sds:GetSyncObjectForLoadSDS("italy")
  229.         end,
  230.         function(l_6_0)
  231.             if season == "summer" then
  232.                 game.traffic:OpenSeason(140)
  233.                 game.speech:LoadStage(140)
  234.                 game.radio:SetContent("Empire", "all", "Empire_07010")
  235.                 game.radio:SetContent("Classic", "all", "Classic_07010")
  236.                 game.radio:SetContent("Delta", "all", "Delta_07010")
  237.             elseif season == "winter" then
  238.                 game.traffic:OpenSeason(50)
  239.                 game.speech:LoadStage(50)
  240.                 game.radio:SetContent("Empire", "all", "Empire_02004")
  241.                 game.radio:SetContent("Classic", "all", "Classic_02004")
  242.                 game.radio:SetContent("Delta", "all", "Delta_02004")
  243.             else
  244.                 game.traffic:OpenSeason(140)
  245.                 game.speech:LoadStage(140)
  246.                 game.radio:SetContent("Empire", "all", "Empire_07010")
  247.                 game.radio:SetContent("Classic", "all", "Classic_07010")
  248.                 game.radio:SetContent("Delta", "all", "Delta_07010")
  249.             end
  250.             joe = game.entitywrapper:GetEntityByName("Joe")
  251.             henry = game.entitywrapper:GetEntityByName("Henry")
  252.             hunter = game.entitywrapper:GetEntityByName("Hunter")
  253.             escaper = game.entitywrapper:GetEntityByName("Escaper")
  254.             startPos:set(71.852096557617187, 905.59600830078125, -19.633600234985352)
  255.             joe:SetPos(startPos)
  256.             joe:SetDir(player:GetDir())
  257.             joe:SetRot(player:GetRot())
  258.             joe:Activate()
  259.             joe:InventoryAddWeapon(4, 21)
  260.             startPos:set(73.852096557617187, 906.59600830078125, -19.633600234985352)
  261.             henry:SetPos(startPos)
  262.             henry:SetDir(player:GetDir())
  263.             henry:SetRot(player:GetRot())
  264.             henry:Activate()
  265.             hunter:SetPos(hunterPos)
  266.             escaper:SetPos(escaperPos)
  267.             hunter:Activate()
  268.             escaper:Activate()
  269.             escaper:SetColor(34, 34)
  270.             hunter:SetColor(21, 21)
  271.             player:MakeCarOwnership(escaper)
  272.             player:MakeCarOwnership(hunter)
  273.             sendMessage(l_6_0, 2, 200)
  274.             joe:RegisterToMessages(guid, enums.EventType.ACTOR, enums.ActorMessages.ACTIVATE)
  275.             henry:RegisterToMessages(guid, enums.EventType.ACTOR, enums.ActorMessages.ACTIVATE)
  276.             player:SetControlStyle(enums.ControlStyle.FREE)
  277.             game.game:SoundFadeIn(1000)
  278.             return game.hud:FaderFadeIn(1000)
  279.         end
  280.     })
  281. end
  282.  
  283. CreateActionJoe = function(l_6_0)
  284.     joe:RegisterToMessages(guid)
  285.     Math:newVector():set(0, 0, 0)
  286.     action = game.game:CreateScriptActorAction(joe, Math:newVector(), 1.5, "StartMe", "0050000023")
  287. end
  288.  
  289. CreateActionHenry = function(l_7_0)
  290.     henry:RegisterToMessages(guid)
  291.     Math:newVector():set(0, 0, 0)
  292.     actionHenry = game.game:CreateScriptActorAction(henry, Math:newVector(), 1.5, "StartHenry", "0050000023")
  293. end
  294.  
  295. StartHenry = function(l_8_0)
  296.     id = CommandBuffer:Insert(l_8_0, {
  297.         function(l_1_0)
  298.         end,
  299.         function(l_2_0)
  300.             l_2_0.friendlyDoorCfg:AddWingman(henry:GetGuid())
  301.             soHenry = henry:Follow(game.game:GetActivePlayer(), "RUN", 3.5, 5, true)
  302.             game.game:GetActivePlayer():RegisterFollower(henry)
  303.             return game.delayed:CreateDelayedSynchroObject(100)
  304.         end,
  305.         function(l_3_0)
  306.             actionHenry:SetEventName("StopHenry")
  307.             actionHenry:SetTextId("0050000024")
  308.         end
  309.     })
  310. end
  311.  
  312. StopHenry = function(l_9_0)
  313.     id = CommandBuffer:Insert(l_9_0, {
  314.         function(l_1_0)
  315.         end,
  316.         function(l_2_0)
  317.             l_2_0.friendlyDoorCfg:RemoveWingman(henry:GetGuid())
  318.             if soHenry ~= nil then
  319.                 soHenry:UserData():Terminate()
  320.             end
  321.             player:UnregisterFollower(henry)
  322.             return game.delayed:CreateDelayedSynchroObject(100)
  323.         end,
  324.         function(l_3_0)
  325.             actionHenry:SetEventName("StartHenry")
  326.             actionHenry:SetTextId("0050000023")
  327.         end
  328.     })
  329. end
  330.  
  331. StartMe = function(l_10_0)
  332.     id = CommandBuffer:Insert(l_10_0, {
  333.         function(l_1_0)
  334.         end,
  335.         function(l_2_0)
  336.             l_2_0.friendlyDoorCfg:AddWingman(joe:GetGuid())
  337.             soJde = joe:Follow(game.game:GetActivePlayer(), "RUN", 2, 3.5, true)
  338.             game.game:GetActivePlayer():RegisterFollower(joe)
  339.             return game.delayed:CreateDelayedSynchroObject(100)
  340.         end,
  341.         function(l_3_0)
  342.             action:SetEventName("StopMe")
  343.             action:SetTextId("0050000024")
  344.         end
  345.     })
  346. end
  347.  
  348. StopMe = function(l_11_0)
  349.     id = CommandBuffer:Insert(l_11_0, {
  350.         function(l_1_0)
  351.         end,
  352.         function(l_2_0)
  353.             l_2_0.friendlyDoorCfg:RemoveWingman(joe:GetGuid())
  354.             if soJde ~= nil then
  355.                 soJde:UserData():Terminate()
  356.             end
  357.             player:UnregisterFollower(joe)
  358.             return game.delayed:CreateDelayedSynchroObject(100)
  359.         end,
  360.         function(l_3_0)
  361.             action:SetEventName("StartMe")
  362.             action:SetTextId("0050000023")
  363.         end
  364.     })
  365. end
Add Comment
Please, Sign In to add comment
Public Pastes
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
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!