+$/
[SAMN
[
[SAMPLES 1000 POINTS
[AT CLOCK
[DATA STORED IN UMB
[AT GIVEN FWA
[CLOCK = NUMBER OF
[100 USEC CLOCK
[PULSES PER SAMPLE
[CLOCK = 0, SAMPLE
[EVERY 33 USEC
[CALLING SEQUENCE:
[   JMP 8O
[   CHAN N
[   FWA-1
[   CLOCK
[USES I10,11,12
[ENTER AT 8O
#8O LDA I
-1
ADD 0
BCL I
6000
STC 10
LDA I10
ADA I
SAM 0
STC .+36
LDA I10
STC 12
LDA I10
COM
STC .+22
ADD 0
ADA I
3
STC .+44
LDA 10
AZE I
JMP .+5
LDA I
JMP .+10
STC .+22
JMP .+4
LDA I
JMP .+14
STC .+16
SET I10
-1000
SET I11
-CLOCK
SXL 0
JMP .-1
SXL I0
JMP .-1
XSK I11
JMP .-5
SAM N
STA I12
XSK I10
JMP .-3
LDA I
-1000
ADM
2
SET I10
-1000
LDA I
400
ADM I12
XSK I10
JMP .-4
JMP 0
JMP 0