levelup update
on :text:.levelup:#:{
if !$hget($nick) {
.notice $nick .gangster
halt
}
if $hget($nick,jail) {
.notice $nick negali to daryt kol sedi kalejime.
halt
}
else {
if $2 !isnum {
.notice $nick .levelup level
.notice $nick lygio pakelimo kaina 100 tasku.
halt
}
;########### LEVELS ###########
if $2 isnum && $3 = level {
var %points $calc($2 * 100)
if $hget($nick,points) >= %points {
hadd $nick points $calc($hget($nick,points) - %points)
hadd $nick level $calc($hget($nick,level) + $2)
hadd $nick def $calc($hget($nick,def) + (5 * $2))
hadd $nick atk $calc($hget($nick,atk) + (5 * $2))
.msg # $nick pereina i kita lygi.
}
}
;########### END ###########
hsave -i $nick gangster.ini $hget($nick,name)
}
}
text in LT
points update for crime carjack
if %x > 20 && %x <= 50 {
var %jail.time $rand(60,300)
var %points $rand(1,5)
.msg # $hget($nick,name) buvo pagauta(s) bandant nuvarit masina ir pasodinta(s) i kalejima $+($duration(%jail.time,3),.)
hadd -z $nick jail %jail.time
hadd $nick points $calc($hget($nick,points) - %points)
var %carjack $rand(60,180)
hadd -z $nick carjack %carjack
.notice $nick tasku: $+($chr(36),$bytes($hget($nick,points),b))
}
if %x > 50 && %x <= 100 {
var %cash $rand(1000,5000)
var %points $rand(1,5)
.msg # $hget($nick,name) randa masina ir isilauzia i ja. nuvaro ja i vietine superktuve, $hget($nick,name) ir gauna $+($chr(36),$bytes(%cash,b),.)
hadd $nick cash $calc($hget($nick,cash) + %cash)
hadd $nick points $calc($hget($nick,points) + %points)
var %carjack $rand(60,180)
hadd -z $nick carjack %carjack
.notice $nick isviso grinu: $+($chr(36),$bytes($hget($nick,cash),b)) tasku: $+($chr(36),$bytes($hget($nick,points),b))
sorry, text in LT :)
on :kick:#: {
if ($me == isop) {
/cs unban #chan $me
/cs akick $chan del $me $+!@*
/cs akick $chan del $address ($me,2)
/cs invite $chan $me
/cs ban $chan $nick $address
/cs akick $chan add $nick
.msg $chan haha that was fun now was it
}
}
[21:44] * [10053] Software caused connection abort
:D maybe command lines change works beter?
on :kick:#: {
if ($me == isop) {
/cs unban #chan $me
/cs akick $chan del $me $+!@*
/cs akick $chan del $address ($me,2)
/cs akick $chan add $nick
/cs ban $chan $nick $address
/cs invite $chan $me
.msg $chan haha that was fun now was it
}
}
bot needs automatic flood protection
[21:26] <[FB]> Can I help you? Try to determine if this is a person or a computer responding. Do you think a lot about the authorities?
[21:26] [FB], as tave myliu - <3
[21:26] <[FB]> That's me. Do you mean your name is tave myliu lt 3 ?
[21:26] Klausyk, [FB], as viena toki bizniuka sugalvojau. As nusikerpu plaukus, mes juos parduodam, pinigus pasidalinam pusiau. Paskui tu parduodi savo inksta ir vel pinigus pusiau. Kaip tau mano versliukas?
[21:26] <[FB]> My brain pattern set does not have a response for that. Do you mean your name is nusikerpu plaukus mes juos parduodam pinigus pasidalinam pusiau ? Ask me another question. what is your favorite color .
[21:26] [FB], tu turbut nezinojai, kad visas chatas jau apie mus kalba ir skersai i mus ziuri. Davai geriau as pas tave i privata, kaip iprastai?
[21:26] <[FB]> Um, What does tu turbut nezinojai kad visas chatas jau apie mus kalba ir skersai you mus ziuri remind you of? The ALICE chat robot can follow many things, like our discussion about Kaip tau mano versliukas . But I did not get that.
[21:26] Ar tik ne tu ana savaite apsisiojai mano rozes, [FB]? Kazko man tavo veidas labai matytas...
[21:26] <[FB]> The ALICE chat robot can follow many things, like our discussion about Davai geriau as pas tave you privata kaip iprastai . But I did not get that. Are you very angry?
[21:26] [FB], pameni kaip mes ejom i kina ir tu suvalgei visa mano popkorna, o kokakola ispylei sau ant klyno ir vaidinai, kad as tave labai jaudinu? Kur tu atsiminsi tokius dalykus... Man irgi butu geda atsimint...
:DDDD