User Tools

Site Tools


start:eti:carte:sources:etipcbus

Etipcbus.dpr

PROGRAM Etipcbus;
{-----------------------------------------------------------------------------
  PROGRAMMEE     : FULL.EXE (ou ETIPCBUS II)
  BUT            : Programme de test pour la carte PC bus ISA. Cette carte
                   contient de base un PPI 8255 et un PIT8254 a été ajouté.
  AUTEURS        : Michael Amarantidis & Stéphane Claus
  DATE           : Décembre 1996 / Janvier 1997
 
  MODIFIE LE     : 10.4.1997 / 2.01ß / Claus Stéphane
  RAISONS         : - Ajouté des commentaires
                    - Initialisation de l'intervalle du Timer "timerEtatPorts"
                      lors de l'activation de la fiche principale
 
  REMARQUES      : Voir l'entête de l'unité UPrincpl.Pas pour plus d'infos
                   Informations au 22.12.1996:
                   Source compilé    3065 lignes
                   Taille code       210102 octets
                   Taille données    4730 octets
                   Taille pile       16384 octets
                   Taille tas local  8192 octets
 
                   Informations au 18.01.1997:
                   Source compilé    3481 lignes
                   Taille code       213263 octets
                   Taille données    4744 octets
                   Taille pile       16384 octets
                   Taille tas local  8192 octets
 
                   Informations au 12.04.1997:
                   Source compilé    10712 lignes
                   Taille code       278868 octets
                   Taille données    10804 octets
                   Taille pile       16384 octets
                   Taille tas local  8192 octets
 
                   Informations au 27.05.1997:
                   Source compilé    11744 lignes
                   Taille code       282581 octets
                   Taille données    10844 octets
                   Taille pile       16384 octets
                   Taille tas local  8192 octets
 
 -----------------------------------------------------------------------------}
 
USES
  Forms,
  Uprincpl in 'UPRINCPL.PAS' {frmMain},
  Ucfgprgm in 'UCFGPRGM.PAS' {frmCfgProgramme},
  Ucfgprts in 'UCFGPRTS.PAS' {frmCfgPorts},
  Ucfgbs55 in 'UCFGBS55.PAS' {frmAdresseBase},
  Uapropos in 'UAPROPOS.PAS' {frmAbout},
  Ulit in 'ULIT.PAS' {frmLire},
  Uecrit in 'UECRIT.PAS' {frmEcrire},
  Uchen in 'UCHEN.PAS' {frmChenillard},
  Upattern in 'UPATTERN.PAS' {frmPattern},
  Uchrono in 'UCHRONO.PAS' {frmChronoPPI},
  Ugenerat in 'UGENERAT.PAS' {frmGenerateur},
  Uquartz in 'UQUARTZ.PAS' {frmQuartz},
  Usayno in 'USAYNO.PAS' {frmSayNo},
  Ufreq in 'UFREQ.PAS' {frmFrequencemetre},
  Ugraph in 'UGRAPH.PAS' {frmGraph};
 
{$R *.RES}
 
BEGIN
  Application.Title := 'ETIPCBUS';
  Application.HelpFile := 'ETIPCBUS.HLP';
  Application.CreateForm(TfrmMain, frmMain);
  Application.CreateForm(TfrmCfgProgramme, frmCfgProgramme);
  Application.CreateForm(TfrmCfgPorts, frmCfgPorts);
  Application.CreateForm(TfrmAdresseBase, frmAdresseBase);
  Application.CreateForm(TfrmAbout, frmAbout);
  Application.CreateForm(TfrmLire, frmLire);
  Application.CreateForm(TfrmEcrire, frmEcrire);
  Application.CreateForm(TfrmChenillard, frmChenillard);
  Application.CreateForm(TfrmPattern, frmPattern);
  Application.CreateForm(TfrmChronoPPI, frmChronoPPI);
  Application.CreateForm(TfrmGenerateur, frmGenerateur);
  Application.CreateForm(TfrmQuartz, frmQuartz);
  Application.CreateForm(TfrmSayNo, frmSayNo);
  Application.CreateForm(TfrmFrequencemetre, frmFrequencemetre);
  Application.CreateForm(TfrmGraph, frmGraph);
  Application.Run;
END. {PROGRAM Etipcbus}
This website uses cookies. By using the website, you agree with storing cookies on your computer. Also you acknowledge that you have read and understand our Privacy Policy. If you do not agree leave the website.More information about cookies
start/eti/carte/sources/etipcbus.txt · Last modified: 2016/07/24 04:02 by admin