# alias: MichaelsCuebid
# button-text: Michaels Cuebid
# gib-works: true
# bba-works: true
# auction-filter: Auction.....\n(1C +2C|1D +2D|1H +2H|1S +2S)
# convention-card-ns: 21GF-DEFAULT
# convention-card-ew: 21GF-GIB

/*@chat
---  Michaels Cuebid.
Two-suited, 5-11 or 16+
  • 1!C - 2!C = 5+!H & 5+!S
  • 1!D - 2!D = 5+!H & 5+!S
  • 1!H - 2!H = 5+!S & 5+(!C or !D)
  • 1!S - 2!S = 5+!H & 5+(!C or !D)
https://www.bridgebum.com/michaels_cuebid.php
4NT is Roman Keycard Blackwood (1430) with a trump suit agreed, or quantitative (inviting 6NT) in a notrump auction. Keycard responses:
  • 5!C = 1 or 4 keycards
  • 5!D = 0 or 3
  • 5!H = 2 without the trump queen
  • 5!S = 2 with the trump queen
@chat*/

/*
Michaels Cuebid
*/

dealer east

#include "script/TP"
# Defines tpWest, tpSouth

#include "script/Predict-Opening-1-Bid-East"
# Defines oneClub, oneDiamond, oneHeart, oneSpade, oneNT, twoNT, threeNT

# Define South's suits for Michaels Cuebid
sS = top5(south,spades)>2   and spades(south)>4
sH = top5(south,hearts)>2   and hearts(south)>4
sD = top5(south,diamonds)>2 and diamonds(south)>4
sC = top5(south,clubs)>2    and clubs(south)>4

# Define East's opening bids
eOC = oC and sH and sS
eOD = oD and sH and sS
eOH = oH and (sS and (sC or sD))
eOS = oS and (sH and (sC or sD))
eOpens = (eOC or eOD or eOH or eOS) and hcp(east)>11

# Define ranges for West's continuations
force   = tpWest>=13
invite  = tpWest>=10 and not force
compete = tpWest>=7  and not (force or invite)
preempt = tpWest>=4  and not (force or invite or compete)  
wRange  = force or invite or compete or preempt

sRange = (hcp(south)>4 and hcp(south)<12) or hcp(south)>15  // weak (5-11) or strong (16+)
sMCB= shape(south,any 76xx +any 67xx +any 66xx +any 65xx +any 56xx +any 55xx) and sRange

levPreempt = preempt and hascard(north,2C) or hascard(north,2D) // keep only 44% of preempts

eOpens and sMCB and wRange
and (force or invite or compete or levPreempt)

action
average "TP >=13 " 100 * force,
average "TP >=10 " 100 * invite,
average "TP >= 7 " 100 * compete,
average "TP >= 4 " 100 * preempt,