- Kerry's Acol system

MACRO ToOpps Opponents
- identifies the "Chat to opponents window

MACRO ToTable Online
- used to send openly

MACRO Opener black
- button colour for opening bids

MACRO Response blue
- button colour for immediate responses

MACRO Rebid green
- button colour for opener's rebids

MACRO Overcall purple
- button colour for our overcalls

MACRO Other red
- button colour for other stuff

PROC ChatOpps
  MOUSE WINXY 461 815
  - correct for 1152x864 resolution and the
  - BBO window maximised on the left of the screen
  MOUSE LeftClick
  DELAY 1000
  - need a delay here to allow the 'Chat to oppoents' window to
  - come up. 1000 ms is on the safe side.
  WINDOW %ToOpps%
  
BUTTON Welcome %other%
  WINDOW %ToTable%
  PUT Hi opps. Kerry and I play Acol, 12-14 NT,
    MORE 4 card majors, and our openers from 2!d through 4!d are artificial.
    MORE We'll alert them obviously, CC is loaded if you want details now.{enter}
  
BUTTON Discuss %other%
  WINDOW %ToTable%
  PUT Opps, it's OK for you to discuss your bidding system as you need it,
    MORE that includes during the auction if something comes up you haven't discussed{enter}
  
BUTTON Leads %other% *chatopps Our lead style is 1/3/low, Lavinthal (McKenney) discards, standard count{enter}
  
NEWLINE

BUTTON 1NT %opener% *chatopps 12-14 throughout, often a 5 card minor, rarely a 5 card major.{enter}
  
BUTTON "2N Leb" %response% *chatopps Lebensohl, shows a range of hands, forces partner to bid 3!c{enter}
  
BUTTON 1N-dbl-pass %response% *chatopps
  PUT Pass forces pard to redouble, I have three possible hand types. 1) I want to take out
    MORE into a minor  2) I think pard can make 1NT**   3) I'm 4-4 in the majors but I can't stand a
    MORE 2!d response to Stayman.{enter}
  
BUTTON 1N-dbl-rdbl %response% *chatopps Shows any 4-3-3-3 shape and a hand too weak to stand 1NT doubled{enter}
  
BUTTON "Forced rdbl" %rebid% *chatopps Forced to redouble, meaningless{enter}
  
NEWLINE

BUTTON 2D %opener% *chatopps
  PUT 2!d = 3-way multi. 1) Weak 2!h or 2!s   2) 8+ playing tricks in !c or !d
    MORE but not good enough for a 2!c opener   3) 19-20 balanced.  Forcing unless
    MORE pard has a weak hand with long !d{enter}
  
BUTTON 2D-2H %response% *chatopps I want to play 2!h if pard has a weak 2!h opener{enter}
  
BUTTON 2D-2S %response% *chatopps I want to play 2!s if pard has a weak 2!s opener, or 3+!h if pard has a weak 2!h opener{enter}
  
BUTTON 2D-2N %response% *chatopps Asking, at least a game invite opposite either weak 2 opener.{enter}
  
BUTTON 2D-2M-3m %rebid% *chatopps Shows an Acol 2 bid in the suit (8+ tricks but not good enough for a 2!c opener). Not forcing.{enter}
  
NEWLINE

BUTTON 2D-2M-2N %rebid% *chatopps Shows 19-20 balanced. May occasionally include a stiff A or K{enter}
  
BUTTON 2D-2N-3C %rebid% *chatopps 3!c = Lower range weak 2!h opener{enter}
  
BUTTON 2D-2H-3D %rebid% *chatopps 3!d = Lower range weak 2!s opener{enter}
  
BUTTON 2D-2N-3H %rebid% *chatopps 3!h = Upper range weak 2!h opener{enter}
  
BUTTON 2D-2H-3S %rebid% *chatopps 3!s = Upper range weak 2!s opener{enter}
  
NEWLINE

BUTTON 2H %opener% *chatopps
  PUT 2!h = 3 way bid.  1) Weak 5-5 !h and a minor  2) 8+ playing tricks in !h
    MORE but not good enough for a 2!c opener   3) 21-22 balanced. Forcing.{enter}
  
BUTTON 2S %opener% ^chatopps
  PUT 2!s = 2 way bid. 1) Weak 5-5 !s and another suit  2) 8+ playing tricks
    MORE in !s but not good enough for 2!c. Not absolutely forcing.{enter}
  
BUTTON "Tartan relay" %response% *chatopps Forced response, meaningless{enter}
  
BUTTON "Weak 5-5" %rebid% *chatopps Shows a weak 2 suiter, roughly 5-9 HCP, at least 5-5 in the two suits.{enter}
  
BUTTON "Acol 2" %rebid% *chatopps Shows an Acol 2 in the suit (8+ playing tricks but not enough for a 2!c opener) with no decent side suit. {enter}
  
NEWLINE

BUTTON 2NT %opener% *chatopps 2NT = a normal 3!c OR 3!d pre-empt.{enter}
  
BUTTON 3C %opener% *chatopps 3!c = weak hand, at least 5-5 in BOTH minors{enter}
  
BUTTON 3D %opener% *chatopps 3!d = a normal 3!h OR 3!s opener{enter}
  
BUTTON 3H %opener% *chatopps
  PUT 3!h = a gambling 3NT type of hand based on a long minor but missing one
    MORE of AKQ in the suit. No outside Ace or King.{enter}
  
BUTTON 3S %opener% *chatopps 3!s = 7+ card solid minor, with no outside Ace or King.{enter}
  
BUTTON 3NT %opener% *chatopps 3NT = a normal 4!c or 4!d pre-empt{enter}
  
BUTTON 4C %opener% *chatopps
  PUT 4!c = S.A.Texas (NAMYATS). Shows either an 8 card solid !h suit with no outside A or K, or
    MORE an 8 card !h suit with one loser plus an outside Ace{enter}
  
BUTTON 4D %opener% *chatopps
  PUT 4!d = S.A.Texas (NAMYATS). Shows either an 8 card solid !s suit with no outside A or K, or
    MORE an 8 card !s suit with one loser plus an outside Ace{enter}
  
NEWLINE

BUTTON "Suction 2C" %overcall% *chatopps
  PUT  2!c = (!c and !d) or just !h. If I'm 5-4 with !c and !d, !d will be the 5 card suit.{enter}
  
BUTTON "Suction 2D" %overcall% *chatopps
  PUT 2!d = (!d and !h) or just !s. If I'm 5-4 with !d and !h, !h will be the 5 card suit.{enter}
  
NEWLINE

BUTTON "Suction 2H" %overcall% *chatopps
  PUT 2!h = (!h and !s) or just !c. If I'm 5-4 with !h and !s, !s will be the 5 card suit.{enter}
  
BUTTON "Suction 2S" %overcall% *chatopps
  PUT 2!s = (!s and !c) or just !d. If I'm 5-4 with !s and !c, !c will be the 5 card suit.{enter}
  
BUTTON "Suction 2 suiter" %overcall% *chatopps
  PUT Shows a non-touching 2 suiter, i.e. (!c and !h) or (!d and !s){enter}
  
NEWLINE

BUTTON "Suction pass" %rebid% *chatopps
  PUT Unless I have a very weak hand and am willing to play anything undoubled
  PUT the pass shows a definite preference for the lower of pard's assumed 2 suits.{enter}
  
BUTTON "Suction next suit" %rebid% *chatopps
  PUT Three possibilities. 1) I'm not sure what partner has and I'm playing safe.
  PUT   2) I think partner has the two suiter and I do not prefer the lwwer suit
  PUT   3) I think pard has the one-suited hand but that the contract will play better from her hand{enter}