[פרסום] Owners System (on text(pm), menu) by Xronic

[Xronic]

שם הקוד: Owners system by Xronic
יוצר: Xronic
גירסא: 1.0
תיאור: הרבה אנשים ביקשו ממני את הקוד הזה, אז אמרתי נעלה את זה לפה
הפעלה: קליק ימני < Owners System by Xronic
דרישות: n/a

קוד: בחר הכל

; —————————————————————————————————————————————————————————————————————————————— ;
; Owners System by Xronic                                                        ;
; Commands (Pm-Bot): !add-o QACC (add owner to %owners) Example: !add-o Xronic   ;
; Commands (Pm-Bot): !del-o QACC (del Owner to %owners) Example: !del-o Xronic   ;
; Commands (Pm-Bot): !owners (u can now show all owners) Exmape: !Owners         ;
; —————————————————————————————————————————————————————————————————————————————— ;

on *:text:*:?: {
  if ($istok(%owners,$gettok($address($nick,2),2,64),32)) && (!%flood-pm) {
    if ($1 == !Add-o) || ($1 == !Add-owner) && ($2 $+ .users.quakenet.org isin %owners) && (!%flood-pm) { timer 1 0 msg $nick $2 $+ .users.quakenet.org is already Owner | set -u2 %flood-pm 1 }
    elseif ($1 == !Add-O) || ($1 == !Add-owner) && (!%flood-pm) { set %owners %owners $2 $+ .users.quakenet.org | msg $nick Done! the $2 $+ .users.quakenet.org has been succesfully added from owners list. }
    elseif ($1 == !Del-O) || ($1 == !Del-owner) && ($2 $+ .users.quakenet.org !isin %owners) && (!%flood-pm) { timer 1 1.5 msg $nick Error! No Such Q account | set -u2 %flood-pm 1 }
    elseif ($1 == !del-o) || ($1 == !Del-owners) && (!%flood-pm) { set %owners $remove(%owners,$2 $+ .users.quakenet.org) | timer 1 0 msg $nick Done! the $2 $+ .users.quakenet.org has been successfully removed from owners list. | set -u2 %flood-pm 1 }
    elseif ($1 == !Owners) { msg $nick ( $+ Total Owners: $numtok(%owners,32) $+ ) | msg $nick Owners list: %owners  }
  }
}
menu * {
  Owners System by Xronic
  ..add owner { set %owners %owners $input(Qacc,e,Qacc) $+ .users.quakenet.org | echo -a 4done! owner added }
  ..del owner { set %owners $remove(%owners,$input(Qacc,e,Qacc remove?) $+ .users.quakenet.org,32) | echo -a 4done! owner added }
  ..Show owners { $input(Owners List (Total Owners: $numtok(%owners,32) $+ ) $+ : $crlf $+ $replace(%owners,$chr(32),$crlf),o,Owners) }
} 

on *:load:{
  set %owners %owners $input(Qacc,e,Qacc) $+ .users.quakenet.org | echo -a 4done! owner added
  set %owners $remove(%owners,$input(Qacc,e,Qacc remove?) $+ .users.quakenet.org,32) | echo -a 4done! owner removed
}


[Premium]

אללה הודד!!!! יש אבל תודה אח שלי !

[ZxoR]

נכון שזה לא פריץ, אבל לא הייתי מכניס את זה לגאטרבוט שלי, יותר מקצועי לעשות עם שם משתמש וסיסמא.

[Ohad]

אם כבר השתמשת ב-q acc אז עדיף להשתמש ב User list של המירק ואפילו לתת אפשרות למספר דרגות (לפי מספרים).
והמבוא לקוד כתוב בצורה מטופשת.

[ZxoR]

כמו שאוהד כתב ובנוסף: אין לנו צורך בקוד כזה באתר. קוד מסוג זה מומלץ לכתוב אישית מותאם לבוט שהוא מיועד אליו.

תודה בכל מקרה, יועבר במשך השבוע למחסן.