Kod

On: input: *: (
e?er / == $ LEFT ($ 1 -, 1) ($ 1 - |. halt)
e?er $ aktif == Durum Penceresi (. echo-s $ 1 - | halt)
. $ Aktif $ timestamp echo? 12 [? 1 $ ben? 12]? 1 ~ $ 1 -
. Msg $ aktif $ 1 -
)

^ * On: Metin :*:#:{
Cappystarjoe == $ nick e?er (. Damgas? $ chan $ echo? 1 -? 5 ¤? 12 |? 2 [? 10 Cappystarjoe ™? 2]? 12 |? 5? ¤? 1 -: ? 5 $ 1 - |. Halt)
else (
$ Nick isowner $ chan (if. Damgas? $ chan $ echo? 12 [? 5 • $ + $ nick $ +? 12]? 1:? $ 1 - |. Halt)
$ $ Isop nick chan e?er (. Damgas? $ chan $ echo? 12 [? 4 @ $ + $ nick $ +? 12]? 1:? $ 1 - |. Halt)
$ Nick isvoice $ chan (if. Damgas? $ chan $ echo? 12 [? 3 + $ + $ nick $ +? 12]? 1:? $ 1 - |. Halt)
$ Nick ishop $ chan (if. Damgas? $ chan $ echo? 12 [?% 7 $ + $ nick $ +? 12]? 1:? $ 1 - |. Halt)
if $ nick (isnotify. $ chan $ echo timestamp? 12 [? 2 * $ + $ nick $ +? 12]? 1:? $ 1 - |. Halt)
. Timestamp $ chan $ echo? 12 [? 1 $ + $ nick $ +? 12]? 1:? $ 1 - |. Durdurma
)
)

^ * On: MET?N :*:?:{
Cappystarjoe == $ nick e?er (. Damgas? $ nick $ echo? 1 -? 5 ¤? 12 |? 2 [? 10 Cappystarjoe ™? 2]? 12 |? 5? ¤? 1 -: ? 5 $ 1 - |. Halt)
. Timestamp $ nick $ echo? 12 [? 1 $ + $ nick $ +? 12]? 1:? $ 1 - |. Durdurma
)