ARP TP by DubStep_ SOURCE

ARP TP by DubStep_

SOURCE

// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP 
0662: printstring "Made by DS_" 
thread "Label__0" 

:Label__0_29
wait 0 
   SAMP.Available
else_jump @Label__0_29 
chatmsg "[ARP TP]: {ffffff}by DubStep_ started. Special for K0tenok" 65280 
SAMP.GetScreenResolution(10@, 11@)
10@ /= 2 
10@ += 150 
11@ /= 2 
Dialog.Create(0@, "{808080}Teleport by DubStep_{909080} for K0tenok")
Dialog.SetRECT(0@, 10@, 11@, 410, 310)
Dialog.AddListBox(0@, 10, 5, 5, 400, 250)
Dialog.ListBoxInsertElement(0@, 10, "Ěŕăŕçčí Îäĺćäű LS", 4@, -1)
Dialog.ListBoxInsertElement(0@, 10, "Ěŕăŕçčí Îäĺćäű SF", 4@, -1)
Dialog.ListBoxInsertElement(0@, 10, "Ěŕăŕçčí Îđóćč˙ LS", 4@, -1)
Dialog.ListBoxInsertElement(0@, 10, "Ěŕăŕçčí Îđóćč˙ LV", 4@, -1)
Dialog.ListBoxInsertElement(0@, 10, "Ěŕăŕçčí Îđóćč˙ SF", 4@, -1)
Dialog.ListBoxInsertElement(0@, 10, "Ę ěĺňęĺ íŕ ęŕđňĺ", 4@, -1)
Dialog.AddButton(0@, 0, "Ňĺëĺďîđň", 220, 260, 100, 30)
Dialog.AddButton(0@, 1, "Çŕęđűňü", 90, 260, 100, 30)
Dialog.SetVisible(0@, 0)
0B34: samp register_client_command "tpkot" to_label @Label__0_662 

:Label__0_487
wait 0 
if 
   Dialog.IsVisible(0@)
else_jump @Label__0_655 
SAMP.SetCursorMode(3)
if 
   Dialog.PopEvent(0@, 1@, 2@)
else_jump @Label__0_655 
if 
  1@ == 1794 
else_jump @Label__0_565 
Dialog.ListBoxGetSelectedAndCount(0@, 2@, 3@, 0)

:Label__0_565
if 
  1@ == 257 
else_jump @Label__0_655 
if 
  2@ == 0 
else_jump @Label__0_626 
Dialog.SetVisible(0@, 0)
SAMP.SetCursorMode(0)
call @Label__0_735 1 3@ 

:Label__0_626
if 
  2@ == 1 
else_jump @Label__0_655 
Dialog.SetVisible(0@, 0)
SAMP.SetCursorMode(0)

:Label__0_655
jump @Label__0_487 

:Label__0_662
if 
   Dialog.IsVisible(0@)
else_jump @Label__0_696 
Dialog.SetVisible(0@, 0)
SAMP.SetCursorMode(0)
jump @Label__0_733 

:Label__0_696
Dialog.SetVisible(0@, 1)
11@ += 90 
10@ += 100 
call @Label__0_1166 2 10@ 11@ 

:Label__0_733
SAMP.CmdRet

:Label__0_735
if 
  0@ == 0 
else_jump @Label__0_783 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, 459.2712, -1501.217, 30.0387)

:Label__0_783
if 
  0@ == 1 
else_jump @Label__0_831 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, -1696.772, 949.9268, 23.8906)

:Label__0_831
if 
  0@ == 2 
else_jump @Label__0_879 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, 1365.783, -1279.804, 12.5469)

:Label__0_879
if 
  0@ == 3 
else_jump @Label__0_927 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, 2156.103, 943.2082, 9.8203)

:Label__0_927
if 
  0@ == 4 
else_jump @Label__0_975 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, -2626.02, 212.4472, 3.6146)

:Label__0_975
if 
  0@ == 5 
else_jump @Label__0_1154 
if 
0AB6: store_target_marker_coords_to 10@ 11@ 12@ // IF and SET 
else_jump @Label__0_1103 
call @Label__0_1159 0 
Actor.PutAt($PLAYER_ACTOR, 10@, 11@, 12@)
2@ = 0 

:Label__0_1046
wait 0 
0AB6: store_target_marker_coords_to 10@ 11@ 12@ // IF and SET 
Actor.PutAt($PLAYER_ACTOR, 10@, 11@, 12@)
2@ += 1 
  2@ > 50 
else_jump @Label__0_1046 
jump @Label__0_1154 

:Label__0_1103
chatmsg "[ARP TP]: {ffffff}ďîńňŕâü ěĺňęó íŕ ęŕđňĺ!" 65280 

:Label__0_1154
ret 0 

:Label__0_1159
SAMP.Spawn
ret 0 

:Label__0_1166
0AA2: 2@ = load_library "user32.dll" // IF and SET 
0AA4: 3@ = get_proc_address "SetCursorPos" library 2@ // IF and SET 
0AA5: call 3@ num_params 2 pop 0 1@ 0@  
ret 0 

Hacked and decrypted by Mr.Ze

Search Post

Label :