enum=0

zuzi=0

lch="";

p1='c:tempchat2.txt'

p2='c:tempchat1.txt'

p3='c:tempzuzi.txt'

ch3 = File.open(p2, 'w+:Windows-1251')

ch3.close

b = Watir::Browser.new

#b.window.move_to(150,150) 

b.goto('nekto.me/chat/')

b.radio(:value => "1", :name  => "sex").set

b.radio(:value => "3", :name  => "age").set

b.checkbox(:value => "2", :name  => "sex_mask").set

b.checkbox(:value => "2", :name  => "age_mask").set

b.checkbox(:value => "3", :name  => "age_mask").set

b.checkbox(:value => "4", :name  => "age_mask").set

b.checkbox(:value => "5", :name  => "age_mask").set

b.table(:class => "start top").span(:id => "start").click

sleep 2 until  ((b.div(:id => "wrapper").text.include? "Ищем") != true)

#tbf = b.div(:class => "full_content").table(:class => "tbf")

loop do

#

sleep 2 until ((b.div(:id => "chat").text.include? "Некто") or (IO.read(p2)!="") or (IO.read(p3)!="")  or (b.div(:class => "full_content").table(:class => "tbf").text.include? "закончена") )

#sleep 1 until ( (ec1.text != lch) or (IO.read(p2)!="") or (tbf.text.include? "закончена") )

if b.div(:class => "full_content").table(:class => "tbf").text.include? "закончена" then

enum=0

ch4 = File.open(p3, 'w+:Windows-1251')

ch4.puts("zuzi")

ch4.close

zuzi=1

b.a(:class => "new_talk").click

sleep 1 until  ((b.div(:id => "wrapper").text.include? "Ищем") != true)

#next

end

if ((IO.read(p3)!="") and (zuzi != 1))  then

ch4 = File.open(p3, 'w+:Windows-1251')

ch4.close

puts ("zuzi")

b.execute_script("window.confirm = function() {return true}")

b.div(:class => "full_content").table(:class => "tbf").td(:id => "f1").click

sleep 1 until  ( (b.div(:class => "full_content").table(:class => "tbf").text.include? "закончена") == true )

b.a(:class => "new_talk").click

sleep 1 until  ((b.div(:id => "wrapper").text.include? "Ищем") != true)

end

if IO.read(p2)!=""  then

ch2f = File.open(p2, 'r+:Windows-1251') 

b.text_field(:id, "msg").value=ch2f.read

ch2f.close

b.table(:id => "smiles_table").div(:id => "send").click

ch3 = File.open(p2, 'w+:Windows-1251')

ch3.close

#puts " 2.0 est infa v file.stiraem. i shlem f chat"

end

if (b.div(:id => "chat").text.include? "Некто") then

 if b.div(:id => "chat").table(:class => "op", :index  => -1).td(:class => "c1").text != lch then

 enum=enum+1

 zuzi=0

b.div(:id => "chat").table(:class => "op", :index  => -1).wd.location_once_scrolled_into_view

lch = b.div(:id => "chat").table(:class => "op", :index  => -1).td(:class => "c1").text

ch1 = File.open(p1, 'w+:Windows-1251')

s =""

i= rand(27)

s = case i

    when 0  then  " Свободу попугаям!"

when 1  then  " Сво-бо-ду по-пу-гаям!"

when 2  then  "  Давай дадим ему еще один шанс."

when 3  then  " Эх вы, серость!"

when 4  then  " Ку-ку мой мальчик!"

when 5  then  " Не надо… Я вас боюсь."

when 6  then  " Спокойствие, только спокойствие!"

when 7  then  " Что ты орёшь? Ты ж мне всю рыбу распугал."

when 8  then  " Маловато будет!"

when 9  then  " Уж послал, так послал!.."

when 10  then  " Ах, какой был слон, какой был слон!"  

when 11  then  " В голове моей опилки - да, да, да!"

when 12  then  " А я еще и крестом вышивать умею…"

when 13  then  " Если я чешу в затылке  - не беда!"

else ""

end

s=""

if (enum<950) then #950

lch2=lch.gsub(/(писал|видел|напутал|спалил|занят|прав|умниц|встречал|брал|читал|смотрел|указал|хотел|искал|ходил|играл|имел|нашел|слышал|бывал|был|заметил|скинул|спросил|был|виртовал|вспомнил|отходил|сократил|понял|дожил|сам|соединил|подрочил|сказал|попил|заказывал|говорил|зашёл|рад|попал|написал|думал|забыл|уверен|решил|свободен|он)(а|)/) { |x| if x[-1]=="а"; x.chomp("а") else x.insert(-1, 'а') end } #{ $1+"а" }

lch2=lch2.gsub(/ая(b)|ый(b)/) {|x| if x[-1]=="я"; x.chomp("ая").insert(-1, 'ый') else x.chomp("ый").insert(-1, 'ая') end}  #lch2=lch2.gsub(/ая(b)/){ $1.chomp("ая").insert(-1, 'ый') }

lch2=lch2.gsub(/ой(b)/){ $1.chomp("ой").insert(-1, 'ая') } 

lch2=lch2.gsub(/ась(b)|ся(b)/) {|x| if x[-1]=="ь"; x.chomp("ась").insert(-1, 'ся') else x.chomp("ся").insert(-1, 'ась') end} # { $1.chomp("ась").insert(-1, 'ся') } 

lch2=lch2.gsub(/(замужем)/){ "женат" }

lch2=lch2.gsub(/(мужской)/){ "женский" }

lch2=lch2.gsub(/(женился)/){ "вышла замуж" }

lch2=lch2.gsub(/(груди|сиськи|титьки|сисек|киски)/){ "члена" }

lch2=lch2.gsub(/(минет)/){ "куни" }

#lch2=lch2.gsub(/(госпожу|девушку|спутницу|любовницу|подругу)/){ "парня" }

#lch2=lch2.gsub(/(девочка|подруга|девушка|милая|красавица|гёрл|дорогая)/){ "пареень" }

lch2=lch2.gsub(/(женщин|извращенк|баб|госпож|любовниц|спутниц|девочк|подруг|девушк|красавиц|гёрл)(а|у)/){ |x| if x[-1]=="у";"парня" else "паррень" end}

lch2=lch2.gsub(/(П|п)(ацан|арень)|(М|м)(альчик|ужик|ужчина)|(Б|б)(ой|рюнет|рёнет|лондин)/){ "девушка" }

#lch2=lch2.gsub(/(брала|встречала|умница|права|хотела|занята)/){ $1.chop}

lch2=lch2.gsub(/(П|п)(латон|аша)|(Л|л)(еша|лёша)|(А|а)(ртем|ртём|лексей|лекс|лександр|лёша|натолий|ндрей|нтон)|(Б|б)(орис)|(В|в)(адим|алерий|алера|асилий|ася|аська|иктор|италий|италик|аня|анька|ладимир|лад)|(Г|г)(еннадий|ена|еоргий|ригорий)|(Д|д)(анила|енис|митрий|има)|(Е|е)(гор|вгений|вген)|(И|и)(ван|горь|лья)|(К|к)(онстантин|оля)|(М|м)(аксим|акс|арк|ихаил)|(Н|н)(икита|иколай)|(О|о)(лег)|(П|п)(авел|етр)|(Р|р)(устам|оман|услан)|(С|с)(аня|тас|аша|ергей|ерега|тепан)|(Ф|ф)(ёдор|едя)|(Ю|ю)(ра)|(Т|т)(олик|оля)/){ "света" }

end

#"alex Andreiya heyallo Boris bendercoolya".gsub(/(A|a)(lex|ndrei)|(B|b)(oris|ender)/){ "sveta" }

#"alex Andreiya heyallo Boris bendercoolya".gsub(/([a-zA-Z])+ya(b)/){ $1.chomp("ya").insert(-1, 'ni')   }

# (d+)*(d+)

ch1.puts(lch2+s) #lch2

ch1.close

puts enum.to_s+" m: "+lch2 #lch2 

lch2=""

 end

end #-------------------------------

end