Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- {$CLEO .cs}
- 0000: NOP
- 30@ = 0
- while true
- wait 0
- 0AAA: 25@ = thread 'DSKOOL' pointer
- 0AAA: 26@ = thread 'BSKOOL' pointer
- if and //textures
- 30@ == 0
- 25@ == 0
- 26@ == 0
- Actor.Driving($PLAYER_ACTOR)
- //$Active_Interior == 0
- 84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
- 84A7: not actor $PLAYER_ACTOR driving_boat
- //80DD: not actor $PLAYER_ACTOR driving_car_with_model #TAXI
- //80DD: not actor $PLAYER_ACTOR driving_car_with_model #CABBIE
- then
- 03C0: 1@ = actor $PLAYER_ACTOR car
- 0390: load_txd_dictionary "SPEED"
- 038F: load_texture "STRELK" as 115 // Load dictionary with 0390 first
- 038F: load_texture "CIF" as 116 // Load dictionary with 0390 first
- 038F: load_texture "CIFN" as 117 // Load dictionary with 0390 first
- 038F: load_texture "STRELKN" as 118 // Load dictionary with 0390 first
- 30@ = 1
- {else
- 03F0: enable_text_draw 0
- 0391: release_txd_dictionary
- 30@ = 0 }
- end //textures
- while 30@ == 1
- wait 0
- gosub @CutsceneCheck
- gosub @WideScreenCheck
- 00BF: 12@ = current_time_hours, 13@ = current_time_minutes
- if and
- 056E: car 1@ defined
- 29@ == FALSE
- 28@ == FALSE
- 12@ > 6
- then
- //02E3: 2@ = car 1@ speed
- //2@ *= 4.0
- 0AB1: call_scm_func @time 0
- 0AB1: call_scm_func @GEAR 0 23@
- 03F0: enable_text_draw 1
- 03E3: set_texture_to_be_drawn_antialiased 1
- 038D: draw_texture 116 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
- 03E3: set_texture_to_be_drawn_antialiased 1
- 03E0: draw_text_behind_textures 1
- 074B: draw_texture 115 position 550.0 360.0 scale 191.25 170.0 angle 23@ color_RGBA 255 255 255 255
- end
- if and
- 056E: car 1@ defined
- 29@ == FALSE
- 28@ == FALSE
- 12@ <= 6
- then
- {02E3: 2@ = car 1@ speed
- 2@ *= 4.0}
- 0AB1: call_scm_func @time 0
- 0AB1: call_scm_func @GEAR 0 23@
- 03F0: enable_text_draw 1
- 03E3: set_texture_to_be_drawn_antialiased 1
- 038D: draw_texture 117 position 550.0 360.0 size 191.25 170.0 RGBA 255 255 255 255
- 03E3: set_texture_to_be_drawn_antialiased 1
- 03E0: draw_text_behind_textures 1
- 074B: draw_texture 118 position 550.0 360.0 scale 191.25 170.0 angle 23@ color_RGBA 255 255 255 255
- end
- if// or
- //30@ == 2
- 80DF: not actor $PLAYER_ACTOR driving
- then
- 03F0: enable_text_draw 0
- wait 1
- 0391: release_txd_dictionary
- 30@ = 0
- end
- if //or
- 0ab0: 192 //~
- //00DD: actor $PLAYER_ACTOR driving_car_with_model #TAXI
- //00DD: actor $PLAYER_ACTOR driving_car_with_model #CABBIE
- then
- 03F0: enable_text_draw 0
- wait 1
- 0391: release_txd_dictionary
- 30@ = 0
- end
- end//30@ == 1
- end
- :time
- 00BF: 12@ = current_time_hours, 13@ = current_time_minutes
- 0349: set_text_draw_font 3
- 033F: set_text_draw_letter_size 0.25 0.84
- 0348: enable_text_draw_proportional 1
- 081C: draw_text_outline 1 RGBA 0 0 0 255
- 0340: set_text_draw_RGBA 221 148 32 200
- 03E0: draw_text_behind_textures 1
- if
- 13@ > 9
- then
- 045B: draw_text_2numbers 540.0 340.0 GXT 'TIME' numbers 12@ 13@ // ~1~:~1~
- else
- 045B: draw_text_2numbers 540.0 340.0 GXT 'TIME_0' numbers 12@ 13@ // ~1~:~1~
- end
- 0AB2: ret 0
- :CutsceneCheck
- if
- 06B9: cutscene_data_loaded
- then
- if
- 82E9: not cutscene_reached_end
- then
- 29@ = TRUE
- end
- else
- 29@ = FALSE
- end
- return
- :WideScreenCheck
- 0A8D: 27@ = read_memory 0xB6F065 size 4 virtual_protect 0
- if
- 27@ == 1
- then
- 28@ = TRUE
- else
- 28@ = FALSE
- end
- return
- :GEAR
- if and
- 84C8: not actor $PLAYER_ACTOR driving_flying_vehicle
- 84A7: not actor $PLAYER_ACTOR driving_boat
- //80DD: not actor $PLAYER_ACTOR driving_car_with_model #TAXI
- //80DD: not actor $PLAYER_ACTOR driving_car_with_model #CABBIE
- Actor.Driving($PLAYER_ACTOR)
- then
- 03C0: 0@ $player_actor
- 0A97: 31@ = car 0@ struct
- 0A8E: 30@ = 31@ + 1424 // int
- 0A8D: 30@ = read_memory 30@ size 1 virtual_protect 0
- 0AA8: call_function_method 0x6D1080 struct 31@ num_params 0 pop 0 29@
- if or
- 29@ == 1
- 29@ == 2
- then
- if or
- 30@ == 0
- 30@ == 9
- then
- 0174: 3@ = car 0@ Z_angle
- if and
- 3@ >= 60.0
- 3@ <= 150.0
- then
- 0AA7: call_function 0x49D3A0 num_params 0 pop 0 3@ // ??? ????????? 2 WE
- else
- if and
- 3@ >= 240.0
- 3@ <= 330.0
- then
- 0AA7: call_function 0x49D3A0 num_params 0 pop 0 3@ // ??? ????????? 2 WE
- else
- 0AA7: call_function 0x49D350 num_params 0 pop 0 3@ // ??? ????????? 1 NS
- end
- end
- for 4@ = 8 to 31
- 08C3: clear 3@ bit 4@
- end // ???????? ???????: 0 - ???????, 1 - ??????, 2 - ???????
- if
- 3@ == 0
- then
- 4@ = 0
- 5@ = 255
- 6@ = 0
- else
- if
- 3@ == 1
- then
- 4@ = 255
- 5@ = 128
- 6@ = 0
- else
- 4@ = 255
- 5@ = 0
- 6@ = 0
- end
- end
- 0AB8: get_vehicle 0@ current_gear_to 2@
- 02E3: 0@ 0@
- 0@ *= 3.6
- 0087: 1@ = 0@ // (float)
- if
- 1@ > 240.0
- then
- 1@ = 240.0
- end
- 0092: 0@ = float 1@ to_integer
- 0@ *= 1.35
- 03F0: enable_text_draw 1
- 0349: set_text_draw_font 3 // 0 2
- 03E4: enable_text_draw_align_right 1
- 0340: set_text_draw_RGBA 4@ 5@ 6@ 255 //0 128 0 255
- 081C: draw_text_outline 1 RGBA 0 0 0 200
- 033F: set_text_draw_letter_size 0.25 0.84
- 045A: draw_text_1number 567.0 358.0 GXT 'NUMBER' number 2@ // ~1~ ? +14
- end // 30 ==
- end // 29 ==
- end
- 0AB2: ret 1 1@
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement