Toprak
25 Mart 2015, 23:44
Merhaba,
Bugüne kadar gördüğüm bütün amsg muaf kanal eklentileri while döngüsü kullanılarak yapılmış can sıkıntısı ve regsubex'in verdiği zevk ile 10 dakika uğraş sonucu yapabildim(Difuzyon) dan biraz yardım aldım tabi :)
Regex'e 1 aydır merak sarmaya başladım hemen hemen her kod yazışımda kullanmaya gerek duyuyorum biraz uğraşayım güzel bir şey çıksın dedim uzun oldu ama hoşuma gitti =)
Kod'u Aliases(alt + d) kısmına ekleyiniz.
ame { var %:m $1- | tokenize 32 $regsubex($str(*,$chan(0)),/./g, $iif(!$istok(%:k,$chan(\n),32),$chan(\n) $chr(32))) | describe $* %:m }
amsg { var %:m $1- | tokenize 32 $regsubex($str(*,$chan(0)),/./g, $iif(!$istok(%:k,$chan(\n),32),$chan(\n) $chr(32))) | msg $* %:m }
Ame/Amsg'den muaf kanalları
/set %:k #Kanal #Kanal1 #Kanal2 gibi aralarında boşluk bırakarak ekleyin.
Daha kısa yazıla bilinir belki.
Bugüne kadar gördüğüm bütün amsg muaf kanal eklentileri while döngüsü kullanılarak yapılmış can sıkıntısı ve regsubex'in verdiği zevk ile 10 dakika uğraş sonucu yapabildim(Difuzyon) dan biraz yardım aldım tabi :)
Regex'e 1 aydır merak sarmaya başladım hemen hemen her kod yazışımda kullanmaya gerek duyuyorum biraz uğraşayım güzel bir şey çıksın dedim uzun oldu ama hoşuma gitti =)
Kod'u Aliases(alt + d) kısmına ekleyiniz.
ame { var %:m $1- | tokenize 32 $regsubex($str(*,$chan(0)),/./g, $iif(!$istok(%:k,$chan(\n),32),$chan(\n) $chr(32))) | describe $* %:m }
amsg { var %:m $1- | tokenize 32 $regsubex($str(*,$chan(0)),/./g, $iif(!$istok(%:k,$chan(\n),32),$chan(\n) $chr(32))) | msg $* %:m }
Ame/Amsg'den muaf kanalları
/set %:k #Kanal #Kanal1 #Kanal2 gibi aralarında boşluk bırakarak ekleyin.
Daha kısa yazıla bilinir belki.