D-Warp(v0.1) by D.Kay SOURCE

D-Warp(v0.1) by D.Kay

SOURCE

Original:

 // 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 
thread "D-Stats" 
0662: printstring "UGBASE.EU" 
0662: printstring "YOLO" 
0662: printstring "YOLO" 
0662: printstring "YOLO" 
wait 0 
0B34: samp register_client_command "pwarp" to_label @D-Stats_319 
0B34: samp register_client_command "vwarp" to_label @D-Stats_635 
0B34: samp register_client_command "vspec" to_label @D-Stats_966 
0B34: samp register_client_command "spec_off" to_label @D-Stats_1258 
0B34: samp register_client_command "wback" to_label @D-Stats_1266 
31@ = 0 

:D-Stats_134
wait 0 
if 
  31@ == 1 
else_jump @D-Stats_134 
31@ = 0 
SAMP.CmdRet
Actor.StorePos($0[3], 20@, 21@, 22@)
04C4: store_coords_to 5@ 6@ 7@ from_actor 4@ with_offset 0.0 -1.0 -0.7 
wait 0 
Actor.PutAt($0[3], 5@, 6@, 7@)
29@ = Actor.Angle(4@)
Actor.Angle($0[3]) = 29@
chatmsg "{4960F5}[D-WARP]: Typed {FF0000}/wback {4960F5} to get back." 12566463 
jump @D-Stats_134 

:D-Stats_319
wait 0 
   SAMP.IsCommandTyped(0@)
if 
0AD4: 1@ = scan_string 0@ format "%d %d" 2@  
else_jump @D-Stats_414 
if 
   SAMP.IsPlayerConnected(2@)
else_jump @D-Stats_562 
4@ = SAMP.GetActorHandleByPlayerID(2@)
if 
056D:   actor 4@ defined 
else_jump @D-Stats_480 
31@ = 1 
SAMP.CmdRet
jump @D-Stats_134 

:D-Stats_414
wait 0 
chatmsg "{4960F5}[D-WARP]: /pgoto {FF0000}<PlayerID>" 12566463 
31@ = 0 
SAMP.CmdRet

:D-Stats_480
wait 0 
chatmsg "{4960F5}[D-WARP]: Player {FF0000}is not streamed in." 12451840 
31@ = 0 
SAMP.CmdRet
jump @D-Stats_134 

:D-Stats_562
wait 0 
chatmsg "{4960F5}[D-WARP]: {FF0000}Invaild player ID" 12451840 
SAMP.CmdRet
31@ = 0 
jump @D-Stats_134 

:D-Stats_635
   SAMP.IsCommandTyped(9@)
if 
0AD4: $0[4] = scan_string 9@ format "%d" 12@  
else_jump @D-Stats_910 
11@ = SAMP.GetVehicleHandleBySAMPVehicleID(12@)
if 
056E:   car 11@ defined 
else_jump @D-Stats_825 
Actor.StorePos($0[3], 20@, 21@, 22@)
0407: store_coords_to 13@ 14@ 15@ from_car 11@ with_offset 0.0 -1.0 -1.0 
Actor.PutAt($0[3], 13@, 14@, 15@)
chatmsg "{4960F5}[D-WARP]: Typed {FF0000}/wback {4960F5} to get back." 12566463 
jump @D-Stats_903 

:D-Stats_825
chatmsg "{4960F5}[D-WARP]: {FF0000}Vehicle Is Not Streamed in / Not Available" 12451840 

:D-Stats_903
jump @D-Stats_964 

:D-Stats_910
chatmsg "{4960F5}[D-WARP]: /vgoto {FF0000}<VehicleID>" 12566463 

:D-Stats_964
SAMP.CmdRet

:D-Stats_966
wait 0 
   SAMP.IsCommandTyped(10@)
if 
0AD4: $0[4] = scan_string 10@ format "%d" 17@  
else_jump @D-Stats_1201 
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(17@)
if 
056E:   car 16@ defined 
else_jump @D-Stats_1123 
19@ = Car.Health(16@)
Camera.OnVehicle(16@, 3, 1)
chatmsg "{4960F5}[D-VSPEC]: {FF0000}Vehicle [ID: %d], [Health: %d]" 12451840 17@ 19@ 
jump @D-Stats_1194 

:D-Stats_1123
chatmsg "{4960F5}[D-VSPEC]: Vehicle Is Not Streamed in / Not Available" 12451840 

:D-Stats_1194
jump @D-Stats_1256 

:D-Stats_1201
chatmsg "{4960F5}[D-VSPEC]: /vspec {FF0000}<VehicleID>" 12566463 

:D-Stats_1256
SAMP.CmdRet

:D-Stats_1258
wait 0 
Camera.Restore_WithJumpCut
SAMP.CmdRet

:D-Stats_1266
wait 0 
Actor.PutAt($0[3], 20@, 21@, 22@)
SAMP.CmdRet

Compilable:

 // 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 
thread "D_Stats" 
0662: printstring "UGBASE.EU" 
0662: printstring "YOLO" 
0662: printstring "YOLO" 
0662: printstring "YOLO" 
wait 0 
0B34: samp register_client_command "pwarp" to_label @D_Stats_319 
0B34: samp register_client_command "vwarp" to_label @D_Stats_635 
0B34: samp register_client_command "vspec" to_label @D_Stats_966 
0B34: samp register_client_command "spec_off" to_label @D_Stats_1258 
0B34: samp register_client_command "wback" to_label @D_Stats_1266 
31@ = 0 

:D_Stats_134
wait 0 
if 
  31@ == 1 
else_jump @D_Stats_134 
31@ = 0 
SAMP.CmdRet
Actor.StorePos($0[3], 20@, 21@, 22@)
04C4: store_coords_to 5@ 6@ 7@ from_actor 4@ with_offset 0.0 -1.0 -0.7 
wait 0 
Actor.PutAt($0[3], 5@, 6@, 7@)
29@ = Actor.Angle(4@)
Actor.Angle($0[3]) = 29@
chatmsg "{4960F5}[D-WARP]: Typed {FF0000}/wback {4960F5} to get back." 12566463 
jump @D_Stats_134 

:D_Stats_319
wait 0 
   SAMP.IsCommandTyped(0@)
if 
0AD4: 1@ = scan_string 0@ format "%d %d" 2@  
else_jump @D_Stats_414 
if 
   SAMP.IsPlayerConnected(2@)
else_jump @D_Stats_562 
4@ = SAMP.GetActorHandleByPlayerID(2@)
if 
056D:   actor 4@ defined 
else_jump @D_Stats_480 
31@ = 1 
SAMP.CmdRet
jump @D_Stats_134 

:D_Stats_414
wait 0 
chatmsg "{4960F5}[D-WARP]: /pgoto {FF0000}<PlayerID>" 12566463 
31@ = 0 
SAMP.CmdRet

:D_Stats_480
wait 0 
chatmsg "{4960F5}[D-WARP]: Player {FF0000}is not streamed in." 12451840 
31@ = 0 
SAMP.CmdRet
jump @D_Stats_134 

:D_Stats_562
wait 0 
chatmsg "{4960F5}[D-WARP]: {FF0000}Invaild player ID" 12451840 
SAMP.CmdRet
31@ = 0 
jump @D_Stats_134 

:D_Stats_635
   SAMP.IsCommandTyped(9@)
if 
0AD4: $0[4] = scan_string 9@ format "%d" 12@  
else_jump @D_Stats_910 
11@ = SAMP.GetVehicleHandleBySAMPVehicleID(12@)
if 
056E:   car 11@ defined 
else_jump @D_Stats_825 
Actor.StorePos($0[3], 20@, 21@, 22@)
0407: store_coords_to 13@ 14@ 15@ from_car 11@ with_offset 0.0 -1.0 -1.0 
Actor.PutAt($0[3], 13@, 14@, 15@)
chatmsg "{4960F5}[D-WARP]: Typed {FF0000}/wback {4960F5} to get back." 12566463 
jump @D_Stats_903 

:D_Stats_825
chatmsg "{4960F5}[D-WARP]: {FF0000}Vehicle Is Not Streamed in / Not Available" 12451840 

:D_Stats_903
jump @D_Stats_964 

:D_Stats_910
chatmsg "{4960F5}[D-WARP]: /vgoto {FF0000}<VehicleID>" 12566463 

:D_Stats_964
SAMP.CmdRet

:D_Stats_966
wait 0 
   SAMP.IsCommandTyped(10@)
if 
0AD4: $0[4] = scan_string 10@ format "%d" 17@  
else_jump @D_Stats_1201 
16@ = SAMP.GetVehicleHandleBySAMPVehicleID(17@)
if 
056E:   car 16@ defined 
else_jump @D_Stats_1123 
19@ = Car.Health(16@)
Camera.OnVehicle(16@, 3, 1)
chatmsg "{4960F5}[D-VSPEC]: {FF0000}Vehicle [ID: %d], [Health: %d]" 12451840 17@ 19@ 
jump @D_Stats_1194 

:D_Stats_1123
chatmsg "{4960F5}[D-VSPEC]: Vehicle Is Not Streamed in / Not Available" 12451840 

:D_Stats_1194
jump @D_Stats_1256 

:D_Stats_1201
chatmsg "{4960F5}[D-VSPEC]: /vspec {FF0000}<VehicleID>" 12566463 

:D_Stats_1256
SAMP.CmdRet

:D_Stats_1258
wait 0 
Camera.Restore_WithJumpCut
SAMP.CmdRet

:D_Stats_1266
wait 0 
Actor.PutAt($0[3], 20@, 21@, 22@)
SAMP.CmdRet

Hacked and decrypted by Mr.Ze

Search Post

Label :