Çevrimdışı

elimde şöyle bir kod var ilk harf büyük ve sonu noktalı bitiyor calışıyorda bu koda mümkünmü ac kapa diyerek istedigimizde normal istedigimizde noktalı yazabilirmi şimdiden tşklrer

on *:input:*:{
if ($left($1,1) !isin x/$%.! && !$ctrlenter) {
var %smiley =
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
:P
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
:\ :/
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;D ;P
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;\ ;( :* ;* :@ :S :# :$ :o xD :< :> ;@
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;# ;$ ;o ;< ;>
var %smileys = :-) :-D :-P :-( :-\ :-/ ;-) ;-D ;-P ;-/ ;-\ ;-( :-* ;-* :-@ :-S :-# :-$ :-o :-< :-> ;-@ ;-S ;-# ;-$ ;-o ;-< ;-> :
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
:=P :=( :=\ :=/ ;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
;=P ;=/ ;=\ ;=( :=* ;=* :=@ :=S :=# :=$ :=o :=< :=> ;=@ ;=S ;=# ;=$ ;=o ;=< ;=> ^_^ o_o O_O o_O O_o 0_0 0_o o_0 *_^ ^_* -.- omg lol btw wtf heh bbl brb
var %noact = $chr(33) $chr(64) $chr(35) $chr(36) $chr(37) $chr(94) $chr(38) $chr(42) $chr(40) $chr(41) $chr(45) $chr(43) $chr(61) $chr(49) $chr(50) $chr(51) $chr(52) $chr(53) $chr(54) $chr(55) $chr(56) $chr(57) $chr(48) $chr(92) $chr(123) $chr(125) $chr(124) $chr(59) $chr(58) $chr(39) $chr(34) $chr(44) $chr(46) $chr(60) $chr(62) $chr(47) $chr(63) $chr(95) $chr(91) $chr(93)
var %httpthingy = htt
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ftp
var %httpthingy21 = .com .net .org .php .asp .htm omfg rofl .asx
var %httpthingy22 = .html .aspx
var %newmsg = $iif($1 !ison $active && $1 != $active && !$istok(%smiley,$1,32) && !$istok(%smileys,$1,32) && !$istok(%noact,$1,32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%httpthingy22,$right($1,5),32),$upper($lef t($1,1)) $+ $right($1,-1),$1) $+ $iif($2-,$chr(32) $+ $2- $+ $iif(!$istok(%noact,$right($2-,1),32) && !$istok(%smiley,$right($2-,2),32) && !$istok(%smileys,$right($2-,3),32) && !$istok(%httpthingy,$left($gettok($2-,-1,32),3),32) && !$istok(%httpthingy21,$right($gettok($2-,-1,32),4),32) && !$istok(%noact,$left($gettok($2-,-1,32),1),32) && !$istok(%httpthingy22,$left($gettok($2-,-1,32),5),32),.),$iif(!$istok(%noact,$right($1,1),3 2) && !$istok(%smiley,$right($1,2),32) && !$istok(%smileys,$right($1,3),32) && !$istok(%httpthingy,$left($1,3),32) && !$istok(%httpthingy21,$right($1,4),32) && !$istok(%noact,$left($1,1),32) && !$istok(%httpthingy22,$right($1,5),32),...))
var %newmsg = $regsubex(%newmsg,/\bi\b/g,I)
msg $active %newmsg
halt
}
}