Ocean-optics Jaz Scripting Language and Scripting Engine Uživatelský manuál Strana 61

  • Stažení
  • Přidat do mých příruček
  • Tisk
  • Strana
    / 74
  • Tabulka s obsahem
  • KNIHY
  • Hodnocené. / 5. Na základě hodnocení zákazníků
Zobrazit stránku 60
A: Example Scripts
013-RD000-000-12- 201010 53
LABEL TOP
ShowMenu("Standardize","View pH","Refresh pK","Exit")
OnButtonClick(UserSelection,TimeOutSeconds)
If(UserSelection <> 0) GOTO Check1
UserChoice := 0
GOTO EXIT
LABEL Check1
If(UserSelection <> 1) GOTO Check2
UserChoice := 1
GOTO EXIT
LABEL Check2
If(UserSelection <> 2) GOTO Check3
UserChoice := 2
GOTO EXIT
LABEL Check3
If(UserSelection <> 3) GOTO Bummer
UserChoice := 3
GOTO EXIT
LABEL bummer
PassCount := PassCount + 1
If(PassCount > MaxPasses) GOTO QUIT
DisplayMsg("Please select$something")
Pause(10)
GOTO TOP
LABEL QUIT
UserSelection := -1
LABEL EXIT
END
[PROCESS GetTheDarkRef]
// Turns off lamp, takes dark reference, repowers lamp, adjusts IntTime
SetLampIntensity(0,ALLBULBS,0)
SetLampShutter(0,0)
Zobrazit stránku 60
1 2 ... 56 57 58 59 60 61 62 63 64 65 66 ... 73 74

Komentáře k této Příručce

Žádné komentáře