n 1: connect: On (. IAL | takip + 300)

alias takip (

1 $ e?er == + ($ iif ($ nick (Takip), hfree Takip) |. # Takip izin | $ iif ($ nick (Takip), hmake Takip 1000) |% set $ iif CSJ ($ 2, $ 2,300) | echo-ta? 4Takip Modu Devrede! .. $+([,% CSJ, sn.,]))

else (. disable # Takip | unset% CSJ | echo-ta? 14Takip Modu DevreD???! )

)

# Takip on

^ *: QUIT: (hadd $ iif ($ address ($ nick, 2 ),$+(- u,% CSJ ),$+(- u1)) Takip $ address ($ nick, 2) $ iif (on $ Istok ($ nick (Takip, $ address ($ nick, 2)), $ nick, 3 2), $ nick (Takip, $ address ($ nick, 2)), $ iif ($ nick (Takip, $ adresi ( $ nick, 2)), $ nick (Takip, $ address ($ nick, 2)) + $ nick, $ nick)))

Do?um! ^ *: JOIN: #: (

if ($ nick (Takip, $ address ($ nick, 2)) & & $ nick (Takip, $ address ($ nick, 2)) = $ nick) (echo-t $ chan? 4Takip Raporu:? 12 $ nick ? 5nickinin% CSJ saniye i?inde kulland??? nickler:? 14 $ nick (Takip, $ address ($ nick, 2)))

if $ gettok ($ nick (Takip, $ address ($ nick, 2)). verileri, 0,43)> 3 (ban-k $ chan $ nick 2 Nick Change)

)

# Takip end