Ocean-optics Jaz Scripting Language and Scripting Engine Manuale Utente Scaricare il pdf (Pagina 68)

A: Example Scripts

60 013-RD000-000-12- 201010

Display("pK = ",pK,"")

Pause(2)

Display("Slope = ",Slope,"")

Pause(2)

GOTO Top

LABEL EXIT

END

[PROCESS ViewpH]

// View pH Interface

Label TOP

ShowMenu("Measure Sample","Save pH","Back")

OnButtonClick(UserSelection,TimeOutSeconds)

If(UserSelection = 0) GOTO CALCULATE_IT

If(UserSelection = 1) GOTO Save_pH

If(UserSelection = 2) CALL MainMenu

GOTO EXIT

LABEL CALCULATE_IT

CALL CalculatepH

GOTO TOP

LABEL Save_pH

OpenFile(pH_Save,ForWrite)

SaveReading(pH_Save,"pH = ",pH,"")

CloseFile(pH_Save)

DisplayMsg("pH Saved")

Pause(2)

GOTO TOP

LABEL EXIT

END

1 2 ... 63 64 65 66 67 68 69 70 71 72 73 74

Commenti su questo manuale

Nessun commento