Gammon Forum

------------------------------------------------------
Configuration - Merentha
------------------------------------------------------
- Main Settings       |
|  - General          |
|  |   L IP address   |
|  |   L Notes        |
|  + Appearance       |
|  + Input            |
|  + Paste/Send       |
|  + Scripting        |
- EQ Plugin           |
|  + General          |
|  + Appearance       |
|  + Input            |
|  + Paste/Send       |
|  + Scripting        |
+ Spell Queue Plugin  |
------------------------------------------------------

<triggers>
  <trigger
   custom_colour="1"
   enabled="y"
   expand_variables="y"
   match="@target falls to the ground"
   name="target_falls"
   regexp="y"
   script="vm1:OnTargetFalls"
   sequence="100"
  >
  <send>kill @target</send>
  </trigger>
</triggers>
<script vm="vm1">

sub OnTargetFalls (a, b, c)

' blah blah

end sub

</script>

<plugin name="Magnum's wilderness walker"
        language="vbscript"
        author="Magnum"
>
<description>
This lets you walk through the wilderness blah blah ...
</description>
<use>
To use it type BLAH followed by BLAH
</use>
</plugin>

<!-- This has established the start of a plugin - one per include file I would suggest -->

<triggers>
  <trigger
   custom_colour="1"
   enabled="y"
   expand_variables="y"
   match="@target falls to the ground"
   name="target_falls"
   regexp="y"
   script="OnTargetFalls"
   sequence="100"
  >
  <send>kill @target</send>
  </trigger>
</triggers>

<aliases>
  <alias
   match="gems"
   enabled="y"
   ignore_case="y"
   name="gems"
  >
  <send>insert gems into statue</send>
  </alias>
</aliases>

<script>
<![CDATA[
'
' Using CDATA means you don't have to worry about > signs 
'  in the script.
'

sub OnTargetFalls (a, b, c)
 world.note world.getvariable ("blah")
end sub

]]> 
</script>

VARIANT CMUSHclientDoc::GetVariable(LPCTSTR VariableName) 
{
CString strVariableName = VariableName;
CVariable * variable_item;
VARIANT vaResult;

  VariantInit(&vaResult);

  vaResult.vt = VT_NULL;

  // return if bad name, if so return NULL
  if (CheckObjectName (strVariableName))
    return vaResult;

  vaResult.vt = VT_EMPTY;

  // see if variable exists, if not return EMPTY
  if (!m_VariableMap.Lookup (strVariableName, variable_item))
	  return vaResult;

  SetUpVariantString (vaResult, variable_item->strContents);

  return vaResult;

}