It is simply the "4 pics" dialog, with selected result stored in v100
Code:
!?CM4; RONON****
!!BG:N?v39; v39=stack # (used in Sheppard's functions)
!!BMv39:T?y-1; creature type (35 for Ronon)
!!CM:I?y-2;
!!FU&y-2<>2003:E; exit if not click on Combat options
**CM&y-2=2003:R0; disable std button action if Combat clicked
!!FU&y-1<>35:E; exit if not C35's turn
!!FU7000:P; Ronon's battle menu
** battle wrap-up
!?FU7000; Ronon battle menu_
** set up radio-button (G1) dialog box: radio/use v1 for results/initial state
** /z# has header/z# has 1st item description/etc.
!!VRz20:S^Ronon battle menu^;
!!VRz21:S^^;
!!VRz22:S^Pick one^;
!!VRz23:S^%Z199\Bless.gif^;
!!VRz24:S^%Z199\Precis.gif^;
!!VRz25:S^%Z199\Dispel.gif^;
!!VRz26:S^%Z199\Shield.gif^;
!!VRz27:S^Create wide-area energy discharge^;
!!VRz28:S^Create ranged damage^;
!!VRz29:S^Remove unfriendly energy fields^;
!!VRz35:S^Create Augmenting field^;
!!VRz27:S^Block energy^;
!!VRz28:S^Create ranged damage^;
!!VRz29:S^Remove unfriendly energy fields^;
!!VRz35:S^Block energy^;
!!VRz31:S^Bless^;
!!VRz32:S^Precision^;
!!VRz33:S^Dispel^;
!!VRz34:S^Shield^;
!!IF:D70/z20/0/z22/z23/z24/z25/z26/z27/z28/z29/z35/z27/z28/z29/z35;
!!IF:F70/z31/z32/z33/z34/1; Give hints and disable cancel button
!!IF:E100/70; The choice will be stored in v100
!!CM&v100<0:R0; (if player clicks on cancel)
!!FU&v100<0:E;
!!FU7001&v100=1:P;
!!FU7001&v100=2:P;
!!FU7001&v100=3:P;
!!FU7001&v100=4:P;
!?FU7001;
!!IF:M^Designate the coordinates (right-click hex).^;
!!IF:V300/1; enables another mouse click trigger
!?CM4&300; trigger for hex designation by Ronon
!!CM:R0; no other clicks allowed until battle option completed
!!CM:D?y-1; hex number
!!FU|y-1<1/y-1>185:E; Exit if invalid hex
!!IF:V300/0;
!!UN:R6/2000;
!!FU7002&v100=1:Py-1;
!!FU7003&v100=2:Py-1;
!!FU7004&v100=3:Py-1;
!!FU7005&v100=4:Py-1;
!?FU7002; x1=hex cast bless expert
!!BU:Ex1/?y2; get stack # at hex x1 (-1 if none)
!!VRz1:S^SGA\C302.wav^;
!!IF:V1/0;
!!IF&y2=-1:V1/1; no stack @ hex N.G.
!!IF&v53<21/y2>20:V1/1; opp. side N.G.
!!IF&v53>20/y2<21:V1/1; opp. side N.G.
!!SN&1:Pz1;
!!IF&1:V300/1; try again
!!FU&1:E;
!!BMv39:C41/x1/3/3/1; cast bless
!!BG:A3; end turn with Defend action
!?FU7003; x1=hex cast precision advanced
!!BU:Ex1/?y2; get stack # at hex x1 (-1 if none)
!!VRz1:S^SGA\C302.wav^;
!!IF:V1/0;
!!IF&y2=-1:V1/1; no stack @ hex N.G.
!!IF&v53<21/y2>20:V1/1; opp. side N.G.
!!IF&v53>20/y2<21:V1/1; opp. side N.G.
!!SN&1:Pz1;
!!IF&1:V300/1; try again
!!FU&1:E;
!!BMv39:C44/x1/2/3/1; cast precision
!!BG:A3; end turn with Defend action
!?FU7004; x1=hex cast Dispel expert
!!BU:Ex1/?y2; get stack # at hex x1 (-1 if none)
!!VRz1:S^SGA\C302.wav^;
!!IF:V1/0;
!!IF&y2=-1:V1/1; no stack @ hex N.G.
!!IF&v53<21/y2>20:V1/1; opp. side N.G.
!!IF&v53>20/y2<21:V1/1; opp. side N.G.
!!SN&1:Pz1;
!!IF&1:V300/1; try again
!!FU&1:E;
!!BMv39:C35/x1/3/3/1; cast dispel
!!BG:A3; end turn with Defend action
!?FU7005; x1=hex cast Shield advanced
!!BU:Ex1/?y2; get stack # at hex x1 (-1 if none)
!!VRz1:S^SGA\C302.wav^;
!!IF:V1/0;
!!IF&y2=-1:V1/1; no stack @ hex N.G.
!!IF&v53<21/y2>20:V1/1; opp. side N.G.
!!IF&v53>20/y2<21:V1/1; opp. side N.G.
!!SN&1:Pz1;
!!IF&1:V300/1; try again
!!FU&1:E;
!!BMv39:C27/x1/2/3/1; cast shield
!!BG:A3; end turn with Defend action
Basically my wish is:
1)On left click open system menu
2) On right click open the above menu, without getting system menu
CM4 is said to work with right click, but when I click left I get same thing.
(This post was last modified: 11.02.2010 23:26 by Valery.)