Тушим своё авто
Теперь можно тушить автомобиль огнетушителем. Вот раздолбали вы свою тачку, а тачка крутая там (с нитро и спойлерами)! Не хочется терять! =) Теперь можно выйти и потушить огонь огнетушителем! Думаю полезно!
:CarFireexp
0001: wait 0 ms
00D6: if 0
0256: player $PLAYER_CHAR defined
004D: jump_if_false ЈЈCarFireexp
00D6: if 0
00DF: actor $PLAYER_ACTOR driving
004D: jump_if_false ЈЈCarFireexp
03C0: $pl_car = actor $PLAYER_ACTOR car
:CarFireexp2
0001: wait 0 ms
00D6: if 0
0495: unknown car check $pl_car
004D: jump_if_false ЈЈCarFireexp5
0004: $time_fire = 0 ;; integer values
0224: set car $pl_car health to 300
0325: $fire = create car $pl_car fire
0325: $fire1 = create car $pl_car fire
0325: $fire2 = create car $pl_car fire
:CarFireexp3
0001: wait 1 ms
0008: $time_fire += 1 ;; integer values
00D6: if 2
82D0: NOT fire $fire extinguished
82D0: NOT fire $fire1 extinguished
82D0: NOT fire $fire2 extinguished
004D: jump_if_false ЈЈCarFireexp7
00D6: if 0
8029: NOT $time_fire >= 200 ;; integer values
004D: jump_if_false ЈЈCarFireexp4
00D6: if 0
8119: NOT car $pl_car wrecked
004D: jump_if_false ЈЈCarFireexp6
0002: jump ЈЈCarFireexp3
:CarFireexp7
02D1: unknown remove fire $fire
031A: remove all fires
054F: $pl_car
01C3: remove references to car $pl_car
0002: jump ЈЈCarFireexp
:CarFireexp4
020B: explode car $pl_car
:CarFireexp6
054F: $pl_car
01C3: remove references to car $pl_car
0002: jump ЈЈCarFireexp
:CarFireexp5
0001: wait 0 ms
00D6: if 0
8205: NOT actor $PLAYER_ACTOR near car $pl_car radius 25.0 25.0 25.0 unknown 0
004D: jump_if_false ЈЈCarFireexp2
054F: $pl_car
01C3: remove references to car $pl_car
0002: jump ЈЈCarFireexp