Çevrimdışı

n283=trivq {
n284= %qst.fil = $question.file
n285= :getline
n286= if ($lines($n.file(-a)) >= $lines($n.file)) { .remove $n.file(-a) }
n287= %nxt.qst = $rand(2,$lines($n.file))
n288= if %clqvh == 13 { goto getline }
n289= if ($hasbeenask(%qst.fil,%nxt.qst) == true) { goto getline }
n290= writeini $n.file(-a) %qst.fil %nxt.qst true
n291= %qstfle = $nopath(%qst.fil)
n292= %tmp = $read -l $+ %nxt.qst $n.file
n293= %trivq = $replace(%tmp,$chr(32),$chr(160))
n294= if $len(%trivq) > 440 { goto getline }
n295= if ($arg(%trivq,1,*) == $null || $arg(%trivq,2,*) == $null) { msg $getread(-s,miscop,trivia.channel) TRENDY Arkadasa Once Soru BeKLemesini Soylermısın Lutfen... | goto getline }
n296= if %autostst == on { set %autost on | unset %autostst }
n297= ;if %farq >= 30 { goto getline }
n298= if ( %rp = 3 ) { .saveini | checktop10 }
n299= if ( %rp = 11 ) { checktopmonth }
n300= if (%top20 == on ) && ( %rp = 14 ) { checktop20 }
n301= if (%top20 == on ) && ( %rp = 16 ) { checktopmonth20 }
n302= if %chantxt > 0 { unset %chanq | unset %chantxt }
n303= msg $getread(-s,miscop,trivia.channel) $rhype
n304= %start = $ticks | set %hint false
n305= unset %ansnum
n306= set %ansnum $arg(%trivq,2,*)



* /writeini: too large: 'd:\yedekler\oyunbotu\ask\soru1.ask' (line 291, aliases.ini)


Arkadaslar Oyun Botu Soruları Soruyo Ama Bı Yere Geldımı Bu Hatayı Verıyo Ve Bot Soru Sormuyo Artık Sence Sebeb Nedir Hatası Nerde Yardimci Olursanız Sevinirim...