MDPM v4 e carros com som na rua

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

MDPM v4 e carros com som na rua

Mensagem por kayky em Dom Abr 14, 2013 7:49 pm

Código:

{$CLEO .cs}

0@ = 1
0AB3: var 550 = 0
0AB3: var 551 = 0
0AB3: var 552 = 0
0AB3: var 553 = 0
0AB3: var 554 = 0
0AB3: var 555 = 0
0AB3: var 556 = 0
0AB3: var 557 = 0
0AB3: var 558 = 0
0AB3: var 559 = 0
0AB3: var 560 = 0
0AB1: call_scm_func @NONAME_929 0
wait 1000

:NONAME_99
wait 0
  Player.Defined($PLAYER_CHAR)
jf @NONAME_202
if
8ADC:  not test_cheat "MDPM"
jf @NONAME_148
gosub @NONAME_838
jump @NONAME_202

:NONAME_148
  Actor.Driving($PLAYER_ACTOR)
jf @NONAME_202
03C0: 24@ = actor $PLAYER_ACTOR car
4@ = Car.Model(24@)
0A01:  model 4@ minimum_4wheels_vehicle
jf @NONAME_202
22@ = 0
gosub @NONAME_213

:NONAME_202
jump @NONAME_99
wait "Æ
zùÿÿ"
0400: store_coords_to
  not Car.Defined(24@)
jf @NONAME_494
0A8C: write_memory 1@ size 4 value 0 virtual_protect 0

:NONAME_494
jump @NONAME_351
0A8C: write_memory 1@ size 4 value 24@ virtual_protect 0
30@ = 0
if
  22@ == 0
jf @NONAME_575
0A92: create_custom_thread "Som 3D Script.MDPM" 24@ 0 1 
jump @NONAME_582

:NONAME_575
0AB3: var 557 = 1

:NONAME_582
return

:NONAME_584
0AC6: 1@ = label @NONAME_1670 offset
3@ = 0
0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0

:NONAME_613
  not 3@ == 128
jf @NONAME_716
if
003B:  2@ == 10@ // (int)
jf @NONAME_672
0A8C: write_memory 1@ size 4 value 0 virtual_protect 0
0AB3: var 558 = 10@
wait 50
return

:NONAME_672
0AC6: 1@ = label @NONAME_1670 offset
3@ += 4
005A: 1@ += 3@ // (int)
0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0
jump @NONAME_613

:NONAME_716
0AB3: var 558 = 10@
wait 50
return
0AC6: 1@ = label @NONAME_1670 offset
3@ = 0
0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0

:NONAME_759
  not 3@ == 128
jf @NONAME_829
0A8C: write_memory 1@ size 4 value 0 virtual_protect 0
0AC6: 1@ = label @NONAME_1670 offset
3@ += 4
005A: 1@ += 3@ // (int)
0A8D: 2@ = read_memory 1@ size 4 virtual_protect 0
jump @NONAME_759

:NONAME_829
30@ = 1
return

:NONAME_838
0AB4: 10@ = var 551
if
  10@ > 0
jf @NONAME_871
gosub @NONAME_584

:NONAME_871
0AB4: 24@ = var 557
if
  24@ > 0
jf @NONAME_927
if
  Car.Defined(24@)
jf @NONAME_927
22@ = 1
gosub @NONAME_213

:NONAME_927
return

:NONAME_929
if
0AA2: 5@ = load_library "kernel32.dll" // IF and SET
jf @NONAME_985
0AA4: 6@ = get_proc_address "MoveFileA" library 5@ // IF and SET
jump @NONAME_990

:NONAME_985
0AB2: ret 0

:NONAME_990
0AC8: 0@ = allocate_memory_size 792
0A8E: 3@ = 0@ + 264 // int
0A8E: 4@ = 3@ + 264 // int
if
0AE6: 1@ = find_first_file "CLEO\SOM3D\*.mp3" get_filename_to 0@ //IF and SET
jf @NONAME_1352
2@ = 1

:NONAME_1064
if
0AB1: call_scm_func @NONAME_1367 1 0@
jf @NONAME_1095
2@ += 1

:NONAME_1095
8AE7:  not 0@ = find_next_file 1@ //IF and SET
jf @NONAME_1064
0AE8: find_close 1@
if
0AE6: 1@ = find_first_file "CLEO\SOM3D\*.mp3" get_filename_to 0@ //IF and SET
jf @NONAME_1352

:NONAME_1152
if
0AB1: call_scm_func @NONAME_1367 1 0@
jf @NONAME_1185
0000: NOP
jump @NONAME_1332

:NONAME_1185
0AD3: string 3@ "CLEO\SOM3D\%d.mp3" 2@
if
0AAB:  file_exists 3@
jf @NONAME_1250
2@ += 1
jump @NONAME_1257
jump @NONAME_1257

:NONAME_1250
jump @NONAME_1264

:NONAME_1257
jump @NONAME_1185

:NONAME_1264
0AD3: string 4@ "CLEO\SOM3D\%s" 0@
0AA7: call_function 6@ 2 pop 0 3@ 4@ 31@ 
if
  not 31@ == 0
jf @NONAME_1332
2@ += 1

:NONAME_1332
8AE7:  not 0@ = find_next_file 1@ //IF and SET
jf @NONAME_1152
0AE8: find_close 1@

:NONAME_1352
0AA3: free_library 5@
0AC9: free_allocated_memory 0@
0AB2: ret 0

:NONAME_1367
0085: 1@ = 0@ // (int)
0085: 2@ = 0@ // (int)
0@ = 0

:NONAME_1390
0A8D: 3@ = read_memory 2@ size 1 virtual_protect 0
2@ += 1
if or
  3@ == 0
  3@ == 46
jf @NONAME_1573
if
  3@ == 46
jf @NONAME_1566
0085: 5@ = 2@ // (int)
0A8D: 4@ = read_memory 5@ size 1 virtual_protect 0
  4@ == 109
jf @NONAME_1658
5@ += 1
0A8D: 4@ = read_memory 5@ size 1 virtual_protect 0
  4@ == 112
jf @NONAME_1658
5@ += 1
0A8D: 4@ = read_memory 5@ size 1 virtual_protect 0
  4@ == 51
jf @NONAME_1658
0@ = 1
jump @NONAME_1658

:NONAME_1566
jump @NONAME_1651

:NONAME_1573
if or
  not 3@ >= 48
  3@ > 59
jf @NONAME_1612
jump @NONAME_1658
jump @NONAME_1651

:NONAME_1612
if and
  6@ == 0
  3@ == 48
jf @NONAME_1644
jump @NONAME_1658

:NONAME_1644
6@ = 1

:NONAME_1651
jump @NONAME_1390

:NONAME_1658
  0@ == 1
0AB2: ret 0

:NONAME_1670
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP
0000: NOP

Código:

{$CLEO .cs}

8@ = 1
9@ = 0
gosub @NONAME_478

:NONAME_21
wait 0
  Player.Defined($PLAYER_CHAR)
else_jump @NONAME_315
gosub @NONAME_322
00BF: 1@ = current_time_hours, 2@ = current_time_minutes
if and
  not 1@ > 6
  1@ >= 0
else_jump @NONAME_89
wait 3@
jump @NONAME_94

:NONAME_89
wait 4@

:NONAME_94
0208: 15@ = random_float_in_ranges 15.0 -15.0
04C4: store_coords_to 12@ 13@ 14@ from_actor $PLAYER_ACTOR with_offset 15@ 75.0 0.0
073E: get_car_in_sphere 12@ 13@ 14@ radius 30.0 model -1 handle_as 0@
if
  Car.Defined(0@)
else_jump @NONAME_315
5@ = Car.Model(0@)
046C: 7@ = car 0@ driver
if and
  7@ > 0
0A01:  model 5@ minimum_4wheels_vehicle
8975:  not car 0@ emergency_vehicle
  not 5@ == 531
  not 5@ == 420
  not 5@ == 438
  not 5@ == 499
else_jump @NONAME_315
08EC: 6@ = car 0@ type
if or
  not 6@ >= 3
  5@ == 422
else_jump @NONAME_315
0A92: create_custom_thread "Som 3D script.MDPM" 0@ 8@ 9@ 

:NONAME_315
jump @NONAME_21

:NONAME_322
0085: 3@ = 10@ // (int)
0085: 4@ = 11@ // (int)
if or
  Player.InZone($PLAYER_CHAR, 'SF')
  Player.InZone($PLAYER_CHAR, 'VE')
else_jump @NONAME_398
3@ *= 2
4@ *= 2
jump @NONAME_437

:NONAME_398
if
  not Player.InZone($PLAYER_CHAR, 'LA')
else_jump @NONAME_437
3@ *= 4
4@ *= 4

:NONAME_437
0A8D: 16@ = read_memory 11993422 size 1 virtual_protect 0
if
  16@ > 5
else_jump @NONAME_476
4@ /= 2

:NONAME_476
return

:NONAME_478
0AF0: 31@ = get_int_from_ini_file "cleo\Som 3D.ini" section "Carros na rua" key "ATIVAR" //IF and SET
if
  31@ == 0
else_jump @NONAME_543
0A93: end_custom_thread

:NONAME_543
if
0AF0: 10@ = get_int_from_ini_file "cleo\Som 3D.ini" section "Carros na rua" key "Dia" //IF and SET
else_jump @NONAME_630
if
  not 10@ >= 1000
else_jump @NONAME_623
10@ = 1000

:NONAME_623
jump @NONAME_638

:NONAME_630
10@ = 10000

:NONAME_638
if
0AF0: 11@ = get_int_from_ini_file "cleo\Som 3D.ini" section "Carros na rua" key "Noite" //IF and SET
if
  not 11@ >= 1000
else_jump @NONAME_720
11@ = 1000
jump @NONAME_728

:NONAME_720
11@ = 20000

:NONAME_728
return

kayky

Mensagens : 2
Data de inscrição : 27/03/2013

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum