on *:text:*:#:{ if $regex($1,/^[!.-]gbt$/Si) { if !$2 { msg # Lütfen nick belirtiniz. 4ORN 2!gbt Abuzittin } msg # 4 $2 Nickinin GBT'sine bakılıyor... msg # 4Adı Soyadı : 4[ 2 $read(kim/isim.txt) 4 ]1 - 4 Meslek : 4[2 $read(kim/meslek.txt) 4]1 - 4Memleket : 4[2 $read(kim/sehir.txt) 4] 1- 4Medeni Durumu : 4[2 $read(kim/medeni.txt) 4] 1- 4Takımı : 4[2 $read(kim/takim.txt) 4]1 - 4Yaş : 4[2 $(,$str($!r(18,80) $chr(32) , 1)) 4] 1 - 4Burç: 4[2 $read(kim/burc.txt) 4] 1 - 4Sevdiği Renk: 4[2 $read(kim/renkler.txt) 4] } }