unit_dllfunc.pas

ICCard读写程序,用来在windows环境下读写IC卡内数据!

unit Unit_DllFunc;

interface

  function ic_init(port: smallint;baud:longint): longint; stdcall;
  far;external 'MWIC_32.DLL' name 'ic_init';
  function auto_init(port: smallint;baud:longint): longint; stdcall;
  far;external 'MWIC_32.DLL' name 'auto_init';
  function ic_exit(icdev: longint):smallint;stdcall;
  far;external 'MWIC_32.dll' name 'ic_exit';
  function get_status(icdev: longint; status:pchar):smallint;stdcall;
  far;external 'MWIC_32.dll' name 'get_status';

  function asc_hex(asc:pchar;hex:pchar;len:smallint):smallint;stdcall;
  far;external 'MWIC_32.dll'name 'asc_hex';
  function hex_asc(var hex:byte;asc:pchar;len:smallint):smallint;stdcall;
  far;external 'MWIC_32.dll'name 'hex_asc';


  function cpu_reset(icdev:longint;var databuff:byte):smallint;stdcall;
  far;external 'MWIC_32.dll' name 'cpu_reset';
  function cpu_protocol(icdev: longint;len:smallint;var send_cmd:byte;var rece_cmd:byte):smallint;stdcall;
  far;external 'MWIC_32.dll'name 'cpu_protocol';
  
implementation

end.