道路测量程序大全(1)

道路测量程序大全（1）

一、 操作说明

1.现场灌沙法压实度估算程序MSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

G(TY)?

（2）输入土样重G(TY)？

HG(T+S)?

（3）输入灌沙后（筒＋余沙）重HG(T+S)？

HS?

（4）输入估计的含水量HS？

SMD=

（5）输出湿密度SMD=

GMD=

（6）输出干密度GMD=

YSD=

（7）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

2.实际灌沙法压实度计算程序YSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

HG(T+S)?

（2）输入灌沙后（筒＋余沙）重HG(T+S)？

G(TY)?

（3）输入土样重G(TY)？

SKSZ=

（4）输出试坑里的沙重SKSZ=

SKTJ=

（5）输出试坑体积SKTJ=

SMD=

（6）输出湿密度SMD=

HN1?

（7）输入第一个盒号HN1？

ST+H1?

（8）输入第一个湿土＋盒重ST+H1？

GT+H1?

（9）输入第一个干土＋盒重GT+H1？

HZ1=

（10）输出第一个盒重HZ1=

HSL1=

（11）输出第一个含水量HSL1=

HN2?

（12）输入第二个盒号HN2？

ST+H2?

（13）输入第二个湿土＋盒重ST+H2？

GT+H2?

（14）输入第二个干土＋盒重GT+H2？

HZ2=

（15）输出第二个盒重HZ2=

HSL2=

（16）输出第二个含水量HSL2=

PHS=

（17）输出两个含水量的平均含水量PHS=

GMD=

（16）输出干密度GMD=

YSD=

（17）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

二、程序设计

1.现场灌沙法压实度估算程序MSD

Fixm¿

Lbl 0¿

{ABCD}¿

A“QG(T+S)”:C“G(T+Y)”:B“（HG(T+S）”¿

D“HS”¿

H=Z[1]C÷(A-B-Z[2])¿

I=H(1-D÷(100+D))¿

J=100I÷Z{3}¿

H“SMD=”◢

I“GMD=”◢

J“YSD=”◢

Goto 0

2.实际灌沙法压实度计算程序YSD

Fixm¿

Lbl 0¿

{ABC}¿

A“QG(T+S)”:B“HG(T+S)”:C“G(TY)”¿

S=A-B=Z[2]:S“SKSZ=”◢

T=S÷Z[1]:T“SKTJ=”◢

H=C÷T:H“SMD=”◢

{GEFNQR}¿

G“HN1”:E“ST+H1”:F“GT+H1”¿

P=G+10¿

G≥400ÞP=G-290◣¿

K=Z[P]¿

L=100(E-F)÷(F-K)¿

K“HZ1=”◢

L“HSL1=”◢

N“HN2”:Q“ST+H2”:R“GT+H2”¿

P=N+10¿

N≥400ÞP=N-290◣¿

U=Z[P]¿

M=100(Q-R)÷(R-U)¿

U“HZ2=”◢

M“HSL2=”◢

D=(L+M)÷2:D“PHS=”◢

I=H(1-D÷(100+D))¿

J=100I÷Z[3]¿

I“GMD=”◢

J“YSD=”◢

Goto 0

三、扩展变量设置

1.设置说明

Z[1]:标准砂密度

Z[2]:标定的锥体砂重

Z[3]:填料的最大干密度

Z[4]～Z[9]:预留的备用变量

Z[10]～Z[210]:盒重（按编号顺序，例如第1个盒重存入Z[11]，第109个盒重存入Z[119]）

2.扩展变量设置值

（略）

一、 操作说明

1.现场灌沙法压实度估算程序MSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

G(TY)?

（2）输入土样重G(TY)？

HG(T+S)?

（3）输入灌沙后（筒＋余沙）重HG(T+S)？

HS?

（4）输入估计的含水量HS？

SMD=

（5）输出湿密度SMD=

GMD=

（6）输出干密度GMD=

YSD=

（7）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

2.实际灌沙法压实度计算程序YSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

HG(T+S)?

（2）输入灌沙后（筒＋余沙）重HG(T+S)？

G(TY)?

（3）输入土样重G(TY)？

SKSZ=

（4）输出试坑里的沙重SKSZ=

SKTJ=

（5）输出试坑体积SKTJ=

SMD=

（6）输出湿密度SMD=

HN1?

（7）输入第一个盒号HN1？

ST+H1?

（8）输入第一个湿土＋盒重ST+H1？

GT+H1?

（9）输入第一个干土＋盒重GT+H1？

HZ1=

（10）输出第一个盒重HZ1=

HSL1=

（11）输出第一个含水量HSL1=

HN2?

（12）输入第二个盒号HN2？

ST+H2?

（13）输入第二个湿土＋盒重ST+H2？

GT+H2?

（14）输入第二个干土＋盒重GT+H2？

HZ2=

（15）输出第二个盒重HZ2=

HSL2=

（16）输出第二个含水量HSL2=

PHS=

（17）输出两个含水量的平均含水量PHS=

GMD=

（16）输出干密度GMD=

YSD=

（17）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

二、程序设计

1.现场灌沙法压实度估算程序MSD

Fixm¿

Lbl 0¿

{ABCD}¿

A“QG(T+S)”:C“G(T+Y)”:B“（HG(T+S）”¿

D“HS”¿

H=Z[1]C÷(A-B-Z[2])¿

I=H(1-D÷(100+D))¿

J=100I÷Z{3}¿

H“SMD=”◢

I“GMD=”◢

J“YSD=”◢

Goto 0

2.实际灌沙法压实度计算程序YSD

Fixm¿

Lbl 0¿

{ABC}¿

A“QG(T+S)”:B“HG(T+S)”:C“G(TY)”¿

S=A-B=Z[2]:S“SKSZ=”◢

T=S÷Z[1]:T“SKTJ=”◢

H=C÷T:H“SMD=”◢

{GEFNQR}¿

G“HN1”:E“ST+H1”:F“GT+H1”¿

P=G+10¿

G≥400ÞP=G-290◣¿

K=Z[P]¿

L=100(E-F)÷(F-K)¿

K“HZ1=”◢

L“HSL1=”◢

N“HN2”:Q“ST+H2”:R“GT+H2”¿

P=N+10¿

N≥400ÞP=N-290◣¿

U=Z[P]¿

M=100(Q-R)÷(R-U)¿

U“HZ2=”◢

M“HSL2=”◢

D=(L+M)÷2:D“PHS=”◢

I=H(1-D÷(100+D))¿

J=100I÷Z[3]¿

I“GMD=”◢

J“YSD=”◢

Goto 0

三、扩展变量设置

1.设置说明

Z[1]:标准砂密度

Z[2]:标定的锥体砂重

Z[3]:填料的最大干密度

Z[4]～Z[9]:预留的备用变量

Z[10]～Z[210]:盒重（按编号顺序，例如第1个盒重存入Z[11]，第109个盒重存入Z[119]）

2.扩展变量设置值

（略）

一、 操作说明

1.现场灌沙法压实度估算程序MSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

G(TY)?

（2）输入土样重G(TY)？

HG(T+S)?

（3）输入灌沙后（筒＋余沙）重HG(T+S)？

HS?

（4）输入估计的含水量HS？

SMD=

（5）输出湿密度SMD=

GMD=

（6）输出干密度GMD=

YSD=

（7）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

2.实际灌沙法压实度计算程序YSD

QG(T+S)?

（1）输入灌沙前（筒＋沙）重QG(T+S)？

HG(T+S)?

（2）输入灌沙后（筒＋余沙）重HG(T+S)？

G(TY)?

（3）输入土样重G(TY)？

SKSZ=

（4）输出试坑里的沙重SKSZ=

SKTJ=

（5）输出试坑体积SKTJ=

SMD=

（6）输出湿密度SMD=

HN1?

（7）输入第一个盒号HN1？

ST+H1?

（8）输入第一个湿土＋盒重ST+H1？

GT+H1?

（9）输入第一个干土＋盒重GT+H1？

HZ1=

（10）输出第一个盒重HZ1=

HSL1=

（11）输出第一个含水量HSL1=

HN2?

（12）输入第二个盒号HN2？

ST+H2?

（13）输入第二个湿土＋盒重ST+H2？

GT+H2?

（14）输入第二个干土＋盒重GT+H2？

HZ2=

（15）输出第二个盒重HZ2=

HSL2=

（16）输出第二个含水量HSL2=

PHS=

（17）输出两个含水量的平均含水量PHS=

GMD=

（16）输出干密度GMD=

YSD=

（17）输出压实度YSD=

此步操作完成后再按一下EXE返回第(1)步要求重新输入

计算。

二、程序设计

1.现场灌沙法压实度估算程序MSD

Fixm¿

Lbl 0¿

{ABCD}¿

A“QG(T+S)”:C“G(T+Y)”:B“（HG(T+S）”¿

D“HS”¿

H=Z[1]C÷(A-B-Z[2])¿

I=H(1-D÷(100+D))¿

J=100I÷Z{3}¿

H“SMD=”◢

I“GMD=”◢

J“YSD=”◢

Goto 0

2.实际灌沙法压实度计算程序YSD

Fixm¿

Lbl 0¿

{ABC}¿

A“QG(T+S)”:B“HG(T+S)”:C“G(TY)”¿

S=A-B=Z[2]:S“SKSZ=”◢

T=S÷Z[1]:T“SKTJ=”◢

H=C÷T:H“SMD=”◢

{GEFNQR}¿

G“HN1”:E“ST+H1”:F“GT+H1”¿

P=G+10¿

G≥400ÞP=G-290◣¿

K=Z[P]¿

L=100(E-F)÷(F-K)¿

K“HZ1=”◢

L“HSL1=”◢

N“HN2”:Q“ST+H2”:R“GT+H2”¿

P=N+10¿

N≥400ÞP=N-290◣¿

U=Z[P]¿

M=100(Q-R)÷(R-U)¿

U“HZ2=”◢

M“HSL2=”◢

D=(L+M)÷2:D“PHS=”◢

I=H(1-D÷(100+D))¿

J=100I÷Z[3]¿

I“GMD=”◢

J“YSD=”◢

Goto 0

三、扩展变量设置

1.设置说明

Z[1]:标准砂密度

Z[2]:标定的锥体砂重

Z[3]:填料的最大干密度

Z[4]～Z[9]:预留的备用变量

Z[10]～Z[210]:盒重（按编号顺序，例如第1个盒重存入Z[11]，第109个盒重存入Z[119]）

2.扩展变量设置值

（略）