home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / fortran / mslang / avi / configur.fd next >
Encoding:
Text File  |  1994-03-24  |  16.0 KB  |  598 lines
  1. c*tagdcb       
  2.        structure /tagdcb/
  3.           Integer*4 DCBlength
  4.           Integer*4 BaudRate
  5.           Integer*4 flags
  6.           Integer*2 wReserved
  7.           Integer*2 XonLim
  8.           Integer*2 XoffLim
  9.           Integer*1 ByteSize
  10.           Integer*1 Parity
  11.           Integer*1 StopBits
  12.           Integer*1 XonChar
  13.           Integer*1 XoffChar
  14.           Integer*1 ErrorChar
  15.           Integer*1 EofChar
  16.           Integer*1 EvtChar
  17.        End Structure
  18. c*tagcomstat
  19.        structure /tagCOMSTAT/
  20.           Integer*4 flags
  21.           Integer*4 cbInQue
  22.           Integer*4 cbOutQue
  23.        End Structure
  24. c*tagbitmapfileheader       
  25.        structure /tagBitMapFileHeader/
  26.           Integer*2 bfType
  27.           Integer*4 bfSize
  28.           Integer*2 bfReserved1
  29.           Integer*2 bfReserved2
  30.           Integer*4 bfOffBits
  31.        End Structure
  32. c*tagbitmap
  33.        structure /tagBitMap/
  34.           Integer*2 bmType
  35.           Integer*2 bmWidth
  36.           Integer*2 bmHeight
  37.           Integer*2 bmWidthBytes
  38.           Integer*1 bmPlanes
  39.           Integer*1 bmBitsPixel
  40.           Integer*4 bmBits
  41.        End Structure
  42. c*tagbmphead
  43.        structure /tagBMPHead/
  44.           Character*1 id1
  45.           Character*1 id2
  46.           Integer*4 filesize
  47.           Integer*2 reserved1
  48.           Integer*2 reserved2
  49.           Integer*4 headersize
  50.           Integer*4 infosize
  51.           Integer*4 width
  52.           Integer*4 depth
  53.           Integer*2 biPlanes
  54.           Integer*2 bits
  55.           Integer*4 biCompression
  56.           Integer*4 biSizeImage
  57.           Integer*4 biXPelsPerMeter
  58.           Integer*4 biYPelsPerMeter
  59.           Integer*4 biClrUsed
  60.           Integer*4 biClrImportant
  61.        End Structure
  62. c*tagbitmapheader
  63.        structure /tagbitmapheader/
  64.           Character*1 id1
  65.           Character*1 id2
  66.           Integer*4 filesize
  67.           Integer*2 reserved1
  68.           Integer*2 reserved2
  69.           Integer*4 headersize
  70.           Integer*4 infosize
  71.           Integer*4 width
  72.           Integer*4 depth
  73.           Integer*2 biPlanes
  74.           Integer*2 bits
  75.        End Structure
  76. c*tagbitmapinfoheader
  77.        structure /tagbitmapinfoheader/
  78.           Integer*4 biSize
  79.           Integer*4 biWidth
  80.           Integer*4 biHeight
  81.           Integer*2 biPlanes
  82.           Integer*2 biBitCount
  83.           Integer*4 biCompression
  84.           Integer*4 biSizeImage
  85.           Integer*4 biXPelsPerMeter
  86.           Integer*4 biYPelsPerMeter
  87.           Integer*4 biClrUsed
  88.           Integer*4 biClrImportant
  89.        End Structure
  90. c*wndclass
  91.        structure/wndclass/
  92.         integer*4 style
  93.         integer*4 lpfnWndProc
  94.         integer*4 cbClsExtra
  95.         integer*4 cbWndExtra
  96.         integer*4 hInstance
  97.         integer*4 hIcon
  98.         integer*4 hCursor
  99.         integer*4 hbrBackground
  100.         integer*4 lpszMenuName
  101.         integer*4 lpszClassName
  102.       end structure
  103. c*tagmsg
  104.        structure /tagmsg/
  105.           integer*4 hwnd
  106.           integer*4 message
  107.           integer*4 wParam
  108.           Integer*4 lParam
  109.           Integer*4 time
  110.           integer*4 pt_x
  111.           integer*4 pt_y
  112.        End Structure
  113. c*tagtextmetric
  114.        structure /tagTextMetric/
  115.           integer*4 tmHeight
  116.           integer*4 tmAscent
  117.           integer*4 tmDescent
  118.           integer*4 tmInternalLeading
  119.           integer*4 tmExternalLeading
  120.           integer*4 tmAveCharWidth
  121.           integer*4 tmMaxCharWidth
  122.           integer*4 tmWeight
  123.           integer*4 tmOverhang
  124.           integer*4 tmDigitizedAspectX
  125.           integer*4 tmDigitizedAspectY
  126.           INTEGER*1 tmFirstChar
  127.           INTEGER*1 tmLastChar
  128.           INTEGER*1 tmDefaultChar
  129.           INTEGER*1 tmBreakChar
  130.           INTEGER*1 tmItalic
  131.           INTEGER*1 tmUnderlined
  132.           INTEGER*1 tmStruckOut
  133.           INTEGER*1 tmPitchAndFamily
  134.           INTEGER*1 tmCharSet
  135.        end structure
  136. c*tagrect
  137.        structure /tagRect/
  138.           integer*4 left
  139.           integer*4 top
  140.           integer*4 right
  141.           integer*4 bottom
  142.        end structure
  143. c*tagpaintstruct
  144.        structure /tagPAINTSTRUCT/
  145.           integer*4 hdc
  146.           integer*4 fErase
  147.           record /tagRect/ rcPaint
  148.           integer*4 fRestore
  149.           integer*4 fIncUpdate
  150.           integer*1 rgbReserved(16)
  151.        end structure
  152. c*taglogpen
  153.        structure /tagLOGPEN/
  154.           integer*4 style
  155.           integer*4 x
  156.           integer*4 y
  157.           INTEGER*4 color
  158.        end structure
  159. c*idc_arrow
  160.       integer*4 idc_arrow
  161.       parameter (idc_arrow=32512)
  162. c*srccopy
  163.       integer*4 SRCCOPY
  164.       Parameter (SRCCOPY=#00CC0020)
  165. c*null
  166.       integer*4 null
  167.       Parameter (null=0)
  168. c*cbm_init
  169.       integer*4 cbm_init
  170.       Parameter (CBM_INIT=4)
  171. c*dib_rgb_colors
  172.       integer*4 dib_rgb_colors
  173.       Parameter (DIB_RGB_COLORS=0)
  174. c*dib_pal_colors
  175.       integer*4 dib_pal_colors
  176.       Parameter (DIB_PAL_COLORS=1)
  177. c*sw_shownormal
  178.       integer*4 sw_shownormal
  179.       Parameter (sw_shownormal=1)
  180. c*ws_overlappedwindow
  181.       integer*4 ws_overlappedwindow
  182.       Parameter (ws_overlappedwindow=#00cc4000)
  183. c*cw_usedefault
  184.       integer*4 cw_usedefault
  185.       Parameter (cw_usedefault=#8000)
  186. c*idok
  187.       integer*4 idok
  188.       Parameter (IDOK=1)
  189. c*idcancel
  190.       integer*4 idcancel
  191.       Parameter (IDCANCEL=2)
  192. c*wm_initdialog
  193.       integer*4 wm_initdialog
  194.       Parameter (WM_INITDIALOG=#0110)
  195. c*wm_command
  196.       integer*4 wm_command
  197.       Parameter (WM_COMMAND=#0111)
  198. c*wm_create
  199.       integer*4 wm_create
  200.       Parameter (WM_CREATE=1)
  201. c*wm_size
  202.       integer*4 wm_size
  203.       Parameter (WM_SIZE=5)
  204. c*wm_setfocus
  205.       integer*4 wm_setfocus
  206.       Parameter (WM_SETFOCUS=7)
  207. c*wm_destroy
  208.       integer*4 wm_destroy
  209.       Parameter (WM_DESTROY=2)
  210. c*wm_close
  211.       integer*4 wm_close
  212.       Parameter (WM_CLOSE=#10)
  213. c*wm_paint
  214.       integer*4 wm_paint
  215.       Parameter (WM_PAINT=#f)
  216. c*wm_keydown
  217.       integer*4 wm_keydown
  218.       Parameter (WM_KEYDOWN=#100)
  219. c*wm_keyup
  220.       integer*4 wm_keyup
  221.       Parameter (WM_KEYUP=#101)
  222. c*wm_char
  223.       integer*4 wm_char
  224.       Parameter (WM_CHAR=#102)
  225. c*wm_commnotify
  226.       integer*4 wm_commnotify
  227.       Parameter (WM_COMMNOTIFY=#44)
  228. c*true
  229.       integer*4 true
  230.       Parameter (true=1)
  231. c*false
  232.       integer*4 false
  233.       Parameter (false=0)
  234. c*system_fixed_font
  235.       integer*4 system_fixed_font
  236.       Parameter (SYSTEM_FIXED_FONT=16)
  237. c*bn_clicked
  238.       integer*4 bn_clicked
  239.       Parameter (BN_CLICKED=0)
  240. c*color_window
  241.       integer*4 color_window
  242.       Parameter (COLOR_WINDOW=5)
  243. c*color_windowtext
  244.       integer*4 color_windowtext
  245.       Parameter (COLOR_WINDOWTEXT=8)
  246. c*transparent
  247.       integer*4 transparent
  248.       Parameter (TRANSPARENT=1)
  249. c*opaque
  250.       integer*4 opaque
  251.       Parameter (OPAQUE=2)
  252. c*cb_geteditsel
  253.       integer*4 cb_geteditsel
  254.       Parameter (CB_GETEDITSEL=#140+0)
  255. c*cb_selectstring
  256.       integer*4 cb_selectstring
  257.       Parameter (CB_SELECTSTRING=#140+13)
  258. c*cb_seteditsel
  259.       integer*4 cb_seteditsel
  260.       Parameter (CB_SETEDITSEL=#140+2)
  261. c*cb_setitemdata
  262.       integer*4 cb_setitemdata
  263.       Parameter (CB_SETITEMDATA=#140+17)
  264. c*cb_setcursel
  265.       integer*4 cb_setcursel
  266.       Parameter (CB_SETCURSEL=#140+14)
  267. c*cb_getcursel
  268.       integer*4 cb_getcursel
  269.       Parameter (CB_GETCURSEL=#140+7)
  270. c*cb_getitemdata
  271.       integer*4 cb_getitemdata
  272.       Parameter (CB_GETITEMDATA=#140+16)
  273. c*cb_okay
  274.       integer*4 cb_okay
  275.       Parameter (CB_OKAY=0)
  276. c*cb_err
  277.       integer*4 cb_err
  278.       Parameter (CB_ERR=-1)
  279. c*cb_errspace
  280.       integer*4 cb_errspace
  281.       Parameter (CB_ERRSPACE=-2)
  282. c*cb_addstring
  283.       integer*4 cb_addstring
  284.       Parameter (CB_ADDSTRING=#140+3)
  285. c*lb_addstring
  286.       integer*4 lb_addstring
  287.       Parameter (LB_ADDSTRING=#140+1)
  288. c*ps_solid
  289.       integer*4 ps_solid
  290.       Parameter (PS_SOLID=0)
  291. c*ps_dash
  292.       integer*4 ps_dash
  293.       Parameter (PS_DASH=1)
  294. c*ps_dot
  295.       integer*4 ps_dot
  296.       Parameter (PS_DOT=2)
  297. c*ps_dashdot
  298.       integer*4 ps_dashdot
  299.       Parameter (PS_DASHDOT=3)
  300. c*ps_dashdotdot
  301.       integer*4 ps_dashdotdot
  302.       Parameter (PS_DASHDOTDOT=4)
  303. c*r2_copypen
  304.       integer*4 r2_copypen 
  305.       Parameter (R2_COPYPEN=13)
  306. c*r2_not
  307.       integer*4 r2_not 
  308.       Parameter (R2_NOT=6)
  309. c*wm_lbuttondown
  310.       integer*4 wm_lbuttondown
  311.       Parameter (WM_LBUTTONDOWN=#201)
  312. c*wm_lbuttonup
  313.       integer*4 wm_lbuttonup
  314.       Parameter (WM_LBUTTONUP=#202)
  315. c*wm_mousemove
  316.       integer*4 wm_mousemove
  317.       Parameter (WM_MOUSEMOVE=#200)
  318. c*wm_rbuttondown
  319.       integer*4 wm_rbuttondown
  320.       Parameter (WM_RBUTTONDOWN=#204)
  321. c*wm_rbuttonup
  322.       integer*4 wm_rbuttonup
  323.       Parameter (WM_RBUTTONUP=#205)
  324. c*wm_timer
  325.       integer*4 wm_timer
  326.       Parameter (WM_TIMER=#113)
  327. c*horzres
  328.       integer*4 horzres
  329.       Parameter (HorzRes=8)
  330. c*vertres
  331.       integer*4 vertres
  332.       Parameter (VertRes=10)
  333. c*newframe
  334.       integer*4 newframe
  335.       Parameter (NewFrame=1)
  336. c*startdoc
  337.       integer*4 startdoc
  338.       Parameter (StartDoc=10)
  339. c*enddoc
  340.       integer*4 enddoc
  341.       Parameter (EndDoc=11)
  342. c*out_default_precis
  343.       integer*1 out_default_precis
  344.       Parameter (OUT_DEFAULT_PRECIS=0)
  345. c*ansi_charset
  346.       integer*1 ansi_charset
  347.       Parameter (ANSI_CHARSET=0)
  348. c*oem_charset
  349.       integer*1 oem_charset
  350.       Parameter (OEM_CHARSET=#FF)
  351. c*out_default_precision
  352.       integer*1 out_default_precision
  353.       Parameter (OUT_DEFAULT_PRECISION=0)
  354. c*OUT_TT_PRECISION
  355.       integer*1 out_tt_precision
  356.       Parameter (OUT_TT_PRECISION=4)
  357. c*out_tt_only_precision
  358.       integer*1 out_tt_only_precision
  359.       Parameter (OUT_TT_ONLY_PRECISION=7)
  360. c*CLIP_DEFAULT_PRECISION
  361.       integer*1 CLIP_DEFAULT_PRECISION 
  362.       Parameter (CLIP_DEFAULT_PRECISION=0)
  363. c*CLIP_DEFAULT_PRECIS
  364.       integer*1 CLIP_DEFAULT_PRECIS
  365.       Parameter (CLIP_DEFAULT_PRECIS=0)
  366. c*default_palette
  367.       integer*1 default_palette
  368.       Parameter (DEFAULT_PALETTE=15)
  369. c*default_quality
  370.       integer*1 default_quality
  371.       Parameter (DEFAULT_QUALITY=0)
  372. c*draft_quality
  373.       integer*1 draft_quality
  374.       Parameter (DRAFT_QUALITY=1)
  375. c*PROOF_QUALITY
  376.       integer*1 PROOF_QUALITY
  377.       Parameter (PROOF_QUALITY=2)
  378. c*variable_pitch
  379.       integer*1 VARIABLE_PITCH
  380.       Parameter (VARIABLE_PITCH=2)
  381. c*FF_SCRIPT
  382.       integer*1 FF_SCRIPT
  383.       Parameter (FF_SCRIPT=#40)
  384. c*ff_roman
  385.       integer*1 FF_ROMAN
  386.       Parameter (FF_ROMAN=#10)
  387. c*DEFAULT_PITCH
  388.       integer*1 DEFAULT_PITCH
  389.       Parameter (DEFAULT_PITCH=0)
  390. c*ff_dontcare
  391.       integer*1 ff_dontcare
  392.       Parameter (FF_DONTCARE=0)
  393. c*FF_MODERN
  394.       integer*1 FF_MODERN
  395.       Parameter (FF_MODERN=#30)
  396. c*fixed_pitch
  397.       integer*1 fixed_pitch
  398.       Parameter (FIXED_PITCH=1)
  399. c*snd_SYNC
  400.       integer*4 snd_sync
  401.       Parameter (SND_SYNC=0)
  402. c*snd_async
  403.       integer*4 snd_async
  404.       Parameter (SND_ASYNC=1)
  405. c*snd_NODEFAULT
  406.       integer*4 snd_NODEFAULT
  407.       Parameter (SND_NODEFAULT=2)
  408. c*snd_memory
  409.       integer*4 snd_MEMORY
  410.       Parameter (SND_MEMORY=4)
  411. c*snd_LOOP
  412.       integer*4 snd_loop
  413.       Parameter (SND_LOOP=8)
  414. c*snd_nostop
  415.       integer*4 snd_NOSTOP
  416.       Parameter (SND_NOSTOP=#10)
  417. c*NOparity
  418.       integer*1 noparity
  419.       Parameter (NOPARITY=0)
  420. c*ODDparity
  421.       integer*1 ODDparity
  422.       Parameter (ODDPARITY=1)
  423. c*EVENparity
  424.       integer*1 evenparity
  425.       Parameter (EVENPARITY=2)
  426. c*markparity
  427.       integer*1 MARKparity
  428.       Parameter (MARKPARITY=3)
  429. c*spaceparity
  430.       integer*1 spaceparity
  431.       Parameter (SPACEPARITY=4)
  432. c*cn_RECEIVE
  433.       integer*4 cn_RECEIVE
  434.       Parameter (CN_RECEIVE=1)
  435. c*cn_transmit
  436.       integer*4 cn_TRANSMIT
  437.       Parameter (CN_TRANSMIT=2)
  438. c*cn_EVENT
  439.       integer*4 cn_EVENT
  440.       Parameter (CN_EVENT=4)
  441. c*cbr_300
  442.       integer*4 CBR_300
  443.       Parameter (CBR_300=300)
  444. c*cbr_1200
  445.       integer*4 CBR_1200
  446.       Parameter (CBR_1200=1200)
  447. c*cbr_2400
  448.       integer*4 CBR_2400
  449.       Parameter (CBR_2400=2400)
  450. c*cbr_4800
  451.       integer*4 CBR_4800
  452.       Parameter (CBR_4800=4800)
  453. c*cbr_9600
  454.       integer*4 CBR_9600
  455.       Parameter (CBR_9600=9600)
  456. c*BLACKONWHITE
  457.       integer*4 blackonwhite
  458.       Parameter (BLACKONWHITE=1)
  459. c*whiteonblack
  460.       integer*4 WHITEONBLACK
  461.       Parameter (WHITEONBLACK=2)
  462. c*coloroncolor
  463.       integer*4 COLORONCOLOR
  464.       Parameter (COLORONCOLOR=3)
  465. c*CB_SetItemHeight
  466.       integer*4 cB_setitemheight
  467.       parameter (cb_setitemheight=#140+19)
  468. c*onestopbit
  469.       Integer*1 ONESTOPBIT
  470.       Parameter (ONESTOPBIT=0)
  471. c*ONE5STOPBITS
  472.       Integer*1 ONE5STOPBITS
  473.       Parameter (ONE5STOPBITS=1)
  474. c*TWOSTOPBITS
  475.       Integer*1 TWOSTOPBITS
  476.       Parameter (TWOSTOPBITS=2)
  477. c*EV_RXCHAR
  478.       integer*4 EV_RXCHAR
  479.       Parameter (EV_RXCHAR=1)
  480. c*EV_PERR
  481.       integer*4 EV_PERR
  482.       Parameter (EV_PERR=#200)
  483. c*EV_ERR
  484.       integer*4 EV_ERR
  485.       Parameter (EV_ERR=#80)
  486. c*DCBfbinary                 
  487.       integer*4 DCBfbinary
  488.       Parameter (DCBfbinary=0)
  489. c*DCBfParity                  
  490.       integer*4 DCBfParity
  491.       Parameter (DCBfParity=1)
  492. c*DCBfOutxctsFlow              
  493.       integer*4 DCBfOutxctsFlow
  494.       Parameter (DCBfOutxctsFlow=2)
  495. c*DCBfOutxdsrflow               
  496.       integer*4 DCBfOutxdsrflow
  497.       Parameter (DCBfOutxdsrflow=3)
  498. c*DCBfDtrControl               
  499.       integer*4 DCBfDtrControl
  500.       Parameter (DCBfDtrControl=4)
  501. c*DCBfDsrSensitivity               
  502.       integer*4 DCBfDsrSensitivity
  503.       Parameter (DCBfDsrSensitivity=6)
  504. c*DCBfTXContinueOnXoff
  505.       integer*4 DCBfTXContinueOnXoff
  506.       Parameter (DCBfTXContinueOnXoff=7)
  507. c*DCBfOutx
  508.       integer*4 DCBfOutx
  509.       Parameter (DCBfoutx=8)
  510. c*DCBfInx
  511.       integer*4 DCBfInx
  512.       Parameter (DCBfinx=9)
  513. c*DCBfPeChar
  514.       integer*4 DCBfErrorChar
  515.       Parameter (DCBfErrorchar=10)
  516. c*DCBfNull
  517.       integer*4 DCBfNull
  518.       Parameter (DCBfnull=11)
  519. c*DCBfRtsControl
  520.       integer*4 DCBfRtsControl
  521.       Parameter (DCBfRtsControl=12)
  522. c*DCBfAbortOnError
  523.       integer*4 DCBfAbortOnError
  524.       Parameter (DCBfAbortOnError=14)
  525. c*DCBfDummy2
  526.       integer*4 DCBfDummy2
  527.       Parameter (DCBfDummy2=15)
  528. c*PRINTER_ENUM_DEFAULT       
  529.        INTEGER*4 PRINTER_ENUM_DEFAULT
  530.        PARAMETER (PRINTER_ENUM_DEFAULT=#000000001)
  531. C*PRINTER_ENUM_LOCAL
  532.        INTEGER*4 PRINTER_ENUM_LOCAL
  533.        PARAMETER (PRINTER_ENUM_LOCAL=#000000002)
  534. C*WM_ERASEBKGND
  535.        INTEGER*4 WM_ERASEBKGND
  536.        PARAMETER (WM_ERASEBKGND=#00014)
  537. C*WM_MOVE
  538.        INTEGER*4 WM_MOVE
  539.        PARAMETER (WM_MOVE=#00003)
  540. C*WM_SYSKEYDOWN
  541.        INTEGER*4 WM_SYSKEYDOWN
  542.        PARAMETER (WM_SYSKEYDOWN=#00104)
  543. C*WM_SYSKEYUP
  544.        INTEGER*4 WM_SYSKEYUP
  545.        PARAMETER (WM_SYSKEYUP=#00105)
  546. C*WM_SYSCHAR
  547.        INTEGER*4 WM_SYSCHAR
  548.        PARAMETER (WM_SYSCHAR=#00106)
  549. C*GENERIC_READ
  550.        INTEGER*4 GENERIC_READ
  551.        PARAMETER (GENERIC_READ=#080000000)
  552. C*GENERIC_WRITE
  553.        INTEGER*4 GENERIC_WRITE
  554.        PARAMETER (GENERIC_WRITE=#040000000)
  555. C*GENERIC_EXECUTE
  556.        INTEGER*4 GENERIC_EXECUTE
  557.        PARAMETER (GENERIC_EXECUTE=#020000000)
  558. C*OPEN_EXISTING
  559.        INTEGER*4 OPEN_EXISTING
  560.        PARAMETER (OPEN_EXISTING=3)
  561. C*OPEN_ALWAYS
  562.        INTEGER*4 OPEN_ALWAYS
  563.        PARAMETER (OPEN_ALWAYS=4)
  564. C*DTR_CONTROL_DISABLE
  565.        INTEGER*4 DTR_CONTROL_DISABLE
  566.        PARAMETER (DTR_CONTROL_DISABLE=#000)
  567. C*DTR_CONTROL_ENABLE
  568.        INTEGER*4 DTR_CONTROL_ENABLE
  569.        PARAMETER (DTR_CONTROL_ENABLE=#001)
  570. C*DTR_CONTROL_HANDSHAKE
  571.        INTEGER*4 DTR_CONTROL_HANDSHAKE
  572.        PARAMETER (DTR_CONTROL_HANDSHAKE=#002)
  573. C*RTS_CONTROL_DISABLE
  574.        INTEGER*4 RTS_CONTROL_DISABLE
  575.        PARAMETER (RTS_CONTROL_DISABLE=#000)
  576. C*RTS_CONTROL_ENABLE
  577.        INTEGER*4 RTS_CONTROL_ENABLE
  578.        PARAMETER (RTS_CONTROL_ENABLE=#001)
  579. C*RTS_CONTROL_HANDSHAKE
  580.        INTEGER*4 RTS_CONTROL_HANDSHAKE
  581.        PARAMETER (RTS_CONTROL_HANDSHAKE=#002)
  582. C*RTS_CONTROL_TOGGLE
  583.        INTEGER*4 RTS_CONTROL_TOGGLE
  584.        PARAMETER (RTS_CONTROL_TOGGLE=#003)
  585. C*MS_CTS_ON
  586.        INTEGER*4 MS_CTS_ON
  587.        PARAMETER (MS_CTS_ON=#0010)
  588. C*MS_DSR_ON
  589.        INTEGER*4 MS_DSR_ON
  590.        PARAMETER (MS_DSR_ON=#0020)
  591. C*MS_RING_ON
  592.        INTEGER*4 MS_RING_ON
  593.        PARAMETER (MS_RING_ON=#0040)
  594. C*MS_RLSD_ON
  595.        INTEGER*4 MS_RLSD_ON
  596.        PARAMETER (MS_RLSD_ON=#0080)
  597. c*BarrysEnd
  598.