Авто-математика

Статус
В этой теме нельзя размещать новые ответы.

Immunity

Активный
210
44
Сделайте кто-то нормальный код) Или скомпилируйте код выше, а то не получается что-то :(
 

Immunity

Активный
210
44
Надо) Админы там рукожопы полные, нужно добить проект)
 

01EG

Известный
Проверенный
630
344
Код нормальный, он не компилится, лишь потому что у легендыча свои кейворды и еще там чо-то. В принципе он лежит у меня полускомпиленный, так как думал доделать еще функцию деления, бикоз у него она отсутствует.
 

Сэнд

Известный
Проверенный
436
213
CLEO:
{$CLEO}
0000:
wait 2000

alloc 30@ 256

while true

0B75: samp get_chat_string 99 text_to 30@ prefix_to 0 color_to 0 prefix_color_to 0

if 0C18: 0 = strstr string1 30@ string2 "{E3BE88}Математика:"
then
    if 0C18: 0 = strstr string1 30@ string2 "прибавить"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}прибавить {3399CC}%i" 1@ 2@
        005A: 1@ += 2@
        say "/otvet %i" 1@                                                      
    end

    if 0C18: 0 = strstr string1 30@ string2 "минус"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}минус {3399CC}%i" 1@ 2@
        0062: 1@ -= 2@
        say "/otvet %i" 1@
    end

    if 0C18: 0 = strstr string1 30@ string2 "умножить"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}умножить {3399CC}%i" 1@ 2@
        006A: 1@ *= 2@
        say "/otvet %i" 1@
    end
end

wait 0
end
wt5WfGIIDog.jpg

Как исправить?
 

deddosouru

Смотрю аниме, служу Сатане
Друг
2,036
1,320
Крайне нестабильная хуйня, которая будет работать лишь в тех случаях, когда будут меняться только числа. Можно было сделать по круче, с хуком, sscanf и прочим добром, но мне лень, да и в клео непривычно писать.
CLEO:
{$CLEO}
0000:
wait 2000

alloc 30@ 256

while true

0B75: samp get_chat_string 99 text_to 30@ prefix_to 0 color_to 0 prefix_color_to 0

if 0C18: 0 = strstr string1 30@ string2 "{E3BE88}Математика:"
then
    if 0C18: 0 = strstr string1 30@ string2 "прибавить"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}прибавить {3399CC}%i" 1@ 2@
        005A: 1@ += 2@
        0AF8: samp add_message_to_chat  "%i" -1 1@                                                      
    end

    if 0C18: 0 = strstr string1 30@ string2 "минус"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}минус {3399CC}%i" 1@ 2@
        0062: 1@ -= 2@
        0AF8: samp add_message_to_chat  "%i" -1 1@
    end

    if 0C18: 0 = strstr string1 30@ string2 "умножить"
    then
        0AD4: 0@ = scan_string 30@ format "{E3BE88}Математика: {3399CC}%i {299800}умножить {3399CC}%i" 1@ 2@
        006A: 1@ *= 2@
        0AF8: samp add_message_to_chat  "%i" -1 1@
    end
end

wait 0
end
переделал от нефиг делать под себя.
оно флудит ответом в чат. хреново когда включен глобал
как сделать чтоб оно не флудило ответом а ждало следующую строчку
разобрался. выставил задержки.
 
Последнее редактирование:

Dark_Knight

Me, me and me.
Друг
4,068
2,083
переделал от нефиг делать под себя.
оно флудит ответом в чат. хреново когда включен глобал
как сделать чтоб оно не флудило ответом а ждало следующую строчку
разобрался. выставил задержки.
Хук на РПЦ был бы куда лучше.
 
Статус
В этой теме нельзя размещать новые ответы.