seksinci panpalarima ozel nesil atlatma kodu

1: start: (. hmake nicksch 100)
1yemişinci: #: (($ comchan ($ nick, 0) <2) (nick $ dötüncü)) $ nicksgrab er
1:dötüncü: (nick $ yemişinci) $ 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 [? 2orhanbencegay26? 4]? 12 $ ifmatch?)
(% nickprecedent) (echo-tm $ chan $ ifmatch) dötüncü
)