AOP Sy-s-hit

on *:JOIN*:#: {
 if ($nick == $me) halt
 if ($$ial($nick $+ *,1).addr == $read($mircdirLists\adminaop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
   .msg $chan Admin Aop: $nick , Loagged as: $gettok($read($mircdirLists\adminaop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )),2,32) , (@commands)
   if ($me isowner #) { mode # +q $nick }
   elseif ($me isop #) { mode # +o $nick }
   else { halt }
 }
 elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
  .msg $chan Owner Aop: $nick , Loagged as: $gettok($read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )),2,32) , (`q to owner/`o to op)
   if ($me isowner #) { mode # +q $nick }
   elseif ($me isop #) { mode # +o $nick }
   else { halt }
 }
 elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\hostraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
   .msg $chan Host Aop: $nick , Loagged as: $gettok($read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )),2,32) , (`o to op)
   if ($me isowner #) || ($me isop #) { mode # +o $nick }
   else { halt }
 }
 else { halt }
}

on *:TEXT:*`q*:#:{
 if ($$ial($nick $+ *,1).addr == $read($mircdirLists\adminaop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) || ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
   mode # +q $nick
 }
 else { halt }
}

on *:TEXT:*`o*:#:{
 if ($$ial($nick $+ *,1).addr == $read($mircdirLists\adminaop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) || ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) || ($$ial($nick $+ *,1).addr == $read($mircdirLists\hostaop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {
   mode # +o $nick
 }
 else { halt }
}

#aop end

menu nicklist {
 Aop Lists
 .Admin Aop 
 ..Add : {
   write Lists\adminaop.txt $$ial($$1 $+ *,1).addr $$1
   MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Was Added to Admin-Aop List.
   /privmsg $$1 Added To Aop List As AdminAop , (@commands)
 }
 ..Remove : {
   if ($$ial($$1 $+ *,1).addr == $read($mircdirLists\adminaop.txt, w,* $+ $$ial($$1 $+ *,1).addr $+ * )) {
     write -ds $+ $$ial($$1 $+ *,1).addr Lists\adminaop.txt
     MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Was Removed From Admin Aop List.
   }
   else { MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Isn't in Admin Aop List. }
 }
 .Owner Aop
 ..Add : {
   write Lists\owneraop.txt $$ial($$1 $+ *,1).addr $$1
   MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $msn.decode($$1) 14Was Added to Owner Aop List.
   /privmsg # $$1 Added To Aop List As Ownr Aop , (`q to owner/`o to op)
 }
 ..Remove : {
   if ($$ial($$1 $+ *,1).addr == $read($mircdirLists\owneraop.txt, w,* $+ $$ial($$1 $+ *,1).addr $+ * )) {
     write -ds $+ $$ial($$1 $+ *,1).addr Lists\owneraop.txt
     MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Was Removed From Owner Aop List.
   }
   else { MiMic $chan -a 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Isn't in Owner Aop List. }
 }
 .Host Aop
 ..Add : {
   write Lists\hostaop.txt $$ial($$1 $+ *,1).addr $$1
   MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Was Added to Host Aop List.
   /privmsg $$1 Added To Aop List As Host Aop , (`o to op)
 }
 ..Remove : {
   if ($$ial($$1 $+ *,1).addr == $read($mircdirLists\hostaop.txt, w,* $+ $$ial($$1 $+ *,1).addr $+ * )) {
     write -ds $+ $$ial($$1 $+ *,1).addr Lists\hostaop.txt
     MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Was Removed From Host Aop List.
   }
   else { MiMic $chan 14 $chr(160) $+ $chr(160) $+ $chr(160) $+ $chr(149) $+ 7 $$1 14Isn't in Host Aop List. }
 }
}

so, wuts wrong with the aop sys sh|t ?

PS: MiMic is instead of /echo (Smilies system)

ideas ..?

Tell us whats wrong with it first. Need to know rather then find out.

I guess

on *:JOIN*:#: {

should be

on *:JOIN:#: {

Fusion, it simply doesnt work ;\

well, the add/remove commands are workin fine , but when someone joins the room (added in admin/owner/host) NUTHING happens, no reaction from what i placed in the code ..

replying petertje: i tried

on *:JOIN:#: {

on *:JOIN*:#: {

on 1:JOIN:#: {

none is damn working

make sure you dont have another onjoin event in the same file and try this

on ^*:JOIN:#: {

this line doesnt tell it which text file

elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {

to this

elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {

also to do something like this would be easier using an ini file instead of text

Well, 1st of all ty git, well i tried :

$mircdirLists\owneraop

$mircdirLists\owneraop.txt

Lists\owneraop.txt (without $mircdir as the mirc doesnt need it in the add/remove)

but never worked, and i dont have any other onjoin events in the file, the only thing i didnt try yet is ^*:JOIN:#: {

i'll try it and post back

ty

[i cant change to INI files now, as i built the AOP System dialog according to what i already made, and it works perfect, just th onjoin events aint responding =( ]

well Git, i tried every thing u said, the onjoin events and everything !

ideas ?

$mircdir $+ Lists\owneraop.txt

see if that works

make sure you dont have another onjoin event in the same file and try this

 

on ^*:JOIN:#: {

 

 

this line doesnt tell it which text file

 

elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {

 

to this

 

elseif ($$ial($nick $+ *,1).addr == $read($mircdirLists\owneraop.txt, w,* $+ $$ial($nick $+ *,1).addr $+ * )) {

 

 

also to do something like this would be easier using an ini file instead of text

Could be tricky here to use $ial($nick $+ *,1) instead of $ial($nick,1)

i was just correcting the other fault pete lol the bit in red

I didnt have time to look at it properly , so i just did the bits that stood out

pete, the $ial($nick $+ *,1) works fine already, and when i open the txt file i find the gates added..

It's ok guys, the risks aren't that big, but they are there.

When some nick, lets say ABCDE, is in the owneraop.txt and in the room, and a nick ABCD comes in, ownering up would work for that nick. Even though his gate is not in the text file.

This will be the result of the $ial's:

$ial(ABCD $+ *,0) -> 2

$ial(ABCD $+ *,1) -> ABCDE

$ial(ABCD $+ *,2) -> ABCD

so in this case $ial(ABCD $+ *,1).addr will return the gate of ABCDE and the corresponding record in the text file will be found.

When the full nickname is available, always use $ial($nick).addr