# alias: oneMinor1NT
# button-text: 1m-1N (6-9) w/33(43)
# gib-works: true
# bba-works: true
# auction-filter: Auction.....\n1[CD] +Pass +1N
# convention-card-ns: 21GF-GIB
# convention-card-ew: 21GF-GIB

/*@chat
--- 1m - 1NT (6-9) w/4333 & no major
South opens 1!C or 1!D.  North has any 4333 hand with stuff in every other suit.
Should North skip over a 4-card suit to bid NT?
@chat*/

dealer south

#include "script/Calm-Opponents"
# Defines calmWest
#include "script/Predict-Opening-1-Bid"
# Defines oneClub, oneDiamond
#include "script/TP"
# Defines tpSouth

# Define suit quality for NT -- Qxx opener's suit and Kxx or QJx in unbid suits
nC2 = hcp(north,clubs)>1         // at least Qxx
nD2 = hcp(north,diamonds)>1
nM2 = hcp(north,hearts)>1 and hcp(north,spades)>1
nC3 = hcp(north,clubs)>2         // at least Kxx or QJx
nD3 = hcp(north,diamonds)>2
nM3 = hcp(north,hearts)>2 and hcp(north,spades)>2

# Define North's response ranges
n1 = hcp(north)>5  and hcp(north)<10
n2 = hcp(north)>9  and hcp(north)<13
n3 = hcp(north)>12 and hcp(north)<16

# For opening with minimum values, require extra suit length
sMin = hcp(south)<12 and tpSouth<13
sShape = sMin ? shape(south,any 7xxx+any 6xxx) : shape(south, xxxx)

# South bids 1C or 1D and North responds 1N or 2/3N
s1Cn1N = oneClub    and nD2 and nM2 and n1           // 1C - 1N with 2 hcp in unbid suits
s1Dn1N = oneDiamond and nC2 and nM2 and n1           // 1D - 1N  
s1m1N  = s1Cn1N or s1Dn1N

s1Cn2N = oneClub    and nC2 and nD3 and nM3 and n2   // 1C - 2N with 3 hcp in unbid suits and 2 in opener's suit
s1Dn2N = oneDiamond and nD2 and nC3 and nM3 and n2   // 1D - 2N 
s1m2N  = s1Cn2N or s1Dn2N

s1Cn3N = oneClub    and nC2 and nD3 and nM3 and n3   // 1C - 3N with 3 hcp in unbid suits and 2 in opener's suit
s1Dn3N = oneDiamond and nD2 and nC3 and nM3 and n3   // 1D - 3N
s1m3N  = s1Cn3N or s1Dn3N

//nAny4   = shape(north,any 4333)   // any 4333
//nMajor4 = shape(north,4333+3433)  // either major
nShape = shape(north,any 4333 -4xxx -x4xx)

sRange = tpSouth>11 and hcp(south)>10 and tpSouth<22 and hcp(south)<23

# Now do it
s1m1N and sRange and sShape and calmWest and nShape  // (nAny4 or nMajor4)

action

average "1m... 6- 9 " 100 * s1m1N,
average "     10-12 " 100 * s1m2N,
average "     13-15 " 100 * s1m3N,

average "hcp South  " hcp(south),
average "    West   " hcp(west),
average "    North  " hcp(north),
average "    East   " hcp(east),

average "South 4333 " 100 * shape(north,4333),
average "      3433 " 100 * shape(north,3433),
average "      3343 " 100 * shape(north,3343),
average "      3334 " 100 * shape(north,3334),

frequency "losers(south)" (losers(south), 0, 12),