Fagscan

Platform: mIRC

Published Sep 04, 2007

Updated Sep 28, 2007

666 12

Ye i got bored so made a fag scan xD.
Put this into your remotes (Alt+R)

To use Hold Ctrl and left click on all the names you want to show up as fags, then right click on one of them an click "-=fagscan=-"

enjoy ;P

o ye and make sure flood protection is off ;p

*Update*
Shortened and improved coding
"Improved" code so that it should now work for everyone, apparently i was the only one that had the previous code working xD :S.

menu nicklist {

  -

  -=fagscan=-:{

    var %nsnicks $snick(#,0)

    var %snicknum = 1, %high, %med, %low

    msg # Scanning # for fags...

    .timer 1 1 msg # 4|

    .timer 1 2 msg # 4|||||

    .timer 1 4 msg # 4|||||||||

    .timer 1 5 msg # 4||||||||||8||

    .timer 1 7 msg # 4||||||||||8||||||

    .timer 1 9 msg # 4||||||||||8||||||||||9|

    .timer 1 11 msg # 4||||||||||8||||||||||9||||

    .timer 1 14 msg # 4||||||||||8||||||||||9|||||||||||||

    .timer 1 15 msg # 13Scan completed.

    .timer 1 16 msg # 12 $+ %nsnicks fags detected:

    while (%nsnicks) {

      var %random $r(1,3)



      if (%random == 1) {

        var %high $addtok(%high,$chr(32) $($ $+ %snicknum,2),44)

      }



      elseif (%random == 2) {

        var %med $addtok(%med,$chr(32) $($ $+ %snicknum,2),44)

      }



      elseif (%random == 3) {

        var %low $addtok(%low,$chr(32) $($ $+ %snicknum,2),44)

      }

      inc %snicknum

      dec %nsnicks

    }

    if (%high) {

      .timer 1 16 msg # 4High risk- %high

    }

    if (%med) {

      .timer 1 16 msg # 7Medium risk- %med

    }

    if (%low) {

      .timer 1 16 msg # 8Low risk- %low

    }

  }

  -

}

Comments

FRISH - Sep 14, 2007

ok kewl kewl, ive updated the main code to this since its not useful if i could only use it b4 xP

Respond

yag303 - Sep 14, 2007

sure did! ty :)

Respond

Robo-kitty - Sep 13, 2007

yes, that fixed it!

Respond

FRISH - Sep 13, 2007

ok right ive made a 2nd code for those who cant work the fagscan, im presuming this works but tell us if it does or not plz ;)

		Code 			
menu nicklist {
  -
  -=fagscan=-:{
    var %nsnicks $snick(#,0)
    var %snicknum = 1, %high, %med, %low
    msg # Scanning # for fags...
    .timer 1 1 msg # 4|
    .timer 1 2 msg # 4|||||
    .timer 1 4 msg # 4|||||||||
    .timer 1 5 msg # 4||||||||||8||
    .timer 1 7 msg # 4||||||||||8||||||
    .timer 1 9 msg # 4||||||||||8||||||||||9|
    .timer 1 11 msg # 4||||||||||8||||||||||9||||
    .timer 1 14 msg # 4||||||||||8||||||||||9|||||||||||||
    .timer 1 15 msg # 13Scan completed.
    .timer 1 16 msg # 12 $+ %nsnicks fags detected:
    while (%nsnicks) {
      var %random $r(1,3)

      if (%random == 1) { 
        if (%high) { var %commer $chr(44) }
        var %high %high $+ %commer $($ $+ %snicknum,2)
      }

      elseif (%random == 2) { 
        if (%med) { var %commer $chr(44) }
        var %med %med $+ %commer $($ $+ %snicknum,2) 
      }

      elseif (%random == 3) { 
        if (%low) { var %commer $chr(44) }
        var %low %low $+ %commer $($ $+ %snicknum,2) 
      }
      if (!%high || !%med || !%low) { var %commer }
      inc %snicknum
      dec %nsnicks
    }
    if (%high) {
      .timer 1 16 msg # 4High risk- %high
    }
    if (%med) {
      .timer 1 16 msg # 7Medium risk- %med
    }
    if (%low) {
      .timer 1 16 msg # 8Low risk- %low
    }
  }
  -
}
	

Respond

FRISH - Sep 13, 2007

ye i can only think of 2 resons why it would do this:
1) try putting it in a new script file (file,new) and try if it works
2) theres another script unsetting the variabless %high %med and %low, probably isnt though

but anyway mine works ;p, if i can ill see if i can sort it out but might not =/

is there anyone else who has got it to work?

Respond

yag303 - Sep 13, 2007

when i run Fagscan it doesnt list any nicks :(

Scanning #testing for fags...
|
|||||
|||||||||
||||||||||||
||||||||||||||||
|||||||||||||||||||||
||||||||||||||||||||||||
|||||||||||||||||||||||||||||||||
Scan completed.
2 fags detected:

thats it.. it doesnt go farther.. any ideas?
when i use what napa182 posted it lists nick but only repeats them

Respond

Robo-kitty - Sep 10, 2007

im using it, he seems not to be

Respond

FRISH - Sep 09, 2007

yep =/ im presuming ur not then

Respond

Robo-kitty - Sep 09, 2007

I get the same error, did you use mIRC to make this?

Respond

FRISH - Sep 05, 2007

hmmm well i dont know whats wrong when you try it on yours, but my code\'s better when it works coz on yours if you highlight more than 1 nick it repeats their name ^^

it should work anyway coz in the code its just doing:
$snick(#,1)
$snick(#,2)
...
$snick(#,lastselectedname)

Respond

napa182 - Sep 04, 2007

i keep getting this error * Invalid format: $snick
i did this and it got rid of the error

		Code 			
menu nicklist {
  -
  -=fagscan=-:{
    var %nsnicks $snick(#,0)
    var %snicknum = 1, %high, %med, %low
    msg # Scanning # for fags...
    .timer 1 1 msg # 4|
    .timer 1 2 msg # 4|||||
    .timer 1 4 msg # 4|||||||||
    .timer 1 5 msg # 4||||||||||8||
    .timer 1 7 msg # 4||||||||||8||||||
    .timer 1 9 msg # 4||||||||||8||||||||||9|
    .timer 1 11 msg # 4||||||||||8||||||||||9||||
    .timer 1 14 msg # 4||||||||||8||||||||||9|||||||||||||
    .timer 1 15 msg # 13Scan completed.
    .timer 1 16 msg # 12 $+ %nsnicks fags detected:
    while (%nsnicks) {
      var %random $r(1,3)

      if (%random == 1) { 
        if (%high) { var %commer $chr(44) }
        var %high %high $+ %commer $1 
      }

      elseif (%random == 2) { 
        if (%med) { var %commer $chr(44) }
        var %med %med $+ %commer $1  
      }

      elseif (%random == 3) { 
        if (%low) { var %commer $chr(44) }
        var %low %low $+ %commer $1  
      }
      if (!%high || !%med || !%low) { var %commer }
      inc %snicknum
      dec %nsnicks
    }
    if (%high) {
      .timer 1 16 msg # 4High risk- %high
    }
    if (%med) {
      .timer 1 16 msg # 7Medium risk- %med
    }
    if (%low) {
      .timer 1 16 msg # 8Low risk- %low
    }
  }
  -
}
	

Respond

mountaindew - Sep 04, 2007

lol

Respond