Brookfield DV-III Rheometer - Manual (Page 55)

- 55 -
1265 P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C(3);
1270 DV3COMMAND$ = “V” + HEXRPM$ ‘ Speed command is a V + hex speed value
1275 G O S U B G O S U B G O S U B G O S U B G O S U B 1815 ‘ Send command to DV-III
1280 G O S U B G O S U B G O S U B G O S U B G O S U B 1870 ‘ Wait for DV-III to respond
1285 G O S U B G O S U B G O S U B G O S U B G O S U B 1540 ‘ Count desired time interval (10 secs)
1290 DV3COMMAND$ = “R” ‘ R command gets torque and temp data
1295 G O S U B G O S U B G O S U B G O S U B G O S U B 1815 ‘ Send command to DV-III
1300 G O S U B G O S U B G O S U B G O S U B G O S U B 1870 ‘ Wait for DV-III to repsond
1305 G O S U B G O S U B G O S U B G O S U B G O S U B 1920 ‘ Calculate data
1310 P R I N T P R I N T P R I N T P R I N T P R I N T “%=”;
1315 P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G “###.#”;TORQUE; ‘ Print % torque
1320 P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C(3);
1325 P R I N T P R I N T P R I N T P R I N T P R I N T “cP=”;
1330 P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G “#########.#”;VISC; ‘ Print viscosity (cps)
1335 P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C(3);
1340 P R I N T P R I N T P R I N T P R I N T P R I N T “D/Cm2=”;
1345 P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G “#####.#”;SSTRESS; ‘ Print shear stress (d/cm2)
1350 P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C P R I N T S P C(3);
1355 P R I N T P R I N T P R I N T P R I N T P R I N T “1/SEC=”;
1360 P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G “####.#”;SRATE; ‘ Print shear rate (1/SEC)
1365 P R I N T P R I N T P R I N T P R I N T P R I N T S P C S P C S P C S P C S P C(3);
1370 P R I N T P R I N T P R I N T P R I N T P R I N T “ ° C=”;
1375 P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G P R I N T U S I N G “####.#”;TEMPERATURE ‘ Print temperature ( ° C)
1380 RPM = RPM + 10 ‘ Increment RPM by 10
1385 W E N D W E N D W E N D W E N D W E N D ‘ End WHILE from line 1240
1390 RPM = 0 ‘ Reset speed to 0 RPM
1395 G O S U B G O S U B G O S U B G O S U B G O S U B 1595 ‘ Convert RPM value to a 4 digit hex string
1400 DV3COMMAND$ = “V” + HEXRPM$ ‘ Speed command is a V + hex speed value
1405 G O S U B G O S U B G O S U B G O S U B G O S U B 1815 ‘ Send command to DV-III
1410 P R I N T P R I N T P R I N T P R I N T P R I N T
1415 P R I N T P R I N T P R I N T P R I N T P R I N T S P C S P C S P C S P C S P C(25) “Speed Set Execution Complete!”
1420 G O S U B G O S U B G O S U B G O S U B G O S U B 2080 ‘ Close Communications channel
1425 E N D E N D E N D E N D E N D
1430 ‘
1435 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — +
+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1440 ‘| | | | | R o u t i n e t o i n s e r t a d e l a y ( a p p r o x 5 0 m i l l i s e c o n d s ) | R o u t i n e t o i n s e r t a d e l a y ( a p p r o x 5 0 m i l l i s e c o n d s ) | R o u t i n e t o i n s e r t a d e l a y ( a p p r o x 5 0 m i l l i s e c o n d s ) | R o u t i n e t o i n s e r t a d e l a y ( a p p r o x 5 0 m i l l i s e c o n d s ) | R o u t i n e t o i n s e r t a d e l a y ( a p p r o x 5 0 m i l l i s e c o n d s ) |
1445 ‘| | | | | b e t w e e n e a c h c h a r a c t e r s e n t t o t h e D V - I I I . | b e t w e e n e a c h c h a r a c t e r s e n t t o t h e D V - I I I . | b e t w e e n e a c h c h a r a c t e r s e n t t o t h e D V - I I I . | b e t w e e n e a c h c h a r a c t e r s e n t t o t h e D V - I I I . | b e t w e e n e a c h c h a r a c t e r s e n t t o t h e D V - I I I . |
1450 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1455 F O R F O R F O R F O R F O R DLY = 1 T O T O T O T O T O 50
1460 N E X T N E X T N E X T N E X T N E X T DLY
1465 R E T U R N R E T U R N R E T U R N R E T U R N R E T U R N
1470 ‘
1475 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — +
+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1480 ‘| | | | | R o u t i n e t h a t w a i t s f o r a k e y s t r o k e | R o u t i n e t h a t w a i t s f o r a k e y s t r o k e | R o u t i n e t h a t w a i t s f o r a k e y s t r o k e | R o u t i n e t h a t w a i t s f o r a k e y s t r o k e | R o u t i n e t h a t w a i t s f o r a k e y s t r o k e |
1485 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1490 KEYSTROKE$ = “”
1495 W H I L E
W H I L E W H I L E W H I L E W H I L E KEYSTROKE$ = “”
1500 KEYSTROKE$ = I N K E Y $ I N K E Y $ I N K E Y $ I N K E Y $ I N K E Y $
1505 W E N D W E N D W E N D W E N D W E N D
1510 R E T U R N R E T U R N R E T U R N R E T U R N R E T U R N
1515 ‘
1520 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — +
+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1525 ‘| R o u t i n e t o c o u n t e l a p s e d s e c o n d s . U s e d t o c o u n t | R o u t i n e t o c o u n t e l a p s e d s e c o n d s . U s e d t o c o u n t | R o u t i n e t o c o u n t e l a p s e d s e c o n d s . U s e d t o c o u n t | R o u t i n e t o c o u n t e l a p s e d s e c o n d s . U s e d t o c o u n t | R o u t i n e t o c o u n t e l a p s e d s e c o n d s . U s e d t o c o u n t |
1530 ‘| t h e t i m e i n t e r v a l b e t w e e n e a c h d a t a p o i n t t a k e n . | t h e t i m e i n t e r v a l b e t w e e n e a c h d a t a p o i n t t a k e n . | t h e t i m e i n t e r v a l b e t w e e n e a c h d a t a p o i n t t a k e n . | t h e t i m e i n t e r v a l b e t w e e n e a c h d a t a p o i n t t a k e n . | t h e t i m e i n t e r v a l b e t w e e n e a c h d a t a p o i n t t a k e n . |
1535 ‘+ — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — + + — — — — — — — — — — — — — — — — — — — — — — — — — — +
1540 T1 = T I M E R T I M E R T I M E R T I M E R T I M E R ‘ Gets seconds since midnight
1545 T2 = T1