HP 8112A Operating, Programming And Servicing Manual page 101

190
PRINT "Every two s econds delay i s increment ed by 1 ms and w idth is decrement ed"
200 PRINT "by 2 ms
PRINT
2 1 0
220
! D e l ay and W idth loop
230
240
250 FOR I=O TO 1 0
260 New_del=9+I * 1
New_w id=22 - I * 2
270
280
290 GOSUB D i sp l ay
300
3 10 OUTPUT Addr ; " DEL " ; New _del ; " MS "
OUTPUT Addr ; " W ID " ; New_wid ; "MS "
320
330
340 WAIT 2
NEXT I
350
360
370 LOCAL Addr
380 PRINT
PRINT " End of the program DEL_WI D . 11
390
400 STOP
4 1 0
! - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -- - - - - - - - - - - - - - - - - - - - - - - - - - -
420
430
440 D isplay : ! D i sp l ay the current values of Delay and Width
PRINT " De l ay = 11 ;
450
PRINT USING " ZZ . DD , #" ; New_del
460
470 PRINT " ms
PRINT USING " ZZ . DD , 1 1 1 1 ms '""' ; New_wid
480
RETURN
490
END
500
. . . "
! Print the values for the Setup and Hold t ime
Turn HP8 1 12A back to Local mode
W i dth = " ;
Programming Examples 7 -9