CASIO程序(试验计算2.0版).docVIP

操作说明 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）输出个含水量HS= GMD= （16）输出= YSD= （17）输出= 此步操作完成后再按一下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.扩展变量设置值 （略） 《CASIO fx-4800P试验计算2.0版》程序设计 作者：徐光辉 2000年11月27日 14 4