LaRossa
Потрачен
- 429
- 117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
18Какой код у клавиши ALT?
18Какой код у клавиши ALT?
{$CLEO}
0000:
0C6A: 31@ = create_custom_thread_at_label @LABEL
REPEAT
wait 0
UNTIL 0AFA: is_samp_available
WHILE TRUE
wait 0
IF 8ADC: test_cheat "AL"
THEN
<code>
ELSE
print "OFF" 1000
WHILE TRUE
wait 0
IF 0ADC: test_cheat "AL"
THEN
print "ON" 1000
BREAK
END
END
END
END
:LABEL
WHILE TRUE
wait 0
IF 8ADC: test_cheat "AL"
THEN
<code2>
ELSE
print "OFF" 1000
WHILE TRUE
wait 0
IF 0ADC: test_cheat "AL"
THEN
print "ON" 1000
BREAK
END
END
END
END
Малюсенькая прога, чтобы определять ID виртуальных(клавиатурных) клавиш: Информация - Номера клавиш(https://blast.hk/threads/8760/)Какой код у клавиши ALT?
Эммм...Ты смотрел видео, которое я кинул? Оно снято на этом же сервере дня 4 назад
Чё так мало беск циклов?Как можно сделать активацию и деактивацию на один и тот же чит-код, чтобы это все работало во всех потоках(я создал 2)?
Вот примерно что хочу(мой вариант не работает):
Код:{$CLEO} 0000: 0C6A: 31@ = create_custom_thread_at_label @LABEL REPEAT wait 0 UNTIL 0AFA: is_samp_available WHILE TRUE wait 0 IF 8ADC: test_cheat "AL" THEN <code> ELSE print "OFF" 1000 WHILE TRUE wait 0 IF 0ADC: test_cheat "AL" THEN print "ON" 1000 BREAK END END END END :LABEL WHILE TRUE wait 0 IF 8ADC: test_cheat "AL" THEN <code2> ELSE print "OFF" 1000 WHILE TRUE wait 0 IF 0ADC: test_cheat "AL" THEN print "ON" 1000 BREAK END END END END
Эммм... Я разве писал, что это он сделал? Кто-то взорвал там всё, на каждом слёте дома/бизнеса такое происходит.Эммм...
![]()
![]()
Это не он сделал...
Так, не придерайся. Все к месту тут у меня. В моём случае без циклов не обойтись(вырезал код). Так что.. Не надо тут из себя умного строить, мол "много циклов не надо, я же знаю, что тебе надо(нет)"Чё так мало беск циклов?
Я хочу больше
Юзай until
Там явно не просто взрыв создается. Там что-то взрывают, но что - не видно.Эммм... Я разве писал, что это он сделал? Кто-то взорвал там всё, на каждом слёте дома/бизнеса такое происходит.
Как можно сделать активацию и деактивацию на один и тот же чит-код, чтобы это все работало во всех потоках(я создал 2)?
Вот примерно что хочу(мой вариант не работает):
Код:{$CLEO} 0000: 0C6A: 31@ = create_custom_thread_at_label @LABEL REPEAT wait 0 UNTIL 0AFA: is_samp_available WHILE TRUE wait 0 IF 8ADC: test_cheat "AL" THEN <code> ELSE print "OFF" 1000 WHILE TRUE wait 0 IF 0ADC: test_cheat "AL" THEN print "ON" 1000 BREAK END END END END :LABEL WHILE TRUE wait 0 IF 8ADC: test_cheat "AL" THEN <code2> ELSE print "OFF" 1000 WHILE TRUE wait 0 IF 0ADC: test_cheat "AL" THEN print "ON" 1000 BREAK END END END END
{$CLEO}
0000:
while not Samp.Available()
wait 0
end
while true
wait 0
if 8ADC: test_cheat "AL"
then
0B12: 0@ = 0@ XOR 1
if 0@ == 1
then
print "ON" 1000
else
print "OFF" 1000
end
end
end
Так погоди, у меня же два потока. На одном-то я и сам знаю, а на двух нет. Там надо разные чит-коды, а мне нужно, чтобы все отключалось однимCLEO:{$CLEO} 0000: while not Samp.Available() wait 0 end while true wait 0 if 8ADC: test_cheat "AL" then 0B12: 0@ = 0@ XOR 1 if 0@ == 1 then print "ON" 1000 else print "OFF" 1000 end end end
хуками. gametextЛадно, как можно считать текст с сообщения на экране?![]()
С этого![]()
Пиздец ты ему помогхуками. gametext
Убери это:Пацаны помогите нужно что бы он обратно на место не тп а оставался там где координаты тпшут что бы там и остался!
Код:{$CLEO} 0000:NOP 0B34: samp register_client_command "tmats" to_label @command 0B2E: 1@ = read_samp_memory offset 0xD150 size 2 while true wait 0 if 0@ == 1 then Actor.LockInCurrentPosition($PLAYER_ACTOR,1) 018C: play_sound 1052 at 0.0 0.0 0.0 0B2D: write_samp_memory offset 0xD150 value 0xC390 size 2 wait 1000 0AFB: samp request_class 1 Actor.StorePos($PLAYER_ACTOR,4@,5@,6@) Actor.Angle($PLAYER_ACTOR) = 180.1614 Camera.Restore_WithJumpCut() 04E4: refresh_game_renderer_at 375.928 1976.13 24.0366 03CB: set_rendering_origin_at 375.928 1976.13 24.0366 wait 150 Actor.PutAt($PLAYER_ACTOR,375.928 1976.13 24.0366) wait 350 Actor.PutAt($PLAYER_ACTOR,4@,5@,6@) wait 1000 0B2D: write_samp_memory offset 0xD150 value 1@ size 2 Actor.LockInCurrentPosition($PLAYER_ACTOR,0) 0@ = 0 end end :command 0@ = 1 chatmsg "* [Loading]..." -1 SAMP.CmdRet()
wait 350
Actor.PutAt($PLAYER_ACTOR,4@,5@,6@)