Konuya cevap cer

Mesaj

<blockquote data-quote="Xenomorph" data-source="post: 8861" data-attributes="member: 5869">Gunumuzde AI hayatimizin hemen hemen her noktasinda yer almaya basladi. Konu teknoloji oluncada mIRC aleminde hergun sayisiz AI destekli yeni urunler cikmaya basladi. Bugun burda sizinle AI DESTEKLI OPER YARDIMCISI PAYLASICAGIZ. KISA YOL KOMUTLARIM /xaihelp/xaipanel/xai on/xaioto off/xaianaliz nick/xaioner nick/xaiuygula nick/*&nbsp;Xenomorph AI Destekli Oper Yardımcısı v2026&nbsp;Kullanım: mIRC/AdiIRC &gt; ALT+R &gt; File &gt; Load&nbsp;Amaç: Operlere olay analizi, öneri, risk puanı ve manuel müdahale desteği verir.&nbsp;Not: Bu sürüm API gerektirmez. ChatGPT/API bağlantılı sürüm için API anahtarı gerekir.*/on *:LOAD:{&nbsp; xai.init&nbsp; echo -a 04[Xenomorph AI] 03AI Oper Yardımcısı yüklendi. Komutlar: /xaihelp}on *:START:{&nbsp; xai.init}alias xai.init {&nbsp; if (!$hget(xaiEvents)) { hmake xaiEvents 500 }&nbsp; if (!$hget(xaiRisk)) { hmake xaiRisk 500 }&nbsp; if (!$exists(xai_muaf.txt)) {&nbsp; &nbsp; write xai_muaf.txt NickServ&nbsp; &nbsp; write xai_muaf.txt ChanServ&nbsp; &nbsp; write xai_muaf.txt MemoServ&nbsp; &nbsp; write xai_muaf.txt OperServ&nbsp; &nbsp; write xai_muaf.txt Global&nbsp; }&nbsp; if (!$exists(xai_channels.txt)) { write xai_channels.txt #help }&nbsp; if (!$exists(xai_keywords.txt)) {&nbsp; &nbsp; write xai_keywords.txt reklam&nbsp; &nbsp; write xai_keywords.txt flood&nbsp; &nbsp; write xai_keywords.txt proxy&nbsp; &nbsp; write xai_keywords.txt vpn&nbsp; &nbsp; write xai_keywords.txt tor&nbsp; &nbsp; write xai_keywords.txt botnet&nbsp; &nbsp; write xai_keywords.txt saldırı&nbsp; &nbsp; write xai_keywords.txt kufur&nbsp; &nbsp; write xai_keywords.txt küfür&nbsp; }&nbsp; if (!$readini(xai.ini,settings,enabled)) { writeini xai.ini settings enabled on }&nbsp; if (!$readini(xai.ini,settings,autopunish)) { writeini xai.ini settings autopunish off }&nbsp; if (!$readini(xai.ini,settings,masterchan)) { writeini xai.ini settings masterchan #master }&nbsp; if (!$readini(xai.ini,settings,risklimit)) { writeini xai.ini settings risklimit 70 }&nbsp; if (!$readini(xai.ini,settings,defaultpunish)) { writeini xai.ini settings defaultpunish kickban }}; ======================; KOMUTLAR; ======================alias xaihelp {&nbsp; echo -a 04===== Xenomorph AI Oper Yardımcısı =====&nbsp; echo -a 03/xai on&nbsp; 14- AI yardımcısını açar&nbsp; echo -a 03/xai off 14- AI yardımcısını kapatır&nbsp; echo -a 03/xaistatus 14- Durum gösterir&nbsp; echo -a 03/xaianaliz nick 14- Nick için risk analizi yapar&nbsp; echo -a 03/xaioner nick 14- Nick için önerilen müdahaleyi gösterir&nbsp; echo -a 03/xaiuygula nick 14- AI önerisini manuel uygular&nbsp; echo -a 03/xaioto on/off 14- Otomatik ceza sistemini aç/kapat&nbsp; echo -a 03/xaikanal ekle/sil/list #kanal 14- AI izleme kanalları&nbsp; echo -a 03/xaimuaf ekle/sil/list Nick 14- Muaf listesi&nbsp; echo -a 03/xaipanel 14- Paneli açar&nbsp; echo -a 04========================================}alias xai {&nbsp; if (!$istok(on off,$1,32)) { echo -a Kullanım: /xai on|off | return }&nbsp; writeini xai.ini settings enabled $1&nbsp; echo -a 04[Xenomorph AI] 03AI Oper Yardımcısı: $1}alias xaioto {&nbsp; if (!$istok(on off,$1,32)) { echo -a Kullanım: /xaioto on|off | return }&nbsp; writeini xai.ini settings autopunish $1&nbsp; echo -a 04[Xenomorph AI] 03Otomatik ceza: $1&nbsp; if ($1 == on) echo -a 04UYARI: 14Otomatik ceza sadece kendi sunucunda ve yetkili olduğun kanallarda kullanılmalıdır.}alias xaistatus {&nbsp; echo -a 04[Xenomorph AI] 03Durum: $readini(xai.ini,settings,enabled)&nbsp; echo -a 04[Xenomorph AI] 03Otomatik ceza: $readini(xai.ini,settings,autopunish)&nbsp; echo -a 04[Xenomorph AI] 03Risk limiti: $readini(xai.ini,settings,risklimit)&nbsp; echo -a 04[Xenomorph AI] 03Master kanal: $readini(xai.ini,settings,masterchan)&nbsp; echo -a 04[Xenomorph AI] 03Varsayılan ceza: $readini(xai.ini,settings,defaultpunish)}alias xaikanal {&nbsp; if (!$istok(ekle sil list,$1,32)) { echo -a Kullanım: /xaikanal ekle|sil|list #kanal | return }&nbsp; if ($1 == list) { run xai_channels.txt | return }&nbsp; if (!$2) { echo -a Kanal belirt. | return }&nbsp; if ($1 == ekle) {&nbsp; &nbsp; if (!$read(xai_channels.txt,w,$2)) { write xai_channels.txt $2 | echo -a 03AI izleme kanalına eklendi: $2 }&nbsp; &nbsp; else echo -a 14Zaten listede: $2&nbsp; }&nbsp; if ($1 == sil) {&nbsp; &nbsp; write -ds $+ $2 xai_channels.txt&nbsp; &nbsp; echo -a 04AI izleme kanalından silindi: $2&nbsp; }}alias xaimuaf {&nbsp; if (!$istok(ekle sil list,$1,32)) { echo -a Kullanım: /xaimuaf ekle|sil|list Nick | return }&nbsp; if ($1 == list) { run xai_muaf.txt | return }&nbsp; if (!$2) { echo -a Nick belirt. | return }&nbsp; if ($1 == ekle) {&nbsp; &nbsp; if (!$read(xai_muaf.txt,w,$2)) { write xai_muaf.txt $2 | echo -a 03AI muaf eklendi: $2 }&nbsp; }&nbsp; if ($1 == sil) {&nbsp; &nbsp; write -ds $+ $2 xai_muaf.txt&nbsp; &nbsp; echo -a 04AI muaf silindi: $2&nbsp; }}; ======================; PANEL; ======================menu status,channel,menubar {&nbsp; Xenomorph AI Oper Yardımcısı&nbsp; .Panel:/xaipanel&nbsp; .AI Aç:/xai on&nbsp; .AI Kapat:/xai off&nbsp; .Otomatik Ceza Aç:/xaioto on&nbsp; .Otomatik Ceza Kapat:/xaioto off&nbsp; .Durum:/xaistatus&nbsp; .Komutlar:/xaihelp}menu nicklist {&nbsp; Xenomorph AI&nbsp; .Risk Analizi:/xaianaliz $$1&nbsp; .AI Öneri:/xaioner $$1&nbsp; .Öneriyi Uygula:/xaiuygula $$1&nbsp; .AI Muaf Ekle:/xaimuaf ekle $$1}alias xaipanel { dialog -m xaiPanel xaiPanel }dialog xaiPanel {&nbsp; title &quot;Xenomorph AI Oper Yardımcısı&quot;&nbsp; size -1 -1 235 160&nbsp; option dbu&nbsp; text &quot;AI Durumu:&quot;, 1, 10 12 60 10&nbsp; button &quot;AI Aç&quot;, 2, 80 10 50 15&nbsp; button &quot;AI Kapat&quot;, 3, 140 10 60 15&nbsp; text &quot;Otomatik Ceza:&quot;, 4, 10 38 70 10&nbsp; button &quot;Aç&quot;, 5, 80 36 50 15&nbsp; button &quot;Kapat&quot;, 6, 140 36 60 15&nbsp; button &quot;Durum Göster&quot;, 7, 10 65 80 18&nbsp; button &quot;Kanal Listesi&quot;, 8, 105 65 80 18&nbsp; button &quot;Muaf Listesi&quot;, 9, 10 92 80 18&nbsp; button &quot;Keyword Listesi&quot;, 10, 105 92 80 18&nbsp; button &quot;Komutlar&quot;, 11, 10 122 80 18&nbsp; button &quot;Kapat&quot;, 12, 115 122 70 18, cancel}on *<img src="https://cdn.jsdelivr.net/joypixels/assets/8.0/png/unicode/64/1f600.png" class="smilie smilie--emoji" loading="lazy" width="64" height="64" alt=":D" title="Big grin&nbsp; &nbsp; :D"&nbsp; data-smilie="8"data-shortname=":D" />IALOG:xaiPanel:sclick:*:{&nbsp; if ($did == 2) xai on&nbsp; if ($did == 3) xai off&nbsp; if ($did == 5) xaioto on&nbsp; if ($did == 6) xaioto off&nbsp; if ($did == 7) xaistatus&nbsp; if ($did == 8) run xai_channels.txt&nbsp; if ($did == 9) run xai_muaf.txt&nbsp; if ($did == 10) run xai_keywords.txt&nbsp; if ($did == 11) xaihelp}; ======================; AI MOTORU; ======================alias xai.enabled { return $iif($readini(xai.ini,settings,enabled) == on,1,0) }alias xai.auto { return $iif($readini(xai.ini,settings,autopunish) == on,1,0) }alias xai.master { return $readini(xai.ini,settings,masterchan) }alias xai.chan { return $iif($read(xai_channels.txt,w,$1),1,0) }alias xai.muaf { return $iif($read(xai_muaf.txt,w,$1),1,0) }alias xai.log {&nbsp; write xai_log.txt $asctime(yyyy-mm-dd HH:nn:ss) $1-&nbsp; echo -a 04[Xenomorph AI] 14$1-&nbsp; if ($me ison $xai.master) msg $xai.master 04[Xenomorph AI] 14$1-}alias xai.addrisk {&nbsp; ; /xai.addrisk nick puan sebep&nbsp; var %nick $1&nbsp; var %puan $2&nbsp; var %sebep $3-&nbsp; if (!%nick || !%puan) return&nbsp; var %key risk. $+ %nick&nbsp; hinc -mu600 xaiRisk %key %puan&nbsp; hadd -mu600 xaiRisk reason. $+ %nick %sebep&nbsp; xai.log %nick risk + $+ %puan $+ : %sebep $+ . Toplam risk: $hget(xaiRisk,%key)&nbsp; if ($hget(xaiRisk,%key) &gt;= $readini(xai.ini,settings,risklimit)) {&nbsp; &nbsp; xai.alert %nick $hget(xaiRisk,%key) %sebep&nbsp; }}alias xai.alert {&nbsp; var %nick $1&nbsp; var %risk $2&nbsp; var %sebep $3-&nbsp; xai.log DİKKAT: %nick yüksek riskli görünüyor. Risk: %risk Sebep: %sebep&nbsp; echo -a 04[AI ÖNERİ] 14/xaianaliz %nick&nbsp; veya&nbsp; /xaiuygula %nick&nbsp; if ($xai.auto) {&nbsp; &nbsp; var %i 1&nbsp; &nbsp; while (%i &lt;= $comchan(%nick,0)) {&nbsp; &nbsp; &nbsp; var %c $comchan(%nick,%i)&nbsp; &nbsp; &nbsp; if ($xai.chan(%c)) xai.punish %c %nick AI yüksek risk: %sebep&nbsp; &nbsp; &nbsp; inc %i&nbsp; &nbsp; }&nbsp; }}alias xaianaliz {&nbsp; if (!$1) { echo -a Kullanım: /xaianaliz nick | return }&nbsp; var %nick $1&nbsp; var %risk $hget(xaiRisk,risk. $+ %nick)&nbsp; if (!%risk) var %risk 0&nbsp; var %reason $hget(xaiRisk,reason. $+ %nick)&nbsp; echo -a 04===== AI RİSK ANALİZİ =====&nbsp; echo -a 03Nick: 14%nick&nbsp; echo -a 03Risk Puanı: 14%risk / 100&nbsp; echo -a 03Son Sebep: 14$iif(%reason,%reason,Yok)&nbsp; echo -a 03Yorum: 14$xai.comment(%risk)&nbsp; echo -a 03Öneri: 14$xai.suggest(%risk)&nbsp; echo -a 04===========================}alias xaioner {&nbsp; if (!$1) { echo -a Kullanım: /xaioner nick | return }&nbsp; var %risk $hget(xaiRisk,risk. $+ $1)&nbsp; if (!%risk) var %risk 0&nbsp; echo -a 04[Xenomorph AI] 03 $+ $1 için öneri: $xai.suggest(%risk)}alias xaiuygula {&nbsp; if (!$1) { echo -a Kullanım: /xaiuygula nick | return }&nbsp; var %nick $1&nbsp; var %risk $hget(xaiRisk,risk. $+ %nick)&nbsp; if (!%risk) var %risk 0&nbsp; if (%risk &lt; 30) { echo -a 03AI: Risk düşük, ceza önermiyorum. | return }&nbsp; var %i 1&nbsp; while (%i &lt;= $comchan(%nick,0)) {&nbsp; &nbsp; var %c $comchan(%nick,%i)&nbsp; &nbsp; if ($xai.chan(%c)) {&nbsp; &nbsp; &nbsp; xai.punish %c %nick Manuel AI önerisi uygulandı. Risk: %risk&nbsp; &nbsp; }&nbsp; &nbsp; inc %i&nbsp; }}alias xai.comment {&nbsp; if ($1 &lt; 20) return Normal kullanıcı gibi görünüyor.&nbsp; if ($1 &lt; 40) return Hafif şüpheli davranış var, takip önerilir.&nbsp; if ($1 &lt; 70) return Orta riskli, uyarı/kick düşünülebilir.&nbsp; if ($1 &lt; 90) return Yüksek riskli, kickban önerilir.&nbsp; return Çok yüksek riskli, oper müdahalesi önerilir.}alias xai.suggest {&nbsp; if ($1 &lt; 20) return İşlem yapma, sadece izle.&nbsp; if ($1 &lt; 40) return Uyar veya takip et.&nbsp; if ($1 &lt; 70) return Kick veya geçici ban.&nbsp; if ($1 &lt; 90) return Kickban uygula.&nbsp; return Gerekirse G-Line/Z-Line için oper kontrolü yap.}alias xai.contains {&nbsp; var %file $1&nbsp; var %text $lower($2-)&nbsp; var %i 1&nbsp; while (%i &lt;= $lines(%file)) {&nbsp; &nbsp; var %w $lower($read(%file,%i))&nbsp; &nbsp; if (%w isin %text) return 1&nbsp; &nbsp; inc %i&nbsp; }&nbsp; return 0}alias xai.caps {&nbsp; var %text $remove($1-,$chr(32))&nbsp; var %len $len(%text)&nbsp; if (%len == 0) return 0&nbsp; var %upper 0&nbsp; var %i 1&nbsp; while (%i &lt;= %len) {&nbsp; &nbsp; if ($mid(%text,%i,1) isupper) inc %upper&nbsp; &nbsp; inc %i&nbsp; }&nbsp; return $int($calc((%upper / %len) * 100))}alias xai.punish {&nbsp; ; /xai.punish #kanal nick sebep&nbsp; var %chan $1&nbsp; var %nick $2&nbsp; var %sebep $3-&nbsp; if (!%chan || !%nick) return&nbsp; if ($xai.muaf(%nick)) return&nbsp; if (%nick == $me) return&nbsp; if (%nick isop %chan) return&nbsp; var %punish $readini(xai.ini,settings,defaultpunish)&nbsp; if (%punish == kick) {&nbsp; &nbsp; kick %chan %nick Xenomorph AI: %sebep&nbsp; }&nbsp; elseif (%punish == ban) {&nbsp; &nbsp; mode %chan +b $address(%nick,2)&nbsp; }&nbsp; elseif (%punish == kickban) {&nbsp; &nbsp; mode %chan +b $address(%nick,2)&nbsp; &nbsp; kick %chan %nick Xenomorph AI: %sebep&nbsp; }&nbsp; elseif (%punish == gline) {&nbsp; &nbsp; gline %nick 1h :Xenomorph AI: %sebep&nbsp; }&nbsp; elseif (%punish == zline) {&nbsp; &nbsp; zline %nick 1h :Xenomorph AI: %sebep&nbsp; }&nbsp; xai.log %nick için işlem uygulandı: %punish / %sebep}; ======================; OLAY ANALİZİ; ======================on *:TEXT:*:#:{&nbsp; if (!$xai.enabled) return&nbsp; if (!$xai.chan(#)) return&nbsp; if ($xai.muaf($nick)) return&nbsp; if ($nick isop #) return&nbsp; ; Reklam / link / şüpheli kelime&nbsp; if ($xai.contains(xai_keywords.txt,$1-)) {&nbsp; &nbsp; xai.addrisk $nick 20 Anahtar kelime yakalandı: $1-&nbsp; }&nbsp; if ((http:// isin $lower($1-)) || (https:// isin $lower($1-)) || (www. isin $lower($1-)) || (discord.gg isin $lower($1-))) {&nbsp; &nbsp; xai.addrisk $nick 30 Link/reklam ihtimali.&nbsp; }&nbsp; ; Caps&nbsp; if ($len($strip($1-)) &gt;= 18) {&nbsp; &nbsp; if ($xai.caps($strip($1-)) &gt;= 75) {&nbsp; &nbsp; &nbsp; xai.addrisk $nick 15 Aşırı büyük harf kullanımı.&nbsp; &nbsp; }&nbsp; }&nbsp; ; Flood sayacı&nbsp; var %key msg. $+ # $+ . $+ $nick&nbsp; hinc -mu8 xaiEvents %key&nbsp; if ($hget(xaiEvents,%key) &gt;= 6) {&nbsp; &nbsp; xai.addrisk $nick 35 Mesaj flood ihtimali.&nbsp; &nbsp; hdel xaiEvents %key&nbsp; }&nbsp; ; Operin nickine seslenme&nbsp; if ($istok($lower($strip($1-)),$lower($me),32)) {&nbsp; &nbsp; echo -a 09[AI DİKKAT] 03$nick sana # kanalında seslendi: $1-&nbsp; &nbsp; flash -b&nbsp; &nbsp; beep 2&nbsp; }}on *:NOTICE:*:#:{&nbsp; if (!$xai.enabled) return&nbsp; if (!$xai.chan(#)) return&nbsp; if ($xai.muaf($nick)) return&nbsp; if ((http:// isin $lower($1-)) || (www. isin $lower($1-))) {&nbsp; &nbsp; xai.addrisk $nick 25 Notice reklam ihtimali.&nbsp; }}on *:JOIN:#:{&nbsp; if (!$xai.enabled) return&nbsp; if (!$xai.chan(#)) return&nbsp; if ($nick == $me) return&nbsp; if ($xai.muaf($nick)) return&nbsp; var %host $address($nick,5)&nbsp; if ((proxy isin $lower(%host)) || (vpn isin $lower(%host)) || (tor isin $lower(%host))) {&nbsp; &nbsp; xai.addrisk $nick 30 Şüpheli host/ident: %host&nbsp; }&nbsp; var %j join. $+ #&nbsp; hinc -mu10 xaiEvents %j&nbsp; if ($hget(xaiEvents,%j) &gt;= 6) {&nbsp; &nbsp; xai.log # kanalında toplu giriş hareketi algılandı. Öneri: Kanalı geçici +m yap.&nbsp; &nbsp; hdel xaiEvents %j&nbsp; }}on *:NICK:{&nbsp; if (!$xai.enabled) return&nbsp; var %i 1&nbsp; while (%i &lt;= $comchan($newnick,0)) {&nbsp; &nbsp; var %c $comchan($newnick,%i)&nbsp; &nbsp; if ($xai.chan(%c)) {&nbsp; &nbsp; &nbsp; var %key nickchange. $+ $newnick&nbsp; &nbsp; &nbsp; hinc -mu60 xaiEvents %key&nbsp; &nbsp; &nbsp; if ($hget(xaiEvents,%key) &gt;= 3) {&nbsp; &nbsp; &nbsp; &nbsp; xai.addrisk $newnick 20 Sık nick değişimi.&nbsp; &nbsp; &nbsp; }&nbsp; &nbsp; }&nbsp; &nbsp; inc %i&nbsp; }}ctcp *:*:*:{&nbsp; if (!$xai.enabled) return&nbsp; if ($xai.muaf($nick)) return&nbsp; var %key ctcp. $+ $nick&nbsp; hinc -mu10 xaiEvents %key&nbsp; if ($hget(xaiEvents,%key) &gt;= 4) {&nbsp; &nbsp; xai.addrisk $nick 30 CTCP flood ihtimali.&nbsp; &nbsp; ignore -u180 $nick 1&nbsp; &nbsp; xai.log $nick CTCP sebebiyle 3 dakika ignore edildi.&nbsp; &nbsp; hdel xaiEvents %key&nbsp; }}</blockquote>

[QUOTE="Xenomorph, post: 8861, member: 5869"] Gunumuzde AI hayatimizin hemen hemen her noktasinda yer almaya basladi. Konu teknoloji oluncada mIRC aleminde hergun sayisiz AI destekli yeni urunler cikmaya basladi. Bugun burda sizinle AI DESTEKLI OPER YARDIMCISI PAYLASICAGIZ. [B]KISA YOL KOMUTLARIM [/B] /xaihelp /xaipanel /xai on /xaioto off /xaianaliz nick /xaioner nick /xaiuygula nick /* Xenomorph AI Destekli Oper Yardımcısı v2026 Kullanım: mIRC/AdiIRC > ALT+R > File > Load Amaç: Operlere olay analizi, öneri, risk puanı ve manuel müdahale desteği verir. Not: Bu sürüm API gerektirmez. ChatGPT/API bağlantılı sürüm için API anahtarı gerekir. */ on *:LOAD:{ xai.init echo -a 04[Xenomorph AI] 03AI Oper Yardımcısı yüklendi. Komutlar: /xaihelp } on *:START:{ xai.init } alias xai.init { if (!$hget(xaiEvents)) { hmake xaiEvents 500 } if (!$hget(xaiRisk)) { hmake xaiRisk 500 } if (!$exists(xai_muaf.txt)) { write xai_muaf.txt NickServ write xai_muaf.txt ChanServ write xai_muaf.txt MemoServ write xai_muaf.txt OperServ write xai_muaf.txt Global } if (!$exists(xai_channels.txt)) { write xai_channels.txt #help } if (!$exists(xai_keywords.txt)) { write xai_keywords.txt reklam write xai_keywords.txt flood write xai_keywords.txt proxy write xai_keywords.txt vpn write xai_keywords.txt tor write xai_keywords.txt botnet write xai_keywords.txt saldırı write xai_keywords.txt kufur write xai_keywords.txt küfür } if (!$readini(xai.ini,settings,enabled)) { writeini xai.ini settings enabled on } if (!$readini(xai.ini,settings,autopunish)) { writeini xai.ini settings autopunish off } if (!$readini(xai.ini,settings,masterchan)) { writeini xai.ini settings masterchan #master } if (!$readini(xai.ini,settings,risklimit)) { writeini xai.ini settings risklimit 70 } if (!$readini(xai.ini,settings,defaultpunish)) { writeini xai.ini settings defaultpunish kickban } } ; ====================== ; KOMUTLAR ; ====================== alias xaihelp { echo -a 04===== Xenomorph AI Oper Yardımcısı ===== echo -a 03/xai on 14- AI yardımcısını açar echo -a 03/xai off 14- AI yardımcısını kapatır echo -a 03/xaistatus 14- Durum gösterir echo -a 03/xaianaliz nick 14- Nick için risk analizi yapar echo -a 03/xaioner nick 14- Nick için önerilen müdahaleyi gösterir echo -a 03/xaiuygula nick 14- AI önerisini manuel uygular echo -a 03/xaioto on/off 14- Otomatik ceza sistemini aç/kapat echo -a 03/xaikanal ekle/sil/list #kanal 14- AI izleme kanalları echo -a 03/xaimuaf ekle/sil/list Nick 14- Muaf listesi echo -a 03/xaipanel 14- Paneli açar echo -a 04======================================== } alias xai { if (!$istok(on off,$1,32)) { echo -a Kullanım: /xai on|off | return } writeini xai.ini settings enabled $1 echo -a 04[Xenomorph AI] 03AI Oper Yardımcısı: $1 } alias xaioto { if (!$istok(on off,$1,32)) { echo -a Kullanım: /xaioto on|off | return } writeini xai.ini settings autopunish $1 echo -a 04[Xenomorph AI] 03Otomatik ceza: $1 if ($1 == on) echo -a 04UYARI: 14Otomatik ceza sadece kendi sunucunda ve yetkili olduğun kanallarda kullanılmalıdır. } alias xaistatus { echo -a 04[Xenomorph AI] 03Durum: $readini(xai.ini,settings,enabled) echo -a 04[Xenomorph AI] 03Otomatik ceza: $readini(xai.ini,settings,autopunish) echo -a 04[Xenomorph AI] 03Risk limiti: $readini(xai.ini,settings,risklimit) echo -a 04[Xenomorph AI] 03Master kanal: $readini(xai.ini,settings,masterchan) echo -a 04[Xenomorph AI] 03Varsayılan ceza: $readini(xai.ini,settings,defaultpunish) } alias xaikanal { if (!$istok(ekle sil list,$1,32)) { echo -a Kullanım: /xaikanal ekle|sil|list #kanal | return } if ($1 == list) { run xai_channels.txt | return } if (!$2) { echo -a Kanal belirt. | return } if ($1 == ekle) { if (!$read(xai_channels.txt,w,$2)) { write xai_channels.txt $2 | echo -a 03AI izleme kanalına eklendi: $2 } else echo -a 14Zaten listede: $2 } if ($1 == sil) { write -ds $+ $2 xai_channels.txt echo -a 04AI izleme kanalından silindi: $2 } } alias xaimuaf { if (!$istok(ekle sil list,$1,32)) { echo -a Kullanım: /xaimuaf ekle|sil|list Nick | return } if ($1 == list) { run xai_muaf.txt | return } if (!$2) { echo -a Nick belirt. | return } if ($1 == ekle) { if (!$read(xai_muaf.txt,w,$2)) { write xai_muaf.txt $2 | echo -a 03AI muaf eklendi: $2 } } if ($1 == sil) { write -ds $+ $2 xai_muaf.txt echo -a 04AI muaf silindi: $2 } } ; ====================== ; PANEL ; ====================== menu status,channel,menubar { Xenomorph AI Oper Yardımcısı .Panel:/xaipanel .AI Aç:/xai on .AI Kapat:/xai off .Otomatik Ceza Aç:/xaioto on .Otomatik Ceza Kapat:/xaioto off .Durum:/xaistatus .Komutlar:/xaihelp } menu nicklist { Xenomorph AI .Risk Analizi:/xaianaliz $$1 .AI Öneri:/xaioner $$1 .Öneriyi Uygula:/xaiuygula $$1 .AI Muaf Ekle:/xaimuaf ekle $$1 } alias xaipanel { dialog -m xaiPanel xaiPanel } dialog xaiPanel { title "Xenomorph AI Oper Yardımcısı" size -1 -1 235 160 option dbu text "AI Durumu:", 1, 10 12 60 10 button "AI Aç", 2, 80 10 50 15 button "AI Kapat", 3, 140 10 60 15 text "Otomatik Ceza:", 4, 10 38 70 10 button "Aç", 5, 80 36 50 15 button "Kapat", 6, 140 36 60 15 button "Durum Göster", 7, 10 65 80 18 button "Kanal Listesi", 8, 105 65 80 18 button "Muaf Listesi", 9, 10 92 80 18 button "Keyword Listesi", 10, 105 92 80 18 button "Komutlar", 11, 10 122 80 18 button "Kapat", 12, 115 122 70 18, cancel } on *:DIALOG:xaiPanel:sclick:*:{ if ($did == 2) xai on if ($did == 3) xai off if ($did == 5) xaioto on if ($did == 6) xaioto off if ($did == 7) xaistatus if ($did == 8) run xai_channels.txt if ($did == 9) run xai_muaf.txt if ($did == 10) run xai_keywords.txt if ($did == 11) xaihelp } ; ====================== ; AI MOTORU ; ====================== alias xai.enabled { return $iif($readini(xai.ini,settings,enabled) == on,1,0) } alias xai.auto { return $iif($readini(xai.ini,settings,autopunish) == on,1,0) } alias xai.master { return $readini(xai.ini,settings,masterchan) } alias xai.chan { return $iif($read(xai_channels.txt,w,$1),1,0) } alias xai.muaf { return $iif($read(xai_muaf.txt,w,$1),1,0) } alias xai.log { write xai_log.txt $asctime(yyyy-mm-dd HH:nn:ss) $1- echo -a 04[Xenomorph AI] 14$1- if ($me ison $xai.master) msg $xai.master 04[Xenomorph AI] 14$1- } alias xai.addrisk { ; /xai.addrisk nick puan sebep var %nick $1 var %puan $2 var %sebep $3- if (!%nick || !%puan) return var %key risk. $+ %nick hinc -mu600 xaiRisk %key %puan hadd -mu600 xaiRisk reason. $+ %nick %sebep xai.log %nick risk + $+ %puan $+ : %sebep $+ . Toplam risk: $hget(xaiRisk,%key) if ($hget(xaiRisk,%key) >= $readini(xai.ini,settings,risklimit)) { xai.alert %nick $hget(xaiRisk,%key) %sebep } } alias xai.alert { var %nick $1 var %risk $2 var %sebep $3- xai.log DİKKAT: %nick yüksek riskli görünüyor. Risk: %risk Sebep: %sebep echo -a 04[AI ÖNERİ] 14/xaianaliz %nick veya /xaiuygula %nick if ($xai.auto) { var %i 1 while (%i <= $comchan(%nick,0)) { var %c $comchan(%nick,%i) if ($xai.chan(%c)) xai.punish %c %nick AI yüksek risk: %sebep inc %i } } } alias xaianaliz { if (!$1) { echo -a Kullanım: /xaianaliz nick | return } var %nick $1 var %risk $hget(xaiRisk,risk. $+ %nick) if (!%risk) var %risk 0 var %reason $hget(xaiRisk,reason. $+ %nick) echo -a 04===== AI RİSK ANALİZİ ===== echo -a 03Nick: 14%nick echo -a 03Risk Puanı: 14%risk / 100 echo -a 03Son Sebep: 14$iif(%reason,%reason,Yok) echo -a 03Yorum: 14$xai.comment(%risk) echo -a 03Öneri: 14$xai.suggest(%risk) echo -a 04=========================== } alias xaioner { if (!$1) { echo -a Kullanım: /xaioner nick | return } var %risk $hget(xaiRisk,risk. $+ $1) if (!%risk) var %risk 0 echo -a 04[Xenomorph AI] 03 $+ $1 için öneri: $xai.suggest(%risk) } alias xaiuygula { if (!$1) { echo -a Kullanım: /xaiuygula nick | return } var %nick $1 var %risk $hget(xaiRisk,risk. $+ %nick) if (!%risk) var %risk 0 if (%risk < 30) { echo -a 03AI: Risk düşük, ceza önermiyorum. | return } var %i 1 while (%i <= $comchan(%nick,0)) { var %c $comchan(%nick,%i) if ($xai.chan(%c)) { xai.punish %c %nick Manuel AI önerisi uygulandı. Risk: %risk } inc %i } } alias xai.comment { if ($1 < 20) return Normal kullanıcı gibi görünüyor. if ($1 < 40) return Hafif şüpheli davranış var, takip önerilir. if ($1 < 70) return Orta riskli, uyarı/kick düşünülebilir. if ($1 < 90) return Yüksek riskli, kickban önerilir. return Çok yüksek riskli, oper müdahalesi önerilir. } alias xai.suggest { if ($1 < 20) return İşlem yapma, sadece izle. if ($1 < 40) return Uyar veya takip et. if ($1 < 70) return Kick veya geçici ban. if ($1 < 90) return Kickban uygula. return Gerekirse G-Line/Z-Line için oper kontrolü yap. } alias xai.contains { var %file $1 var %text $lower($2-) var %i 1 while (%i <= $lines(%file)) { var %w $lower($read(%file,%i)) if (%w isin %text) return 1 inc %i } return 0 } alias xai.caps { var %text $remove($1-,$chr(32)) var %len $len(%text) if (%len == 0) return 0 var %upper 0 var %i 1 while (%i <= %len) { if ($mid(%text,%i,1) isupper) inc %upper inc %i } return $int($calc((%upper / %len) * 100)) } alias xai.punish { ; /xai.punish #kanal nick sebep var %chan $1 var %nick $2 var %sebep $3- if (!%chan || !%nick) return if ($xai.muaf(%nick)) return if (%nick == $me) return if (%nick isop %chan) return var %punish $readini(xai.ini,settings,defaultpunish) if (%punish == kick) { kick %chan %nick Xenomorph AI: %sebep } elseif (%punish == ban) { mode %chan +b $address(%nick,2) } elseif (%punish == kickban) { mode %chan +b $address(%nick,2) kick %chan %nick Xenomorph AI: %sebep } elseif (%punish == gline) { gline %nick 1h :Xenomorph AI: %sebep } elseif (%punish == zline) { zline %nick 1h :Xenomorph AI: %sebep } xai.log %nick için işlem uygulandı: %punish / %sebep } ; ====================== ; OLAY ANALİZİ ; ====================== on *:TEXT:*:#:{ if (!$xai.enabled) return if (!$xai.chan(#)) return if ($xai.muaf($nick)) return if ($nick isop #) return ; Reklam / link / şüpheli kelime if ($xai.contains(xai_keywords.txt,$1-)) { xai.addrisk $nick 20 Anahtar kelime yakalandı: $1- } if ((http:// isin $lower($1-)) || (https:// isin $lower($1-)) || (www. isin $lower($1-)) || (discord.gg isin $lower($1-))) { xai.addrisk $nick 30 Link/reklam ihtimali. } ; Caps if ($len($strip($1-)) >= 18) { if ($xai.caps($strip($1-)) >= 75) { xai.addrisk $nick 15 Aşırı büyük harf kullanımı. } } ; Flood sayacı var %key msg. $+ # $+ . $+ $nick hinc -mu8 xaiEvents %key if ($hget(xaiEvents,%key) >= 6) { xai.addrisk $nick 35 Mesaj flood ihtimali. hdel xaiEvents %key } ; Operin nickine seslenme if ($istok($lower($strip($1-)),$lower($me),32)) { echo -a 09[AI DİKKAT] 03$nick sana # kanalında seslendi: $1- flash -b beep 2 } } on *:NOTICE:*:#:{ if (!$xai.enabled) return if (!$xai.chan(#)) return if ($xai.muaf($nick)) return if ((http:// isin $lower($1-)) || (www. isin $lower($1-))) { xai.addrisk $nick 25 Notice reklam ihtimali. } } on *:JOIN:#:{ if (!$xai.enabled) return if (!$xai.chan(#)) return if ($nick == $me) return if ($xai.muaf($nick)) return var %host $address($nick,5) if ((proxy isin $lower(%host)) || (vpn isin $lower(%host)) || (tor isin $lower(%host))) { xai.addrisk $nick 30 Şüpheli host/ident: %host } var %j join. $+ # hinc -mu10 xaiEvents %j if ($hget(xaiEvents,%j) >= 6) { xai.log # kanalında toplu giriş hareketi algılandı. Öneri: Kanalı geçici +m yap. hdel xaiEvents %j } } on *:NICK:{ if (!$xai.enabled) return var %i 1 while (%i <= $comchan($newnick,0)) { var %c $comchan($newnick,%i) if ($xai.chan(%c)) { var %key nickchange. $+ $newnick hinc -mu60 xaiEvents %key if ($hget(xaiEvents,%key) >= 3) { xai.addrisk $newnick 20 Sık nick değişimi. } } inc %i } } ctcp *:*:*:{ if (!$xai.enabled) return if ($xai.muaf($nick)) return var %key ctcp. $+ $nick hinc -mu10 xaiEvents %key if ($hget(xaiEvents,%key) >= 4) { xai.addrisk $nick 30 CTCP flood ihtimali. ignore -u180 $nick 1 xai.log $nick CTCP sebebiyle 3 dakika ignore edildi. hdel xaiEvents %key } } [/QUOTE]

Adı

İnsan doğrulaması