OgreMCP page for PQ SG

D

Deugar

Active Member
I went ahead and made a option for frame 8. Once that is done you can insert the following after frame 4. and it should work.

to use:
1. Pause
2. target
3. hail
4. get mug
5. target marshal
6. use item
7. resume

Added SLice-O-Matic button; have to use button option 4 instead of step 4.
Remember make a copy of the original.

For the top part to fix frame 8 to work on column 1.

<!-- My Stuff -->
<CommandButton Name="DefaultColumn1Button8" template='Button'>
<X>5</X>
<Y>145</Y>
<Alpha>10</Alpha>
<Width>50</Width>
<Height>20</Height>
<Text>MyStuff</Text>
<Alignment>Center</Alignment>
<OnLeftClick>
This.Parent.FindChild[ButtonCode1]:LeftClick
This.Parent.FindChild[Frame8]:Show
This.Font:SetColor[ff00ff00]
</OnLeftClick>
</CommandButton>

Here is what to insert after frame 4.

<!-- My Stuff -->
<!-- Frame 8 Below -->
<Frame name='Frame8' Template='Frame'>
<X>150</X>
<Y>5</Y>
<Border>1</Border>
<Resizable>0</Resizable>
<Height>95%</Height>
<Width>60%</Width>
<Visible>0</Visible>

<Children>
<!-- Frame 8 - Row 1 below -->
<Text name='SetFirstRow' template='Text'>
<visible>0</visible>
<OnLoad>
EQ2OgreMCPXPos:Set[5]
EQ2OgreMCPYPos:Set[-20]
EQ2OgreMCPYInc:Set[25]
</OnLoad>
</Text>
<CommandButton Name="Button-r8c4a1" template='OgreMCPButton'>
<Text>Target</Text>
<OnLeftClick>
relay all eq2exec target a Thurgadin supply runner
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c4a2" template='OgreMCPButton'>
<Text>Hail</Text>
<OnLeftClick>
execute runscript eq2ogrebot/OgreMCP HailNPCUP
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c4a3" template='OgreMCPButton'>
<Text>G Mug</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,3]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c4a4" template='OgreMCPButton'>
<Text>tMarshal</Text>
<OnLeftClick>
relay all eq2exec target a Thurgadin siege-marshal
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c4a5" template='OgreMCPButton'>
<Text>UseMug</Text>
<OnLeftClick>
relay all eq2exec use_itemvdl -1485495104 651838410
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c4a6" template='OgreMCPButton'>
<Text>Slicer</Text>
<OnLeftClick>
relay all eq2exec use_itemvdl 1857339110 363419791
</OnLeftClick>
</CommandButton>
<!-- Frame 8 - Row 2 below -->
<Text name='SetSecondRow' template='Text'>
<visible>0</visible>
<OnLoad>
EQ2OgreMCPXPos:Inc[${EQ2OgreMCPXInc}]
EQ2OgreMCPYPos:Set[-20]
EQ2OgreMCPYInc:Set[25]
</OnLoad>
</Text>
<CommandButton Name="Button-r8c5a1" template='OgreMCPButton'>
<Text>Come2Me</Text>
<OnLeftClick>
relay all "Script[\${OgreBotScriptName}]:QueueCommand[Call MoveToArea ${Me.ID}]"
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c5a2" template='OgreMCPButton'>
<Text>Revive</Text>
<OnLeftClick>
relay all "Script[\${OgreBotScriptName}]:QueueCommand[call Revive]"
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c5a3" template='OgreMCPButton'>
<Text>NoTarget</Text>
<OnLeftClick>
relay all EQ2Execute /target_none
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c5a4" template='OgreMCPButton'>
<Text>Repair</Text>
<OnLeftClick>
relay all "Script[\${OgreBotScriptName}]:QueueCommand[call RepairGear]"
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c5a5" template='OgreMCPButton'>
<Text>Fly-Up</Text>
<OnLeftClick>
if ${This.Text.Equal[Fly-Up]}
{
relay all press -hold Home
This.Font:SetColor[ff00ff00]
This:SetText[Flying-Up]
}
elseif ${This.Text.Equal[Flying-Up]}
{
relay all press -release Home
This.Font:SetColor[ff7f7f7f]
This:SetText[Fly-Up]
}
</OnLeftClick>
<Font>
<Color>ff7f7f7f</Color>
</Font>
</CommandButton>
<CommandButton Name="Button-r8c5a6" template='OgreMCPButton'>
<Text>Fly-Dn</Text>
<OnLeftClick>
if ${This.Text.Equal[Fly-Dn]}
{
relay all press -hold End
This.Font:SetColor[ff00ff00]
This:SetText[Flying-Dn]
}
elseif ${This.Text.Equal[Flying-Dn]}
{
relay all press -release End
This.Font:SetColor[ff7f7f7f]
This:SetText[Fly-Dn]
}
</OnLeftClick>
<Font>
<Color>ff7f7f7f</Color>
</Font>
</CommandButton>
<!-- Frame 8 - Row 3 below -->
<Text name='SetThirdRow' template='Text'>
<visible>0</visible>
<OnLoad>
EQ2OgreMCPXPos:Inc[${EQ2OgreMCPXInc}]
EQ2OgreMCPYPos:Set[-20]
EQ2OgreMCPYInc:Set[25]
</OnLoad>
</Text>
<CommandButton Name="Button-r8c6a1" template='OgreMCPButton'>
<Text>Opt 1</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,1]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c6a2" template='OgreMCPButton'>
<Text>Opt 2</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,2]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c6a3" template='OgreMCPButton'>
<Text>Opt 3</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,3]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c6a4" template='OgreMCPButton'>
<Text>Opt 4</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,4]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c6a5" template='OgreMCPButton'>
<Text>Opt 5</Text>
<OnLeftClick>
relay all EQ2UIPage[ProxyActor,Conversation].Child[composite,replies].Child[button,5]:LeftClick
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c6a6" template='OgreMCPButton'>
<Text>6</Text>
<OnLeftClick>
echo 6
</OnLeftClick>
</CommandButton>

<!-- Frame 8 - Row 4 below -->
<Text name='SetFourthRow' template='Text'>
<visible>0</visible>
<OnLoad>
EQ2OgreMCPXPos:Inc[${EQ2OgreMCPXInc}]
EQ2OgreMCPYPos:Set[-20]
EQ2OgreMCPYInc:Set[25]
</OnLoad>
</Text>
<CommandButton Name="Button-r8c7a1" template='OgreMCPButton'>
<Text>1</Text>
<OnLeftClick>
echo button1
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c7a2" template='OgreMCPButton'>
<Text>2</Text>
<OnLeftClick>
echo button2
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c7a3" template='OgreMCPButton'>
<Text>3</Text>
<OnLeftClick>
echo button3
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c7a4" template='OgreMCPButton'>
<Text>4</Text>
<OnLeftClick>
echo button4
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c7a5" template='OgreMCPButton'>
<Text>5</Text>
<OnLeftClick>
echo button5
</OnLeftClick>
</CommandButton>
<CommandButton Name="Button-r8c7a6" template='OgreMCPButton'>
<Text>6</Text>
<OnLeftClick>
echo 6
</OnLeftClick>
</CommandButton>
</Children>
</frame>
<!-- End MyStuff -->
 
Last edited:
bjcasey

bjcasey

ISX Specialist
Slight addition to allow you to select another page after you have clicked on "My Stuff".

Search for the follow:

Code: 
<Button Name="ButtonCode1" template='Button'>
        <X>1</X>
        <Y>1</Y>
        <Width>1</Width>
        <Height>1</Height>
        <Text>CodeBlock</Text>
        <Visible>0</Visible>
        <OnLeftClick>
          This.Parent.FindChild[Frame1]:Hide
          This.Parent.FindChild[DefaultColumn1Button1].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame2]:Hide
          This.Parent.FindChild[DefaultColumn1Button2].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame3]:Hide
          This.Parent.FindChild[DefaultColumn1Button3].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame4]:Hide
          This.Parent.FindChild[DefaultColumn1Button4].Font:SetColor[ff7f7f7f]
	</OnLeftClick>
      </Button>
And replace it with:

Code: 
<Button Name="ButtonCode1" template='Button'>
        <X>1</X>
        <Y>1</Y>
        <Width>1</Width>
        <Height>1</Height>
        <Text>CodeBlock</Text>
        <Visible>0</Visible>
        <OnLeftClick>
          This.Parent.FindChild[Frame1]:Hide
          This.Parent.FindChild[DefaultColumn1Button1].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame2]:Hide
          This.Parent.FindChild[DefaultColumn1Button2].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame3]:Hide
          This.Parent.FindChild[DefaultColumn1Button3].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame4]:Hide
          This.Parent.FindChild[DefaultColumn1Button4].Font:SetColor[ff7f7f7f]
          This.Parent.FindChild[Frame8]:Hide
          This.Parent.FindChild[DefaultColumn1Button8].Font:SetColor[ff7f7f7f]
        </OnLeftClick>
      </Button>
 
D

Deugar

Active Member
Button if you use option 4 after the hail

<CommandButton Name="Button-r8c4a6" template='OgreMCPButton'>
<Text>Slicer</Text>
<OnLeftClick>
relay all eq2exec use_itemvdl 1857339110 363419791
</OnLeftClick>
</CommandButton>
 
You must log in or register to reply here.
Top Bottom