Скрипт на флуд

Anything and all.

Moderators: Murderator+, Murderator

SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Скрипт на флуд

Post by SESTRA »

Парни подскажите я не допираю вот скрипт ну тоесть не скрипт а так на флуд кароче что нуна сделать чтоб не просто тупо выскакивало а писалось кабуто я пишу !
Пример

#
Sub Flud()
uo.msg("O")
wait(800)
uo.msg("O o")
wait(800)
uo.msg("O oe")
wait(800)
uo.msg("O oe e")
wait(800)
uo.msg("O oe ea")
wait(800)
uo.msg("O oe eae")
wait(800)
uo.msg("O oe eaei")
wait(800)
uo.msg("O oe eaeie")
wait(800)
end sub
А Я че Я не че !
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Задержки побольше поставь... в строках:

Code: Select all

wait(800)

800 замени на нужное число...
ПС: 1000 равна 1 сек
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Всё гораздо красивее -)

Code: Select all

sub Flooder()
var i, arr_len = 5 ; Общее количество слов
var speed = 300 ; Скорость нажатия клавиш в мс.
; Ниже - слова
DIM words[val(str(arr_len))]
words[0] = "A"
words[1] = "BB"
words[2] = "CCC"
words[3] = "DDDD"
words[4] = "EEEEE"
for i=0 to arr_len-1
wait((strlen(words[i])+1)*speed)
uo.msg(words[i])
next
endsub


ЗЫ: Можно еще рандомайзу встроить, чтобы добавлять/вычитать секунды, чтобы было похоже, что ищешь клавишу, забыл что писать итп, можно даже опечатки замутить, только это некрасиво в скрипте инжекта будет смотреться - надо будет дописать пару длинных функций, для определения кода символа и создания символа из кода.
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Destruction wrote:Всё гораздо красивее -)


Можно еще красивее :oops:

Code: Select all

sub ExtraFlooder()
;
; Требует ASM-3 любой версии
;
; (c) Edred, сваяно прямо на форуме без тестирования
;
Var st = UO.AsmInputString( 'Что бум флудить?')
Var i = strlen( st ), j
Var speed = 1000 ; Скорость нажатия клавиш в мс.
For j = 0 To i-1
   UO.Msg( left( st, j+1 ) )
   wait( speed )
Next
endsub
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Флудеры йопт &)
SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Post by SESTRA »

Спасибо :)
А Я че Я не че !
Destruction
Junior Expert
Posts: 3221
Joined: 2004-06-24 22:08:56

Post by Destruction »

Edred wrote:
Destruction wrote:Всё гораздо красивее -)


Можно еще красивее :oops:

Code: Select all

sub ExtraFlooder()
;
; Требует ASM-3 любой версии
;
; (c) Edred, сваяно прямо на форуме без тестирования
;
Var st = UO.AsmInputString( 'Что бум флудить?')
Var i = strlen( st ), j
Var speed = 1000 ; Скорость нажатия клавиш в мс.
For j = 0 To i-1
   UO.Msg( left( st, j+1 ) )
   wait( speed )
Next
endsub

Нет, сие конструкция красивее, но зато куда менее юзабельна, например требует АСМ.

ЗЫ: Дред, будем делать функцию создания опечаток во фразах? Мне не слабо :wink:
SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Post by SESTRA »

UO.AsmInputString

Вот такая ошибка(
А Я че Я не че !
megafakel
Posts: 19
Joined: 2006-03-28 07:55:10

Post by megafakel »

А как команду поставить?
SESTRA
Posts: 223
Joined: 2006-02-21 09:31:41
Contact:

Post by SESTRA »

куда поставить:?))))
В асю стукни!
А Я че Я не че !
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

SESTRA wrote:UO.AsmInputString

Вот такая ошибка(


Написано же - требует АСМ любой версии. Тебе сюда: http://agrs.info/asm
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

Destruction wrote:Нет, сие конструкция красивее, но зато куда менее юзабельна, например требует АСМ.


Поставить АСМ легче, чем каждый раз в массиве забивать фразу по 20 раз...

Destruction wrote:ЗЫ: Дред, будем делать функцию создания опечаток во фразах? Мне не слабо :wink:


На фиг. Жизнь коротка, тратить время на бессмыслицу нет желания.
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Edred wrote:sub ExtraFlooder()
;
; Требует ASM-3 любой версии
;
; (c) Edred, сваяно прямо на форуме без тестирования
;

Флудит побуквенно, тоесть на слово Превед получим
П
Пр
Пре
Прев
Преве
Превед
Last edited by SLAK on 2006-03-30 09:48:19, edited 1 time in total.
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Destruction wrote:Всё гораздо красивее -)

Это гуд пашет...
megafakel
Posts: 19
Joined: 2006-03-28 07:55:10

Post by megafakel »

sub flood()
uo.fontcolor('0x000')
uo.say("Б")
wait(100)
uo.fontcolor('0x000')
uo.say("Би")
wait(100)
uo.fontcolor('0x000')
uo.say("Бии")
wait(100)
uo.fontcolor('0x0003')
end sub

Мона и такой тоже норм=)
Sfagnum
Expert!
Posts: 1284
Joined: 2004-07-04 00:14:58
Contact:

Post by Sfagnum »

мля МОДЕРЫ! какого хера этот топик тут делает с таким названием?!?!?!
Grin
Expert!
Posts: 2580
Joined: 2005-05-04 14:05:19
Location: Москва

Post by Grin »

мля МОДЕРЫ! какого хера этот топик тут делает с таким названием?!?!?!
SLAK
Posts: 182
Joined: 2005-08-19 16:12:23
Contact:

Post by SLAK »

Мля УМНИКИ!!! Кокого *** вы тут флудите???
CONDOMchick
Posts: 362
Joined: 2005-04-23 20:18:57

Post by CONDOMchick »

Code: Select all

sub Flooder() 
var i, arr_len = 5 ; Общее количество слов
var speed = 300 ; Скорость нажатия клавиш в мс.
; Ниже - слова
DIM words[val(str(arr_len))]
words[0] = "A"
words[1] = "BB"
words[2] = "CCC"
words[3] = "DDDD"
words[4] = "EEEEE"
for i=0 to arr_len-1
wait((strlen(words[i])+1)*speed)
uo.msg(words[i])
next
endsub



можно плз сделать чтобы на каждой строке цвет менял
Dragon World. [since 2004]
Edred
Expert!
Posts: 2544
Joined: 2004-04-03 17:36:29
Location: Saint-Petersburg

Post by Edred »

SLAK wrote:
Edred wrote:sub ExtraFlooder()
;
; Требует ASM-3 любой версии
;
; (c) Edred, сваяно прямо на форуме без тестирования
;

Флудит побуквенно, тоесть на слово Превед получим
П
Пр
Пре
Прев
Преве
Превед


Естественно, а как ты хотел? Чтобы в одной строке все набиралось, типа анимации? Это тебе не в инжект надо, иди куда-нибудь на студию спецэффектов...
Post Reply