Temat:
Menu znika po wyborze opcij
|
Napisano dnia: 2010-11-18 22:22:08
Kod:
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
//pojazdy
Model.Load(#topfun)
//aktorzy
Model.Load(#LSV3)
038B: load_requested_models
:test_1
wait 0
if
0256: player $PLAYER_CHAR defined
jf @test_1
04BB: select_interior 0
0860: link_actor $PLAYER_ACTOR to_interior 0
00A1: put_actor $PLAYER_ACTOR at 2534.252 -1707.3306 13.451
Actor.Angle($PLAYER_ACTOR) = 190.0
02EB: restore_camera_with_jumpcut
:start_1
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 11.38)
Car.Angle($pojazd_1) = 195.2518
0519: set_car $pojazd_1 locked 1
0657: car $pojazd_1 open_componentA 4
0657: car $pojazd_1 open_componentA 5
$aktor_1 = Actor.Create(CivMale, #LSV3, 2535.7832, -1714.6282, 12.4826)
Actor.Angle($aktor_1) = 356.6949
04CE: $ikona_1 = create_icon_marker_without_sphere 18 at 2535.7585 -1713.4692 13.4719
03BC: $marker_1 = create_sphere_at 2535.7585 -1713.4692 13.4719 radius 1.0
060B: set_actor $aktor_1 decision_maker_to 32
0575: set_actor $aktor_1 pinned_position 1
:petla1
wait 0
if
00ED: actor $PLAYER_ACTOR 0 near_point 2535.7585 -1713.4692 radius 0.5 0.5 on_foot
jf @petla2
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
0581: enable_radar 0
0826: enable_hud 0
03BD: destroy_sphere $marker_1
Player.CanMove($PLAYER_CHAR) = False
0639: AS_actor $PLAYER_ACTOR rotate_to_actor $aktor_1
0639: AS_actor $aktor_1 rotate_to_actor $PLAYER_ACTOR
Camera.SetPosition(2532.9404, -1710.443, 13.452, 0.0, 0.0, 0.0)
Camera.PointAt(2532.9404, -1710.443, 13.452, 2)
0159: camera_on_ped $PLAYER_ACTOR 15 2
jump @menu_1
:petla2
wait 0
if or
0118: actor $aktor_1 dead
0119: car $pojazd_1 wrecked
jf @petla1
03BD: destroy_sphere $marker_1
Marker.Disable($ikona_1)
0519: set_car $pojazd_1 locked 0
wait 3200
009B: destroy_actor $aktor_1
wait 1200
00A6: destroy_car $pojazd_1
wait 3000
:petla3
wait 0
if
80FF: not actor $PLAYER_ACTOR sphere 0 in_sphere 2535.7585 -1713.4692 13.4719 radius 50.0 50.0 30.0 on_foot
jf @petla3
jump @start_1
:menu_1
08D4: $menu_1 = create_panel_with_title 'TXT1' position 31.4 180.0 width 179.9 columns 1 interactive 1 background 1 alignment 1
08DB: set_panel $menu_1 column 0 header 'DUMMY' data 'TXT6' 'TXT7' 'TXT8' 'TXT9' 'TXT10' 'TXT11' 'TXT12' 'TXT13' 'TXT14' 'TXT15' 'TXT16' 'TXT17'
:czekaj_na_wybor
wait 0
if
00E1: player $PLAYER_CHAR pressed_key 4 //tab
jf @czekaj_na_wybor
08D7: $test_1 = panel $menu_1 active_row
//08DA: remove_panel $menu_1
//03E6: remove_text_box
0871: init_jump_table $test_1 total_jumps 8 default_jump 0 -1 jumps 0 @a2 1 @a2 2 @a3 3 @a4 4 @a5 5 @a6 6 @a7
:a1
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 15.38)
:a2
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 18.38)
:a3
:a4
:a5
:a6
:a7
0A93: end_custom_thread
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
//pojazdy
Model.Load(#topfun)
//aktorzy
Model.Load(#LSV3)
038B: load_requested_models
:test_1
wait 0
if
0256: player $PLAYER_CHAR defined
jf @test_1
04BB: select_interior 0
0860: link_actor $PLAYER_ACTOR to_interior 0
00A1: put_actor $PLAYER_ACTOR at 2534.252 -1707.3306 13.451
Actor.Angle($PLAYER_ACTOR) = 190.0
02EB: restore_camera_with_jumpcut
:start_1
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 11.38)
Car.Angle($pojazd_1) = 195.2518
0519: set_car $pojazd_1 locked 1
0657: car $pojazd_1 open_componentA 4
0657: car $pojazd_1 open_componentA 5
$aktor_1 = Actor.Create(CivMale, #LSV3, 2535.7832, -1714.6282, 12.4826)
Actor.Angle($aktor_1) = 356.6949
04CE: $ikona_1 = create_icon_marker_without_sphere 18 at 2535.7585 -1713.4692 13.4719
03BC: $marker_1 = create_sphere_at 2535.7585 -1713.4692 13.4719 radius 1.0
060B: set_actor $aktor_1 decision_maker_to 32
0575: set_actor $aktor_1 pinned_position 1
:petla1
wait 0
if
00ED: actor $PLAYER_ACTOR 0 near_point 2535.7585 -1713.4692 radius 0.5 0.5 on_foot
jf @petla2
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
0581: enable_radar 0
0826: enable_hud 0
03BD: destroy_sphere $marker_1
Player.CanMove($PLAYER_CHAR) = False
0639: AS_actor $PLAYER_ACTOR rotate_to_actor $aktor_1
0639: AS_actor $aktor_1 rotate_to_actor $PLAYER_ACTOR
Camera.SetPosition(2532.9404, -1710.443, 13.452, 0.0, 0.0, 0.0)
Camera.PointAt(2532.9404, -1710.443, 13.452, 2)
0159: camera_on_ped $PLAYER_ACTOR 15 2
jump @menu_1
:petla2
wait 0
if or
0118: actor $aktor_1 dead
0119: car $pojazd_1 wrecked
jf @petla1
03BD: destroy_sphere $marker_1
Marker.Disable($ikona_1)
0519: set_car $pojazd_1 locked 0
wait 3200
009B: destroy_actor $aktor_1
wait 1200
00A6: destroy_car $pojazd_1
wait 3000
:petla3
wait 0
if
80FF: not actor $PLAYER_ACTOR sphere 0 in_sphere 2535.7585 -1713.4692 13.4719 radius 50.0 50.0 30.0 on_foot
jf @petla3
jump @start_1
:menu_1
08D4: $menu_1 = create_panel_with_title 'TXT1' position 31.4 180.0 width 179.9 columns 1 interactive 1 background 1 alignment 1
08DB: set_panel $menu_1 column 0 header 'DUMMY' data 'TXT6' 'TXT7' 'TXT8' 'TXT9' 'TXT10' 'TXT11' 'TXT12' 'TXT13' 'TXT14' 'TXT15' 'TXT16' 'TXT17'
:czekaj_na_wybor
wait 0
if
00E1: player $PLAYER_CHAR pressed_key 4 //tab
jf @czekaj_na_wybor
08D7: $test_1 = panel $menu_1 active_row
//08DA: remove_panel $menu_1
//03E6: remove_text_box
0871: init_jump_table $test_1 total_jumps 8 default_jump 0 -1 jumps 0 @a2 1 @a2 2 @a3 3 @a4 4 @a5 5 @a6 6 @a7
:a1
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 15.38)
:a2
0395: clear_area 1 at 2535.7832 -1714.6282 12.4826 radius 8.0
$pojazd_1 = Car.Create(#topfun, 2538.4143, -1716.0818, 18.38)
:a3
:a4
:a5
:a6
:a7
0A93: end_custom_thread
Na razie to mam tyle. Próbuje to robić ale jak bym nie ustawiał to zawsze się robi to jak napisałem wyżej.





