Currently Loaded Scripts

By Jonesy44 on Feb 03, 2008

Pretty basic script to inform you of your currently loaded scripts using mIRC built in idents.

Copy and paste this snippet into your remotes (ALT + R)
Type

/scripts

to fire it up =)

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Scripted by TH a.k.a jonesy44 ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

alias scripts {
  set %total.scripts $script(0)
  set %c 1
  echo $active 4*#Scripts Loaded4* $script(0)
  while (%c <= %total.scripts) {
    echo $active 4*# $+ %c $+ 4* $script( $+ %c $+ )
    inc %c 1
  }
  unset %c
  unset %total.scripts
}

Comments

Sign in to comment.
Lenooox   -  Apr 19, 2011

:)

 Respond  
Jonesy44   -  Apr 19, 2011

Yes - that has the same (useless) function :)

 Respond  
Lenooox   -  Apr 19, 2011

not that good, but I'll explain(I hope it works :D )

on *:text:!loadedscripts:#: {
  var %x 1, %s
  while ($script(%x)) { var %s %s $+ , $nopath($v1) | inc %x }
  msg # 7I have 9 $script(0) 4scripts loaded :0 $gettok($right(%s,-1),1-5,44)
  var %x 6
  while (%x <= $numtok(%s,44)) {
    msg # $gettok(%s,%x $+ - $+ $calc(%x +10),44)
    inc %x 10
  }
}
 Respond  
Jonesy44   -  May 29, 2009

fucking hell this is old.. and really crap :P i cud re-write this in one line now XD

alias scripts var %c = 1 | echo -e 4*#Scripts Loaded4* $script(0) | while (%c <= $script(0)) { echo -a 4*# $+ %c $+ 4* $script(%c) | inc %c 1 }
 Respond  
SnoooP   -  Mar 08, 2008

lol nice script

 Respond  
guest598594   -  Mar 08, 2008

^^nvm about that, i don\'t know what i was talking about :|

 Respond  
guest598594   -  Feb 04, 2008

i would do $iif($isid,return,echo) so u can use it as identifier or alias

 Respond  
Jonesy44   -  Feb 04, 2008

Wow, real nice work =D
blushes xD

 Respond  
napa182   -  Feb 03, 2008

here i made this in about 4 min\'s maybe that can give you an idea for a dialog for this.. whoknows...

dialog test {
  title \"Loaded Scripts\"
  size -1 -1 180 88
  option dbu
  list 1, 11 5 155 66, vsbar  
  button \"List\", 2, 11 74 30 10
  button \"Clear\", 3, 54 74 30 10
  button \"Exit\", 4, 137 74 30 10, cancel
  button \"Edit\", 5, 96 74 30 10
}
alias test { 
  dialog $iif($dialog(test),-v,-md) test test 
}
menu channel {
  .Loaded Scripts { test }  
}
on *:DIALOG:test:init:0:{ did -b test 3,5 }
on *:DIALOG:test:sclick:*:{
  if ($did == 2) {
    did -e test 3,5
    did -b test 2
    var %total.scripts $script(0), %c = 1
    did -a test 1 #Scripts Loaded $script(0)
    while (%c <= %total.scripts) {
      did -a test 1 $script(%c)
      inc %c
    }
  }
  if ($did == 3) { did -r test 1 | did -b test 3,5 | did -e test 2 }
  if ($did == 5) { 
    if (!$did(1).seltext) { return }
    else { run $did(1).seltext }
  }
}
 Respond  
Jonesy44   -  Feb 03, 2008

not a bad idea, perhaps a /aline would work better, i tend to keep about 3-5 scripts loaded at a time, so i find it helpfull. =P
I\'m more or less playing around with posting some small snippets atm on here

Thanks for the feedback =)

 Respond  
napa182   -  Feb 03, 2008

oop\'s the last inc %c 1 can be inc %c
grrr i hate not being able to edit our own posts ..

alias scripts {
  var %total.scripts $script(0), %c = 1
  echo -a 4*#Scripts Loaded4* $script(0)
  while (%c <= %total.scripts) {
    echo -a 4*# $+ %c $+ 4* $script(%c)
    inc %c
  }
}

um good work but you will flood ur self with echos if you have a ton of scripts in ur mirc....um maybe add to this and make it a dialog and have it list them in there..just a thought.

 Respond  
napa182   -  Feb 03, 2008

like Lindrian said in ur last one to use var instead of set...

alias scripts {
  var %total.scripts $script(0), %c = 1
  echo -a 4*#Scripts Loaded4* $script(0)
  while (%c <= %total.scripts) {
    echo -a 4*# $+ %c $+ 4* $script(%c)
    inc %c 1
  }
}
 Respond  
Freckle   -  Feb 03, 2008

also:

$script( $+ %c $+ )

can be (I think)

$script(%c)
 Respond  
Freckle   -  Feb 03, 2008
echo $active

can be replaced with

echo -a
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.