GTA VC 2007 Mod

[ian64]

Hello

Can someone out there please help with my modifications?

I want to play the 2007 version of 'New Vice City' mod,

with added drunk driving with wanted level 2 whenever you

enter the biker bar or ocean hotel for a drink.

I found a script which causes police atention when drunk driving,

I added it to the to my main.scm script for 'New Vice City 2007',

but i can not get it to work.

Getting drunk at bikers bar & ocean hotel.

:DRUNK

thread 'DRUNK'

:DRUNK_10

wait 250

if or

Pickup.Picked_up($376)

Pickup.Picked_up($377)

else_jump @DRUNK_10

fade 0 500

wait 1000

00BC: text_highpriority 'RCPL1_1' 10000 ms 1 // Nice drink.

03FD: set_player $PLAYER_CHAR handling_responsiveness 8

052C: set_player $PLAYER_CHAR drunk_visuals 255

fade 1 500

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 7

052C: set_player $PLAYER_CHAR drunk_visuals 225

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 6

052C: set_player $PLAYER_CHAR drunk_visuals 200

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 5

052C: set_player $PLAYER_CHAR drunk_visuals 175

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 4

052C: set_player $PLAYER_CHAR drunk_visuals 150

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 3

052C: set_player $PLAYER_CHAR drunk_visuals 125

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 2

052C: set_player $PLAYER_CHAR drunk_visuals 100

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 1

052C: set_player $PLAYER_CHAR drunk_visuals 75

wait 19000

03FD: set_player $PLAYER_CHAR handling_responsiveness 0

052C: set_player $PLAYER_CHAR drunk_visuals 0

jump @DRUNK_10

-----------------------------------------------

Drink driving with wanted level script i found,

but cannot get to work with my game.

AME_18

wait 250

if

Player.Defined($PLAYER_CHAR)

else_jump @NONAME_18

if

$209 == 1 // integer values

else_jump @NONAME_18

if

Actor.Driving($PLAYER_ACTOR)

else_jump @NONAME_18

03C0: $305 = actor $PLAYER_ACTOR car

02E3: $306 = car $305 speed

if

$306 > 5.0 // floating-point values

else_jump @NONAME_18

if

not Player.WantedLevel($PLAYER_CHAR) > 1

else_jump @NONAME_18

0054: store_player $PLAYER_CHAR position_to $307 $308 $309

0086: $310 = $307 // floating-point values only

$310 += 10.0 // floating-point values

0086: $311 = $308 // floating-point values only

$311 += 10.0 // floating-point values

0086: $312 = $307 // floating-point values only

$312 -= 10.0 // floating-point values

0086: $314 = $308 // floating-point values only

$314 -= 10.0 // floating-point values

0469: create_actor $315 in area $310 $311 $312 $314 unknown 1 0 0 0 0

if

not $315 == -1 // integer values

else_jump @NONAME_18_345

Player.WantedLevel($PLAYER_CHAR) = 2

03CF: load_wav 'PHIL211' as 1

:NONAME_18_260

if

83D0: not wav 1 loaded

else_jump @NONAME_18_286

wait 0

jump @NONAME_18_260

:NONAME_18_286

00BC: text_highpriority 'BANK_T' 5000 ms 1 // 10-4 we've got a drunk driver.

03D1: play_wav 1

:NONAME_18_305

if

83D2: not wav 1 ended

else_jump @NONAME_18_331

wait 0

jump @NONAME_18_305

:NONAME_18_331

040D: unload_wav 1

03D5: remove_text 'BANK_T' // 10-4 we've got a drunk driver.

:NONAME_18_345

Actor.RemoveReferences($315)

jump @NONAME_18

Come on peeps, any help at all would be much appreciated.

Thanks in advance