[Haskell-cafe] I wish to share IRC bot C++ code and lib as needed, if interrested
Branimir Maksimovic
branimir.maksimovic at gmail.com
Tue Sep 21 23:36:41 UTC 2021
Collected hangman game and some from internet…
Greetings, Branimir.
--------
{-# Language ScopedTypeVariables,BangPatterns #-}
import Sockets
import Foreign.C.String
import Data.List
import Data.Char
import Data.IORef
import System.Random
import Data.Time.Clock.POSIX
import Control.Applicative ((<$>), (<*>))
import Text.Read
import Text.Printf
import Control.Monad (when)
import Data.Char (toLower)
import Data.List (transpose)
import System.Random (randomIO)
import System.IO.Unsafe
import System.Mem
import System.Process
main = do
pt <- getPOSIXTime
let tm = round pt :: Int
stdgen <- newIORef $ mkStdGen tm
ref <- newIORef ""
gen <-readIORef stdgen
gsref <- newIORef $ fst $ newGame gen
tm <- newIORef pt
let myCallbacks = defaultCallbacks {
done_connected = binded,
done_reading = response_get tm ref stdgen gsref,
done_writing = response_written,
done_closed = \pl s -> do
putStrLn "peer closed, reconnecting"
s <- socket myCallbacks
connect pl s "170.178.184.36:6667"
return 1,
handle_error = \pl s buf len-> do
str <- peekCStringLen (buf,fromIntegral len)
putStrLn $ "error "++str++", reconnecting"
s <- socket myCallbacks
connect pl s "170.178.184.36:6667"
return 1,
tick = binded_tick tm
}
s <- socket myCallbacks
pl <- epoll 1000
connect pl s "170.178.184.36:6667"
run_loop pl (-1)
nick :: [StdGen] -> (String,[StdGen])
nick [gen] = let (s,gen') = randomR(0::Int,100) gen in ("zeka_bot_"++ show s,[gen'])
nick [] = ("zeka_bot",[])
binded pl s = do
let (s',_) = nick []
write pl s $ "NICK "++s'++"\r\n"
return 0
binded_tick tm s = do
t <- readIORef tm
t' <- getPOSIXTime
if (t'-t) > 900
then return 1
else return 0
list_zeka = [
"PRIVMSG #hr.soc.politika :OS ME TRTIS?\r\n",
"PRIVMSG #hr.soc.politika :LJUCKA BEDA\r\n",
"PRIVMSG #hr.soc.politika :OS?\r\n",
"PRIVMSG #hr.soc.politika :NOMEN EST OMEN\r\n",
"PRIVMSG #hr.soc.politika :DECAK MURAT\r\n",
"PRIVMSG #hr.soc.politika :KULT JARCA\r\n",
"PRIVMSG #hr.soc.politika :DAJ ME TRTI\r\n",
"PRIVMSG #hr.soc.politika :KULT VAGINE\r\n",
"PRIVMSG #hr.soc.politika :KULT PENISA\r\n",
"PRIVMSG #hr.soc.politika :subice mi se moraju smesta podati!!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :OS ME?\r\n",
"PRIVMSG #hr.soc.politika :Zeka kakio, pa pasulj fini ždere a vešmašina veš lepo pere, yeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :PRKNO\r\n",
"PRIVMSG #hr.soc.politika :DAJ MENI\r\n",
"PRIVMSG #hr.soc.politika :CELOVJEK DLAKUS\r\n",
"PRIVMSG #hr.soc.politika :KAKIO SAM\r\n",
"PRIVMSG #hr.soc.politika :GADE!!!\r\n",
"PRIVMSG #hr.soc.politika :DAJ ME NABIJAJ JEBATE\r\n",
"PRIVMSG #hr.soc.politika :DAJ ME JEBI\r\n",
"PRIVMSG #hr.soc.politika :ZELIS ME GOLOG?\r\n",
"PRIVMSG #hr.soc.politika :A sad opet pod deku....\r\n",
"PRIVMSG #hr.soc.politika :Gentleman Dominant, to je moja titula, tako i izgledam, tako se i oblačim\r\n",
"PRIVMSG #hr.soc.politika :Ja obožavam DREK\r\n",
"PRIVMSG #hr.soc.politika :Konačno precima na grobu!!\r\n",
"PRIVMSG #hr.soc.politika :Zeka sa drugarom prošo celi Mirogoj, yeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :Lepo bi bilo da odem do Beograda za 10 dana\r\n",
"PRIVMSG #hr.soc.politika :da pojebem srpske subice\r\n",
"PRIVMSG #hr.soc.politika :Neka mi daju i dobru ženicu subicu, da mi rodi dečicu, yeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :zahvalio sam im na grobu\r\n",
"PRIVMSG #hr.soc.politika :Jeste, duhovi predaka mi donose oporavak ovih dana\r\n",
"PRIVMSG #hr.soc.politika :Ja usamljen? 5 sati sam danas šetao i pričao sa drugarom\r\n",
"PRIVMSG #hr.soc.politika :1 + 4,5 = 5,5 sati sna\r\n",
"PRIVMSG #hr.soc.politika :Zeka je bolje, pomogo xanax, ne kolje mi se više\r\n",
"PRIVMSG #hr.soc.politika :Naručio pizzu da se počastim :-)\r\n",
"PRIVMSG #hr.soc.politika :uvek istu vrstu pizze već godinama\r\n",
"PRIVMSG #hr.soc.politika :Tako sam dobar, duša od čoveka\r\n",
"PRIVMSG #hr.soc.politika :Volim ja kurve ali NEĆU da plaćam više\r\n",
"PRIVMSG #hr.soc.politika :BDSM subice............ žude da se podaju Dominantu.......\r\n",
"PRIVMSG #hr.soc.politika :Točno, ja sada hoću isključivo subice slatkice :-))\r\n",
"PRIVMSG #hr.soc.politika :Došao eka sa tuluma Filozofskog fakulteta, yeeeeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :Treba slejvicu povesti u Maksimir i pojebati je ispred kaveza s majmunima\r\n",
"PRIVMSG #hr.soc.politika :Nazivaš me smrdom a ja mirišem po prekrasnom parfemu\r\n",
"PRIVMSG #hr.soc.politika :Pičke mene ne zanimaju nego prkna\r\n",
"PRIVMSG #hr.soc.politika :Zeka se vasceo dan odmarao i spavao\r\n",
"PRIVMSG #hr.soc.politika :Kaže ta Zadranka 'imam malo drukčiji ukus što se tiče osobnosti muškaraca'\r\n",
"PRIVMSG #hr.soc.politika :a ja samo odgovorio 'OK, o ukusima se ne raspravlja' :-)\r\n",
"PRIVMSG #hr.soc.politika :<Zdepasti_Zeka>oduvek sam hteo da vladam, a vremenom sam se naučio i da upravljam ljudskim životima\r\n",
"PRIVMSG #hr.soc.politika :Reci im kume\r\n",
"PRIVMSG #hr.soc.politika :oy drug\r\n",
"PRIVMSG #hr.soc.politika :Danas ću poslati Dadeku stvari za Novi Sad :-)\r\n",
"PRIVMSG #hr.soc.politika :Sanjam Dadeka kako se \"kreše\" s drugima.... yaoy\r\n",
"PRIVMSG #hr.soc.politika :OLOSU!\r\n",
"PRIVMSG #hr.soc.politika :JA ZUDIM!\r\n",
"PRIVMSG #hr.soc.politika :Želiš moje TESTISE???????? MUDA??????????\r\n",
"PRIVMSG #hr.soc.politika :DAJ MI MOLOHA JEBATE PATAK\r\n",
"PRIVMSG #hr.soc.politika :Jezivo........\r\n",
"PRIVMSG #hr.soc.politika :Gade, ja sam siroče\r\n",
"PRIVMSG #hr.soc.politika :Prrrrrd........\r\n",
"PRIVMSG #hr.soc.politika :ĆE ME TRTIŠ?\r\n",
"PRIVMSG #hr.soc.politika :OŠ MOJA MUDA? \r\n",
"PRIVMSG #hr.soc.politika :OŠ ME JEBAT? \r\n",
"PRIVMSG #hr.soc.politika :JEDAN JEBE A DRUGI JE JEBEN!! \r\n",
"PRIVMSG #hr.soc.politika :AKTIVAC I PASIVAC \r\n",
"PRIVMSG #hr.soc.politika :Uuuuuuuu, kako sam iz-bacivao iz-metine iz ČMARA! \r\n",
"PRIVMSG #hr.soc.politika :MIRSAD JE PONOVO ROĐENI KRŠĆANIN \r\n",
"PRIVMSG #hr.soc.politika :LOOOOOL \r\n",
"PRIVMSG #hr.soc.politika :U MENI IMA ZRNO LJUDSKOSTI \r\n",
"PRIVMSG #hr.soc.politika :Mirsad opet prdi \r\n",
"PRIVMSG #hr.soc.politika :ŽIVI LEŠ \r\n",
"PRIVMSG #hr.soc.politika :PRAVO U ĆĆĆĆMAR! \r\n",
"PRIVMSG #hr.soc.politika :NABIJANJE KURĆĆĆĆĆĆINE U ĆĆĆĆĆĆĆMAR \r\n",
"PRIVMSG #hr.soc.politika :RAZBIJANJE LOBANJE ČEKIĆEM \r\n",
"PRIVMSG #hr.soc.politika :PEDERE U LUDNICE \r\n",
"PRIVMSG #hr.soc.politika :SAĆE DA TE TRTIM!!! \r\n",
"PRIVMSG #hr.soc.politika :JA SAM AKTIVAC \r\n",
"PRIVMSG #hr.soc.politika :JA NIJESAM PASIVAC \r\n",
"PRIVMSG #hr.soc.politika :JEBEM TI SRBOČETNIČKU MATERIJU!!!!! \r\n",
"PRIVMSG #hr.soc.politika :SRBOČETNICIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII \r\n",
"PRIVMSG #hr.soc.politika :ŽIV'LA 'RVACKA \r\n",
"PRIVMSG #hr.soc.politika :PAZITE SE SRBOČETNICI \r\n",
"PRIVMSG #hr.soc.politika :MI DOLAZIMO \r\n",
"PRIVMSG #hr.soc.politika :GNJIDO \r\n",
"PRIVMSG #hr.soc.politika :SAĆU DA TE TRTIM \r\n",
"PRIVMSG #hr.soc.politika :SRBO \r\n",
"PRIVMSG #hr.soc.politika :JA SAM GENIJE DO YAYA \r\n",
"PRIVMSG #hr.soc.politika :DA, TO SAM YA \r\n",
"PRIVMSG #hr.soc.politika :PE------ŠKOOOOOO \r\n",
"PRIVMSG #hr.soc.politika :ZNAJU GEJEVI DA PEVAJU \r\n",
"PRIVMSG #hr.soc.politika :KAO KASTRATI AKA 'KONTRATENORI' \r\n",
"PRIVMSG #hr.soc.politika :DAJ GEJA BRE \r\n",
"PRIVMSG #hr.soc.politika :NE ŽELIŠ VEČITE GOLE ORGIJE S KURVAMA??????? \r\n",
"PRIVMSG #hr.soc.politika :JA VOLIM \r\n",
"PRIVMSG #hr.soc.politika :KURVE \r\n",
"PRIVMSG #hr.soc.politika :MRZIM TRŽIŠTE \r\n",
"PRIVMSG #hr.soc.politika :TRŽIŠTE LJUCKIH BIĆA \r\n",
"PRIVMSG #hr.soc.politika :POČNI DA ME MLATIŠ PO GLAVI \r\n",
"PRIVMSG #hr.soc.politika :GAY KLUB \r\n",
"PRIVMSG #hr.soc.politika :MASNI PASIVAC \r\n",
"PRIVMSG #hr.soc.politika :ŽELIM TE GOLOG! \r\n",
"PRIVMSG #hr.soc.politika :DEČACI KURVE \r\n",
"PRIVMSG #hr.soc.politika :DEČACI MURATI \r\n",
"PRIVMSG #hr.soc.politika :NEŠ GA KUPIT \r\n",
"PRIVMSG #hr.soc.politika :ŽELIM PAKAO \r\n",
"PRIVMSG #hr.soc.politika :UNAKAZITE ME!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :ZEKA ZNA \r\n",
"PRIVMSG #hr.soc.politika :NEŠ \r\n",
"PRIVMSG #hr.soc.politika :AJDE DOĐI I KOLJI \r\n",
"PRIVMSG #hr.soc.politika :SUDIT ĆE TI BOJOVNICI IZ ČAVOGLAVA \r\n",
"PRIVMSG #hr.soc.politika :TAKO SE BOJIM.......... \r\n",
"PRIVMSG #hr.soc.politika :NEMOJ ME UMLAĆIVAT MOČUGOM \r\n",
"PRIVMSG #hr.soc.politika :ŽELATINOZNA MASA \r\n",
"PRIVMSG #hr.soc.politika :ŽVALE \r\n",
"PRIVMSG #hr.soc.politika :STRAH OBUZIMA \r\n",
"PRIVMSG #hr.soc.politika :BOJIM SE........ \r\n",
"PRIVMSG #hr.soc.politika :ULAZE MI U ČAKRU \r\n",
"PRIVMSG #hr.soc.politika :ULJEZI \r\n",
"PRIVMSG #hr.soc.politika :U Istočnoj Hercegovini se govori ijekavski ludaku \r\n",
"PRIVMSG #hr.soc.politika :ŠAŠOLJENJE MUDA \r\n",
"PRIVMSG #hr.soc.politika :GUJE U POTAJI \r\n",
"PRIVMSG #hr.soc.politika :VOLIM DEČAKE \r\n",
"PRIVMSG #hr.soc.politika :NEŠ MENE!! \r\n",
"PRIVMSG #hr.soc.politika :YAOY \r\n",
"PRIVMSG #hr.soc.politika :ZARIJ MI GA U ĆĆĆĆĆĆMAR \r\n",
"PRIVMSG #hr.soc.politika :kajkaFske popeFke \r\n",
"PRIVMSG #hr.soc.politika :MUŠKARCI MUŠKARCI \r\n",
"PRIVMSG #hr.soc.politika :OH DAAAAAAAAAAAA \r\n",
"PRIVMSG #hr.soc.politika :KRŠTENJE MARKA MARINA \r\n",
"PRIVMSG #hr.soc.politika :Hlače mi se sve više raspadaju, već nekoliko rupa yay \r\n",
"PRIVMSG #hr.soc.politika :APAURIN je iz Raja izašo \r\n",
"PRIVMSG #hr.soc.politika :ORGIJE!!!!!!!!!!! ORGIJE!!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :OŠ AGRESORU \r\n",
"PRIVMSG #hr.soc.politika :JA SAM GUZIČAR \r\n",
"PRIVMSG #hr.soc.politika :UBITI KURVE \r\n",
"PRIVMSG #hr.soc.politika :SRbSKE KURVEŠTIJE \r\n",
"PRIVMSG #hr.soc.politika :DRISLO \r\n",
"PRIVMSG #hr.soc.politika :Đa Đa \r\n",
"PRIVMSG #hr.soc.politika :FEMINIZIRANI FRATRI \r\n",
"PRIVMSG #hr.soc.politika :Poždrao sam lignje do kraja \r\n",
"PRIVMSG #hr.soc.politika :TRAGEDIJA MOZGOVA \r\n",
"PRIVMSG #hr.soc.politika :Popio sam kefir! \r\n",
"PRIVMSG #hr.soc.politika :POŽUDA LUDAKA PREMA FRATRIMA \r\n",
"PRIVMSG #hr.soc.politika :GOLA POŽUDA \r\n",
"PRIVMSG #hr.soc.politika :FRATRI \r\n",
"PRIVMSG #hr.soc.politika :BELZEBUB \r\n",
"PRIVMSG #hr.soc.politika :Dzabe Oko \r\n",
"PRIVMSG #hr.soc.politika :JA SAM ČIKA PEŠKO \r\n",
"PRIVMSG #hr.soc.politika :VADI GA VAN!!!!!!! VADI GA VAN!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :RAŽDAGINJA I PROSLAP \r\n",
"PRIVMSG #hr.soc.politika :VELELEBNI LIBAR \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI GUBICU \r\n",
"PRIVMSG #hr.soc.politika :ČIMPANZE ODGRIZAJU LJUDSKA LICA \r\n",
"PRIVMSG #hr.soc.politika :VELIKONEMAČKI REICH!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :HEIL HITLER!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :KREVELJIM SE I URLAM \r\n",
"PRIVMSG #hr.soc.politika :Begam pod deku! \r\n",
"PRIVMSG #hr.soc.politika :TRGANJE MEEEEEEESSSSAAAAAAA \r\n",
"PRIVMSG #hr.soc.politika :BLJUV \r\n",
"PRIVMSG #hr.soc.politika :NEŠ GNJIDOOOOOOOOOOOOOOOO \r\n",
"PRIVMSG #hr.soc.politika :Đoš \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI PASJU GUBICU \r\n",
"PRIVMSG #hr.soc.politika :Hroh \r\n",
"PRIVMSG #hr.soc.politika :Dođi mi otmi penziju, ajde!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Odoh da buljim u strop..... i zvodoravnog položaja, heh \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI KURVE DAJ MI IH \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI BOŽE KURVE!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Zašto, o zašto mi jeBog oduzeo KURVE??????????? \r\n",
"PRIVMSG #hr.soc.politika :KURVE sam sanjo \r\n",
"PRIVMSG #hr.soc.politika :Na gležnjevima imam sloj smeđe prljavštine, mrtvu kožu koja se ljušti \r\n",
"PRIVMSG #hr.soc.politika :U BERLINU je moje mesto \r\n",
"PRIVMSG #hr.soc.politika :Odstupi Sotono! Ja sam Božje Dijete! \r\n",
"PRIVMSG #hr.soc.politika :Gri-boyed Gribo-yedovič Gri-bo-yedoF \r\n",
"PRIVMSG #hr.soc.politika :Jeste, SveCka Zavera \r\n",
"PRIVMSG #hr.soc.politika :URBAN SAM DO KOSKE! \r\n",
"PRIVMSG #hr.soc.politika :Evo ME drugari!!! \r\n",
"PRIVMSG #hr.soc.politika :Paranoja me pere........ \r\n",
"PRIVMSG #hr.soc.politika :Tako sam dobar!!!! \r\n",
"PRIVMSG #hr.soc.politika :GLEDAŠ TI PEDERA U PRKNU! \r\n",
"PRIVMSG #hr.soc.politika :AAAAHAHHAAAHAHHHH \r\n",
"PRIVMSG #hr.soc.politika :TRTADŽIJA TRTKO \r\n",
"PRIVMSG #hr.soc.politika :Žderao sam desetke čokoladnih tortica.... danima.... \r\n",
"PRIVMSG #hr.soc.politika :Potiho URLAM \r\n",
"PRIVMSG #hr.soc.politika :ISTO--SPOLCI \r\n",
"PRIVMSG #hr.soc.politika :PEDER PEDRO \r\n",
"PRIVMSG #hr.soc.politika :KRUTE KURĆĆĆĆĆINE \r\n",
"PRIVMSG #hr.soc.politika :PENIS PEDERA \r\n",
"PRIVMSG #hr.soc.politika :TRUNITE U FILTERU \r\n",
"PRIVMSG #hr.soc.politika :Vreme za ŠIBANJE..........\r\n",
"PRIVMSG #hr.soc.politika :Yeeeeeeeee, donet će mi drugar sa sela vrbove šibe :-)))\r\n",
"PRIVMSG #hr.soc.politika :Odoh opet pod deku da njušim dlaku i smirujem se....\r\n",
"PRIVMSG #hr.soc.politika :PSINO ČETNIČKA CRNA\r\n",
"PRIVMSG #hr.soc.politika :Oyla! Zeku nazvao drugar pa sam jeo, i to toplo, ugrijao pasulj prebranac, yeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :ISTOVARUJEŠ GOLA GOVNA BRE\r\n",
"PRIVMSG #hr.soc.politika :Sad ću ja da idem lepo u šetnju opet, lep je dan :-)\r\n",
"PRIVMSG #hr.soc.politika :Hehe, dok ja radim svoje, vi se pitate šta ću i kako ću ja, a ja i dalje radim svoje i ide mi\r\n",
"PRIVMSG #hr.soc.politika :Izaći će Zeka opet ujutro u kafić na jutarnju kafu\r\n",
"PRIVMSG #hr.soc.politika :yeha, Zeka ždero\r\n",
"PRIVMSG #hr.soc.politika :STRAH........\r\n",
"PRIVMSG #hr.soc.politika :Strah i žudnja.....\r\n",
"PRIVMSG #hr.soc.politika :Zeka mete pod od mrvica\r\n",
"PRIVMSG #hr.soc.politika :Strah me obuzeo.......\r\n",
"PRIVMSG #hr.soc.politika :Kako god bilo- Zeka dolazi :-)\r\n",
"PRIVMSG #hr.soc.politika :Piše u pozivu - možete doneti svoje igračke....\r\n",
"PRIVMSG #hr.soc.politika :+ donesite i grickalice i piće\r\n",
"PRIVMSG #hr.soc.politika :a ja ću doneti 2 sexy bombonjere + flašu finog likera\r\n",
"PRIVMSG #hr.soc.politika :Zeka ide na sado-mazo žurku, yeeeeeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :Yeah, Zeka se obrazovao u BDSM-u :-)))\r\n",
"PRIVMSG #hr.soc.politika :Prelepo je videti rođenu subicu kako služi Gospodaru\r\n",
"PRIVMSG #hr.soc.politika :Kaj se more, nije bilo slobodnih subitza\r\n",
"PRIVMSG #hr.soc.politika :Oprali svoj veš kod mene i sutra će još\r\n",
"PRIVMSG #hr.soc.politika :hlače, čarape, majice....\r\n",
"PRIVMSG #hr.soc.politika :Ide Zeka zadovoljan pod deku :-))\r\n",
"PRIVMSG #hr.soc.politika :One čekaju da im ja odredim vrem i mesto sastanka, jer su poslušne subice\r\n",
"PRIVMSG #hr.soc.politika :Sad ću da naručim Zečice za dejt\r\n",
"PRIVMSG #hr.soc.politika :Kulminirat ću ja svojom spermom u njihovim guzama......\r\n",
"PRIVMSG #hr.soc.politika :imat ćemo blind date! :-) da bude uzbudljivo\r\n",
"PRIVMSG #hr.soc.politika :POzvao subicu na dejt u sredu\r\n",
"PRIVMSG #hr.soc.politika :Ma........ ali super je bio film Blind Date sa Kim Basinger i Bruceom Willisom\r\n",
"PRIVMSG #hr.soc.politika :Ovaj tjedan bi trebali stići NOVCI :-)))))))))\r\n",
"PRIVMSG #hr.soc.politika :Izaći ću ujutro u dućan i kafić\r\n",
"PRIVMSG #hr.soc.politika :6 sati mirnog sna\r\n",
"PRIVMSG #hr.soc.politika :Popio 2 xanaxa\r\n",
"PRIVMSG #hr.soc.politika :Sat vremena urlao u kujini\r\n",
"PRIVMSG #hr.soc.politika :O-ho-ho, kako Zeka RADI...... svaki dan\r\n",
"PRIVMSG #hr.soc.politika :Bit će na partyju sprava za mučenje, žestokog bičevanja i torture strujom\r\n",
"PRIVMSG #hr.soc.politika :Idem sutra poi kartu za novi sado-mazo party\r\n",
"PRIVMSG #hr.soc.politika :Nemaš blage veze šta je to subica\r\n",
"PRIVMSG #hr.soc.politika :ti poznaš samo kurve\r\n",
"PRIVMSG #hr.soc.politika :Ne pada mi na pamet tebi išta objašnjavati\r\n",
"PRIVMSG #hr.soc.politika :2 sata sna, sanjanje subica\r\n",
"PRIVMSG #hr.soc.politika :Ja ne drkam\r\n",
"PRIVMSG #hr.soc.politika :Deka....\r\n",
"PRIVMSG #hr.soc.politika :Da bar tegliš kad ništa ne pomažeš u domaćinstvu\r\n",
"PRIVMSG #hr.soc.politika :ali naše parcele su sve plodne a tvoje su goleti\r\n",
"PRIVMSG #hr.soc.politika :Boduli imaju male parcele\r\n",
"PRIVMSG #hr.soc.politika :Ja imam 2 kuće i 3,5 ha zemlje\r\n",
"PRIVMSG #hr.soc.politika :Nema kubičnog metra mog stana koji nije uredila moja ruka!\r\n",
"PRIVMSG #hr.soc.politika :Javljaju mi se nove subice na BDSM oglas svaki dan :-))\r\n",
"PRIVMSG #hr.soc.politika :Sve ih treba pojebat iizbičevat\r\n",
"PRIVMSG #hr.soc.politika :drugara u posetu čeka\r\n",
"PRIVMSG #hr.soc.politika :Maska Zeke dolazi prema meni\r\n",
"PRIVMSG #hr.soc.politika :brže će mi doći ovako s manjom poštarinom nego s većom\r\n",
"PRIVMSG #hr.soc.politika :SVE mi ide na ruku\r\n",
"PRIVMSG #hr.soc.politika :Zeka cveta\r\n",
"PRIVMSG #hr.soc.politika :Život je lep :-))\r\n",
"PRIVMSG #hr.soc.politika :Predivno je........\r\n",
"PRIVMSG #hr.soc.politika :Sve mi to šalje moj zaštitnik - sveti mamek sa Nebesa!\r\n",
"PRIVMSG #hr.soc.politika :toliko sam iskusan i verziran u igri zavođenja\r\n",
"PRIVMSG #hr.soc.politika :malo bucmasta, lepa, mekana i podatna, mmmmm\r\n",
"PRIVMSG #hr.soc.politika :Osećam se sposoban da idem tako daleko\r\n",
"PRIVMSG #hr.soc.politika :a male subice vole zrele muškarce\r\n",
"PRIVMSG #hr.soc.politika :FILTER \r\n",
"PRIVMSG #hr.soc.politika :ZAKLAO BI I TI DA MOREŠ\r\n",
"PRIVMSG #hr.soc.politika :Čmar jer ja sam GUZIČAR\r\n",
"PRIVMSG #hr.soc.politika :Najlepše je trteti robinje u prkno...........\r\n",
"PRIVMSG #hr.soc.politika :Oporavljam se dakle u svakom pogledu :-)) A sasvim ću se oporaviti kada nađem DEVOJKU\r\n",
"PRIVMSG #hr.soc.politika :Lučenje kortizola, hormona straha, mi je manje, pa trebam sve manje slatkog jesti\r\n",
"PRIVMSG #hr.soc.politika :STRAH mi je sve manji, više se ne bojim groma, ne pomišljam na požar, ali se i dalje bojim PSA\r\n",
"PRIVMSG #hr.soc.politika :Zeka je umoran, nije dovoljno spavao, ali treba trtiti\r\n",
"PRIVMSG #hr.soc.politika :Da, ali ja ne jebem bilo koga!\r\n",
"PRIVMSG #hr.soc.politika :SAMO U JEBANJU JESTE SPAS ZA OVAJ PALI SVET......\r\n",
"PRIVMSG #hr.soc.politika :Dominacija i usred noći............\r\n",
"PRIVMSG #hr.soc.politika :MOja prva devojka-subica Sunčica je dobro sisala kurac\r\n",
"PRIVMSG #hr.soc.politika :Sanjao sam kako mi pred vrata banuo narkoman\r\n",
"PRIVMSG #hr.soc.politika :Umor me shrvava........ pod deku..........\r\n",
"PRIVMSG #hr.soc.politika :Zeka ždero lep sendvič s pohanom piletinom kupljen kod Šiptara\r\n",
"PRIVMSG #hr.soc.politika :Dominant se dopisuje i usred noći sa ženama, yeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :Đorč, gotovo........ hladno mi je, svaki put nakon što idem van\r\n",
"PRIVMSG #hr.soc.politika :Zeka pod deku konačno....\r\n",
"PRIVMSG #hr.soc.politika :Ma... odoh ja jopet pod deku\r\n",
"PRIVMSG #hr.soc.politika :Da želim mogao bih i trandže i pedere da trtim\r\n",
"PRIVMSG #hr.soc.politika :Ode Zeka pod deku.......\r\n",
"PRIVMSG #hr.soc.politika :đorč, opet sam dobro :-))\r\n",
"PRIVMSG #hr.soc.politika :Evo, smirio sam se skroz.... xanax pomaže!\r\n",
"PRIVMSG #hr.soc.politika :Izbacili me iz takta MIrko i Ilija, gadoooovi\r\n",
"PRIVMSG #hr.soc.politika :Ja sam prelepi Zeka, karizmatična ličnost\r\n",
"PRIVMSG #hr.soc.politika :Popio još 1 xanax, pomozi Bože!!\r\n",
"PRIVMSG #hr.soc.politika :Svinja nije samo sub, on je switch. On i trti i biva trten\r\n",
"PRIVMSG #hr.soc.politika :Ljudi me hvale kako sam 'opaki Dominant', vele... hehe\r\n",
"PRIVMSG #hr.soc.politika :Sanjao sam opet nakon dužeg vremena noćnu moru, yay\r\n",
"PRIVMSG #hr.soc.politika :Opaka Dominacija........\r\n",
"PRIVMSG #hr.soc.politika :sub sub sub\r\n",
"PRIVMSG #hr.soc.politika :Subice me spopadaju, žude za mojom prisutnošću\r\n",
"PRIVMSG #hr.soc.politika :Zeka kakio usred noći\r\n",
"PRIVMSG #hr.soc.politika :POkorit će se meni SVI\r\n",
"PRIVMSG #hr.soc.politika :Bijedni Zeka nije višpe bijedan :-))\r\n",
"PRIVMSG #hr.soc.politika :Zeka nema kompleksa odavno.... od 1992.\r\n",
"PRIVMSG #hr.soc.politika :Jednom u životu sam probao viski \r\n",
"PRIVMSG #hr.soc.politika :Piškio sam i češao skrotum \r\n",
"PRIVMSG #hr.soc.politika :Zatvorena mi je prva čakra \r\n",
"PRIVMSG #hr.soc.politika :AGRESIJA POVAMPIRENIH USTAŠA NA REPUBLIKU SRbSKU KRAJINU \r\n",
"PRIVMSG #hr.soc.politika :NIJEDAN USTAŠA NE KANI PROĆI! \r\n",
"PRIVMSG #hr.soc.politika :NEŠ VIŠE NIKAD!!!!!!!!!!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :OLOOOOOŠI \r\n",
"PRIVMSG #hr.soc.politika :SMEĆEEEEEEE \r\n",
"PRIVMSG #hr.soc.politika :PUSTITE ME NA MIRU GADOVI!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Nema serije nedeljom \r\n",
"PRIVMSG #hr.soc.politika :Pustite me da živim kao PAS!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Ja radim kao mrav!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Dirinčim za mameka!! \r\n",
"PRIVMSG #hr.soc.politika :Prljav sam ko svinja!! \r\n",
"PRIVMSG #hr.soc.politika :Ja nisam lažov!! Stvarno imam skorelu prljavštinu koja se ljušti!! \r\n",
"PRIVMSG #hr.soc.politika :NEĆETE MI UNIŠTITI EGZISTENCIJU!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :i dok spavam brljavite o meni! \r\n",
"PRIVMSG #hr.soc.politika :Prokleti bullyji!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Znate da sam nemoćnik i udri po meni \r\n",
"PRIVMSG #hr.soc.politika :Ja sam DOBAR! \r\n",
"PRIVMSG #hr.soc.politika :Živim mirno s mamekom i nikoga ne ugoržovam \r\n",
"PRIVMSG #hr.soc.politika :Reći ću svima šta mi radite!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :SMEĆE ljucko \r\n",
"PRIVMSG #hr.soc.politika :Ajde DOĐI I ZAKOLJI ME \r\n",
"PRIVMSG #hr.soc.politika :Ne, nego otimaš zadnji dinar invalidima?? \r\n",
"PRIVMSG #hr.soc.politika :Tako te učio tvoj šloser??? \r\n",
"PRIVMSG #hr.soc.politika :DOKAŽITE!! \r\n",
"PRIVMSG #hr.soc.politika :Ne tučem ja mameka \r\n",
"PRIVMSG #hr.soc.politika :Zasmegmana je tvoja gubica!! \r\n",
"PRIVMSG #hr.soc.politika :Svrbi me od puno sedenja pa se uznoji \r\n",
"PRIVMSG #hr.soc.politika :Neću se utopiti ali mogu pasti i ubiti se! \r\n",
"PRIVMSG #hr.soc.politika :Pa se počešem ko čovek \r\n",
"PRIVMSG #hr.soc.politika :Ja nisam peder \r\n",
"PRIVMSG #hr.soc.politika :Pederi su čisti :-) \r\n",
"PRIVMSG #hr.soc.politika :VI mene zajebavate kao mladog majmuna \r\n",
"PRIVMSG #hr.soc.politika :A ja to neću više da trpim!!! \r\n",
"PRIVMSG #hr.soc.politika :Ovo je bullyjing gori nego kad su trešeri zajebavali Turinu \r\n",
"PRIVMSG #hr.soc.politika :Trebam puno sna jer sam bolesnik!! \r\n",
"PRIVMSG #hr.soc.politika :a ja pijem sve po propisu! \r\n",
"PRIVMSG #hr.soc.politika :prokleti pomahnitali alkoholičar! \r\n",
"PRIVMSG #hr.soc.politika :Svrbe me prsti gadovi \r\n",
"PRIVMSG #hr.soc.politika :Gadni buliji \r\n",
"PRIVMSG #hr.soc.politika :Ja sam SIROTI smrda \r\n",
"PRIVMSG #hr.soc.politika :................. \r\n",
"PRIVMSG #hr.soc.politika :ćeš me zaklati na Ovčari??? \r\n",
"PRIVMSG #hr.soc.politika :NEŠ ČETNIČARO!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Sve je ovo gluma, mrzite me samo zato što sam HRVAT IZVORNJAK! \r\n",
"PRIVMSG #hr.soc.politika :CVILITE \r\n",
"PRIVMSG #hr.soc.politika :JESAM VAS OLOOOOOOŠI!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :JECAJ ČETNIČARO \r\n",
"PRIVMSG #hr.soc.politika :ZAJEBO SAM VAS GNJIDE \r\n",
"PRIVMSG #hr.soc.politika :POBEDA!!! POBEDA!!! \r\n",
"PRIVMSG #hr.soc.politika :Mislili ste da sam vaše govno!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Četkam četkom nokat, prst koji smrdi od češanja čmara! \r\n",
"PRIVMSG #hr.soc.politika :Bolje mi ponjuši smrdljiv čmar!! \r\n",
"PRIVMSG #hr.soc.politika :Znaš li ti da je mene peško u javnom nužniku vatao za muda??? \r\n",
"PRIVMSG #hr.soc.politika :OŠ SVRAČJE CRKOTINE? \r\n",
"PRIVMSG #hr.soc.politika :OŠ MIŠJE STRVINE? \r\n",
"PRIVMSG #hr.soc.politika :Ne trza....... \r\n",
"PRIVMSG #hr.soc.politika :Ja obožavam lučenje smrdljivih sekreta iz skrotuma \r\n",
"PRIVMSG #hr.soc.politika :ORGIJE LUDAKA........... \r\n",
"PRIVMSG #hr.soc.politika :KULT VAGINE JE KULT ZMIJURINE!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :A KULT PENISA - KULT JARCA!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :DEST HILJADA DO ZUBA NAORUŽANIH USTAŠA......... \r\n",
"PRIVMSG #hr.soc.politika :UBI UBI SRbINA \r\n",
"PRIVMSG #hr.soc.politika :ŽIVEO SRbSKI NAAAAAAAAAAROD \r\n",
"PRIVMSG #hr.soc.politika :\"U Imockom ima ništo pravoslavni, narod ji zove rišćani i rkači, nu svagdi su u velikoj manjini. Ljudi dobri i mirni, ne valeć jim zakona.\" \r\n",
"PRIVMSG #hr.soc.politika :Ološu, jedem tunj iz konzerve \r\n",
"PRIVMSG #hr.soc.politika :a meso pileće ostavljam mameku! \r\n",
"PRIVMSG #hr.soc.politika :AJDE REZAČI LJUCKIH TELA, AJDE!!! \r\n",
"PRIVMSG #hr.soc.politika :Onanišete opet na mene? \r\n",
"PRIVMSG #hr.soc.politika :ZBLJUV OLOŠI \r\n",
"PRIVMSG #hr.soc.politika ::-)))) dao Bog! \r\n",
"PRIVMSG #hr.soc.politika :ALLAH ILLAHIM \r\n",
"PRIVMSG #hr.soc.politika :ALLAH ALLAH \r\n",
"PRIVMSG #hr.soc.politika :Kako je lep taj filter \r\n",
"PRIVMSG #hr.soc.politika :DoŽot Fy-ka \r\n",
"PRIVMSG #hr.soc.politika :Jebali te srBski zločinci, četniče!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :U ničemu ja ne uživam kao u svom statusu INVALIDA \r\n",
"PRIVMSG #hr.soc.politika :NEŠ GMIZAT!!! \r\n",
"PRIVMSG #hr.soc.politika :KRAO SI??? \r\n",
"PRIVMSG #hr.soc.politika :Moj mamek nije krao \r\n",
"PRIVMSG #hr.soc.politika :Ode gad \r\n",
"PRIVMSG #hr.soc.politika :Ma zaklali ga \r\n",
"PRIVMSG #hr.soc.politika :Zove me mamek da mu pomažem \r\n",
"PRIVMSG #hr.soc.politika :O dragi mamek moj :-)) \r\n",
"PRIVMSG #hr.soc.politika :Prikrivam svoju gadost \r\n",
"PRIVMSG #hr.soc.politika :Pasja gubica je nešto najogavnije \r\n",
"PRIVMSG #hr.soc.politika :NE VERUJ ČETNIKU NI KAD DAROVE NOSI \r\n",
"PRIVMSG #hr.soc.politika :Idem da čalabrcnem skroman obrok \r\n",
"PRIVMSG #hr.soc.politika :ŽIVIJA GOLI STIPE MESIĆ!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :da stiskam sfinkter i izbacujem izmet iz čmara \r\n",
"PRIVMSG #hr.soc.politika :Pokakio sam se, ko vidra \r\n",
"PRIVMSG #hr.soc.politika :Uvek je lepo kakiti \r\n",
"PRIVMSG #hr.soc.politika :Zeka ide pod deku malo \r\n",
"PRIVMSG #hr.soc.politika :Hladno je drug \r\n",
"PRIVMSG #hr.soc.politika :Imam debelu jaknu ali je poderana! \r\n",
"PRIVMSG #hr.soc.politika :Kao student sam hodao u zelenoj vojničkoj jakni \r\n",
"PRIVMSG #hr.soc.politika :hehe, darkerska subkultura \r\n",
"PRIVMSG #hr.soc.politika :a jedno vreme sam nosio i crnu dolčevitu \r\n",
"PRIVMSG #hr.soc.politika :SAND BAKIJA \r\n",
"PRIVMSG #hr.soc.politika :Kašljem ko konj! od cigareta \r\n",
"PRIVMSG #hr.soc.politika :povraća mi se \r\n",
"PRIVMSG #hr.soc.politika :GOLI MUŠKARAC VITLA PENISOM NA NASIPU SAVSKOM \r\n",
"PRIVMSG #hr.soc.politika :SAVSKI NASIP \r\n",
"PRIVMSG #hr.soc.politika :Mamek traži da joj donesem čepiće za čmar \r\n",
"PRIVMSG #hr.soc.politika :Opet piškiti... \r\n",
"PRIVMSG #hr.soc.politika :Bokač! \r\n",
"PRIVMSG #hr.soc.politika :Opet ću tegliti \r\n",
"PRIVMSG #hr.soc.politika :Obući ću zimske cipele \r\n",
"PRIVMSG #hr.soc.politika :Jeo sam GUJDU \r\n",
"PRIVMSG #hr.soc.politika :Ždero sam SVINJE \r\n",
"PRIVMSG #hr.soc.politika :O kako sam ŽDERO \r\n",
"PRIVMSG #hr.soc.politika :Knjabež Buls \r\n",
"PRIVMSG #hr.soc.politika :Joj što volem PEDERE \r\n",
"PRIVMSG #hr.soc.politika :BALKAN POTARACATI ATOMSIM BOMBAMA!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :RINI MI PENIS U PRKNO \r\n",
"PRIVMSG #hr.soc.politika :TURI MI GA \r\n",
"PRIVMSG #hr.soc.politika :ŠABAT ŠALOM \r\n",
"PRIVMSG #hr.soc.politika :PA TO SU USTAŠE JEBA TE PATAK \r\n",
"PRIVMSG #hr.soc.politika :BRAVO!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Klao bih ja SVAKOGA \r\n",
"PRIVMSG #hr.soc.politika :Pedere treba TRTITI! \r\n",
"PRIVMSG #hr.soc.politika :Okani se pedera!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :ONI SU DIVNI \r\n",
"PRIVMSG #hr.soc.politika :Svrbi me trbuh, češem ga \r\n",
"PRIVMSG #hr.soc.politika :USTAŠO, JEL JEČIŠ???????? \r\n",
"PRIVMSG #hr.soc.politika :NE DIRAJ MI PUPAFCA GADE \r\n",
"PRIVMSG #hr.soc.politika :GADE ČETNIČKI \r\n",
"PRIVMSG #hr.soc.politika :PRDARO STARA! \r\n",
"PRIVMSG #hr.soc.politika :SVE SAM JA SHVATIO \r\n",
"PRIVMSG #hr.soc.politika :OBA U FILTERU \r\n",
"PRIVMSG #hr.soc.politika :Bog će da mi da MILIONE \r\n",
"PRIVMSG #hr.soc.politika :Moram kakiti drugari \r\n",
"PRIVMSG #hr.soc.politika :Češanje dandala je najlepše, najugodnije \r\n",
"PRIVMSG #hr.soc.politika :Tako si stimulišem Prvu Čakru! \r\n",
"PRIVMSG #hr.soc.politika :SAKATA, MORBIDNA RITUALNA KLANJA \r\n",
"PRIVMSG #hr.soc.politika :JA SAM OD SUŠTINSKE VAŽNOSTI ZA SVET \r\n",
"PRIVMSG #hr.soc.politika :POKAKIT ĆE TI BRABONJAK NA GLAVU \r\n",
"PRIVMSG #hr.soc.politika :Žderao sam skroman obrok skuše i nudli \r\n",
"PRIVMSG #hr.soc.politika :FRATAR KAO OBJEKT POŽUDE \r\n",
"PRIVMSG #hr.soc.politika :Piškio sam prvo, sad idem \r\n",
"PRIVMSG #hr.soc.politika :MALO PRIJE SI PRETIO \r\n",
"PRIVMSG #hr.soc.politika :PSIHOPATU \r\n",
"PRIVMSG #hr.soc.politika :SVIM ŽRTVAMA KAŽEŠ DA IH VOLIŠ \r\n",
"PRIVMSG #hr.soc.politika :MLATIT ĆEŠ ME KAO PSA!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :I SILOVATI \r\n",
"PRIVMSG #hr.soc.politika :JA SAM SLAB I NEMOĆAN \r\n",
"PRIVMSG #hr.soc.politika :Kaje zlikofci? Kakio sam tvrdu stolicu \r\n",
"PRIVMSG #hr.soc.politika :Enigma liže muda hercegovačkom fratru \r\n",
"PRIVMSG #hr.soc.politika :Zaklat ću te četniče!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Prenosiš sidu bre!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Ilija PEDERU \r\n",
"PRIVMSG #hr.soc.politika :Kaje peško??? \r\n",
"PRIVMSG #hr.soc.politika :FUUUUUUUUUUUJJJJJJJJJJJJJJJJ \r\n",
"PRIVMSG #hr.soc.politika :FALA DRUG! \r\n",
"PRIVMSG #hr.soc.politika :FEMINIZIRAN FRATAR \r\n",
"PRIVMSG #hr.soc.politika :MIrsad žestoko žudi za fratrom \r\n",
"PRIVMSG #hr.soc.politika :Kakio sam i češao dandalo i čmar \r\n",
"PRIVMSG #hr.soc.politika :HAHAHAHHAHAHHHAHHHH \r\n",
"PRIVMSG #hr.soc.politika :PRDARO stara!! \r\n",
"PRIVMSG #hr.soc.politika :Egeštenija Maka \r\n",
"PRIVMSG #hr.soc.politika :Bolje snimi ČMAROVE \r\n",
"PRIVMSG #hr.soc.politika :Kaje Mirkec??? Buš me JEBAL????????!??!?!?? \r\n",
"PRIVMSG #hr.soc.politika :Isprdim ti se na lobanju ćelavu! \r\n",
"PRIVMSG #hr.soc.politika :JA SAM IZRAZITO PERVERZAN PERVERTIT \r\n",
"PRIVMSG #hr.soc.politika :TI Mirko ločeš na LITRE \r\n",
"PRIVMSG #hr.soc.politika :Stimuliram ti ja čmar butt plugom MIrko! \r\n",
"PRIVMSG #hr.soc.politika :trt \r\n",
"PRIVMSG #hr.soc.politika :Ja imam predivno prkno \r\n",
"PRIVMSG #hr.soc.politika :Evo, čim sam pojeo moram da kakim \r\n",
"PRIVMSG #hr.soc.politika :Mamek veli da je iskakio veliku kobasicu \r\n",
"PRIVMSG #hr.soc.politika :Zaranjam u kacu s govnima!! \r\n",
"PRIVMSG #hr.soc.politika :Mazanje govnima golog Turila \r\n",
"PRIVMSG #hr.soc.politika :Gola Mazanja \r\n",
"PRIVMSG #hr.soc.politika :TRANDŽAAAAAAAAAA \r\n",
"PRIVMSG #hr.soc.politika :Banketi od govana....... \r\n",
"PRIVMSG #hr.soc.politika :Žderanje dreka \r\n",
"PRIVMSG #hr.soc.politika :PERVERZIJE S PTERODAKTILOM \r\n",
"PRIVMSG #hr.soc.politika :GADE JA SAM LUD \r\n",
"PRIVMSG #hr.soc.politika :Sad sam urlao na mameka pa pobego da pijem antipsihotik \r\n",
"PRIVMSG #hr.soc.politika :NAKAZO LJUCKA!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :FUJ SMEĆE PROKLETO!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :MENE ĆEŠ TI, MENE..........!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :NGO DINH DIEM BUDALE!!!!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :DOĐI I CIGLOM MI RAZBIJAJ GLAVU \r\n",
"PRIVMSG #hr.soc.politika :GNJIDE jedne proklete!! \r\n",
"PRIVMSG #hr.soc.politika :RAD JE SMRT \r\n",
"PRIVMSG #hr.soc.politika :ČETNIKE UBITI \r\n",
"PRIVMSG #hr.soc.politika :Ispijam 2 jutarnja leka \r\n",
"PRIVMSG #hr.soc.politika :Mamek je meni ZAHVALAN!! \r\n",
"PRIVMSG #hr.soc.politika :Ja sam hranu DONEO \r\n",
"PRIVMSG #hr.soc.politika :Mamek i ja ćemo da se gostimo! \r\n",
"PRIVMSG #hr.soc.politika :Pojeo sam 5 čoko štangica \r\n",
"PRIVMSG #hr.soc.politika :A sad ću da preživam pod dekom! \r\n",
"PRIVMSG #hr.soc.politika :SAKATI SRRRRRRBBBBBBUUUUUUUUUUU \r\n",
"PRIVMSG #hr.soc.politika :EJ SRRRRRBO ČEKA TE VRRRRRRBO \r\n",
"PRIVMSG #hr.soc.politika :Kaj kaj kaj, predragi domaČi naš KAJ \r\n",
"PRIVMSG #hr.soc.politika :HM... \r\n",
"PRIVMSG #hr.soc.politika :BDSM PEDERASTIJA \r\n",
"PRIVMSG #hr.soc.politika :GUZIM TE ČETNIČE \r\n",
"PRIVMSG #hr.soc.politika :LJUCKI OLOOOOOŠI \r\n",
"PRIVMSG #hr.soc.politika :JEZIVO \r\n",
"PRIVMSG #hr.soc.politika :Život nam je jednoličan pa da dam malo živosti \r\n",
"PRIVMSG #hr.soc.politika :Pevam kao operni pevač \r\n",
"PRIVMSG #hr.soc.politika :UDBA UBIJA \r\n",
"PRIVMSG #hr.soc.politika :POjeo sam cele čoko štangice \r\n",
"PRIVMSG #hr.soc.politika :KRVNIČE hrvatskog naroda!!!! \r\n",
"PRIVMSG #hr.soc.politika :Meni je Božić svaki dan \r\n",
"PRIVMSG #hr.soc.politika :VEŠTAĆĆĆĆĆĆKA VAGINA \r\n",
"PRIVMSG #hr.soc.politika :ALTIPLANO \r\n",
"PRIVMSG #hr.soc.politika :RAD JE SMRT! \r\n",
"PRIVMSG #hr.soc.politika :ARBEIT IST TODT \r\n",
"PRIVMSG #hr.soc.politika :DEČAK SPERMA \r\n",
"PRIVMSG #hr.soc.politika :DOĐI TA TE TASLAČIM \r\n",
"PRIVMSG #hr.soc.politika :BUĐAVO DETE \r\n",
"PRIVMSG #hr.soc.politika :NAMAŽEM TE GOVNIMA \r\n",
"PRIVMSG #hr.soc.politika :PROLJEV \r\n",
"PRIVMSG #hr.soc.politika :PEVAJU O GOVNETU \r\n",
"PRIVMSG #hr.soc.politika :Upravo mi se raspala šlapa! provirio palac van :-D \r\n",
"PRIVMSG #hr.soc.politika :DA LI TI IMAŠ PENIS????????????????? \r\n",
"PRIVMSG #hr.soc.politika :SRbINA SKINI DO GOLOG \r\n",
"PRIVMSG #hr.soc.politika :TRI PRSTA!!!!!!!! U ĆĆĆĆĆĆMAR!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :TROPRSTI JUGOOFICIRI \r\n",
"PRIVMSG #hr.soc.politika :PEVAJ PARTIJO!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :PARTIJO MAJKO!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI KRUTE KURĆĆĆĆĆINE PEŠKO \r\n",
"PRIVMSG #hr.soc.politika :MiliJon ustaških ubica je spremno da kolje!! \r\n",
"PRIVMSG #hr.soc.politika :Satanski masakri \r\n",
"PRIVMSG #hr.soc.politika :DEČAK ZELEN OD MRŽNJE \r\n",
"PRIVMSG #hr.soc.politika :PRIMAĆĆĆĆ KRUTIH CIGANSKIH KURĆĆĆĆĆĆINA \r\n",
"PRIVMSG #hr.soc.politika :SAD SAM SE MLATIO PO ŽELUCU \r\n",
"PRIVMSG #hr.soc.politika :ALLE JUDEN VERGASEN!!!!!!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :AKTIVAC NABIJA GLAVU PASIVCA U KACU S GOVNIMA \r\n",
"PRIVMSG #hr.soc.politika :BOZON! \r\n",
"PRIVMSG #hr.soc.politika :PSYHOZA \r\n",
"PRIVMSG #hr.soc.politika :Ja sam MNOGOSTRUK \r\n",
"PRIVMSG #hr.soc.politika :==U== \r\n",
"PRIVMSG #hr.soc.politika :Izjedam Jaffa kekse \r\n",
"PRIVMSG #hr.soc.politika :ŽUDNJA PRKNADŽIJE ZA PRKNOM \r\n",
"PRIVMSG #hr.soc.politika :Mamek me tera da si redovno mažem kraste na prstima \r\n",
"PRIVMSG #hr.soc.politika :Ja sam mrtav čovek....... mrca...... \r\n",
"PRIVMSG #hr.soc.politika :PARANJE UTROBE \r\n",
"PRIVMSG #hr.soc.politika :Neš mi oduzet zoloft!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :NEHIGIJENA \r\n",
"PRIVMSG #hr.soc.politika :NEPRANJE \r\n",
"PRIVMSG #hr.soc.politika :ZA PENISE GOLE PEDERI VAS MOLE \r\n",
"PRIVMSG #hr.soc.politika :Muškarac siše penis muškarcu, na kolenima u zahodu javnom \r\n",
"PRIVMSG #hr.soc.politika :USHTRIA QLIRIMTARE E KOSOVES \r\n",
"PRIVMSG #hr.soc.politika :Lep, velik drek, zapažene teksture i mirisa!!! \r\n",
"PRIVMSG #hr.soc.politika :Mamek pokakio velik drek, hoh \r\n",
"PRIVMSG #hr.soc.politika :Polevanjem dreka vodom nastala je čorbasta smesa \r\n",
"PRIVMSG #hr.soc.politika :Trtili te crnački azilanti????? \r\n",
"PRIVMSG #hr.soc.politika :ŽIVILI ČETNIČKI DERNECI \r\n",
"PRIVMSG #hr.soc.politika :Napred, napred četnici!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Kad ustanem prvo piškim a onda uvek malo žderem \r\n",
"PRIVMSG #hr.soc.politika :žderem Jaffa kekse! \r\n",
"PRIVMSG #hr.soc.politika :LJUBLJENJE VRAGA U STRAŽNJICU!!!! \r\n",
"PRIVMSG #hr.soc.politika :Grecam krastu pa opet mažem i obavijam flasterom \r\n",
"PRIVMSG #hr.soc.politika :Ja ne pijem sopstveni URIN \r\n",
"PRIVMSG #hr.soc.politika :Kurva mi je govorila da će piti moj urin \r\n",
"PRIVMSG #hr.soc.politika :DAJ MI GUBICU RAZBIJAJ BOKSEROM \r\n",
"PRIVMSG #hr.soc.politika :Ja sam BEDA - NIKO & NIŠTA! \r\n",
"PRIVMSG #hr.soc.politika :Kakio sam, izbacio sigurno kilu dreka! \r\n",
"PRIVMSG #hr.soc.politika :Smatraš me budalom? \r\n",
"PRIVMSG #hr.soc.politika :POJEDI NOVAC I RECI 'HVALA TI ŽIVOTEEEEEEE' \r\n",
"PRIVMSG #hr.soc.politika :NIMA UMENI NIKAPI SRBSKE KRFCE \r\n",
"PRIVMSG #hr.soc.politika :PARENJE U SRODSTVU \r\n",
"PRIVMSG #hr.soc.politika :REŽEM ŽILE BREZ TEBE \r\n",
"PRIVMSG #hr.soc.politika :BUŠAN TI JE KAZAN, JUGOOFICIRU \r\n",
"PRIVMSG #hr.soc.politika :TAKO TEPAŠ FLAŠI DREKOVAČE? \r\n",
"PRIVMSG #hr.soc.politika :POSERITE se po meni!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Komad pizze čeka mameka ujutro, moj komentar: a ja sam pozdrao ostalih 7 \r\n",
"PRIVMSG #hr.soc.politika :Digo se i ždero malo ribe bez ulja \r\n",
"PRIVMSG #hr.soc.politika :Imam rupu na košulji, na laktu \r\n",
"PRIVMSG #hr.soc.politika :MILIJON USTAŠA JE SPREMNO DA KOLJE U SVAKOM TRENUTKU! \r\n",
"PRIVMSG #hr.soc.politika :Poždro sam sva medena srca \r\n",
"PRIVMSG #hr.soc.politika :Naručio me mamek kod zubara \r\n",
"PRIVMSG #hr.soc.politika :Mamek me je spasio da me ne strpaju \r\n",
"PRIVMSG #hr.soc.politika :Koje KURVE u mojoj seriji!!! \r\n",
"PRIVMSG #hr.soc.politika :Pomažem popišanom mameku! \r\n",
"PRIVMSG #hr.soc.politika :Ja sam dječarac jarac \r\n",
"PRIVMSG #hr.soc.politika :ISKUSNI PREVEJANI PEDERI \r\n",
"PRIVMSG #hr.soc.politika :GOLO KOLJAŠTVO \r\n",
"PRIVMSG #hr.soc.politika :Dragi Isuse, molim te oslobodi me pederluka!! \r\n",
"PRIVMSG #hr.soc.politika :Odoh pod deku, mamek kaki umesto da jede \r\n",
"PRIVMSG #hr.soc.politika :Mamek bi hteo da ga pazim celu noć! \r\n",
"PRIVMSG #hr.soc.politika :NIšta još nisam spavao, svako malo moram piškiti \r\n",
"PRIVMSG #hr.soc.politika :Zaljubljen si u mene pederu???? \r\n",
"PRIVMSG #hr.soc.politika :NAŠMINKANI PASIVAC \r\n",
"PRIVMSG #hr.soc.politika :PEDER JECA ZA KURCOM \r\n",
"PRIVMSG #hr.soc.politika :Izluđuje me ludački STRAH koji me parališe! \r\n",
"PRIVMSG #hr.soc.politika :Odoh kakiti \r\n",
"PRIVMSG #hr.soc.politika :Iz nosa mi raste dlaka \r\n",
"PRIVMSG #hr.soc.politika :Idem da jedem skroman obrok \r\n",
"PRIVMSG #hr.soc.politika :O što volem SF serije \r\n",
"PRIVMSG #hr.soc.politika :ČETNIKA UBITI KAO P S A !!!!!!!!!!!!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :PROKLETI SRBOČETNIČKI KOLJAČI!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Mamek zamolio da joj dam - jednu pusu :-))))))) \r\n",
"PRIVMSG #hr.soc.politika :Ja sumnjam da možda imam DVE bešike/mjehura!! \r\n",
"PRIVMSG #hr.soc.politika :Vadim goleme smeđe balce iz nosa \r\n",
"PRIVMSG #hr.soc.politika :Probudio me mamek nemilosrdni \r\n",
"PRIVMSG #hr.soc.politika :Treba ti ODSEĆI PENIS, najbolje satarom! \r\n",
"PRIVMSG #hr.soc.politika :Možeš da mi puvaš i prdneš pod prozor!! \r\n",
"PRIVMSG #hr.soc.politika :MUTEŽ U MOZGU \r\n",
"PRIVMSG #hr.soc.politika :GMIZAVCI \r\n",
"PRIVMSG #hr.soc.politika :SKUPO ĆU PRODATI SVOJU KOŽU!!! \r\n",
"PRIVMSG #hr.soc.politika :KLAN, KLAN, PA ZAKLAN \r\n",
"PRIVMSG #hr.soc.politika :Mamek voli sineka najviše na svetu!! \r\n",
"PRIVMSG #hr.soc.politika :Probudim se i vidim - doživio sma opet IZLJEV u snu! \r\n",
"PRIVMSG #hr.soc.politika :sanjao seks s maloleticama \r\n",
"PRIVMSG #hr.soc.politika :Čelovjek Jarac \r\n",
"PRIVMSG #hr.soc.politika :ROČNICI I PRIČUVNICI \r\n",
"PRIVMSG #hr.soc.politika :Nemam poriv da zatučem mameka šipkom \r\n",
"PRIVMSG #hr.soc.politika :NJihove pretnje su SNIMLJENE!!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Nemojte mene drugari, šalio sam se!!!!! \r\n",
"PRIVMSG #hr.soc.politika :DEDA DŽUKELAMA LIŽE GUBICU \r\n",
"PRIVMSG #hr.soc.politika :ŽIVIJA DOTUR IVO SANADER \r\n",
"PRIVMSG #hr.soc.politika :SAMO UBIJANJA NA PAMETI LUDAKA \r\n",
"PRIVMSG #hr.soc.politika :ŠTETA ŠTO NEMAM SABLJU \r\n",
"PRIVMSG #hr.soc.politika :Ja sam invalid i ne mogu čučati i klečati \r\n",
"PRIVMSG #hr.soc.politika :MLAĆENJE MAČKOM SA DEVET REPOVA \r\n",
"PRIVMSG #hr.soc.politika :Opet sam češao čmar, svrbi \r\n",
"PRIVMSG #hr.soc.politika :SRBSKO TLO NATOPITI RADIOAKTIVNIM URANOM \r\n",
"PRIVMSG #hr.soc.politika :Ćuti ćććććetnićććććar \r\n",
"PRIVMSG #hr.soc.politika :Uvaljo bi ja njega u crnački i ciganski DREK!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :JEBO GA ĆALE DUŠAN U PRKNO!!!! SMEĆE CIGANSKO!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :HAHAHAHHAHAHAA, CVILI OD STRAHA ČETNO!!!! \r\n",
"PRIVMSG #hr.soc.politika :Mi HRvati te NEĆEMO :-) \r\n",
"PRIVMSG #hr.soc.politika :Oprat ću ja vas SrBe u krvavoj kupelji! \r\n",
"PRIVMSG #hr.soc.politika :saterao sam SrBu u mišju rupu!! \r\n",
"PRIVMSG #hr.soc.politika :JA napadam kao besan pas \r\n",
"PRIVMSG #hr.soc.politika :KOga ću prvog da trtim ovde??? \r\n",
"PRIVMSG #hr.soc.politika :Fliktuacije u kemiji mozga drug.... \r\n",
"PRIVMSG #hr.soc.politika :Pederastija druže..... \r\n",
"PRIVMSG #hr.soc.politika :Nećeš me pomaknuti ni za jotu! \r\n",
"PRIVMSG #hr.soc.politika :STAN JE MOJ! \r\n",
"PRIVMSG #hr.soc.politika :Krckam zglobove na prstima, mamek kaže da mi je to od dide \r\n",
"PRIVMSG #hr.soc.politika :PENIS UBOJICA \r\n",
"PRIVMSG #hr.soc.politika :SELJAK SODOMIT \r\n",
"PRIVMSG #hr.soc.politika :Cudi me da jos nisi shvatio da se sa Zecom ne raspravlja. Sto mislis, zasto ga svi normalni ljudi na ovoj grupi drze u filteru? \r\n",
"PRIVMSG #hr.soc.politika :I dok ja preživam pod dekom govna ljuCka seru li seru \r\n",
"PRIVMSG #hr.soc.politika :Imam o--durnu žgaravicu od odvratnih cigareta \r\n",
"PRIVMSG #hr.soc.politika :JA NISAM HOMOSEKSUALAC, MENE NAPASTUJE HOMOSEKSUALNI DUH! \r\n",
"PRIVMSG #hr.soc.politika :LOČI DREKOVAČU JUGOOFICIRU \r\n",
"PRIVMSG #hr.soc.politika :POPIT ĆU LEK PROTIVU STRAHA \r\n",
"PRIVMSG #hr.soc.politika :Mamek plače... platit ćete mi za svaku njegovu suzu, zlikovci!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :Kreten si ti! Ovo sad nisu gluposti, žele da nas izbace \r\n",
"PRIVMSG #hr.soc.politika :Možemo samo da se dignemo u vazduh zajedno sa stanom!! \r\n",
"PRIVMSG #hr.soc.politika :IMA meso pileće, ribu tunj, sve ima!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :SVE LAŽ DO LAŽI...... \r\n",
"PRIVMSG #hr.soc.politika :JA NISAM ČOVEK MIRKO \r\n",
"PRIVMSG #hr.soc.politika :Obožavam da žderem zobene pahuljice sa mlekom \r\n",
"PRIVMSG #hr.soc.politika :Često povraćam \r\n",
"PRIVMSG #hr.soc.politika :Podrigujem kao svinja \r\n",
"PRIVMSG #hr.soc.politika :Moj mamek se zna piškiti u gaće i ja mu onda pomognem!! \r\n",
"PRIVMSG #hr.soc.politika :Ja piškim u kahlicu ako je mamek na WC-u \r\n",
"PRIVMSG #hr.soc.politika :JESTE, PRODAO VERU ZA VEČERU........... ALI STIĆĆĆĆI ĆĆĆĆE GA ĆĆĆĆĆĆETNIĆĆĆĆĆKA PRAVDA......... \r\n",
"PRIVMSG #hr.soc.politika :Kakio sam, i žestoko si češao čmar \r\n",
"PRIVMSG #hr.soc.politika :Ja žudim da si četkicom za zube češem čmar! \r\n",
"PRIVMSG #hr.soc.politika :Al mamek mi kaže da to ne smem, da je čmar osetljiv \r\n",
"PRIVMSG #hr.soc.politika :ŽIVOT TI JE UNIŠTEN OTKAD SI NAPAO NA ZECA!!! \r\n",
"PRIVMSG #hr.soc.politika :UNIŠTENI STE S V I !!!!!!!!!!! \r\n",
"PRIVMSG #hr.soc.politika :TI SI GOVNO \r\n",
"PRIVMSG #hr.soc.politika :ULIČARU PRLJAVI \r\n",
"PRIVMSG #hr.soc.politika :Vređao sam mameka LUDAČKI \r\n",
"PRIVMSG #hr.soc.politika :Ja sam obično SMEĆE \r\n",
"PRIVMSG #hr.soc.politika :Opet sam ga malo pre popio!! \r\n",
"PRIVMSG #hr.soc.politika :Ja ne mogu da trpim jer sam bolesnik psihički \r\n",
"PRIVMSG #hr.soc.politika :Iščačko sam si levo uvo i sad bolje čujem \r\n",
"PRIVMSG #hr.soc.politika :Sve meni lepo piše u psihijatrijskom nalazu \r\n",
"PRIVMSG #hr.soc.politika :Dragi mamek! toliko je drag.... \r\n",
"PRIVMSG #hr.soc.politika :ŠTA PAMETUJEŠ, GLUPI \r\n",
"PRIVMSG #hr.soc.politika :TI SI ILIJA BULLY \r\n",
"PRIVMSG #hr.soc.politika :Kad sam patio za njom imao sam rupu u auri \r\n",
"PRIVMSG #hr.soc.politika :GADNI SRbINE \r\n",
"PRIVMSG #hr.soc.politika :Mamek me probudio urlanjem...... :-) \r\n",
"PRIVMSG #hr.soc.politika :U-hu-hu, drugi put kakio danas \r\n",
"PRIVMSG #hr.soc.politika :Volem da kakim, tako izbacujem otrove iz tela! \r\n",
"PRIVMSG #hr.soc.politika :Ja sam viša rasa - ne perem se a ne smrdim! \r\n",
"PRIVMSG #hr.soc.politika :Trbuh mi je naduven, u želucu mi fermentira.... \r\n",
"PRIVMSG #hr.soc.politika :Odoh treći put da kakim... al nije proljev \r\n",
"PRIVMSG #hr.soc.politika :Evo kakio sam ČETVRTI put danas! \r\n",
"PRIVMSG #hr.soc.politika :Ti stigmatiziraš nas psihičke bolesnike, gade \r\n",
"PRIVMSG #hr.soc.politika :Dok vi laprdate ja pomažem & pomažem svom mameku u kujini \r\n",
"PRIVMSG #hr.soc.politika :yey, jeo sam skorman obrok zobene pahuljice s jagodom u mleku \r\n",
"PRIVMSG #hr.soc.politika :Odoh pod deku da se molim Bogu \r\n",
"PRIVMSG #hr.soc.politika :Odoh pod deku da se molim Bogu \r\n",
"PRIVMSG #hr.soc.politika :DOĐI, GADE, DOĐI \r\n",
"PRIVMSG #hr.soc.politika :KRVNIČE POGANA RASO \r\n",
"PRIVMSG #hr.soc.politika :Odvratan je ovaj bot :-( \r\n",
"PRIVMSG #hr.soc.politika :NABIJ GA \r\n",
"PRIVMSG #hr.soc.politika :ROBOVI GREHA \r\n",
"PRIVMSG #hr.soc.politika :SATANSKO SKVIČANJE \r\n",
"PRIVMSG #hr.soc.politika :JEBI BARABU BRE \r\n",
"PRIVMSG #hr.soc.politika :Odoh probati pod deku..... \r\n",
"PRIVMSG #hr.soc.politika :Vršim defragmentaciju diska! \r\n",
"PRIVMSG #hr.soc.politika :Ima fragmentiranih datoteka \r\n",
"PRIVMSG #hr.soc.politika :Brabonjci ispadaju iz čmara \r\n",
"PRIVMSG #hr.soc.politika :Podriguju mi se jetrene knedle \r\n",
"PRIVMSG #hr.soc.politika :JEBI JAREĆE PRKNO \r\n",
"PRIVMSG #hr.soc.politika :LJUBAV :-) \r\n",
"PRIVMSG #hr.soc.politika :NABIJAĆĆĆĆINA PEDERA U PRKNO \r\n",
"PRIVMSG #hr.soc.politika :Njištim kao konj, lud sam \r\n",
"PRIVMSG #hr.soc.politika :Škrgućem zubima i režim \r\n",
"PRIVMSG #hr.soc.politika :kreveljim se \r\n",
"PRIVMSG #hr.soc.politika :1800 UDARACA PENISOM U ČMAR U SEKUNDI? \r\n",
"PRIVMSG #hr.soc.politika :Toliko sam ponosan što sam INVALID :-) \r\n",
"PRIVMSG #hr.soc.politika :Ja moram da izgovaram REČI \r\n",
"PRIVMSG #hr.soc.politika :PIJ MUŠKI URIN \r\n",
"PRIVMSG #hr.soc.politika :JEL I TAMO IMA PEDERA? \r\n",
"PRIVMSG #hr.soc.politika :MASOVNA KUPOVINA VEŠTAČKIH VAGINA \r\n",
"PRIVMSG #hr.soc.politika :Imam majicu prljavu od pepela.... oseća se i užegli smrad.... \r\n",
"PRIVMSG #hr.soc.politika :Ne pada mi na pamet da se operem! \r\n",
"PRIVMSG #hr.soc.politika :HRANIT ĆU JA TEBE GOVNIMA \r\n",
"PRIVMSG #hr.soc.politika :SALATA OD SRbSKE DECE \r\n",
"PRIVMSG #hr.soc.politika :ZAGRIZI GOVNO \r\n",
"PRIVMSG #hr.soc.politika :Povratim ti po vratu \r\n",
"PRIVMSG #hr.soc.politika :ČEKA VAS 50 GODINA MUČENJA \r\n",
"PRIVMSG #hr.soc.politika :JA NE SMEM NI DA VIDIM NOŽ \r\n",
"PRIVMSG #hr.soc.politika :POKENJAM TI SE NA USNE \r\n",
"PRIVMSG #hr.soc.politika :U, kako sam kakio, u \r\n",
"PRIVMSG #hr.soc.politika :Čim sam pojeo - kakio \r\n",
"PRIVMSG #hr.soc.politika :SRbOČETNIČKA ARMADA....... \r\n",
"PRIVMSG #hr.soc.politika :https://www.facebook.com/watch/?v=2324409530910955 \r\n",
"PRIVMSG #hr.soc.politika :POKAKIM TI SE PRAVO U USNE \r\n",
"PRIVMSG #hr.soc.politika :Džinofska klaonica..... \r\n",
"PRIVMSG #hr.soc.politika :POdešavam kompjuter, večeras mi ga je doneo majstor sa popravka!! \r\n",
"PRIVMSG #hr.soc.politika :NAUČEN SAM NA GOLO TRPLJENJE \r\n",
"PRIVMSG #hr.soc.politika :TRTIM MIRKA U PRKNO \r\n",
"PRIVMSG #hr.soc.politika :Šaralampov Krycaj \r\n",
"PRIVMSG #hr.soc.politika :Promjene donose smrt \r\n",
"PRIVMSG #hr.soc.politika :Mrzim promjene \r\n",
"PRIVMSG #hr.soc.politika :Ja mrzim automobile, konje i pse \r\n",
"PRIVMSG #hr.soc.politika :Moraš ti probati TRTENJE U ČMAR! \r\n",
"PRIVMSG #hr.soc.politika :Popiškio sam se u gaće! \r\n",
"PRIVMSG #hr.soc.politika :da se skineš nag i potrčiš ulicom sa sekirom u ruci????? \r\n",
"PRIVMSG #hr.soc.politika :3 sata ukočenog ležanja zatvorenih očiju, heh \r\n",
"PRIVMSG #hr.soc.politika :Ne mogu...................... \r\n",
"PRIVMSG #hr.soc.politika :Prodaješ mi četničku bozu......... \r\n",
"PRIVMSG #hr.soc.politika :IZgleda da ću opet kakiti od štrudli \r\n",
"PRIVMSG #hr.soc.politika :Ja nijesam Hrki \r\n",
"PRIVMSG #hr.soc.politika :MOJ ČMAR JE UZAK, NEMA ULJEZA UNJEMU\r\n",
"PRIVMSG #hr.soc.politika :LAŽ\r\n",
"PRIVMSG #hr.soc.politika :Kao dečak sam kopao prstom po sopstvenom čmaru i vadio drek van\r\n",
"PRIVMSG #hr.soc.politika :ZNam sve o čmarovima :-) :-(\r\n",
"PRIVMSG #hr.soc.politika :TRT TRT TRTICA :-)\r\n",
"PRIVMSG #hr.soc.politika :SAMO SAM ANALAN, ALI NE PEDER\r\n",
"PRIVMSG #hr.soc.politika :ZAŠTO ONDA NE PRIMAM PENISE U SVOJ ČMAR, HA??\r\n",
"PRIVMSG #hr.soc.politika :MNOGI PEDERI SU ME HTELI, A JA SAM BEŽAO\r\n",
"PRIVMSG #hr.soc.politika :Meni je zakržljao mali prst na levoj ruci\r\n",
"PRIVMSG #hr.soc.politika :Ja sam moćan momak a ti si PIZDEK koji anonimno čita i skriva se\r\n",
"PRIVMSG #hr.soc.politika :Odoh da kakim od gomile višanja koje sam poždro\r\n",
"PRIVMSG #hr.soc.politika :Kakio, pa češao čmar, dandalo i skrotum\r\n",
"PRIVMSG #hr.soc.politika :Pedro je moćan peder\r\n",
"PRIVMSG #hr.soc.politika :RAZMAZUJEM TI GOVNO PO GUBICI MIRKO\r\n",
"PRIVMSG #hr.soc.politika :MASAKRI SMAKA SVETA\r\n",
"PRIVMSG #hr.soc.politika :Kakio sam brzo ko vidra\r\n",
"PRIVMSG #hr.soc.politika :Čelovjek Mozgoyed\r\n",
"PRIVMSG #hr.soc.politika :JA SAM IZVORNI MEDITERANAC\r\n",
"PRIVMSG #hr.soc.politika :KAD BUDEM KREPAO BULIJI ĆE URLATI OD SLADOSTRAŠĆA\r\n",
"PRIVMSG #hr.soc.politika :SVINJE ĆE SE VALJATI U BLATU I DREKU\r\n",
"PRIVMSG #hr.soc.politika :SMRDI MI SKROTUM\r\n",
"PRIVMSG #hr.soc.politika :bwuahahahahahahahhahahh\r\n",
"PRIVMSG #hr.soc.politika :https://www.facebook.com/gayshitpostingar/\r\n",
"PRIVMSG #hr.soc.politika :Ja sam užasno moćan bednik, dobivam milostinju i onda cvilim od radosti\r\n",
"PRIVMSG #hr.soc.politika :POKORITE SE PEDRU\r\n",
"PRIVMSG #hr.soc.politika :Zeka kakio kobasu :-), pa jeo jabuku pa kahvu\r\n",
"PRIVMSG #hr.soc.politika :prd prd prd\r\n",
"PRIVMSG #hr.soc.politika :Kad mi se ždere - ja žderem!\r\n",
"PRIVMSG #hr.soc.politika :Žderem još 1 konzervu tunja sa teksaškim miksom povrća :-)\r\n",
"PRIVMSG #hr.soc.politika :Smrdim ko FUTAVAC\r\n",
"PRIVMSG #hr.soc.politika :Iz dana u dan sve više SMRDIM........\r\n",
"PRIVMSG #hr.soc.politika :Sad bih još mogo da operem skrotum i međunožje i - kosu!\r\n",
"PRIVMSG #hr.soc.politika :OŠ ME UBIT?\r\n",
"PRIVMSG #hr.soc.politika :PROKLETI CRNCI ODGRIZAJ IM LOBANJE\r\n",
"PRIVMSG #hr.soc.politika :SAMO UBIJAJ CRNACA ŠTO VIŠE!\r\n",
"PRIVMSG #hr.soc.politika :VUDU ZOMBIJI.........\r\n",
"PRIVMSG #hr.soc.politika :Žderao sam skroman obrok oslića i žganaca/palente\r\n",
"PRIVMSG #hr.soc.politika :Obožavaj GOLI DIVOVSKI PENIS!\r\n",
"PRIVMSG #hr.soc.politika :GOLA ŽILAVA HOMOSEKSUALNOST\r\n",
"PRIVMSG #hr.soc.politika : HOĆEŠ LI DA SIŠEŠ P E N I S ???????????????????\r\n",
"PRIVMSG #hr.soc.politika :To ti je sve MIrko jedan KRUG zapravo, i na jednom mestu se dotiču ekstremna ljevica i ekstremna desnica. Na tom mjestu sedim JA\r\n",
"PRIVMSG #hr.soc.politika :SEKIRČETOM PO LOBANJI BREEEEEEEE............\r\n",
"PRIVMSG #hr.soc.politika :Spao mi je nokat sa palca nožnog, yey\r\n",
"PRIVMSG #hr.soc.politika :MOj tatek je imao bič, a sada i ja imam bič - korbač\r\n",
"PRIVMSG #hr.soc.politika :A ja ležem sa muškarcem i budim se sa jarcem\r\n",
"PRIVMSG #hr.soc.politika :Muči me opet srčana čakra sad popodne\r\n",
"PRIVMSG #hr.soc.politika :tanka mi je aura.....\r\n",
"PRIVMSG #hr.soc.politika :Nekako mi se podebljala aura na srčanoj čakri, hu\r\n",
"PRIVMSG #hr.soc.politika :A JA SAM BIO PRVI KURVAR GRADA ZAGREBA\r\n",
"PRIVMSG #hr.soc.politika :Kad su me pipali još nisam bio dominantan\r\n",
"PRIVMSG #hr.soc.politika :Zdepasti_Zeka is now known as GAY_GLODAR\r\n",
"PRIVMSG #hr.soc.politika :Invalid se digao, a vi niste prestajali da prdite o meni\r\n",
"PRIVMSG #hr.soc.politika :HOMOSEKSUALNOŠĆ?\r\n",
"PRIVMSG #hr.soc.politika :PSINO\r\n",
"PRIVMSG #hr.soc.politika :Zeka loče punu čašu sa tabletom multivitamina\r\n",
"PRIVMSG #hr.soc.politika :EJ ČETNO! GDE TI JE \"MIRKO\"?!?!?!?!?!?!? KAJ NIJE \"DOŠO\"??!?!?!?\r\n",
"PRIVMSG #hr.soc.politika :3 put su me pipali\r\n",
"PRIVMSG #hr.soc.politika :UJMOCA ISINA IDUVA SVETOGA AMIN\r\n",
"PRIVMSG #hr.soc.politika :ĐIRČ\r\n",
"PRIVMSG #hr.soc.politika :UGUŠI SE KURĆĆĆĆĆĆĆĆINOM, PEDERĆĆĆĆĆINO\r\n",
"PRIVMSG #hr.soc.politika :NA MENE SI NAŠAO ONANISATI U SVOJIM PEDERSKIM FANTAZMAGORIJAMA, LUDAČE?!?!?!?\r\n",
"PRIVMSG #hr.soc.politika :SRBOSEČA SRBE SEČE\r\n",
"PRIVMSG #hr.soc.politika :OPSEDNUT SI PUŠENJEM PENISA, PEDERU\r\n",
"PRIVMSG #hr.soc.politika :Noćno mučenje........ mučim se........\r\n",
"PRIVMSG #hr.soc.politika :STARI I PREVEJANI HOMOSEKSUALAC.........\r\n",
"PRIVMSG #hr.soc.politika :SRbSKA ŽENA JE KURVA, A RVACKA JE GOVNO\r\n",
"PRIVMSG #hr.soc.politika :AFRO - ETNO - ČETNO\r\n",
"PRIVMSG #hr.soc.politika :GOLO DETE TERAJ NAULICU BRE\r\n",
"PRIVMSG #hr.soc.politika :OOOOOOOOOOOO\r\n",
"PRIVMSG #hr.soc.politika :Peder si Ilija, peder koji onaniše na grube mišićave primitivce!\r\n",
"PRIVMSG #hr.soc.politika :VEWLIKOSRBI!!!!!!! NEĆETE NIKAD VIŠE!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :SPREČIT ĆU JA SERVSKU VOJSKU U AGRESIJI NA RVACKU\r\n",
"PRIVMSG #hr.soc.politika :VELIKI MOĆNIK ZEKA, HILJADE KURVI KLEČI PRED NJIM\r\n",
"PRIVMSG #hr.soc.politika :Nemate poYma s kim sam sada razgovarao preko FB, sa jednom - ženom! :-)\r\n",
"PRIVMSG #hr.soc.politika :M.O.Ć.\r\n",
"PRIVMSG #hr.soc.politika :Zeka je MOĆAN\r\n",
"PRIVMSG #hr.soc.politika :Zeka moćno prosjači\r\n",
"PRIVMSG #hr.soc.politika :POLA\r\n",
"PRIVMSG #hr.soc.politika :Danas sam vidio 1 lepu devojku u kafiću, dečačkog izgleda sa kratkom kosom, darkerica\r\n",
"PRIVMSG #hr.soc.politika :Drugari ja se neprekidno ČEŠEM\r\n",
"PRIVMSG #hr.soc.politika :Evo poždrao pola štrudle\r\n",
"PRIVMSG #hr.soc.politika :PROKLETI SRbI!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :SMRSKAJ SRbE!!!!!!!!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :Samo da je instant kave, cigareta i kolača :-)\r\n",
"PRIVMSG #hr.soc.politika :Šta ću sad da gledam kad je gotova moja serija?\r\n",
"PRIVMSG #hr.soc.politika :Pogle ga kak ima srpski nos :-D\r\n",
"PRIVMSG #hr.soc.politika :NEĆETE DUGO!!!!!!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :TURKOVLAŠKI NAKOT UME SAMO DA PLJAČKA I KOLJE\r\n",
"PRIVMSG #hr.soc.politika :6,5 sati sna\r\n",
"PRIVMSG #hr.soc.politika :POĆĆĆĆNITE DA KOLJETE, ČČČETNICCCI!!!!!!!!!!!!\r\n",
"PRIVMSG #hr.soc.politika :ČEREČI ČETNIČARU\r\n",
"PRIVMSG #hr.soc.politika :BODENJE, UBADANJE\r\n",
"PRIVMSG #hr.soc.politika :KOPRIVA U VAGINI A ĐUMBIR U ČMARU\r\n",
"PRIVMSG #hr.soc.politika :Kad ja imam za jesti - ja žderem, kad nemam - gladujem, heh\r\n",
"PRIVMSG #hr.soc.politika :Sad sam skoro pao u nesvest od kašlja od cigareta, yao\r\n",
"PRIVMSG #hr.soc.politika :MI RVATI KOLJEMO SA STRAŠĆU\r\n",
"PRIVMSG #hr.soc.politika :UŠMRKAVANJE DROGE U NOZDRVU \r\n",
"PRIVMSG #hr.soc.politika :Stigle cigarete :-)\r\n",
"PRIVMSG #hr.soc.politika :Probat ću isprositi i koji keks\r\n",
"PRIVMSG #hr.soc.politika :Kašljem, ispuhujem nos, imam neki virus ali slab\r\n",
"PRIVMSG #hr.soc.politika :Gadni peder se uvlaććći u ćććoveććććji ćććććmar\r\n",
"PRIVMSG #hr.soc.politika :POpiškim ti se na muške usne!!\r\n",
"PRIVMSG #hr.soc.politika :MRŽNJA PREMA SRbIMA SVIM SRCEM!!!\r\n",
"PRIVMSG #hr.soc.politika :Širite se bre od 1804. u svim smerovima\r\n",
"PRIVMSG #hr.soc.politika :Treba vas satrti\r\n",
"PRIVMSG #hr.soc.politika :Ja sam već 20 godina dominantan!\r\n",
"PRIVMSG #hr.soc.politika :Grecam skorene kraste iz nosa\r\n",
"PRIVMSG #hr.soc.politika :POdrezujem par dlaka na kosi s leve strane\r\n",
"PRIVMSG #hr.soc.politika :Šiašam se sam već 30 godina........\r\n",
"PRIVMSG #hr.soc.politika :ILIJA MANDIĆ JE GLADAN KURĆĆĆINE!!!\r\n",
"PRIVMSG #hr.soc.politika :Upregnut ću susedu da mi donosi voćne štrudle po 8 kuna\r\n",
"PRIVMSG #hr.soc.politika :Treba se obžderavati u slatkom\r\n",
"PRIVMSG #hr.soc.politika :Zove me Darija... :-)))))))))) napričali se, yeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :O kako mi je pasala palačinka sa čokoladom\r\n",
"PRIVMSG #hr.soc.politika :Zamolio sam susedu da mi kupi štrudle voćne\r\n",
"PRIVMSG #hr.soc.politika :Stavio sam novooprani tepih u klozet\r\n",
"PRIVMSG #hr.soc.politika :Sve aparate u kući imam nove, yeeeeeeeeee\r\n",
"PRIVMSG #hr.soc.politika :Odoh da piškim\r\n",
"PRIVMSG #hr.soc.politika :MLAD MULAT??\r\n",
"PRIVMSG #hr.soc.politika :Femmi Boy\r\n",
"PRIVMSG #hr.soc.politika :Jedem das Seine.......\r\n",
"PRIVMSG #hr.soc.politika :U zemaljskom životu blagoslovljen patnjom, na kraju dobiva sve šta je zaslužio\r\n",
"PRIVMSG #hr.soc.politika :Božji čovek, da\r\n",
"PRIVMSG #hr.soc.politika :Ajoj deko, utebi je meko! reko Zeko\r\n",
"PRIVMSG #hr.soc.politika :TI ustao a ja ću pod deku\r\n",
"PRIVMSG #hr.soc.politika :Advocatus Diaboli :-)\r\n",
"PRIVMSG #hr.soc.politika :A ona inače ima puno novaca ali baš voli da pomaže ljudima, ne samo meni, puno ljudi, kao Anđeo je :-))\r\n",
"PRIVMSG #hr.soc.politika :Ne kuca mi na vrata ali kad ona ZA SEBE ide da kupi nešto pita me jel i meni šta treba....\r\n",
"PRIVMSG #hr.soc.politika :KAMERA TURENA U PIZDURINU\r\n",
"PRIVMSG #hr.soc.politika :ZAKLATI MORAM...........\r\n",
"PRIVMSG #hr.soc.politika :URLAM PO KUJINI KA NEZDRAV\r\n",
"PRIVMSG #hr.soc.politika :Bez večere pod deku.........\r\n",
"PRIVMSG #hr.soc.politika :BOG. LJUBAV. DOBROTA!\r\n",
"PRIVMSG #hr.soc.politika :Zeka kakio, kakvo olakšanje\r\n",
"PRIVMSG #hr.soc.politika :DOšla je bila već 2001. pa smo preživeli prosjačeći i prodajući dedine zlatne zube\r\n",
"PRIVMSG #hr.soc.politika :Ohrabrujem svaku subverziju protiv Sistema\r\n",
"PRIVMSG #hr.soc.politika :Pisano je: LJUBAV je jaka kao Smrt!\r\n",
"PRIVMSG #hr.soc.politika :SVATKO tko DANAS ima nofce je proklet........danas i OVDE\r\n",
"PRIVMSG #hr.soc.politika :SIFILIS ILI LUES?!?!?!?!!?!?!?\r\n",
"PRIVMSG #hr.soc.politika :JAHANJE PASIVCA NA KURCU??????????????!?!?!?!?!??!!\r\n",
"PRIVMSG #hr.soc.politika :SUBMISIVAC KOJI U PSEĆOJ ZDELICI DOBIVA OBROK GOVANA?!?!!?\r\n",
"PRIVMSG #hr.soc.politika :Svi smo svedoci - oko 3 godine intenzivne propagande je dovoljno da jedan narod poludi\r\n",
"PRIVMSG #hr.soc.politika :Treba na kolena pasti i zahvaljivati\r\n",
"PRIVMSG #hr.soc.politika :jecati i cviliti dominantno\r\n",
"PRIVMSG #hr.soc.politika :Sve poderano sam bacio\r\n",
"PRIVMSG #hr.soc.politika :a za nagradu - šiba\r\n",
"PRIVMSG #hr.soc.politika :NERAST NADNIČAR\r\n",
"PRIVMSG #hr.soc.politika :NERAST!!\r\n",
"PRIVMSG #hr.soc.politika :Napada me jedna Domina što sam se nazvo 'intelektualcem' :-D\r\n",
"PRIVMSG #hr.soc.politika :Cviljenje........\r\n",
"PRIVMSG #hr.soc.politika :U--hu--hu, kako sam Dominantan!!\r\n",
"PRIVMSG #hr.soc.politika :Prepun sam madeža po telu i stalno rastu novi\r\n",
"PRIVMSG #hr.soc.politika :MONSTRUOZNA MRŽNJA PREMA RVATU\r\n",
"PRIVMSG #hr.soc.politika :NERAST KAO OBJEKT POŽUDE\r\n",
"PRIVMSG #hr.soc.politika :Bole me prepone, madež na preponi mi se tare o hlače, yay\r\n",
"PRIVMSG #hr.soc.politika :Unošenje u lice i dihanje za ovratnik........\r\n",
"PRIVMSG #hr.soc.politika :Imam 3 male sličice mameka u sobi i u kujini\r\n",
"PRIVMSG #hr.soc.politika :Ima jedna Hrvatica koja živi u Nemačkoj, ona se pali na muški znoj i smrad :-)\r\n",
"PRIVMSG #hr.soc.politika : Da je ponižavam da udiše vonj mošusa sa mojih muda\r\n",
"PRIVMSG #hr.soc.politika :Dajte mi stare, okorele i raspale KURVE!\r\n",
"PRIVMSG #hr.soc.politika :Sad više nemam ništa poderano na sebi!\r\n",
"PRIVMSG #hr.soc.politika :Pojeo sam i par zalogaja sira i vuršta uz krastavac\r\n",
"PRIVMSG #hr.soc.politika :Annie Lennox peva pesmu Doubleplusgood\r\n",
"PRIVMSG #hr.soc.politika :Dvaputvišedobar patkogovoritelj\r\n",
"PRIVMSG #hr.soc.politika :Pod deku nakon žderanja skromnog suhog obroka\r\n",
"PRIVMSG #hr.soc.politika :Svima nam je ntko umro od rodbine u tih 6 godina\r\n",
"PRIVMSG #hr.soc.politika :Čim netko obrati pažnju na bednika zeca ja cvetam :-)\r\n",
"PRIVMSG #hr.soc.politika :U klozetu imam grijalicu na zidu koju je ugradio prijatelj-majstor\r\n",
"PRIVMSG #hr.soc.politika :Još bdijem u kujini slušam muziku i razmišljam a sad sam se vratio u sobu\r\n",
"PRIVMSG #hr.soc.politika :KO oće dame zakolje zato što spavam - nek dođe da me zakolje!!!!\r\n"
]
teranje = ["socna pica","lizi picu","vlazna pica","meka,spremna","pohotna pica","https://pbs.twimg.com/media/EAt9NNwXsAEo_Lz?format=jpg&name=small","https://www.menshealth.rs/stil/9832/higijenska-abeceda-za-svakog-muskarca"]
zvijeri = ["Threadripper 2990WX","Xeon W-3175X"]
jadnici = ["mali","veliki","ekstreman","pomalo"]
response_get tm ref stdgen gsref pl s buf len = do
gen <- readIORef stdgen
str <- peekCStringLen (buf,fromIntegral len)
if str == [] then do
let (val,gen') = randomR (0,(length list_zeka)-1) gen
write pl s $ list_zeka !! val
writeIORef stdgen gen'
t <- getPOSIXTime
writeIORef tm t
return 0
else do
putStrLn $ "got "++str
if isSuffixOf "\r\n" str
then do
b <- readIORef ref
gs <- readIORef gsref
let (res,gen',gs') = parse (b++str) gen gs
putStrLn $ "Writing : "++ res
writeIORef ref []
writeIORef stdgen gen'
writeIORef gsref gs'
write pl s res
else do
b <- readIORef ref
writeIORef ref (b++str)
pl_read pl s
return 0
response_written pl s = do
putStrLn "default done_write"
pl_read pl s
return 0
parse str stdgen gs = foldl parse_line ([],stdgen,gs) $ lines str
where
parse_line (s,stdgen,gs) l =
case words l of
("PING":xs) -> (s++"PONG "++unwords xs++"\r\n",stdgen,gs)
(_:"004":xs) -> (s++"JOIN :#hr.soc.politika\r\n",stdgen,gs)
(_:"433":xs) -> let (s',[gen]) = nick [stdgen] in (s++"NICK "++s'++"\r\n" ,gen,gs)
(who:"PRIVMSG":xs) -> let (str,gen,gs') = response (parse_who who) xs
in (s++str,gen,gs')
(who:"JOIN":xs) -> (s++(if parse_who who /= "zeka_bot" then "PRIVMSG #hr.soc.politika :Hello, " else "PRIVMSG #hr.soc.politika :Hi folks, ")++parse_who who++"\r\n",stdgen,gs)
xs -> case find (=="response") xs of
Nothing -> (s,stdgen,gs)
_ -> (s++"USER zeka_bot 8 * :zeka_bot\r\n",stdgen,gs)
parse_who (w:who) = if w == ':'
then parse_who who
else if w == '!'
then []
else w:parse_who who
response who (channel:cmds) = parse cmds
where
parse ((_:cmd'):cmds) =
case cvt cmd' of
cmd | cmd == "ustaša" || cmd == "budala" || cmd == "ustasa" ||
cmd == "усташа" ||
cmd == "cetnik" || cmd == "četnik" ||
cmd == "четник" ||
cmd == "komunist" || cmd == "комунист" ||
cmd == "peder" || cmd == "pederčina" ||
cmd == "srbin" || cmd == "србин" ||
cmd == "hrvat" || cmd == "хрват" ||
cmd == "crnogorac"|| cmd == "musliman" || cmd == "katolik" ||
cmd == "pravoslavac" || cmd == "židov" || cmd == "zidov" ||
cmd == "invalid" || cmd == "decak" || cmd == "dečak" || cmd == "dječak" ||
cmd == "znanstvenik" || cmd == "naučnik" ||
cmd == "kvir" || cmd == "bednik" || cmd == "jadnik" ->
let (val,gen) =
(case (cmd,who) of
("crnogorac","imandic")-> randomR (90::Int,100) stdgen
("crnogorac","IkaPrisnazitelj")-> randomR (90::Int,100) stdgen
(cmd,"Zdepasti_Zeka") | cmd== "invalid" || cmd == "kvir" || cmd == "katolik" || cmd == "dečak" || cmd == "bednik" || cmd == "budala" -> randomR (80::Int,100) stdgen
(cmd,"Stefan_J") | cmd == "naučnik" || cmd == "znanstvenik" -> randomR (85::Int,100) stdgen
_ -> randomR (0::Int,100) stdgen)
in case cmds of
[] | cmd == "jadnik" ->("PRIVMSG #hr.soc.politika "++":"++ who ++ " ti si "++ jadnici !! (val `mod` (length jadnici)) ++ " jadnik\r\n",gen,gs)
[] | cmd /= "jadnik" -> ("PRIVMSG #hr.soc.politika "++":"++
who++", you are "++show val++"% "++cmd'++"\r\n",gen,gs)
(w:[]) -> ("PRIVMSG #hr.soc.politika "++":"++w++" is "++show val++"% "++cmd'++"\r\n",gen,gs)
_ -> ("",gen,gs)
cmd | cmd == "calc" -> ("PRIVMSG #hr.soc.politika "++":"++(calculate $ unwords cmds) ++ "\r\n",stdgen,gs)
cmd | cmd == "quote" ->
let (val,gen) = randomR(0,(length list_zeka)-1) stdgen
in (list_zeka!!val,gen,gs)
cmd | cmd == "fortune" -> unsafePerformIO $ do
strs <- readProcess "fortune" ["-s","-a"] []
return (sendList $ lines $ strs,stdgen,gs)
cmd | cmd == "teraj" ->
let (val,gen) = randomR(0,(length teranje)-1) stdgen
in (sendList $ [teranje!!val],gen,gs)
cmd | cmd == "zvijer" ->
let (val,gen) = randomR(0,(length zvijeri)-1) stdgen
in (sendList $ [zvijeri!!val],gen,gs)
cmd | cmd == "h" -> case cmds of
[] -> if gameStatus gs /= Guessing
then
let (gs',gen') = newGame stdgen
in (sendList $ displayState gs',gen',gs')
else
(sendList $ displayState gs,stdgen,gs)
cmds -> let (res',gs',gen') = gameLoop gs cmds stdgen
in (sendList res',gen',gs')
_ -> ("",stdgen,gs)
sendList strs = foldl cumul [] strs
where
cumul s str = s++"PRIVMSG #hr.soc.politika :"++str++"\r\n"
cvt str = fmap toLower str
type Operator = Rational -> Rational -> Rational
type Entry = (String, Operator)
type Register = [Entry]
modulu :: Rational -> Rational -> Rational
modulu a b = toRational ((round (fromRational a::Double)) `mod` (round (fromRational b::Double)))
operatorRegister :: Register
operatorRegister = [
("-", (-)),
("+", (+)),
("/", (/)),
("*", (*)),
("%", modulu)
]
--main = print $ calculate "3 * 2 + 5 / 2"
calculate :: String -> String
calculate str = case (eval operatorRegister . words) str of
Just r -> printf "%.2f" (fromRational r::Double)
Nothing -> "Nothing"
eval :: Register -> [String] -> Maybe Rational
eval [] _ = Nothing -- No operator found.
eval _ [] = Nothing -- If a operator don't have anything to operate on.
eval _ [number] = let a :: Maybe Double = readMaybe number
in case a of
Just a -> Just (toRational a)
Nothing -> Nothing
eval ((operator, function):rest) unparsed =
case span (/=operator) unparsed of
(_, []) -> eval rest unparsed
(beforeOperator, afterOperator) ->
function
<$> (eval operatorRegister beforeOperator)
<*> (eval operatorRegister $ drop 1 afterOperator)
wordsPath :: FilePath
wordsPath = "words.txt"-- "/usr/share/dict/words"
data GameState = GameState
{ _wordsToGuess :: [String]
, guesses :: [[String]]
}
data GameStatus = Guessing | GameWon | GameLost deriving Eq
hangmanImages :: [[String]]
hangmanImages =
transpose
[ [ " ", " O ", " O ", " O ", " O " , "_O " , "_O_" ]
, [ " ", " ", " | ", " | ", " | " , " | " , " | " ]
, [ " ", " ", " ", "/ ", "/ \\", "/ \\", "/ \\" ]
]
fullHangmanImage :: Int -> [String]
fullHangmanImage index =
"=========" :
"| |" :
map ("| " ++) img
where img = hangmanImages !! index
maxWrongGuesses :: Int
maxWrongGuesses = length hangmanImages - 1
numberOfWrongGuesses :: GameState -> Int
numberOfWrongGuesses (GameState words' guesses') =
length $ filter (charNotInWord.head.concat) guesses'
where charNotInWord c = c `notElem` concat words'
gameStatus :: GameState -> GameStatus
gameStatus (GameState words' guesses')
| isGuessed = GameWon
| isLastGuess = GameLost
| otherwise = Guessing
where
isGuessed = guesses' /= [] && (all isCharInGuesses (concat words') ||
concat words' == (concat.last) guesses')
isCharInGuesses x = x `elem` map (head.head) guesses'
gameState = GameState words' guesses'
isLastGuess = numberOfWrongGuesses gameState == maxWrongGuesses
displayState :: GameState -> [String]
displayState gameState@(GameState words' guesses') =
fullHangmanImage' ++ case gameStatus gameState of
Guessing ->
[ "Word to guess: " ++ wordWithGuesses
, "Guesses: " ++ (unwords.concat) guesses'
]
GameWon ->
[ "CONGRATULATIONS!"
, "You correctly guessed the word " ++ unwords words'
, " in " ++ show (length guesses') ++ " tries "
]
GameLost ->
[ "YOU FAILED!"
, "You failed to guess the word " ++ unwords words'
]
where
fullHangmanImage' = fullHangmanImage currentHangmanIndex
currentHangmanIndex = numberOfWrongGuesses gameState
wordWithGuesses = blankOrChar <$> unwords words'
blankOrChar c
| c `elem` (map (head.head)) guesses' = c
| c == ' ' = c
| otherwise = '_'
gameLoop :: GameState -> [String]-> StdGen -> ([String],GameState,StdGen)
gameLoop gameState words' gen =
let
gameState' = gameState { guesses = guesses gameState ++ [words'] }
res = displayState gameState'
in if gameStatus gameState == Guessing
then (res,gameState',gen)
else
let (gs',gen') = newGame gen
in (displayState gs',gs',gen')
newGame :: StdGen -> (GameState,StdGen)
newGame stdgen = unsafePerformIO $ do
contents <- readFile wordsPath
let words' = map words $ lines contents
(randomNumber,gen) = randomR (0,length words'-1) stdgen
randomWord = words' !! randomNumber
return (GameState randomWord [],gen)
More information about the Haskell-Cafe
mailing list