求帮助,怎么完美移植pc的瞬移cleo代码进安卓的sa
cleo吧
全部回复
仅看楼主
level 10
zhi441 楼主
// This file was decompiled using SASCM.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$CLEO .cs}
//-------------MAIN---------------
thread 'TPIN'
5@ = 0
:TPIN_18
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @TPIN_18
if
not Actor.Driving($PLAYER_ACTOR)
jf @TPIN_76
if
0AB0: key_pressed 115
jf @TPIN_18
jump @TPIN_253
:TPIN_76
if
Actor.Driving($PLAYER_ACTOR)
jf @TPIN_18
if
0AB0: key_pressed 115
jf @TPIN_18
jump @TPIN_114
:TPIN_114
03C0: 20@ = actor $PLAYER_ACTOR car
4@ = Actor.Angle($PLAYER_ACTOR)
0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
0169: set_fade_color_RGB 0 0 0
fade 0 500
wait 500
Player.CanMove($PLAYER_CHAR) = False
select_interior 0
04FA: reset_interior 0 colors
057E: set_radar_grey 0
04E4: unknown_refresh_game_renderer_at 0@ 1@
Camera.SetAtPos(0@, 1@, 2@)
if
Player.Defined($PLAYER_CHAR)
jf @TPIN_377
0860: link_actor $PLAYER_ACTOR to_interior 0
Car.PutAt(20@, 0@, 1@, -100.0)
Car.Angle(20@) = 4@
jf @TPIN_377
:TPIN_253
4@ = Actor.Angle($PLAYER_ACTOR)
0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
0169: set_fade_color_RGB 0 0 0
fade 0 500
wait 500
Player.CanMove($PLAYER_CHAR) = False
select_interior 0
04FA: reset_interior 0 colors
057E: set_radar_grey 0
04E4: unknown_refresh_game_renderer_at 0@ 1@
Camera.SetAtPos(0@, 1@, 2@)
if
Player.Defined($PLAYER_CHAR)
jf @TPIN_377
0860: link_actor $PLAYER_ACTOR to_interior 0
Actor.PutAt($PLAYER_ACTOR, 0@, 1@, -100.0)
Actor.Angle($PLAYER_ACTOR) = 4@
:TPIN_377
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @TPIN_377
wait 1500
fade 1 1000
:TPIN_409
if
fading
jf @TPIN_433
wait 0
jump @TPIN_409
:TPIN_433
wait 0
if
Player.Defined($PLAYER_CHAR)
jf @TPIN_433
Player.CanMove($PLAYER_CHAR) = True
Camera.SetBehindPlayer
Camera.Restore_WithJumpCut
jump @TPIN_18
2014年05月06日 14点05分 1
1