seksinci panpalarima ozel nesil atlatma kodu

1: start: (. hmake nicksch 100)
1yemisinci: #: (($ comchan ($ nick, 0) <2) (nick $ yemisinci)) $ nicksgrab er
1:ciksinci: (nick $ ciksinci) $ nicksgrab
1: kick: #: (
alias (nicksgrab
. $ nicksch hadd iif (($ gettok ($ 2, -1,46) == virtuel) & & ($ numtok (2,46 $)> 3 ),$+($ gettok ($ 2,1-2, 46). virtuel), $ 2) $ 1
)
nickstrouve (alias
var% a = $ iif (($ gettok ($ 2, -1,46) == virtuel) & & ($ numtok (2,46 $)> 3 ),$+($ gettok ($ 2,1-2 , 46). virtuel), $ 2)
return $ iif ($ hget (nicksch,% a)! = $ 1, $ ifmatch)
)
1: change: #: (
var% nickprecedent = $ iif ($ nickstrouve ($ nick, $ site),? 4 [? 2jesus fucking christt? 4]? 12 $ ifmatch?)
(% nickprecedent) (echo-tm $ chan $ ifmatch) yemisinci
)

edit: OHAA ! sukular feda olsun be ! En sonunda calisan bi kod buldum! nick6nida giriyorum hemen