di2622l1.txt 
;**************************************************************************************************
; LISTING 1 - TABLE GENERATION FOR PWM MARKING AND SPACING SEQUENCE
;
; "Generate CID/CIDCW analog signals," EDN, Dec 7, 2000, pg 188

; http://www.ednmag.com/ednmag/reg/2000/12072000/designideas.htm#25di2
;
***************************************************************************************************

PI = 3.1415926
KM = 129             ' MAXIMUM RANGE OF PULSE WIDTH
DT = 419 / 11059200  ' TIME FOR EACH SAMPLE
DTI = DT
J = 22 ' J = 22 FOR 1200, J = 12 FOR 2200, NUMBER OF SAMPLES PER OUTPUT CYCLE
FO = 1 / (J * DT)    ' OUTPUT FREQUENCY
FOR I = 1 TO J
V = (KM / 2) + ((KM / 2) * SIN(2 * PI * FO * DT))   'V = WIDTH OF EACH SAMPLE
PRINT I, DT, V
DT = DT + DTI
NEXT I