From WikiChip
Editing mirc/optimization

Warning: You are not logged in. Your IP address will be publicly visible if you make any edits. If you log in or create an account, your edits will be attributed to your username, along with other benefits.

The edit can be undone. Please check the comparison below to verify that this is what you want to do, and then save the changes below to finish undoing the edit.

This page supports semantic in-text annotations (e.g. "[[Is specified as::World Heritage Site]]") to build structured and queryable content provided by Semantic MediaWiki. For a comprehensive description on how to use annotations or the #ask parser function, please have a look at the getting started, in-text annotation, or inline queries help pages.

Latest revision Your text
Line 3: Line 3:
 
mIRC Script Language is an interpreted language - which means that mIRC has to work out what each statement means each and every time it is executed. Consequently it is not considered a fast language and, more often than not, the easiest implementation is not the fastest.
 
mIRC Script Language is an interpreted language - which means that mIRC has to work out what each statement means each and every time it is executed. Consequently it is not considered a fast language and, more often than not, the easiest implementation is not the fastest.
  
That said, PCs today are far more powerful than when mIRC first introduced its scripting language, and unless your script is processing large number of messages or large files, then performance is less of an issue than it used to be. On the other hand, the maintainability of your script is also important, so eliminating duplicate code using common aliases & identifiers is also beneficial even if it introduces some minor overheads.
+
That said, PCs today are far more powerful then when mIRC first introduced its scripting language, and unless your script is processing large number of messages or large files, then performance is less of an issue than it used to be. On the other hand, the maintainability of your script is also important, so eliminating duplicate code using common aliases & identifiers is also beneficial even if it introduces some minor overheads.
  
 
The following tips will help to increase the execution speed of a script. Most will have a very marginal speed advantage and may not be worth consideration outside of long-running script blocks such as loops.
 
The following tips will help to increase the execution speed of a script. Most will have a very marginal speed advantage and may not be worth consideration outside of long-running script blocks such as loops.
Line 11: Line 11:
  
 
=== Use {{mIRC|Token Manipulation}} to break strings into pieces ===
 
=== Use {{mIRC|Token Manipulation}} to break strings into pieces ===
If you want to get the first part of a string up to (say) the first full-stop, don't use {{mirc|$pos}} to find the position of this character, and then use {{mirc|$left}} or {{mirc|$right}} to get the relevant sub-string. Instead use mIRCs {{mIRC|Token Manipulation}} functionality: <code>$gettok(%string,1,$asc(.))</code> to get the first sentence and <code>$gettok(%string,2-,$asc(.))</code> to get the remainder of the paragraph.
+
If you want to get the first part of a string up to (say) the first full-stop, don't use {{mirc|$pos}} to find the position of this character, and then use {{mirc|$left}} or {{mirc|$right}} to get the relevant sub-string. Instead use mIRCs {{mIRC|Token Manipulation}} functionality: $gettok(%string,1,$asc(.)) to get the first sentence (less the period itself) and $gettok(%string,2-,$asc(.)) to get the remainder of the paragraph.
 
 
''Benchmark:''
 
<source lang="mIRC">/benchmark -ai100000 $gettok(Sentence. Sentence.,1,$asc(.));$left(Sentence. Sentence.,$pos(Sentence. Sentence.,.))</source>
 
  
 
=== Use {{mirc|wildcard|Wildcard-Matching}}  ===
 
=== Use {{mirc|wildcard|Wildcard-Matching}}  ===
 
{{mirc|wildcard|Wildcard-matching}} allows you to see if your string matches a wildcard template containing fixed text and wildcard-match characters ?, * and &.
 
{{mirc|wildcard|Wildcard-matching}} allows you to see if your string matches a wildcard template containing fixed text and wildcard-match characters ?, * and &.
  
* "?" match any character
+
"?" match any character<br />
* "*" match 0 or more characters
+
"*" match 0 or more characters<br />
* " & " match any word
+
" & " match any word
  
 
So if you want to see if a string contains the word "fat" then you can use:
 
So if you want to see if a string contains the word "fat" then you can use:
 
<source lang="mIRC">if (* fat * isin %string) echo -a I am not fat!!</source>
 
<source lang="mIRC">if (* fat * isin %string) echo -a I am not fat!!</source>
  
Wildcard-matches can be used in {{mirc|/if}} statements, but also in {{mirc|$wildtok|token manipulation}}, {{mirc|$hfind|hash tables}}, {{mirc|$fline|custom windows}}, {{mIRC|on events|ON events}}, {{mirc|$var|variables}}, etc. etc. Even if you cannot narrow it down to a single item, using wildcard-matches to reduce substantially the number of iterations of a loop is very beneficial.  
+
Wildcard-matches can be used in {{mirc|/if}} statements, but also in {{mirc|$wildtok|token manipulation}}, {{mirc|$hfind|hash tables}}, {{mirc|$fline|custom windows}}, {{mIRC|on events|ON events}}, {{mirc|$var|variables}}, etc. etc. Even if you cannot narrow it down to a single item, using wildcard-matches to reduce substantially the number of iterations of a loop is also very beneficial.  
  
 
So for example, if we want to find a particular line in a custom window, rather than:  
 
So for example, if we want to find a particular line in a custom window, rather than:  
Line 60: Line 57:
  
 
=== Alias Bypassing ===
 
=== Alias Bypassing ===
When calling any command, mIRC will attempt to find a scripted version prior to looking for a native equivalent. This functionality can be bypassed by prefixing commands with <code>!</code>. $identifiers do not require anything because built-in identifier always have priority, the $~ construct does not speed anything, it only prevents an identifier to look for custom aliases if it's not a built-in.
+
When calling any form of command or identifier mIRC will attempt to find a scripted version prior to looking for a native equivalent. This functionality can be bypassed by prefixing commands with <code>!</code> and by inserting a <code>~</code> after the <code>$</code> of identifiers.
 +
 
 +
This bypasses mIRC looking for a scripted <code>echo</code> alias:
 +
<syntaxhighlight lang="mirc">!echo -a example1
 +
.!echo -a example2</syntaxhighlight>
  
For example, this bypasses mIRC looking for a scripted <code>echo</code> alias:
+
This bypasses mIRC looking for a scripted <code>me</code> alias<sup>1</sup>:
<syntaxhighlight lang="mirc">/!echo -a Message</syntaxhighlight>
+
<syntaxhighlight lang="mirc">echo -a $~me</syntaxhighlight>
  
''Benchmark:''
+
<sup>1</sup>: Even though mIRC will use its own native identifiers over custom aliases of the same name, there is still some pre-evaluation that can be bypassed using the above method.
<syntaxhighlight lang="mirc">/benchmark -aci100000 !set -l %a 2;set -l %a 1</syntaxhighlight>
 
  
 
=== Conditions ===
 
=== Conditions ===
Line 75: Line 75:
 
if (condition) { command }</syntaxhighlight>
 
if (condition) { command }</syntaxhighlight>
  
''Benchmark:''
 
<syntaxhighlight lang="mirc">/benchmark -aci100000 if (0 == 1) var %a 1;if 0 == 1 { var %a 1 };if (0 == 1) { var %a 1 }</syntaxhighlight>
 
  
 
=== {{mirc|/if}} vs. {{mirc|$iif}}() ===
 
=== {{mirc|/if}} vs. {{mirc|$iif}}() ===
Line 82: Line 80:
  
 
Best to worst:
 
Best to worst:
 +
<syntaxhighlight lang="mirc">var %result = condition_false_value
 +
if (condition) var %result = condition_true_value</syntaxhighlight>
 
<syntaxhighlight lang="mirc">if (condition) var %result = condition_true_value
 
<syntaxhighlight lang="mirc">if (condition) var %result = condition_true_value
 
else var %result = condition_false_value</syntaxhighlight>
 
else var %result = condition_false_value</syntaxhighlight>
<syntaxhighlight lang="mirc">var %result = condition_false_value
 
if (condition) var %result = condition_true_value</syntaxhighlight>
 
 
<syntaxhighlight lang="mirc">var %result = $iif(condition, condition_true_value, condition_false_value)</syntaxhighlight>
 
<syntaxhighlight lang="mirc">var %result = $iif(condition, condition_true_value, condition_false_value)</syntaxhighlight>
  
''Benchmark:''
+
=== {{mirc|/tokenize}} & $n vs {{mirc|$gettok}}() ===
<syntaxhighlight lang="mirc">/benchmark -aci100000 if (condition) var %result = condition_true_value | else var %result = condition_false_value;var %result = condition_false_value | if (condition) var %result = condition_true_value;var %result = $iif(condition, condition_true_value, condition_false_value)</syntaxhighlight>
+
For successive<sup>1</sup> calls against the same data, it is faster to use <code>/tokenize</code> and <code>$n</code> over <code>$gettok()</code>.
 
 
=== {{mirc|/tokenize}} & $n vs. {{mirc|$gettok}}() ===
 
For successive<sup>2</sup> calls against the same data, it is faster to use <code>/tokenize</code> and <code>$n</code> over <code>$gettok()</code>.
 
 
<syntaxhighlight lang="mirc">;; faster than using $gettok(a b c, 1, 32) $gettok(a b c, 2, 32)
 
<syntaxhighlight lang="mirc">;; faster than using $gettok(a b c, 1, 32) $gettok(a b c, 2, 32)
 
tokenize 32 a b c
 
tokenize 32 a b c
 
echo -a $1 $2</syntaxhighlight>
 
echo -a $1 $2</syntaxhighlight>
  
<sup>2</sup>: even with just two references against the same input tokenizing is faster than using $gettok
+
<sup>1</sup>: even with just two references against the same input tokenizing is faster than using $gettok
  
=== [ ] vs. $() vs. $eval ===
+
=== []'s vs $() vs $eval ===
 
Best to worst:
 
Best to worst:
 
<syntaxhighlight lang="mirc">
 
<syntaxhighlight lang="mirc">
Line 106: Line 101:
 
$eval(eval_statement, 2)</syntaxhighlight>
 
$eval(eval_statement, 2)</syntaxhighlight>
  
''Benchmark:''
+
'''Note:''' "$($+(%,var,%i))" is, however, far more readable than "[ % [ $+ [ var [ $+ [ %i ] ] ] ] ]".
<syntaxhighlight lang="mirc">
 
//set %test.eval = VALUE
 
//echo -a [] %test. [ $+ eval ]
 
//echo -a $ $($+(%,test.,eval),2)
 
//echo -a $ $+ eval $eval($+(%,test.,eval),2)
 
/benchmark -ai100000 %test. [ $+ eval];$($+(%,test.,eval),2);$eval($+(%,test.,eval),2)</syntaxhighlight>
 
 
 
=== %x= vs. /var vs. /set ===
 
 
 
There are multiple ways to set a global or local variable. Best to worse these are:
 
 
 
==== Global variables ====
 
<syntaxhighlight lang="mirc">
 
%x = VALUE
 
set %x VALUE
 
var -g %x VALUE
 
var -g %x = VALUE
 
</syntaxhighlight>
 
 
 
''Benchmark:''
 
<syntaxhighlight lang="mirc">/benchmark -aci100000 %x = 1;/set %x 1;/set %x = 1;/var -g %x 1;/var -g %x = 1</syntaxhighlight>
 
 
 
==== Local variables ====
 
<syntaxhighlight lang="mirc">
 
set -l %x VALUE
 
var %x VALUE
 
var %x = VALUE
 
</syntaxhighlight>
 
 
 
''Benchmark:''
 
<syntaxhighlight lang="mirc">/benchmark -aci100000 /set -l %x 1;/set -l %x = 1;/var %x 1;/var %x = 1</syntaxhighlight>
 
 
 
== Long running loops ==
 
mIRC is '''not''' multi-threaded - any script runs to completion before mIRC does any other activities i.e. before running any other scripts or processing any messages from IRC servers or processing any actions made by the user. Depending on your version of mIRC, Windows may also start to think that mIRC has become non-responsive and offer to terminate it.
 
 
 
If you want to run a long running looping script (say to load a large file into hash tables) '''without mIRC locking up''', there is a technique you can use. Instead of a single loop like this (which loops a million times before ending):
 
<syntaxhighlight lang="mirc">
 
alias loop {
 
  set %ticks $ticks
 
  var %i 1000000
 
  while (%i) {
 
    ; do stuff
 
    dec %i
 
  }
 
  echo -a Loop took $calc($ticks - %ticks) $+ ms to execute.
 
}
 
</syntaxhighlight>
 
you might instead want to break the loop into (say) a thousand chunks of a thousand iterations and run the next chunk using a timer:
 
<syntaxhighlight lang="mirc">
 
alias loop {
 
  set %ticks $ticks
 
  chunk 1000
 
}
 
alias chunk {
 
  var %i 1000
 
  while (%i) {
 
    ; do stuff
 
    dec %i
 
  }
 
  if ($1 > 1) .timer 1 0 chunk $calc($1 - 1)
 
  else echo -a Loop took $calc($ticks - %ticks) $+ ms to execute.
 
}
 
</syntaxhighlight>
 
As you can see, in this example each chunk does 1,000 loops, and then sets a timer to run the next chunk. The number of iterations per chunk will depend on the CPU load of the stuff in the loop - you may need to experiment to determine the optimum number of iterations per chunk (bearing in mind that it may run on PCs of different CPU powers). Clearly you want to keep the iterations small enough that mIRC continues to feel responsive, but you don't want to slow it up by having too many small chunks being queued on the timer.
 
 
 
On a Core i7 laptop, the first example takes c. 10.8s during which mIRC is unresponsive, and the second takes c. 19.8s but remains very responsive to e.g. keystrokes - however there is an overhead of c. 9s for 1,000 chunks. If one million loops takes 11s, then a chunk of a thousand loops will take c. 11ms which is a lot smaller than needed to keep mIRC responsive. If we assume that to keep mIRC feeling responsive we need to process other activities (say) every 100ms, this suggests that we should be able to run 100 chunks of 10,000 iterations rather than 1,000 of 1,000, and by doing this reduce the overhead of chunking by a factor of 10, which should give us a run time of c. 11.7s - and when I tried it mIRC still felt pretty responsive e.g. to keystrokes, and it did indeed take c. 11.7s to run.
 
 
 
'''Summary:''' In this simple example, by chunking in this way I was able to keep mIRC responsive during a loop which would normally lock-up mIRC for over 10s with an overhead of <10% - a definite win.
 
 
 
== Benchmark utility ==
 
 
 
The benchmark examples above are designed to work with the following script. Type "/benchmark" to get help.
 
 
 
<syntaxhighlight lang="mirc">
 
alias benchmark {
 
  if ($show) {
 
    if ($0 == 0) {
 
      echo -cag action $str(-,80)
 
      echo 4 -ag /benchmark -aciN string1[;string2[;string3 …]]
 
      echo -ag $crlf
 
      echo -cag info The default number of iterations is 10000.
 
      echo -cag info -i switch defines a different number of iterations.
 
      echo -cag info -c tests as a command, not a string
 
      echo -cag info -a applies the same switches to all strings
 
      echo -ag $crlf
 
      echo -cag action Examples:
 
      echo -cag info /benchmark $ $+ replace(a,a,b)
 
      echo -cag info /benchmark -i5000 $ $+ replace(a,a,b)
 
      echo -cag info /benchmark -i5000 $ $+ replace(a,a,b);-i5000 $ $+ regsubex(a,a,b)
 
      echo -cag info /benchmark -ai5000 $ $+ replace(a,a,b);$ $+ regsubex(a,a,b)
 
      echo -ag $crlf
 
      echo -cag info /benchmark -c var % $+ a 1;-c set -l % $+ a 1
 
      echo -cag info /benchmark -ci20000 var % $+ a 1;-ci20000 set -l % $+ a 1
 
      echo -cag info /benchmark -aci20000 var % $+ a 1;set -l % $+ a 1
 
      echo -cag action $str(-,80)
 
      return
 
    }
 
    echo -cag action Benchmark $1-
 
    if ($switch($1,a)) {
 
      var %o $iif($remove($1,a) != -,$v1)
 
      tokenize 32 $2-
 
    }
 
    tokenize 59 $1-
 
    var %a 1
 
    while ($(,%o $ $+ %a) != %o) {
 
      scon 0 .benchmark $!v1
 
      inc %a
 
    }
 
    return
 
  }
 
  var %benchmark $iif($switch($1,i) isnum,$v1,10000)
 
  var %b %benchmark,%s $1
 
  if ($switch(%s)) tokenize 32 $2-
 
  tokenize 32 $iif(!$switch(%s,c),noop) $1-
 
  var %t $ticks
 
  while (%benchmark) {
 
    scon 0 $1-
 
    dec %benchmark
 
  }
 
  var %e $ticks - %t
 
  var %c = $switch(%s,c)
 
  echo 3 -ag %b iterations of the $iif(%c,command,string) $qt($iif(%c,$1-,$2-)) took %e $+ ms
 
  return
 
  :error
 
  echo -cag info $error
 
  echo 4 -ag Could not complete benchmark test for $qt($iif($1 != noop,$1) $2-)
 
  reseterror
 
}
 
 
 
alias -l switch {
 
  if (-?* !iswm $1) return $false
 
  if (!$regex($1,/([a-zA-Z](?:".+?"|[^a-zA-Z]+)?)/g)) return $false
 
  if ($2 isnum && $2 > $regml(0)) return $false
 
  if ($2 = $null) return $true
 
  if ($2 isnum) {
 
    var %m $regml($2),%s $left(%m,1),%p $noqt($mid(%m,2))
 
    if ($2 = 0) return $regml(0)
 
    if (%m != $null) {
 
      if ($regex($prop,/^exists?$/i)) return $true
 
      if ($regex($prop,/^contents?$/i)) return $iif(%p,%p,$false)
 
      return %s
 
    }
 
    return $false
 
  }
 
  var %x 1
 
  while ($regml(%x)) {
 
    var %m $v1,%s $left($v1,1),%p $noqt($mid($v1,2))
 
    if ($2 === %s) {
 
      if ($prop != sname) return $iif(%p,%p,$true)
 
      elseif ($prop = sname) return %s
 
    }
 
    inc %x
 
  }
 
  return $false
 
}
 
</syntaxhighlight>
 
 
 
 
[[Category:mIRC|optimization]]
 
[[Category:mIRC|optimization]]

Please note that all contributions to WikiChip may be edited, altered, or removed by other contributors. If you do not want your writing to be edited mercilessly, then do not submit it here.
You are also promising us that you wrote this yourself, or copied it from a public domain or similar free resource (see WikiChip:Copyrights for details). Do not submit copyrighted work without permission!

Cancel | Editing help (opens in new window)