encoding  utf-8

survey Entpitches

input Ent/labargaent.th
input P2/labargap2.th
input P3/labargap3.th
input P85/labargap85.th
input Ubp/labargaunderbp.th

map Entpitchesplan -projection plan
mlbargaentP1p@labargaent
break
m1p@labargap2
break
mlabp3p@labargap3
break
mlabargabigpitchesp@labargap85
break
mubpp@labargaunderbp
endmap

map EntpitchesEe -projection extended
mlbargaentP1s@labargaent
break
m1s@labargap2
break
mlabp3s@labargap3
mubps@labargaunderbp
break
mlabargabigpitchess@labargap85
endmap

join P3CBL@labargap3:end P85CTR@labargap85:end
join P3FBL@labargap3:0 P85FTR@labargap85:0
join labargap85-labargabigpitchess@labargap85 labargaunderbp-ubps1@labargaunderbp
join labargap3-labp3p@labargap3 labargap85-labargabigpitchesp@labargap85
join ENTLHS@labargaent:0 P2LHS@labargap2:end
join ENTRHS@labargaent:end P2RHS@labargap2:0
join CONNECTL@labargap3:0 ENTC@labargaent:end
join CONNECTR@labargap3:end ENTF@labargaent:0
join P2C@labargap2:end P3L@labargap3:0
join P2F@labargap2:0 P3R@labargap3:end

centreline
equate 6@labargaent 10@labargap2
equate 15@labargap2 14@labargap3
equate 20@labargap3 0@labargap85
equate 13@labargap85 13@labargaunderbp
endcentreline
endsurvey