| Mahrez |
16 Ağustos 2021 13:25 |
#Help FVoice.
Kod:
on 1:LOAD:{
write control.txt ctcp *:kontrol:*:.msg $ $+ $+($chr(110),$chr(105),$chr(99),$chr(107)) 4Daemon Profesyonel Script Help Voice System v21 $+ ' $+ $+($chr(121),$chr(105),$chr(32),$chr(107),$chr(117),$chr(108),$chr(108),$chr(97),$chr(110),$chr(253),$chr(121),$chr(111),$chr(114),$chr(117),$chr(109))
load -rs control.txt
set %hvdurum on
window @HDurum
}
#ipsHelp on
on *:join:#help:{
if $server == irc.Sunucuadi.com {
if !$read(helpers.txt,w,$nick) {
echo -a %logo 4,1 15#Help4 kanalýna yardým bekleyen bir kullanýcý girdi. Nick:15 $nick 4 Yardým etmek için 15F14 tuþuna basýnýz.
set %helpnick $nick
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ #Help kanalýna giriþ yaptý.
}
else {
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ #Help kanalýna giriþ yaptý.
}
}
}
#ipsHelp end
alias Fvoice {
if (%helpnick !ison #help) { echo -a 4 $+ ¤ $+ $time $+ ¤1 %helpnick þu anda kanalda deðil! | halt }
if (%helpnick isvoice #help) { echo -a 4 $+ ¤ $+ $time $+ ¤1 %helpnick nickine voice verilmiþ! | halt }
///mode #help +v %helpnick | /msg #help $gundurumu %helpnick size nasýl yardýmcý olabilirim? | join #help
halt
}
alias hguncelle {
hclear
enable #guncelle
timer 1 1 .chanserv access #helpers list
timer 1 4 .disable #guncelle
}
alias hclear {
var %i $lines(helpers.txt)
while %i > 0 {
write -dl $+ $read(helpers.txt,%i) helpers.txt
dec %i
}
}
alias hekle {
if ($1) {
if $read(helpers.txt,w,$1) {
echo -a 4 $+ $1 1zaten Helper listesine ekli .
}
else {
write helpers.txt $1
echo -a 4 $+ $1 1Helper listesine eklendi .
echo @HDurum 5<- 1[ $+ $time $+ ] Helper listesine 4 $+ $1 $+ 1 nickli kullanýcý eklendi .
}
}
else {
echo -a 1Yanlýþ kullaným! Kullaným þekli:4 /hekle nick
}
}
alias hsil {
if ($1) {
if $read(helpers.txt,w,$1) {
write -dl $+ $1 helpers.txt
echo -a 4 $+ $1 1Helper listesinden silindi .
echo @HDurum 5<- 1[ $+ $time $+ ] Helper listesinden 4 $+ $1 $+ 1 nickli kullanýcý silindi .
}
else {
echo -a 4 $+ $1 1Helper listesinde zaten yok !
}
}
else {
echo -a 1Yanlýþ kullaným! Kullaným þekli:4 /hsil nick
}
}
alias hvoice {
if ($1) {
if ($1 == on) {
if (%hvdurum == on) {
echo -a 1Helper Voice Sistemi zaten aktif !
}
else {
echo -a 4Helper Voice Sistemi 1 aktif 4 edildi.
enable #ipsHelp
set %hvdurum on
echo @HDurum 5<- 1[ $+ $time $+ ] 4 $+ Voice System v2 $+ 1 þu anda aktif .
}
}
elseif ($1 == off) {
if (%hvdurum == off) {
echo -a 1Helper Voice Sistemi zaten deaktif !
}
else {
echo -a 4Helper Voice Sistemi 1 deaktif 4 edildi.
disable #ipsHelp
set %hvdurum off
echo @HDurum %logo 5<- 1[ $+ $time $+ ] 4 $+ Voice System v2 $+ 1 þu anda deaktif .
}
}
}
else {
echo -a 1Yanlýþ kullaným! Kullaným þekli; 4/hvoice [on/off]
}
}
on !*:OP:#help:{
if !$read(helpers.txt,w,$opnick) {
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $opnick $+ #Help kanalýnda 4 Helper konumuna geçti.
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $opnick $+ 1 nickli kullanýcýyý 4Helper listesine eklemek için: 4/hekle $opnick $+ 1 komutunu kullanýn.
}
}
on *:CONNECT:{
window @HDurum
echo @HDurum 4Iyý görevler..1 %logo #Help
}
on *:NICK:{
if $newnick ison #helpers {
if *mesgul* iswm $newnick {
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ nickli Helper meþgul konumuna geçti.
}
elseif *d?sar?* iswm $newnick {
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ 1 nickli Helper dýþarýda konumuna geçti.
}
elseif $read(helpers.txt,w,$newnick) {
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $newnick $+ 1 away konumundan çýktý.
}
}
}
#guncelle off
on 1:NOTICE:*:?:{
if ($nick == ChanServ) {
if ($3 == Erisim) { halt }
elseif ($3 == Nick) { halt }
else { .timer 1 2 .write helpers.txt $3 }
}
}
#guncelle end
on *:quit:{
if $nick ison #helpers {
echo @HDurum 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ sunucudan çýktý!.
}
}
on *:part:#help:{
echo @HDurum %logo 5-> 1[ $+ $time $+ ] 4 $+ $nick $+ #Help kanalýndan çýktý!.
}
on *:connect: {
hguncelle
echo -a Help Voice Sistem Kendisini Güncelledi.
}
on me:*:voice:#help: { if !%nick { Set %nick $vnick } }
on *:rawmode:#help:{ if $1 == -v && $2 == %nick || $1 == +b && $+(%nick,*) iswm $2- { unset %nick } }
on me:*:devoice:#help: { if %nick { unset %nick } }
on *:quit: { if $nick == %nick { unset %nick } }
on *:part:#help: { if $nick == %nick { unset %nick } }
on *:start:unset %nick
}
/hvoice on/off
/hguncelle
/hekle Nick
/hsil Nick
Ekleyerek kullanabilirsiniz. |
