Measurement-computing TempScan/1100 Bedienungsanleitung Seite 279

  • Herunterladen
  • Zu meinen Handbüchern hinzufügen
  • Drucken
  • Seite
    / 306
  • Inhaltsverzeichnis
  • LESEZEICHEN
  • Bewertet. / 5. Basierend auf Kundenbewertungen
Seitenansicht 278
TempScan / MultiScan, Appendix C 879696 Program Examples in Quick Basic C-9
MultiScan/1200
Example 15f. SLOW_ACQ.BAS Program
(1) …… 15-CLS : PRINT “The MultiScan/1200 is resetting...”
…… 15-PRINT #1, “OUTPUT 07;*RX”
(3) …… 15-SLEEP 4
(4) …… 15-WHILE (S% AND 4) = 0
…… 15-PRINT #1, “SPOLL 07"
…… 15-INPUT #2, S%
(7) …… 15-WEND
(8) …… 15-PRINT #1, “OUTPUT 07;M#0X”
(9) …… 15-PRINT #1, “OUTPUT 07;W#32X”
(10) …… 15-PRINT #1, “OUTPUT 07;C1-24,1X”
(11) …… 15-PRINT #1, “OUTPUT 07;C25-48,2X”
(12) …… 15-PRINT #1, “OUTPUT 07;Y30,1,200X”
(13) …… 15-PRINT #1, “OUTPUT 07;I00:00:03.0,00:00:02.0X”
(14) …… 15-PRINT #1, “OUTPUT 07;T1,1,0,0X"
(15) …… 15-PRINT “The MultiScan/1200 is collecting Pre-Trigger data and is ready
for a Trigger...”
…… 15-PRINT “Hit a key to trigger the start of acquisition...”
…… 15-WHILE INKEY$ = “”: WEND
(18) …… 15-PRINT #1,“OUTPUT 07;@X”
(19) …… 15-PRINT “The MultiScan/1200 is collecting and uploading Post-Trigger
data as it becomes available...”
…… 15-PRINT “Hit a key to trigger the stop of acquisition...”
…… 15-i = 0
(22) …… 15-WHILE INKEY$ = “”
…… 15-i = i + 1
…… 15-S% = 0
(25) …… 15- …… 15-WHILE ((S% AND 8) <> 8)
…… 15- …… 15-PRINT #1, “SPOLL 07"
…… 15- …… 15-INPUT #2, S%
(28) …… 15- …… 15-WEND
…… 15- …… 15-PRINT #1 “OUTPUT 07; R1X”
…… 15- …… 15-PRINT #1 “ENTER 07”
…… 15- …… 15-INPUT #2, READINGS$
…… 15- …… 15-LOCATE 7, 1: PRINT “The scan”; i; “was:”; READINGS$
(33) …… 15-WEND
(34) …… 15-PRINT #1, “OUTPUT 07;@X”
(35) …… 15-i = 0
…… 15-U% = 0
…… 15-WHILE INKEY$ = “”
…… 15-i = i + 1
…… 15-S% = 0
(40) …… 15- …… 15-WHILE ((S% AND 8) <> 8)
…… 15- …… 15-PRINT #1, “SPOLL 07"
…… 15- …… 15-INPUT #2, S%
(43) …… 15- …… 15-WEND
…… 15- …… 15-PRINT #1 “OUTPUT 07; R1X”
…… 15- …… 15-PRINT #1 “ENTER 07”
…… 15- …… 15-INPUT #2, READINGS$
…… 15- …… 15-LOCATE 16, 1: PRINT “The scan”; i; “was:”; READINGS$
…… 15- …… 15-PRINT #1, “OUTPUT 07; UOX:
…… 15- …… 15-PRINT #1, :ENTER07”
…… 15- …… 15-OUTPUT #2, U%
…… 15- …… 15-IF U% = 1 THEN END
(52) …… 15-WEND
Seitenansicht 278
1 2 ... 274 275 276 277 278 279 280 281 282 283 284 ... 305 306

Kommentare zu diesen Handbüchern

Keine Kommentare