refactor: Passage aux outils GNU (Cygwin, make)

BREAKING CHANGE: attention modification majeure du code

API.md

@@ -1,97 +0,0 @@
-Liste exhaustive des APIs supportée par cos
-78 fonctions
-
-Drive.sys : Gestionnaires FAT,FIT et partition
-Interruption 48h (Disquette uniquement)
-fonctions 	00h 	readsector
-          	01h	writesector
-          	02h	verifysector 
-          	03h	loadfatway
-          	04h	loadfile
-          	05h 	compressrle
-         	06h	decompressrle
-lpt.sys : Gestionnaires port parallèle
-Interruption 0Dh (LPT1) ou 0Fh (LPT2)
-fonctions 	00h 	getlptin
-          	01h	getlptout
-          	02h	getlptinout
-         	03h	setlptin
-         	04h	setlptout
-         	05h 	setlptinout
-         	06h	getlpt
-	   	07h	getfirstlpt
-		08h	setemettor
-		09h	setreceptor
-		0Ah	settimeout
-		0Bh	gettimeout
-		0Ch	receivelpt
-		0Dh	sendlpt
-		0Eh	receivelptblock
-		0Fh	sendlptblock
-		10h	receivecommand
-		11h	sendcommand
-mouse.sys : Gestionnaires souris
-Interruption 74h (PS/2)
-fonctions  	00h	cmdmouse
-          	01h	cmdmouse2
-         	02h	detectmouse
-         	03h	getmouse
-         	04h 	getmousescreen
-         	05h	configmouse
-pic8259a.sys : Gestionnaires contrôleur d'interruption programmable
-Interruption 50h (Maître et esclave)
-fonctions  	00h 	enableirq
-          	01h	disableirq
-          	02h	readmaskirq
-         	03h	readirr
-         	04h	readisr
-         	05h 	installhandler
-         	06h	replacehandler
-	   	07h	getint
-		08h	setint
-		09h	seteoi
-video.sys : Gestionnaires de la carte video
-Interruption 47h (VGA)
-fonctions 	00h 	setvideomode
-          	01h	getvideomode
-          	02h	cleartext
-         	03h	changefont
-         	04h	loadfont
-         	05h 	space
-         	06h	line
-	   	07h	showchar
-		08h	showint
-		09h	showsigned
-		0Ah	showhex
-		0Bh	showbin
-		0Ch	showstring
-		0Dh	showstring0
-		0Eh	showcharat
-		0Fh	showintat
-		10h	showsignedat
-		11h	showhexat
-		12h	showbinat
-		13h	showstringat
-		14h	showstring0at
-		15h	setcolor
-		16h	getcolor
-		17h	scrolldown
-		18h	getxy
-		19h	setxy
-		1Ah	savescreen
-		1Bh 	restorescreen
-		1Ch	page2to1
-		1Dh	page1to2
-		1Eh	xchgPages
-		1Fh	savepage1
-		20h	changelineattr
-		21h	waitretrace
-		22h	getinfos
-		23h	loadbmp
-		24h	showbmp
-		25h	clearscr
-		26h	savedac
-		27h	restoredac
-		28h	savestate
-		29h	restorestate
-	

INFORMATIONS.md

@@ -1,53 +1,268 @@
-					< COS2000 the new operating system >
+![logo](https://github.com/dahut87/cos2000v1/raw/master/graphisme/logo.png)
+## Documentation d'origine (importée)
+
+COS 2000
+Compatible Operating System
 
  
-I. Présentation
 
-	COS2000, par définition, est système d'exploitation. Celui-ci prend la direction des opérations à partir
+	Présentation
- du moment où le  PC est mis sous tension (Après le BIOS). Il gère tous les périphériques rattachés au PC et 
+	Comment l’installer
-offre aux  programmeurs les moyens de développer des applications compatibles en fournissant des APIs 
+	Mode d’emploi
-(Application Programming Interface). COS2000 est basé sur un concept particulier qui est d'offrir aux 
+	Faire un programme pour COS
-programmeurs un maximum de fonctions intégrées pour faciliter le travail des programmeurs et réduire la 
+	Liste des APIs
-taille des programmes.
+	En cas de problème
 	
-II. Comment l'installer ?
+	mailto:nicolas@palon.fr
+
+
+Présentation
+
+	COS2000, par définition, est système d'exploitation. Celui-ci prend la direction des opérations à partir du moment où le  PC est mis sous tension (Après le BIOS). Il gère tous les périphériques rattachés au PC et offre aux  programmeurs les moyens de développer des applications compatibles en fournissant des APIs (Application Programming Interface). COS2000 est basé sur un concept particulier qui est d'offrir aux programmeurs un maximum de fonctions intégrées pour faciliter le travail des programmeurs et réduire la taille des programmes.
+
+Comment l'installer ?
 
 	Pour installer COS2000 :
 
-		- Insérez une disquette 1.44 Mo vierge ou inutile dans votre lecteur.
+	Sous dos/windows
-		- Lancez le programme SETUP.COM situé dans le dossier de COS2000.
+
-		- Si celui-ci ne détecte pas d'erreur, COS2000 est installé !
+		  Insérez une disquette 1.44 Mo vierge ou inutile dans votre lecteur.
+		  Lancez le programme SETUP.COM situé dans le dossier de COS2000.
+- Si celui ci ne détecte pas d'erreur, COS2000 est installé !
+
+	Sous Linux
+
+		  Insérez une disquette 1.44 Mo vierge ou inutile dans votre lecteur.
+		  Lancez le programme SETUP.SH situé dans le dossier de COS2000.
+- Si celui ci ne détecte pas d'erreur, COS2000 est installé !
 
 	Pour lancer COS2000 :
 
-		- Insérez la disquette où COS2000 est installé.
+		  Insérez la disquette où COS2000 est installé.
-		- Veillez que dans le BIOS vous puissiez démarrer à partir de A:.
+		  Veillez que dans le BIOS vous puissiez démarrer à partir de A:.
-		- Redémarrer votre ordinateur et vous serez sur COS2000.
+		  Redémarrer votre ordinateur et vous serez sur COS2000. 
 
-	Il est possible de télécharger une version plus récente de COS2000 à :
 
-		https://github.com/dahut87/cos2000v1
 
-III. Mode d'emploi
+Mode d'emploi
 
-	Le COS MENU LOADER est le premier logiciel qui est lancé au démarrage. A partir de celui-ci, vous pouvez 
+	L’interpréteur de commande COS est le premier logiciel qui est lancé au démarrage. A partir de celui-ci vous pouvez exécuter quelques commandes ou logiciels. 
-visionner tout les fichiers présents sur votre disquette et éventuellement les exécuter s'ils possèdent 
-l'extension EXE . Pour cela, il suffit de sélectionner avec la ligne en surbrillance le programme à exécuter 
-en utilisant les flèches de direction. Pour exécuter le programmer, pressez la touche "Entrée".
-
-	A partir du COS MENU LOADER on peut lancer un interpréteur de commandes . Celui-ci s'appelle PROMPT.EXE.
-Une fois dans l'interpréteur de commande, vous pouvez tout aussi bien lancer des logiciels en saisissant leurs
-noms après "COS>".
 
 En plus des logiciels, l'interpréteur de commandes peut exécuter 6 commandes :
 
-	EXIT			Quitte l'interpréteur
+	QUIT
-	VERSION		Donne la version de COS2000
+	Quitte l'interpréteur.
-	CLS			Efface l'écran
+
-	REBOOT		Redémarre le PC
+	VERS
-	COMMAND		Donne la liste des commandes disponibles
+	Donne la version de COS2000.
-	MODE [mode]		Permet de changer de mode vidéo. [mode] doit être un entier compris entre 1 et 9. les 
+
-				modes au delà de 4 sont des modes graphiques à texte émulé. Il est déconseillé de les 
+	EFFAC
-				utiliser car il est parfois impossible de revenir aux modes texte.
+	Efface l'écran.
+
+	REDEM
+	Redémarre le PC.
+
+	CMDS
+	Donne la liste des commandes disponibles.
+
+	MODE [mode]
+Permet de changer de mode vidéo. [mode] doit être un entier compris entre 1 et 9. les modes au delà de 4 sont des modes graphiques à texte émulé. Il est déconseillé de les utiliser car il est parfois impossible de revenir aux modes texte.
+
+	LIRE
+	Permet de lire un support disquette 1.44 Mo au format FAT12.
+
+	CH
+	Change le dossier actuel vers celui spécifié.
+
+	VOIR
+	Permet de lister le contenu du dossier actuel.
+
+
+Faire un programme pour COS
+
+	Toute contribution à COS 2000 en terme de programme est la bienvenue, un répertoire « contribs » contiendra les programmes des différents contributeurs. Aucune modification a ceux-ci ne sera faire sans l’accord explicite de l’auteur. Pour une contribution écrivez moi a l’adresse mailto:nicolas@palon.fr.
+
+Pour l’instant il n’y a aucun formatage particulier du code à respecter pour faire un programme pour COS 2000. Il faut pour l’instant seulement un point d’entrée en 0100h comme un .COM de dos, 64 Ko sont donc disponible au programme, la pile utilisé est celle du système d’exploitation, c’est donc le seul segment qui ne sera pas initialisé comme les autres.
+
+
+ 
+	
+
+
+
+
+
+Pour clore le programme il suffit de faire un retour far.
+Exemple avec un Hello Word.
+	
+	Avec tasm
+
+.model tiny			;model tiny (.com)
+.486					;Pour processeur 80486
+Smart				;Optimisations
+.code				;Segment de code
+
+org 0100h				;Point d’entré en 0100h
+
+start:
+	mov	ah,0Dh		
+	mov	si,offset msg
+	int	47h			;Afficher le texte pointé par DS:SI (Showstring0)
+	xor	ax,ax
+	int	16h			;Attendre l’appuie sur une touche
+	db	0CBH ;retour far
+
+msg db ‘Hello World’,0
+end start
+
+	Avec nasm
+
+[bits 16]				;16 bits
+[org 0x0100]				;Point d’entré en 0100h
+section .text				;Segment de code				
+
+start:
+	mov	ah,0x0D		
+	mov	si,msg
+	int	0x47			;Afficher le texte pointé par DS:SI (Showstring0)
+	xor	ax,ax
+	int	0x16			;Attendre l’appuie sur une touche
+	retf		 		;retour far
+
+msg db ‘Hello World’,0
+
+	
+	Comme vous pouvez le constater l’appel des APIs de Cos se réalise par le biais d’interruptions logiciels dont voici la liste.
+
+Liste des APIs
+
+disque.sys : Gestionnaires FAT12 et Disquette
+Interruption 48h (Disquette uniquement)
+
+00h 	readsector
+          	01h	writesector
+          	02h	verifysector 
+          	03h	initdrive
+          	04h	loadfile
+          	05h 	compressrle
+         	06h	decompressrle
+          	07h	findfirstfile
+          	08h	getfreespace
+          	09h 	searchfile
+         	0Ah	getname
+          	0Bh	getserial
+          	0Ch	changedir
+          	0Dh 	readcluster
+         	0Eh	writecluster
+	0Fh	getdir
+
+port.sys : Gestionnaires port parallèle
+Interruption 0Dh (LPT1) ou 0Fh (LPT2)
+
+00h 	getlptin
+          	01h	getlptout
+          	02h	getlptinout
+         	03h	setlptin
+         	04h	setlptout
+         	05h 	setlptinout
+         	06h	getlpt
+	07h	getfirstlpt
+	08h	setemettor
+	09h	setreceptor
+	0Ah	settimeout
+	0Bh	gettimeout
+	0Ch	receivelpt
+	0Dh	sendlpt
+	0Eh	receivelptblock
+	0Fh	sendlptblock
+	10h	receivecommand
+	11h	sendcommand
+
+souris.sys : Gestionnaires souris
+Interruption 74h (PS/2)
+
+00h	cmdmouse
+          	01h	cmdmouse2
+         	02h	detectmouse
+         	03h	getmouse
+         	04h 	getmousescreen
+         	05h	configmouse
+
+8259a.sys : Gestionnaires contrôleur d'interruption programmable
+Interruption 50h (Maître et esclave)
+
+00h 	enableirq
+          	01h	disableirq
+          	02h	readmaskirq
+         	03h	readirr
+         	04h	readisr
+         	05h 	installhandler
+         	06h	replacehandler
+	07h	getint
+	08h	setint
+	09h	seteoi
+
+video.sys : Gestionnaires de la carte vidéo
+Interruption 47h (VGA)
+
+00h 	setvideomode
+          	01h	getvideomode
+          	02h	cleartext
+         	03h	changefont
+         	04h	loadfont
+         	05h 	space
+         	06h	line
+	07h	showchar
+	08h	showint
+	09h	showsigned
+	0Ah	showhex
+	0Bh	showbin
+	0Ch	showstring
+	0Dh	showstring0
+	0Eh	showcharat
+	0Fh	showintat
+	10h	showsignedat
+	11h	showhexat
+	12h	showbinat
+	13h	showstringat
+	14h	showstring0at
+	15h	setcolor
+	16h	getcolor
+	17h	scrolldown
+	18h	getxy
+	19h	setxy
+	1Ah	savescreen
+	1Bh 	restorescreen
+	1Ch	page2to1
+	1Dh	page1to2
+	1Eh	xchgPages
+	1Fh	savepage1
+	20h	changelineattr
+	21h	waitretrace
+	22h	getinfos
+	23h	loadbmp
+	24h	showbmp
+	25h	clearscr
+	26h	savedac
+	27h	restoredac
+	28h	savestate
+	29h	restorestate
+	30h	enablescroll
+         	31h	disablescroll
+	32h	showdate
+	33h	showtime
+	34h	showname
+	35h	showattr
+	36h	showsize
+
+Pour l’instant je n’ai pas fait de guide détaillé de l’utilisation des fonctions de COS… A venir
 
 Les possibilités de COS2000 sont aujourd'hui très limitées car il est en cours de développement.
+
+En cas de problèmes
+
+	Si des bugs surviennent ou si COS2000 ne veut pas s'installer, veuillez s'il vous plaît m'envoyer un E Mail à :
+
+		mailto:nicolas@palon.fr
+
+COS2000 n'exploite pas les disques durs, il est donc impossible qu'il altère de quelque manière que ce soit vos données !!!!!!!!!!!!!

LICENSE.md

@@ -1,301 +1,641 @@
-		    GNU GENERAL PUBLIC LICENSE
+### GNU GENERAL PUBLIC LICENSE
-		       Version 2, June 1991
 
- Copyright (C) 1989, 1991 Free Software Foundation, Inc.
+Version 3, 29 June 2007
-                       59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
- Everyone is permitted to copy and distribute verbatim copies
- of this license document, but changing it is not allowed.
 
-			    Preamble
+Copyright (C) 2007 Free Software Foundation, Inc.
+<https://fsf.org/>
 
-  The licenses for most software are designed to take away your
+Everyone is permitted to copy and distribute verbatim copies of this
-freedom to share and change it.  By contrast, the GNU General Public
+license document, but changing it is not allowed.
-License is intended to guarantee your freedom to share and change free
+
-software--to make sure the software is free for all its users.  This
+### Preamble
-General Public License applies to most of the Free Software
+
-Foundation's software and to any other program whose authors commit to
+The GNU General Public License is a free, copyleft license for
-using it.  (Some other Free Software Foundation software is covered by
+software and other kinds of works.
-the GNU Library General Public License instead.)  You can apply it to
+
-your programs, too.
+The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works. By contrast,
+the GNU General Public License is intended to guarantee your freedom
+to share and change all versions of a program--to make sure it remains
+free software for all its users. We, the Free Software Foundation, use
+the GNU General Public License for most of our software; it applies
+also to any other work released this way by its authors. You can apply
+it to your programs, too.
 
 When we speak of free software, we are referring to freedom, not
 price. Our General Public Licenses are designed to make sure that you
 have the freedom to distribute copies of free software (and charge for
-this service if you wish), that you receive source code or can get it
+them if you wish), that you receive source code or can get it if you
-if you want it, that you can change the software or use pieces of it
+want it, that you can change the software or use pieces of it in new
-in new free programs; and that you know you can do these things.
+free programs, and that you know you can do these things.
 
-  To protect your rights, we need to make restrictions that forbid
+To protect your rights, we need to prevent others from denying you
-anyone to deny you these rights or to ask you to surrender the rights.
+these rights or asking you to surrender the rights. Therefore, you
-These restrictions translate to certain responsibilities for you if you
+have certain responsibilities if you distribute copies of the
-distribute copies of the software, or if you modify it.
+software, or if you modify it: responsibilities to respect the freedom
+of others.
 
 For example, if you distribute copies of such a program, whether
-gratis or for a fee, you must give the recipients all the rights that
+gratis or for a fee, you must pass on to the recipients the same
-you have.  You must make sure that they, too, receive or can get the
+freedoms that you received. You must make sure that they, too, receive
-source code.  And you must show them these terms so they know their
+or can get the source code. And you must show them these terms so they
-rights.
+know their rights.
 
-  We protect your rights with two steps: (1) copyright the software, and
+Developers that use the GNU GPL protect your rights with two steps:
-(2) offer you this license which gives you legal permission to copy,
+(1) assert copyright on the software, and (2) offer you this License
-distribute and/or modify the software.
+giving you legal permission to copy, distribute and/or modify it.
 
-  Also, for each author's protection and ours, we want to make certain
+For the developers' and authors' protection, the GPL clearly explains
-that everyone understands that there is no warranty for this free
+that there is no warranty for this free software. For both users' and
-software.  If the software is modified by someone else and passed on, we
+authors' sake, the GPL requires that modified versions be marked as
-want its recipients to know that what they have is not the original, so
+changed, so that their problems will not be attributed erroneously to
-that any problems introduced by others will not reflect on the original
+authors of previous versions.
-authors' reputations.
 
-  Finally, any free program is threatened constantly by software
+Some devices are designed to deny users access to install or run
-patents.  We wish to avoid the danger that redistributors of a free
+modified versions of the software inside them, although the
-program will individually obtain patent licenses, in effect making the
+manufacturer can do so. This is fundamentally incompatible with the
-program proprietary.  To prevent this, we have made it clear that any
+aim of protecting users' freedom to change the software. The
-patent must be licensed for everyone's free use or not licensed at all.
+systematic pattern of such abuse occurs in the area of products for
+individuals to use, which is precisely where it is most unacceptable.
+Therefore, we have designed this version of the GPL to prohibit the
+practice for those products. If such problems arise substantially in
+other domains, we stand ready to extend this provision to those
+domains in future versions of the GPL, as needed to protect the
+freedom of users.
+
+Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish
+to avoid the special danger that patents applied to a free program
+could make it effectively proprietary. To prevent this, the GPL
+assures that patents cannot be used to render the program non-free.
 
 The precise terms and conditions for copying, distribution and
 modification follow.
-
-		    GNU GENERAL PUBLIC LICENSE
-   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
 
-  0. This License applies to any program or other work which contains
+### TERMS AND CONDITIONS
-a notice placed by the copyright holder saying it may be distributed
-under the terms of this General Public License.  The "Program", below,
-refers to any such program or work, and a "work based on the Program"
-means either the Program or any derivative work under copyright law:
-that is to say, a work containing the Program or a portion of it,
-either verbatim or with modifications and/or translated into another
-language.  (Hereinafter, translation is included without limitation in
-the term "modification".)  Each licensee is addressed as "you".
 
-Activities other than copying, distribution and modification are not
+#### 0. Definitions.
-covered by this License; they are outside its scope.  The act of
-running the Program is not restricted, and the output from the Program
-is covered only if its contents constitute a work based on the
-Program (independent of having been made by running the Program).
-Whether that is true depends on what the Program does.
 
-  1. You may copy and distribute verbatim copies of the Program's
+"This License" refers to version 3 of the GNU General Public License.
-source code as you receive it, in any medium, provided that you
-conspicuously and appropriately publish on each copy an appropriate
-copyright notice and disclaimer of warranty; keep intact all the
-notices that refer to this License and to the absence of any warranty;
-and give any other recipients of the Program a copy of this License
-along with the Program.
 
-You may charge a fee for the physical act of transferring a copy, and
+"Copyright" also means copyright-like laws that apply to other kinds
-you may at your option offer warranty protection in exchange for a fee.
+of works, such as semiconductor masks.
 
-  2. You may modify your copy or copies of the Program or any portion
+"The Program" refers to any copyrightable work licensed under this
-of it, thus forming a work based on the Program, and copy and
+License. Each licensee is addressed as "you". "Licensees" and
-distribute such modifications or work under the terms of Section 1
+"recipients" may be individuals or organizations.
-above, provided that you also meet all of these conditions:
 
-    a) You must cause the modified files to carry prominent notices
+To "modify" a work means to copy from or adapt all or part of the work
-    stating that you changed the files and the date of any change.
+in a fashion requiring copyright permission, other than the making of
+an exact copy. The resulting work is called a "modified version" of
+the earlier work or a work "based on" the earlier work.
 
-    b) You must cause any work that you distribute or publish, that in
+A "covered work" means either the unmodified Program or a work based
-    whole or in part contains or is derived from the Program or any
+on the Program.
-    part thereof, to be licensed as a whole at no charge to all third
-    parties under the terms of this License.
 
-    c) If the modified program normally reads commands interactively
+To "propagate" a work means to do anything with it that, without
-    when run, you must cause it, when started running for such
+permission, would make you directly or secondarily liable for
-    interactive use in the most ordinary way, to print or display an
+infringement under applicable copyright law, except executing it on a
-    announcement including an appropriate copyright notice and a
+computer or modifying a private copy. Propagation includes copying,
-    notice that there is no warranty (or else, saying that you provide
+distribution (with or without modification), making available to the
-    a warranty) and that users may redistribute the program under
+public, and in some countries other activities as well.
-    these conditions, and telling the user how to view a copy of this
-    License.  (Exception: if the Program itself is interactive but
-    does not normally print such an announcement, your work based on
-    the Program is not required to print an announcement.)
-
-These requirements apply to the modified work as a whole.  If
-identifiable sections of that work are not derived from the Program,
-and can be reasonably considered independent and separate works in
-themselves, then this License, and its terms, do not apply to those
-sections when you distribute them as separate works.  But when you
-distribute the same sections as part of a whole which is a work based
-on the Program, the distribution of the whole must be on the terms of
-this License, whose permissions for other licensees extend to the
-entire whole, and thus to each and every part regardless of who wrote it.
 
-Thus, it is not the intent of this section to claim rights or contest
+To "convey" a work means any kind of propagation that enables other
-your rights to work written entirely by you; rather, the intent is to
+parties to make or receive copies. Mere interaction with a user
-exercise the right to control the distribution of derivative or
+through a computer network, with no transfer of a copy, is not
-collective works based on the Program.
+conveying.
 
-In addition, mere aggregation of another work not based on the Program
+An interactive user interface displays "Appropriate Legal Notices" to
-with the Program (or with a work based on the Program) on a volume of
+the extent that it includes a convenient and prominently visible
-a storage or distribution medium does not bring the other work under
+feature that (1) displays an appropriate copyright notice, and (2)
-the scope of this License.
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License. If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
 
-  3. You may copy and distribute the Program (or a work based on it,
+#### 1. Source Code.
-under Section 2) in object code or executable form under the terms of
-Sections 1 and 2 above provided that you also do one of the following:
 
-    a) Accompany it with the complete corresponding machine-readable
+The "source code" for a work means the preferred form of the work for
-    source code, which must be distributed under the terms of Sections
+making modifications to it. "Object code" means any non-source form of
-    1 and 2 above on a medium customarily used for software interchange; or,
+a work.
 
-    b) Accompany it with a written offer, valid for at least three
+A "Standard Interface" means an interface that either is an official
-    years, to give any third party, for a charge no more than your
+standard defined by a recognized standards body, or, in the case of
-    cost of physically performing source distribution, a complete
+interfaces specified for a particular programming language, one that
-    machine-readable copy of the corresponding source code, to be
+is widely used among developers working in that language.
-    distributed under the terms of Sections 1 and 2 above on a medium
-    customarily used for software interchange; or,
 
-    c) Accompany it with the information you received as to the offer
+The "System Libraries" of an executable work include anything, other
-    to distribute corresponding source code.  (This alternative is
+than the work as a whole, that (a) is included in the normal form of
-    allowed only for noncommercial distribution and only if you
+packaging a Major Component, but which is not part of that Major
-    received the program in object code or executable form with such
+Component, and (b) serves only to enable use of the work with that
-    an offer, in accord with Subsection b above.)
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form. A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
 
-The source code for a work means the preferred form of the work for
+The "Corresponding Source" for a work in object code form means all
-making modifications to it.  For an executable work, complete source
+the source code needed to generate, install, and (for an executable
-code means all the source code for all modules it contains, plus any
+work) run the object code and to modify the work, including scripts to
-associated interface definition files, plus the scripts used to
+control those activities. However, it does not include the work's
-control compilation and installation of the executable.  However, as a
+System Libraries, or general-purpose tools or generally available free
-special exception, the source code distributed need not include
+programs which are used unmodified in performing those activities but
-anything that is normally distributed (in either source or binary
+which are not part of the work. For example, Corresponding Source
-form) with the major components (compiler, kernel, and so on) of the
+includes interface definition files associated with source files for
-operating system on which the executable runs, unless that component
+the work, and the source code for shared libraries and dynamically
-itself accompanies the executable.
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
 
-If distribution of executable or object code is made by offering
+The Corresponding Source need not include anything that users can
-access to copy from a designated place, then offering equivalent
+regenerate automatically from other parts of the Corresponding Source.
-access to copy the source code from the same place counts as
-distribution of the source code, even though third parties are not
-compelled to copy the source along with the object code.
-
-  4. You may not copy, modify, sublicense, or distribute the Program
-except as expressly provided under this License.  Any attempt
-otherwise to copy, modify, sublicense or distribute the Program is
-void, and will automatically terminate your rights under this License.
-However, parties who have received copies, or rights, from you under
-this License will not have their licenses terminated so long as such
-parties remain in full compliance.
 
-  5. You are not required to accept this License, since you have not
+The Corresponding Source for a work in source code form is that same
-signed it.  However, nothing else grants you permission to modify or
+work.
-distribute the Program or its derivative works.  These actions are
-prohibited by law if you do not accept this License.  Therefore, by
-modifying or distributing the Program (or any work based on the
-Program), you indicate your acceptance of this License to do so, and
-all its terms and conditions for copying, distributing or modifying
-the Program or works based on it.
 
-  6. Each time you redistribute the Program (or any work based on the
+#### 2. Basic Permissions.
-Program), the recipient automatically receives a license from the
+
-original licensor to copy, distribute or modify the Program subject to
+All rights granted under this License are granted for the term of
-these terms and conditions.  You may not impose any further
+copyright on the Program, and are irrevocable provided the stated
-restrictions on the recipients' exercise of the rights granted herein.
+conditions are met. This License explicitly affirms your unlimited
-You are not responsible for enforcing compliance by third parties to
+permission to run the unmodified Program. The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work. This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+You may make, run and propagate covered works that you do not convey,
+without conditions so long as your license otherwise remains in force.
+You may convey covered works to others for the sole purpose of having
+them make modifications exclusively for you, or provide you with
+facilities for running those works, provided that you comply with the
+terms of this License in conveying all material for which you do not
+control copyright. Those thus making or running the covered works for
+you must do so exclusively on your behalf, under your direction and
+control, on terms that prohibit them from making any copies of your
+copyrighted material outside their relationship with you.
+
+Conveying under any other circumstances is permitted solely under the
+conditions stated below. Sublicensing is not allowed; section 10 makes
+it unnecessary.
+
+#### 3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such
+circumvention is effected by exercising rights under this License with
+respect to the covered work, and you disclaim any intention to limit
+operation or modification of the work as a means of enforcing, against
+the work's users, your or third parties' legal rights to forbid
+circumvention of technological measures.
+
+#### 4. Conveying Verbatim Copies.
+
+You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+#### 5. Conveying Modified Source Versions.
+
+You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these
+conditions:
+
+-   a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+-   b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under
+    section 7. This requirement modifies the requirement in section 4
+    to "keep intact all notices".
+-   c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy. This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged. This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+-   d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit. Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+#### 6. Conveying Non-Source Forms.
+
+You may convey a covered work in object code form under the terms of
+sections 4 and 5, provided that you also convey the machine-readable
+Corresponding Source under the terms of this License, in one of these
+ways:
+
+-   a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+-   b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the Corresponding
+    Source from a network server at no charge.
+-   c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source. This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+-   d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge. You need not require recipients to copy the
+    Corresponding Source along with the object code. If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source. Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+-   e) Convey the object code using peer-to-peer transmission,
+    provided you inform other peers where the object code and
+    Corresponding Source of the work are being offered to the general
+    public at no charge under subsection 6d.
+
+A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal,
+family, or household purposes, or (2) anything designed or sold for
+incorporation into a dwelling. In determining whether a product is a
+consumer product, doubtful cases shall be resolved in favor of
+coverage. For a particular product received by a particular user,
+"normally used" refers to a typical or common use of that class of
+product, regardless of the status of the particular user or of the way
+in which the particular user actually uses, or expects or is expected
+to use, the product. A product is a consumer product regardless of
+whether the product has substantial commercial, industrial or
+non-consumer uses, unless such uses represent the only significant
+mode of use of the product.
+
+"Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to
+install and execute modified versions of a covered work in that User
+Product from a modified version of its Corresponding Source. The
+information must suffice to ensure that the continued functioning of
+the modified object code is in no case prevented or interfered with
+solely because modification has been made.
+
+If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information. But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or
+updates for a work that has been modified or installed by the
+recipient, or for the User Product in which it has been modified or
+installed. Access to a network may be denied when the modification
+itself materially and adversely affects the operation of the network
+or violates the rules and protocols for communication across the
+network.
+
+Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+#### 7. Additional Terms.
+
+"Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law. If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it. (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.) You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders
+of that material) supplement the terms of this License with terms:
+
+-   a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+-   b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+-   c) Prohibiting misrepresentation of the origin of that material,
+    or requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+-   d) Limiting the use for publicity purposes of names of licensors
+    or authors of the material; or
+-   e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+-   f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions
+    of it) with contractual assumptions of liability to the recipient,
+    for any liability that these contractual assumptions directly
+    impose on those licensors and authors.
+
+All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10. If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term. If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions; the
+above requirements apply either way.
+
+#### 8. Termination.
+
+You may not propagate or modify a covered work except as expressly
+provided under this License. Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+However, if you cease all violation of this License, then your license
+from a particular copyright holder is reinstated (a) provisionally,
+unless and until the copyright holder explicitly and finally
+terminates your license, and (b) permanently, if the copyright holder
+fails to notify you of the violation by some reasonable means prior to
+60 days after the cessation.
+
+Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License. If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+#### 9. Acceptance Not Required for Having Copies.
+
+You are not required to accept this License in order to receive or run
+a copy of the Program. Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance. However,
+nothing other than this License grants you permission to propagate or
+modify any covered work. These actions infringe copyright if you do
+not accept this License. Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+#### 10. Automatic Licensing of Downstream Recipients.
+
+Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License. You are not responsible
+for enforcing compliance by third parties with this License.
+
+An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations. If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License. For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+#### 11. Patents.
+
+A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based. The
+work thus licensed is called the contributor's "contributor version".
+
+A contributor's "essential patent claims" are all patent claims owned
+or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version. For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
 this License.
 
-  7. If, as a consequence of a court judgment or allegation of patent
+Each contributor grants you a non-exclusive, worldwide, royalty-free
-infringement or for any other reason (not limited to patent issues),
+patent license under the contributor's essential patent claims, to
-conditions are imposed on you (whether by court order, agreement or
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement). To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients. "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+A patent license is "discriminatory" if it does not include within the
+scope of its coverage, prohibits the exercise of, or is conditioned on
+the non-exercise of one or more of the rights that are specifically
+granted under this License. You may not convey a covered work if you
+are a party to an arrangement with a third party that is in the
+business of distributing software, under which you make payment to the
+third party based on the extent of your activity of conveying the
+work, and under which the third party grants, to any of the parties
+who would receive the covered work from you, a discriminatory patent
+license (a) in connection with copies of the covered work conveyed by
+you (or copies made from those copies), or (b) primarily for and in
+connection with specific products or compilations that contain the
+covered work, unless you entered into that arrangement, or that patent
+license was granted, prior to 28 March 2007.
+
+Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+#### 12. No Surrender of Others' Freedom.
+
+If conditions are imposed on you (whether by court order, agreement or
 otherwise) that contradict the conditions of this License, they do not
-excuse you from the conditions of this License.  If you cannot
+excuse you from the conditions of this License. If you cannot convey a
-distribute so as to satisfy simultaneously your obligations under this
+covered work so as to satisfy simultaneously your obligations under
-License and any other pertinent obligations, then as a consequence you
+this License and any other pertinent obligations, then as a
-may not distribute the Program at all.  For example, if a patent
+consequence you may not convey it at all. For example, if you agree to
-license would not permit royalty-free redistribution of the Program by
+terms that obligate you to collect a royalty for further conveying
-all those who receive copies directly or indirectly through you, then
+from those to whom you convey the Program, the only way you could
-the only way you could satisfy both it and this License would be to
+satisfy both those terms and this License would be to refrain entirely
-refrain entirely from distribution of the Program.
+from conveying the Program.
 
-If any portion of this section is held invalid or unenforceable under
+#### 13. Use with the GNU Affero General Public License.
-any particular circumstance, the balance of the section is intended to
-apply and the section as a whole is intended to apply in other
-circumstances.
 
-It is not the purpose of this section to induce you to infringe any
+Notwithstanding any other provision of this License, you have
-patents or other property right claims or to contest validity of any
+permission to link or combine any covered work with a work licensed
-such claims; this section has the sole purpose of protecting the
+under version 3 of the GNU Affero General Public License into a single
-integrity of the free software distribution system, which is
+combined work, and to convey the resulting work. The terms of this
-implemented by public license practices.  Many people have made
+License will continue to apply to the part which is the covered work,
-generous contributions to the wide range of software distributed
+but the special requirements of the GNU Affero General Public License,
-through that system in reliance on consistent application of that
+section 13, concerning interaction through a network will apply to the
-system; it is up to the author/donor to decide if he or she is willing
+combination as such.
-to distribute software through any other system and a licensee cannot
-impose that choice.
 
-This section is intended to make thoroughly clear what is believed to
+#### 14. Revised Versions of this License.
-be a consequence of the rest of this License.
-
-  8. If the distribution and/or use of the Program is restricted in
-certain countries either by patents or by copyrighted interfaces, the
-original copyright holder who places the Program under this License
-may add an explicit geographical distribution limitation excluding
-those countries, so that distribution is permitted only in or among
-countries not thus excluded.  In such case, this License incorporates
-the limitation as if written in the body of this License.
 
-  9. The Free Software Foundation may publish revised and/or new versions
+The Free Software Foundation may publish revised and/or new versions
-of the General Public License from time to time.  Such new versions will
+of the GNU General Public License from time to time. Such new versions
-be similar in spirit to the present version, but may differ in detail to
+will be similar in spirit to the present version, but may differ in
-address new problems or concerns.
+detail to address new problems or concerns.
 
 Each version is given a distinguishing version number. If the Program
-specifies a version number of this License which applies to it and "any
+specifies that a certain numbered version of the GNU General Public
-later version", you have the option of following the terms and conditions
+License "or any later version" applies to it, you have the option of
-either of that version or of any later version published by the Free
+following the terms and conditions either of that numbered version or
-Software Foundation.  If the Program does not specify a version number of
+of any later version published by the Free Software Foundation. If the
-this License, you may choose any version ever published by the Free Software
+Program does not specify a version number of the GNU General Public
-Foundation.
+License, you may choose any version ever published by the Free
+Software Foundation.
 
-  10. If you wish to incorporate parts of the Program into other free
+If the Program specifies that a proxy can decide which future versions
-programs whose distribution conditions are different, write to the author
+of the GNU General Public License can be used, that proxy's public
-to ask for permission.  For software which is copyrighted by the Free
+statement of acceptance of a version permanently authorizes you to
-Software Foundation, write to the Free Software Foundation; we sometimes
+choose that version for the Program.
-make exceptions for this.  Our decision will be guided by the two goals
-of preserving the free status of all derivatives of our free software and
-of promoting the sharing and reuse of software generally.
 
-			    NO WARRANTY
+Later license versions may give you additional or different
+permissions. However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
 
-  11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
+#### 15. Disclaimer of Warranty.
-FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW.  EXCEPT WHEN
-OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
-PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
-OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
-MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE.  THE ENTIRE RISK AS
-TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU.  SHOULD THE
-PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
-REPAIR OR CORRECTION.
 
-  12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
-WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
+APPLICABLE LAW. EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
-REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT
-INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
+WARRANTY OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT
-OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
+LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
-TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
+A PARTICULAR PURPOSE. THE ENTIRE RISK AS TO THE QUALITY AND
-YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
+PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE PROGRAM PROVE
-PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
+DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING, REPAIR OR
-POSSIBILITY OF SUCH DAMAGES.
+CORRECTION.
+
+#### 16. Limitation of Liability.
+
+IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR
+CONVEYS THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
+INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES
+ARISING OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT
+NOT LIMITED TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR
+LOSSES SUSTAINED BY YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM
+TO OPERATE WITH ANY OTHER PROGRAMS), EVEN IF SUCH HOLDER OR OTHER
+PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGES.
+
+#### 17. Interpretation of Sections 15 and 16.
+
+If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
 
 END OF TERMS AND CONDITIONS
-
+
-	    How to Apply These Terms to Your New Programs
+### How to Apply These Terms to Your New Programs
 
 If you develop a new program, and you want it to be of the greatest
 possible use to the public, the best way to achieve this is to make it
-free software which everyone can redistribute and change under these terms.
+free software which everyone can redistribute and change under these
+terms.
 
-  To do so, attach the following notices to the program.  It is safest
+To do so, attach the following notices to the program. It is safest to
-to attach them to the start of each source file to most effectively
+attach them to the start of each source file to most effectively state
-convey the exclusion of warranty; and each file should have at least
+the exclusion of warranty; and each file should have at least the
-the "copyright" line and a pointer to where the full notice is found.
+"copyright" line and a pointer to where the full notice is found.
 
         <one line to give the program's name and a brief idea of what it does.>
         Copyright (C) <year>  <name of author>
 
-    This program is free software; you can redistribute it and/or modify
+        This program is free software: you can redistribute it and/or modify
         it under the terms of the GNU General Public License as published by
-    the Free Software Foundation; either version 2 of the License, or
+        the Free Software Foundation, either version 3 of the License, or
         (at your option) any later version.
 
         This program is distributed in the hope that it will be useful,
@@ -304,39 +644,32 @@ the "copyright" line and a pointer to where the full notice is found.
         GNU General Public License for more details.
 
         You should have received a copy of the GNU General Public License
-    along with this program; if not, write to the Free Software
+        along with this program.  If not, see <https://www.gnu.org/licenses/>.
-    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
+Also add information on how to contact you by electronic and paper
+mail.
 
-Also add information on how to contact you by electronic and paper mail.
+If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
 
-If the program is interactive, make it output a short notice like this
+        <program>  Copyright (C) <year>  <name of author>
-when it starts in an interactive mode:
+        This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
-
-    Gnomovision version 69, Copyright (C) year name of author
-    Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
         This is free software, and you are welcome to redistribute it
         under certain conditions; type `show c' for details.
 
-The hypothetical commands `show w' and `show c' should show the appropriate
+The hypothetical commands \`show w' and \`show c' should show the
-parts of the General Public License.  Of course, the commands you use may
+appropriate parts of the General Public License. Of course, your
-be called something other than `show w' and `show c'; they could even be
+program's commands might be different; for a GUI interface, you would
-mouse-clicks or menu items--whatever suits your program.
+use an "about box".
 
-You should also get your employer (if you work as a programmer) or your
+You should also get your employer (if you work as a programmer) or
 school, if any, to sign a "copyright disclaimer" for the program, if
-necessary.  Here is a sample; alter the names:
+necessary. For more information on this, and how to apply and follow
-
+the GNU GPL, see <https://www.gnu.org/licenses/>.
-  Yoyodyne, Inc., hereby disclaims all copyright interest in the program
-  `Gnomovision' (which makes passes at compilers) written by James Hacker.
-
-  <signature of Ty Coon>, 1 April 1989
-  Ty Coon, President of Vice
-
-This General Public License does not permit incorporating your program into
-proprietary programs.  If your program is a subroutine library, you may
-consider it more useful to permit linking proprietary applications with the
-library.  If this is what you want to do, use the GNU Library General
-Public License instead of this License.
-
 
+The GNU General Public License does not permit incorporating your
+program into proprietary programs. If your program is a subroutine
+library, you may consider it more useful to permit linking proprietary
+applications with the library. If this is what you want to do, use the
+GNU Lesser General Public License instead of this License. But first,
+please read <https://www.gnu.org/licenses/why-not-lgpl.html>.

MAKEFILE

@@ -0,0 +1,52 @@
+all:
+	cd commande
+	make
+	cd ..
+
+	cd programs
+	make
+	cd ..
+
+	cd noyau
+	make
+	cd ..
+
+	cd contribs
+	make
+	cd ..
+
+	cd install
+	make
+	cd ..
+
+copy:
+	make all
+	copy commande\*.exe ..\data
+	copy programs\*.exe ..\data
+	copy programs\*.rip ..\data
+	copy noyau\*.sys ..\data
+	rem copy noyau\*.bin ..\data
+	copy contribs\*.exe ..\data
+	copy install\*.com ..\
+	make clean
+
+clean:
+	cd commande
+	make clean
+	cd ..
+
+	cd programs
+	make clean
+	cd ..
+
+	cd noyau
+	make clean
+	cd ..
+
+	cd contribs
+	make clean
+	cd ..
+
+	cd install
+	make clean
+	cd ..

commande/MAKEFILE

@@ -0,0 +1,17 @@
+lnk_boot = tlink /x
+asm= tasm /t/m5/zi
+lnk= tlink /x/t
+
+all: commande.exe
+
+commande.exe: commande.asm str0.asm
+	$(asm) commande
+	$(lnk) commande
+	ren commande.com commande.exe
+
+clean:
+  del *.obj
+  del *.exe
+  del *.com
+  del *.sys
+  del *.err

commande/asm.bat

@@ -1,54 +0,0 @@
-@echo off
-
-echo Assembling file %1... 
-..\util\tasm %1.asm /m5/x/t
-if errorlevel 1 goto end
-if "%1"=="boot" goto boot
-echo Linking file %1...
-..\util\tlink %1.obj /x/t
-if errorlevel 1 goto end
-echo Copying file %1...  
-if "%1"=="video" goto video
-if "%1"=="lpt" goto system
-if "%1"=="keyboard" goto system
-if "%1"=="mouse" goto system 
-if "%1"=="pic8259a" goto system 
-if "%1"=="timer" goto system
-if "%1"=="drive" goto system 
-if "%1"=="joystick" goto system 
-if "%1"=="system" goto system
-if "%1"=="setup" goto setup 
-copy %1.com ..\data\%1.exe>nul
-goto end   
-
-:boot
-echo Linking file %1...
-..\util\tlink %1.obj /x
-if errorlevel 1 goto end
-echo Copying file %1...
-..\util\exe2boot %1.exe
-copy %1.bin ..\data\%1.bin>nul 
-goto end
-
-:video
-type thin8x8.fnt>>%1.com
-:system
-copy %1.com ..\data\%1.sys>nul
-goto end
-:setup
-copy %1.com ..\%1.com>nul
-goto end
-
-:end
-if not exist *.bin goto exes
-del *.bin
-:exes
-if not exist *.exe goto coms
-del *.exe
-:coms
-if not exist *.com goto objs
-del *.com
-:objs  
-if not exist *.obj goto nobjs
-del *.obj
-:nobjs

commande/clean.bat

@@ -1,3 +0,0 @@
-@echo off
-echo nettoyage en cours...
-del ..\data\*.* >nul

commande/commande.asm

@@ -5,7 +5,24 @@ smart
 
 org 0100h
 
+include ..\include\fat.h
+
 start:
+	push    cs
+        push    cs
+        push    cs
+        push    cs
+        pop     ds
+        pop     es
+        pop     fs
+        pop     gs
+	  mov ah,21
+     mov cl,7
+     int 47h
+	mov	ah,3
+	int	48h
+	mov	ax,0002
+	int	47h
         mov     ah,2
         int     47h
         mov     ah,6
@@ -26,7 +43,12 @@ replay:
 noret:
         mov     ah,6
         int     47h
+	mov	ah,16
+	mov	di,offset dir
+	int	48h
+	mov	si,di    
         mov     ah,13
+	int	47h
         mov     si,offset prompt
         int     47h
         mov     di,offset buffer
@@ -125,7 +147,7 @@ noaddext:
         mov     di,offset vga
         mov     ah,40
         int     47h
-        mov     ax,6000h
+        mov     ax,9000h
         mov     es,ax
         push    ax
         mov     di,0100h
@@ -184,7 +206,7 @@ Code_Version:
         int     47h
         ret
         
-Version_Text db 'Cos 2000 version 2.0.1B by Nico',0
+Version_Text db 'Cos 2000 version 3.0.2Fr par Nico',0
         
 Code_Cls:
         mov     ah,2
@@ -222,6 +244,155 @@ Code_Mode:
         int     47h
         ret
 
+present db 'Le volume insere est nomme ',0
+present2 db ', Numero de serie : ',0
+nomdisque db 13 dup (0)
+Code_Dir:
+mov si,offset present
+mov ah,13
+int 47h
+mov ah,11
+mov di,offset nomdisque
+int 48h
+mov si,di
+mov ah,13
+int 47h
+mov si,offset present2
+mov ah,13
+int 47h
+mov ah,12
+int 48h
+mov ah,10
+mov cx,32
+int 47h
+mov ah,6
+int 47h
+mov ah,6
+int 47h
+xor ebp,ebp
+mov di,offset bufferentry
+mov si,di
+mov ah,7
+int 48h
+jc nofiles
+go:
+mov ah,46
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,44
+mov dx,[si+Entries.FileDateCrea]
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,45
+mov dx,[si+Entries.FileTimeCrea]
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,44
+mov dx,[si+Entries.FileDate]
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,45
+mov dx,[si+Entries.FileTime]
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,48
+mov edx,[si+Entries.FileSize]
+int 47h
+mov ah,05
+int 47h
+int 47h
+int 47h
+mov ah,47
+mov dl,[si+Entries.FileAttr]
+int 47h
+mov ah,6
+int 47h
+inc bp
+mov ah,8
+int 48h
+jnc go
+nofiles:
+mov edx,ebp
+mov ah,6
+int 47h
+mov ah,8
+int 47h
+mov si,offset filess
+mov ah,13
+int 47h
+ret
+bufferentry db 32 dup (0)
+filess db ' Fichier(s) au total',0
+
+changing db 'Changement de repertoire vers ',0
+code_cd:
+	mov     cx,0
+        call    gettypeditem0
+	push	si
+	mov	si,offset changing
+	mov	ah,13
+	int	47h
+	pop	si
+	int	47h
+	mov 	ah,6
+	int 	47h
+	mov	si,di
+	mov	ah,13
+	int	48h
+	jnc	okchange
+	mov	si,offset errorchanging
+	mov	ah,13
+	int	47h
+okchange:
+	ret
+errorchanging db 'Impossible d''atteindre ce dossier',0
+
+code_refresh:
+	mov 	ah,3
+	int 	48h
+	jnc	okrefresh
+	mov	si,offset errorrefreshing
+	mov	ah,13
+	int	47h
+ret
+okrefresh:
+mov si,offset present
+mov ah,13
+int 47h
+mov ah,11
+mov di,offset nomdisque
+int 48h
+mov si,di
+mov ah,13
+int 47h
+mov si,offset present2
+mov ah,13
+int 47h
+mov ah,12
+int 48h
+mov ah,10
+mov cx,32
+int 47h
+mov ah,6
+int 47h
+	ret
+errorrefreshing db 'Impossible de lire le support',0
+
 extcom db '.EXE',0
         
 commands      dw Str_Exit   ,Code_Exit   ,Syn_Exit   ,Help_Exit
@@ -230,36 +401,49 @@ commands      dw Str_Exit   ,Code_Exit   ,Syn_Exit   ,Help_Exit
               dw Str_Reboot ,Code_Reboot ,Syn_Reboot ,Help_Reboot
               dw Str_Command,Code_Command,Syn_Command,Help_Command   
               dw Str_Mode   ,Code_Mode   ,Syn_Mode   ,Help_Mode
+              dw Str_Dir   ,Code_Dir   ,Syn_Dir   ,Help_Dir
+              dw Str_refresh   ,Code_refresh   ,Syn_refresh   ,Help_refresh
+	      dw Str_cd   ,Code_cd   ,Syn_cd   ,Help_cd
               dw 0
       
-Str_Exit      db 'EXIT',0
+Str_Exit      db 'QUIT',0
-Str_Version   db 'VERSION',0
+Str_Version   db 'VERS',0
-Str_Cls       db 'CLS',0
+Str_Cls       db 'EFFAC',0
-Str_Reboot    db 'REBOOT',0
+Str_Reboot    db 'REDEM',0
-Str_Command   db 'COMMAND',0
+Str_Command   db 'CMDS',0
 Str_Mode      db 'MODE',0
+Str_Dir		db 'VOIR',0
+Str_refresh 	db 'LIRE',0
+Str_cd 		db 'CH',0
 Syn_Exit      db 0
 Syn_Version   db 0
 Syn_Cls       db 0
 Syn_Reboot    db 0
 Syn_Command   db 0
 Syn_Mode      db 'FFH',0
+Syn_Dir   db 0
+Syn_refresh   db 0
+Syn_cd   db '@',0
 Help_Exit     db 0
 Help_Version  db 0
 Help_Cls      db 0
 Help_Reboot   db 0
 Help_Command  db 0
 Help_Mode     db 0
-                                 
+Help_Dir     db 0  
-derror        db 'Syntax error',0
+Help_refresh     db 0   
-Error_Syntax  db 'Command or executable doesn''t exist ! F1 for ',0
+Help_cd     db 0                              
-prompt        db 'COS>',0
+derror        db 'Erreur de Syntaxe !',0
-msg           db 'Cos command interpretor V1.0',0
+Error_Syntax  db 'La commande ou l''executable n''existe pas ! F1 pour ',0
+prompt        db '>',0
+msg           db 'Interpreteur de commande COS V1.1',0
 
         include str0.asm
 
-buffer        equ $
+dir           equ $
-buffer2       equ $+256
+buffer        equ $+128
-vga           equ $+512
+buffer2       equ $+128+512
+vga           equ $+128+512+512
+
 
 end start

commande/debog.bat

@@ -1,2 +0,0 @@
-@echo off
-..\util\td %1

commande/str0.asm

@@ -1,7 +1,18 @@
 ;Librairie qui prend en charge le format de STR ASCIIZ
-;# nombre   9
+;# nombre   8
-;@ str      8
+;@ str      7
-;& file     7
+;& nom      6
+
+;High          Low
+;0 variable    4 hex
+;1 byte        3 dec
+;2 word        2 oct
+;3 3 octets    1 bin
+;4 dword       5 adresse
+;5 5 octets    6 nom
+;6 ...         7 str
+	;       8 nombre
+
 
 ;Renvoie carry si la syntaxe de ds:si n'est pas respect‚ par rapport a es:di
 CheckSyntax0:
@@ -214,36 +225,37 @@ testadress:
         mov     ax,0005h
         jmp     endofwhat
 testname:
-        call    str0isname
+        ;call    str0isname
-        jc      testvarstr
+        ;jc      testvarstr
-        mov     al,07h
+        ;jnc	isok
-        call    getlength0
+	;mov     al,06h
         cmp     byte ptr [si],'&'
-        jne     real
+        jne     testvarstr
-        mov     cl,0
+	mov     al,06h
-real:
+        call    getlength0
+	dec	cl
         mov     ah,cl
 	jmp     endofwhat
 testvarstr:       
         cmp     byte ptr [si],'@'
         jne     testnumber
-        mov     al,08h
+        mov     al,07h
         call    getlength0
+	dec	cl
         mov     ah,cl
         jmp     endofwhat 
 testnumber:
         cmp     byte ptr [si],'#'
         jne     isstr
-        call    getlength0
+	mov	al,8
-        cmp     cl,1
-        ja      isstr
-        mov     ax,0009h
-        jmp     endofwhat
-isstr:
-        mov     al,06h
         call    getlength0
         dec	cl
 	mov	ah,cl
+        jmp     endofwhat
+isstr:
+        mov     al,07h
+        call    getlength0
+        mov     ah,cl
 endofwhat:
         pop     edx cx bx 
         ret
@@ -288,7 +300,7 @@ itsdead:
         pop    di si ax
         ret
 
-non db '/<>|@#',01,0FFh
+non db '/<>|"?*:\',01,0FFh
 
 ;Renvoie non carry si le texte point‚ par si est de la base cl
 str0isbase:

commande/test.asm

@@ -0,0 +1,25 @@
+.model tiny
+.486
+smart
+.code
+
+org 0100h
+
+start:
+mov si,offset essai
+call whatis0
+
+
+	mov	si,offset pop1
+	mov	di,offset pop2
+	call	checksyntax0
+ret
+
+essai db '#',0
+pop1 db 'essai 0FFh',0
+pop2 db 'ESSAI 012H',0
+        include str0.asm
+
+
+
+end start

commande/write.bat

@@ -1,4 +0,0 @@
-@echo off
-cd ..
-setup
-cd sources

contribs/MAKEFILE

@@ -0,0 +1,20 @@
+lnk_boot = tlink /x
+asm= tasm /t/m5/zi
+lnk= tlink /x/t
+
+all: ex-tasm.exe ex-nasm.exe
+
+ex-tasm.exe: ex-tasm.asm
+	$(asm) ex-tasm
+	$(lnk) ex-tasm
+	ren ex-tasm.com ex-tasm.exe
+
+ex-nasm.exe: ex-nasm.asm
+	nasm ex-nasm.asm -o ex-nasm.exe
+
+clean:
+  del *.obj
+  del *.exe
+  del *.com
+  del *.sys
+  del *.err

contribs/ex-nasm.asm

@@ -0,0 +1,14 @@
+[bits 16]		        ;16 bits
+[org 0x0100]			;Point d'entré en 0100h
+section .text			;Segment de code				
+
+start:
+	mov	ah,0x0D		
+	mov	si,msg
+	int	0x47		;Afficher le texte (Showstring0)
+	xor	ax,ax
+	int	0x16		;Attendre l'appuie sur une touche
+	retf		 	;retour far
+
+msg db 'Hello World',0
+

contribs/ex-tasm.asm

@@ -0,0 +1,19 @@
+.model tiny			;model tiny (.com)
+.486				;Pour processeur 80486
+Smart				;Optimisations
+.code				;Segment de code
+
+org 0100h			;Point d'entré en 0100h
+
+start:
+	mov	ah,0Dh		
+	mov	si,offset msg
+	int	47h		;Afficher le texte (Showstring0)
+	xor	ax,ax
+	int	16h		;Attendre l'appuie sur une touche
+	db	0CBH            ;retour far
+
+msg db 'Hello World',0
+
+end start
+

include/bmp.h

@@ -0,0 +1,40 @@
+BMP_File         		struc
+BMP_FileType            db      'BM'
+BMP_FileSize            dd      ?       ; taille du fichier
+BMP_Reserved            dd      0       ; toujours 0
+BMP_BitMapOffset        dd      ?       ; offset de l'image
+BMP_HeaderSize          dd      ? ; taille de l'entete en octects
+BMP_Width               dd      ? ; largeur en pixels de l'image
+BMP_Height              dd      ? ; hauteur en pixels de l'image
+BMP_Planes              dw      1 ; nombre de plan utilisés
+BMP_BitsPerPixel        dw      ? ; nombre de bits par pixels
+BMP_Compression         dd      ? ; méthode de compression 
+BMP_SizeOfBitMap        dd      ? ; taille de l'image en octects
+BMP_HorzResolution      dd      ? ; resolution horizontale en pixels par mètre
+BMP_VertResolution      dd      ? ; resolution verticale en pixels  par mètre
+BMP_ColorsUsed          dd      ? ; nombre de couleur dans la palette  si 0: palette entière si BitPerPixel<=8
+BMP_ColorsImportant     dd      ? ; nombre de couleurs importantes masques pour les modes de plus de 8 bits par pixels
+BMP_RedMask             dd      ?
+BMP_GreenMask           dd      ?
+BMP_BlueMask            dd      ?
+BMP_AlphaMask           dd      ?
+BMP_ColorSpaceType      dd      ?
+BMP_RedX                dd      ?
+BMP_RedY                dd      ?
+BMP_RedZ                dd      ?
+BMP_GreenX              dd      ?
+BMP_GreenY              dd      ?
+BMP_GreenZ              dd      ?
+BMP_BlueX               dd      ?
+BMP_BlueY               dd      ?
+BMP_BlueZ               dd      ?
+BMP_GammaRed            dd      ?
+BMP_GammaGreen          dd      ?
+BMP_GammeBlue           dd      ?
+BMP_file       		ends
+
+;BMP_Compression peut prendre les valeurs suivantes: 
+BMP_COMP_UNCOMP         equ     0       ; pas de compression
+BMP_COMP_RLE8           equ     1       ; 8-bit run length encoding
+BMP_COMP_RLE4           equ     2       ; 4-bit tun length encoding
+BMP_COMP_BFE            equ     3       ; bitfields encoding

include/fat.h

@@ -0,0 +1,58 @@
+Free  equ 0
+True 	equ 1
+False equ 0
+
+DPT struc    
+StepRate&HeadUnload db 0DFh ;Vitesse de progression & mont‚e de la tˆte
+DMAFlag&HeadLoad    db 002h ;Etat Dma et temps de descente de la tˆte
+DelayMotorOff       db 025h ;Temps avant extinction moteur
+BytePerSector       db 002h ;Taille des secteurs
+SectorPerTracks     db 000h ;Nombre de secteur par piste
+InterSectGapLength  db 01Bh ;Taille du GAP3 en lecture/‚criture
+DataLength          db 0FFh ;Longueur du transfert de donn‚es
+InterSectGapLengthF db 054h ;Taille du GAP3 en formatage
+FormatByte          db 0F6h ;Octet de formatage
+HeadSettlingTime    db 000h ;Temps de repos des tˆtes
+DelayMotorNormSpeed db 008h ;Temps de mont‚e en vitesse du moteur
+DPT ends  
+
+Entries Struc
+FileName 	db 8 dup (0)
+FilExt  	db 3 dup (0)
+FileAttr	db 0
+FileReserved 	db 0
+FileTimeCreaMs  db 0 ;(*10 ms)
+FileTimeCrea	dw 0
+FileDateCrea	dw 0
+FileDateAcc	dw 0
+FileNotused	dw 0
+FileTime	dw 0
+FileDate	dw 0
+FileGroup	dw 0
+FileSize	dd 0
+Entries Ends
+
+BootSector Struc
+jumper			db 0,0,0
+Vendor  	      db     'COS2000A'                ;Fabricant + n°série Formatage
+SectorSize        dw      512                      ;octet/secteur
+SectorsPerCluster db      1                        ;secteur/cluster
+ReservedSectors   dw      1                        ;secteur reserv‚
+FatsPerDrive      db      2                        ;nb de copie de la FAT
+DirectorySize     dw      224                      ;taille rep racine
+SectorsPerDrive   dw      2880                     ;nb secteur du volume si < 32 még
+MédiaDescriptor   db      0F0h                     ;Descripteur de média
+SectorsPerFat     dw      9                        ;secteur/FAT
+SectorsPerTrack   dw      18                       ;secteur/piste       
+HeadsPerDrive     dw      2                        ;nb de tˆteb de lecture/écriture
+HiddenSectorsH    dw      0                        ;nombre de secteur cach‚s
+HiddenSectorsL	dw	  0				   ;
+SectorPerDisk2    dd      0                        ;Nombre secteur du volume si > 32 Mo+20h                                        ; the number of sectors
+BootDrive 	      db      0                        ;Lecteur de d‚marrage
+ReservedForNT     db      0                        ;NA
+BootSign 	      db      29h                      ;boot signature 29h
+SerialNumber      dd      01020304h                ;no de serie
+DriveName         db      'COS2000    '            ;nom de volume
+TypeOffAt         db      'FAT16   '               ;FAT
+bootcode          db 453 dup (0)
+BootSector ends

include/pci.h

@@ -0,0 +1,19 @@
+pci Struc
+vendor		dw 0	;vendor ID (read-only), FFFFh returned if requested device non-existent
+device		dw 0	;device ID (read-only)
+command		dw 0	;command register
+status		dw 0	;status register
+revision 	db 0	;revision ID
+interface	db 0	;programming interface
+subclass	db 0	;sub-class
+class		db 0	;class code
+cache		db 0	;cache line size
+timer		db 0	;latency timer
+typed		db 0	;header type
+			;bits 6-0: header format
+			;00h other
+			;01h PCI-to-PCI bridge
+			;02h PCI-to-CardBus bridge
+			;bit 7: multi-function device
+result		db 0	;Built-In Self-Test result
+pci Ends

include/pol8x16.inc

@@ -0,0 +1,256 @@
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Eh, 081h, 0A5h, 081h, 081h, 0BDh, 099h, 081h, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Eh, 0FFh, 0DBh, 0FFh, 0FFh, 0C3h, 0E7h, 0FFh, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 036h, 07Fh, 07Fh, 07Fh, 07Fh, 03Eh, 01Ch, 008h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 008h, 01Ch, 03Eh, 07Fh, 03Eh, 01Ch, 008h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 03Ch, 03Ch, 0E7h, 0E7h, 0E7h, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 03Ch, 07Eh, 0FFh, 0FFh, 07Eh, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 018h, 03Ch, 03Ch, 018h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0E7h, 0C3h, 0C3h, 0E7h, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Ch, 066h, 042h, 042h, 066h, 03Ch, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 0FFh, 0FFh, 0FFh, 0FFh, 0C3h, 099h, 0BDh, 0BDh, 099h, 0C3h, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h
+	DB 000h, 000h, 00Fh, 007h, 00Dh, 019h, 03Ch, 066h, 066h, 066h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 03Ch, 066h, 066h, 066h, 03Ch, 018h, 07Eh, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 03Fh, 033h, 03Fh, 030h, 030h, 030h, 070h, 0F0h, 0E0h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Fh, 063h, 07Fh, 063h, 063h, 063h, 067h, 0E7h, 0E6h, 0C0h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 0DBh, 03Ch, 0E7h, 03Ch, 0DBh, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 040h, 060h, 070h, 07Ch, 07Fh, 07Ch, 070h, 060h, 040h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 001h, 003h, 007h, 01Fh, 07Fh, 01Fh, 007h, 003h, 001h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 03Ch, 07Eh, 018h, 018h, 018h, 07Eh, 03Ch, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 033h, 033h, 033h, 033h, 033h, 033h, 000h, 033h, 033h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Fh, 0DBh, 0DBh, 0DBh, 07Bh, 01Bh, 01Bh, 01Bh, 01Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 03Eh, 063h, 030h, 01Ch, 036h, 063h, 063h, 036h, 01Ch, 006h, 063h, 03Eh, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 07Fh, 07Fh, 07Fh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 03Ch, 07Eh, 018h, 018h, 018h, 07Eh, 03Ch, 018h, 07Eh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 03Ch, 07Eh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 018h, 018h, 018h, 018h, 07Eh, 03Ch, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 00Ch, 006h, 07Fh, 006h, 00Ch, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 018h, 030h, 07Fh, 030h, 018h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 060h, 060h, 060h, 07Fh, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 024h, 066h, 0FFh, 066h, 024h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 008h, 01Ch, 01Ch, 03Eh, 03Eh, 07Fh, 07Fh, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 07Fh, 07Fh, 03Eh, 03Eh, 01Ch, 01Ch, 008h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 000h, 000h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 024h, 024h, 024h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 042h, 042h, 042h, 0FFh, 042h, 042h, 042h, 0FFh, 042h, 042h, 042h, 000h, 000h, 000h, 000h
+	DB 000h, 010h, 07Eh, 090h, 090h, 090h, 07Ch, 012h, 012h, 012h, 0FCh, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 061h, 091h, 092h, 064h, 008h, 010h, 026h, 049h, 089h, 086h, 000h, 000h, 000h, 000h
+	DB 000h, 070h, 088h, 088h, 088h, 050h, 060h, 091h, 08Ah, 084h, 04Ah, 031h, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 018h, 010h, 020h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 006h, 018h, 020h, 040h, 040h, 040h, 040h, 040h, 020h, 018h, 006h, 000h, 000h, 000h, 000h
+	DB 000h, 060h, 018h, 004h, 002h, 002h, 002h, 002h, 002h, 004h, 018h, 060h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 010h, 092h, 054h, 038h, 0FEh, 038h, 054h, 092h, 010h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 010h, 010h, 010h, 0FEh, 010h, 010h, 010h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 018h, 018h, 010h, 020h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 0FEh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 001h, 001h, 002h, 004h, 008h, 010h, 020h, 040h, 080h, 080h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 083h, 085h, 089h, 091h, 0A1h, 0C1h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 010h, 030h, 050h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 07Ch, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 001h, 002h, 03Ch, 040h, 080h, 080h, 080h, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 001h, 002h, 03Ch, 002h, 001h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 002h, 006h, 00Ah, 012h, 022h, 042h, 082h, 0FFh, 002h, 002h, 002h, 000h, 000h, 000h, 000h
+	DB 000h, 0FFh, 080h, 080h, 080h, 0FCh, 002h, 001h, 001h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 080h, 0BCh, 0C2h, 081h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 0FFh, 081h, 001h, 002h, 004h, 008h, 010h, 010h, 010h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 042h, 03Ch, 042h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 043h, 03Dh, 001h, 001h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 018h, 018h, 010h, 020h, 000h, 000h
+	DB 000h, 002h, 004h, 008h, 010h, 020h, 040h, 020h, 010h, 008h, 004h, 002h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 0FEh, 000h, 000h, 000h, 0FEh, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 040h, 020h, 010h, 008h, 004h, 002h, 004h, 008h, 010h, 020h, 040h, 000h, 000h, 000h, 000h
+	DB 000h, 038h, 044h, 082h, 082h, 004h, 008h, 010h, 010h, 000h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 099h, 0A5h, 0A5h, 0A5h, 09Eh, 080h, 041h, 03Eh, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 024h, 042h, 081h, 081h, 0FFh, 081h, 081h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 0FCh, 042h, 041h, 041h, 042h, 07Ch, 042h, 041h, 041h, 042h, 0FCh, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 080h, 080h, 080h, 080h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 0FCh, 042h, 041h, 041h, 041h, 041h, 041h, 041h, 041h, 042h, 0FCh, 000h, 000h, 000h, 000h
+	DB 000h, 0FFh, 080h, 080h, 080h, 080h, 0FCh, 080h, 080h, 080h, 080h, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 0FFh, 080h, 080h, 080h, 080h, 0FCh, 080h, 080h, 080h, 080h, 080h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 080h, 09Fh, 081h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 081h, 081h, 081h, 081h, 0FFh, 081h, 081h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 038h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 038h, 000h, 000h, 000h, 000h
+	DB 000h, 007h, 002h, 002h, 002h, 002h, 002h, 002h, 082h, 082h, 044h, 038h, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 082h, 084h, 088h, 090h, 0E0h, 090h, 088h, 084h, 082h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 080h, 080h, 080h, 080h, 080h, 080h, 080h, 080h, 080h, 080h, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 0C3h, 0A5h, 099h, 099h, 081h, 081h, 081h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 0C1h, 0A1h, 091h, 089h, 085h, 083h, 081h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 081h, 081h, 081h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 0FCh, 082h, 081h, 081h, 082h, 0FCh, 080h, 080h, 080h, 080h, 080h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 081h, 081h, 081h, 081h, 089h, 085h, 042h, 03Dh, 000h, 000h, 000h, 000h
+	DB 000h, 0FCh, 082h, 081h, 081h, 082h, 0FCh, 090h, 088h, 084h, 082h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 042h, 081h, 080h, 040h, 03Ch, 002h, 001h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 0FEh, 092h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 081h, 081h, 081h, 081h, 081h, 081h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 081h, 081h, 081h, 081h, 042h, 042h, 024h, 024h, 018h, 018h, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 081h, 081h, 081h, 081h, 081h, 099h, 099h, 0A5h, 0A5h, 042h, 000h, 000h, 000h, 000h
+	DB 000h, 081h, 081h, 081h, 042h, 024h, 018h, 024h, 042h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 082h, 082h, 082h, 082h, 044h, 028h, 010h, 010h, 010h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 0FFh, 001h, 001h, 002h, 004h, 018h, 020h, 040h, 080h, 080h, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 07Eh, 040h, 040h, 040h, 040h, 040h, 040h, 040h, 040h, 040h, 07Eh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 080h, 080h, 040h, 020h, 010h, 008h, 004h, 002h, 001h, 001h, 000h, 000h, 000h, 000h
+	DB 000h, 07Eh, 002h, 002h, 002h, 002h, 002h, 002h, 002h, 002h, 002h, 07Eh, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 024h, 042h, 081h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 000h, 000h
+	DB 000h, 008h, 004h, 002h, 001h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 07Ch, 002h, 002h, 07Eh, 082h, 082h, 07Dh, 000h, 000h, 000h, 000h
+	DB 000h, 080h, 080h, 080h, 080h, 0BCh, 0C2h, 081h, 081h, 081h, 0C2h, 0BCh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Ch, 042h, 080h, 080h, 080h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 001h, 001h, 001h, 001h, 03Dh, 043h, 081h, 081h, 081h, 043h, 03Dh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Ch, 042h, 081h, 0FFh, 080h, 040h, 03Eh, 000h, 000h, 000h, 000h
+	DB 000h, 00Eh, 011h, 010h, 010h, 0FEh, 010h, 010h, 010h, 010h, 010h, 010h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Dh, 043h, 081h, 081h, 043h, 03Dh, 001h, 002h, 07Ch, 000h, 000h
+	DB 000h, 080h, 080h, 080h, 080h, 0BCh, 0C2h, 081h, 081h, 081h, 081h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 008h, 008h, 000h, 038h, 008h, 008h, 008h, 008h, 008h, 03Eh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 002h, 002h, 000h, 006h, 002h, 002h, 002h, 002h, 002h, 082h, 044h, 038h, 000h, 000h
+	DB 000h, 080h, 080h, 080h, 080h, 082h, 084h, 088h, 090h, 0A8h, 0C4h, 082h, 000h, 000h, 000h, 000h
+	DB 038h, 008h, 008h, 008h, 008h, 008h, 008h, 008h, 008h, 008h, 008h, 03Eh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0ECh, 092h, 092h, 092h, 092h, 092h, 092h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0B8h, 0C4h, 082h, 082h, 082h, 082h, 082h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Ch, 042h, 081h, 081h, 081h, 042h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0BCh, 0C2h, 081h, 081h, 081h, 0C2h, 0BCh, 080h, 080h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Dh, 043h, 081h, 081h, 081h, 043h, 03Dh, 001h, 001h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0BEh, 0C1h, 080h, 080h, 080h, 080h, 080h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 07Eh, 081h, 080h, 07Eh, 001h, 081h, 07Eh, 000h, 000h, 000h, 000h
+	DB 010h, 010h, 010h, 010h, 010h, 0FEh, 010h, 010h, 010h, 010h, 011h, 00Eh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 081h, 081h, 081h, 081h, 081h, 043h, 03Dh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 081h, 081h, 081h, 081h, 042h, 024h, 018h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 082h, 082h, 092h, 092h, 092h, 0AAh, 044h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 081h, 042h, 024h, 018h, 024h, 042h, 081h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 081h, 081h, 081h, 081h, 043h, 03Dh, 001h, 002h, 07Ch, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0FFh, 002h, 004h, 018h, 020h, 040h, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 004h, 008h, 010h, 010h, 010h, 020h, 010h, 010h, 010h, 008h, 004h, 000h, 000h, 000h, 000h
+	DB 000h, 010h, 010h, 010h, 010h, 000h, 000h, 010h, 010h, 010h, 010h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 040h, 020h, 010h, 010h, 010h, 008h, 010h, 010h, 010h, 020h, 040h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 070h, 099h, 00Eh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 008h, 01Ch, 036h, 063h, 063h, 07Fh, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Eh, 033h, 061h, 060h, 060h, 061h, 033h, 01Eh, 006h, 003h, 03Eh, 000h, 000h, 000h
+	DB 000h, 000h, 066h, 066h, 000h, 066h, 066h, 066h, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 006h, 00Ch, 018h, 000h, 03Eh, 063h, 07Fh, 060h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 008h, 01Ch, 036h, 000h, 03Ch, 006h, 03Eh, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 066h, 066h, 000h, 03Ch, 006h, 03Eh, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 030h, 018h, 00Ch, 000h, 03Ch, 006h, 03Eh, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 01Ch, 036h, 01Ch, 000h, 03Ch, 006h, 03Eh, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Ch, 066h, 060h, 066h, 03Ch, 00Ch, 006h, 03Ch, 000h, 000h, 000h, 000h
+	DB 000h, 008h, 01Ch, 036h, 000h, 03Eh, 063h, 07Fh, 060h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 066h, 066h, 000h, 03Eh, 063h, 07Fh, 060h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 030h, 018h, 00Ch, 000h, 03Eh, 063h, 07Fh, 060h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 066h, 066h, 000h, 038h, 018h, 018h, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 03Ch, 066h, 000h, 038h, 018h, 018h, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 060h, 030h, 018h, 000h, 038h, 018h, 018h, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 063h, 063h, 008h, 01Ch, 036h, 063h, 063h, 07Fh, 063h, 063h, 000h, 000h, 000h, 000h, 000h
+	DB 01Ch, 036h, 01Ch, 000h, 01Ch, 036h, 063h, 063h, 07Fh, 063h, 063h, 000h, 000h, 000h, 000h, 000h
+	DB 00Ch, 018h, 030h, 000h, 07Fh, 033h, 030h, 03Eh, 030h, 033h, 07Fh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 06Eh, 03Bh, 01Bh, 07Eh, 0D8h, 0DCh, 077h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Fh, 036h, 066h, 066h, 07Fh, 066h, 066h, 066h, 067h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 008h, 01Ch, 036h, 000h, 03Eh, 063h, 063h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 063h, 063h, 000h, 03Eh, 063h, 063h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 030h, 018h, 00Ch, 000h, 03Eh, 063h, 063h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 03Ch, 066h, 000h, 066h, 066h, 066h, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 030h, 018h, 00Ch, 000h, 066h, 066h, 066h, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 063h, 063h, 000h, 063h, 063h, 063h, 063h, 03Fh, 003h, 006h, 03Ch, 000h, 000h, 000h
+	DB 000h, 063h, 063h, 01Ch, 036h, 063h, 063h, 063h, 063h, 036h, 01Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 063h, 063h, 000h, 063h, 063h, 063h, 063h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 018h, 018h, 07Eh, 0C3h, 0C0h, 0C0h, 0C3h, 07Eh, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 01Ch, 036h, 032h, 030h, 078h, 030h, 030h, 030h, 073h, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 0C3h, 066h, 03Ch, 018h, 0FFh, 018h, 0FFh, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 0FCh, 066h, 066h, 07Ch, 062h, 066h, 06Fh, 066h, 066h, 0F3h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 00Eh, 01Bh, 018h, 018h, 018h, 07Eh, 018h, 018h, 018h, 018h, 0D8h, 070h, 000h, 000h, 000h
+	DB 000h, 00Ch, 018h, 030h, 000h, 03Ch, 006h, 03Eh, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 00Ch, 018h, 030h, 000h, 038h, 018h, 018h, 018h, 018h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 00Ch, 018h, 030h, 000h, 03Eh, 063h, 063h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 00Ch, 018h, 030h, 000h, 066h, 066h, 066h, 066h, 066h, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 03Bh, 06Eh, 000h, 06Eh, 033h, 033h, 033h, 033h, 033h, 000h, 000h, 000h, 000h, 000h
+	DB 03Bh, 06Eh, 000h, 063h, 073h, 07Bh, 07Fh, 06Fh, 067h, 063h, 063h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 03Ch, 06Ch, 06Ch, 03Eh, 000h, 07Eh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 038h, 06Ch, 06Ch, 038h, 000h, 07Ch, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 000h, 018h, 018h, 030h, 063h, 063h, 03Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 07Fh, 060h, 060h, 060h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 07Fh, 003h, 003h, 003h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 060h, 0E0h, 063h, 066h, 06Ch, 018h, 030h, 06Eh, 0C3h, 006h, 00Ch, 01Fh, 000h, 000h, 000h
+	DB 000h, 060h, 0E0h, 063h, 066h, 06Ch, 018h, 033h, 067h, 0CFh, 01Fh, 003h, 003h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 000h, 018h, 018h, 03Ch, 03Ch, 03Ch, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 01Bh, 036h, 06Ch, 036h, 01Bh, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 06Ch, 036h, 01Bh, 036h, 06Ch, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 011h, 044h, 011h, 044h, 011h, 044h, 011h, 044h, 011h, 044h, 011h, 044h, 011h, 044h, 000h, 000h
+	DB 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 000h, 000h
+	DB 0DDh, 077h, 0DDh, 077h, 0DDh, 077h, 0DDh, 077h, 0DDh, 077h, 0DDh, 077h, 0DDh, 077h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 0F8h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 0F8h, 018h, 0F8h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 0F6h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FEh, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0F8h, 018h, 0F8h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 0F6h, 006h, 0F6h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0FEh, 006h, 0F6h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 0F6h, 006h, 0FEh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 0FEh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 0F8h, 018h, 0F8h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0F8h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 01Fh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 01Fh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 0FFh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 01Fh, 018h, 01Fh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 037h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 037h, 030h, 03Fh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Fh, 030h, 037h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 0F7h, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 0F7h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 037h, 030h, 037h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 0F7h, 000h, 0F7h, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 0FFh, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 0FFh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 03Fh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 01Fh, 018h, 01Fh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 01Fh, 018h, 01Fh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 03Fh, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 036h, 036h, 036h, 036h, 036h, 036h, 036h, 0FFh, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 0FFh, 018h, 0FFh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 0F8h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 01Fh, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h
+	DB 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 0F0h, 000h, 000h
+	DB 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 00Fh, 000h, 000h
+	DB 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Bh, 06Eh, 06Ch, 06Ch, 06Eh, 03Bh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Eh, 063h, 07Eh, 063h, 063h, 07Eh, 060h, 060h, 020h, 000h, 000h, 000h
+	DB 000h, 000h, 07Fh, 063h, 063h, 060h, 060h, 060h, 060h, 060h, 060h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 07Fh, 036h, 036h, 036h, 036h, 036h, 036h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Fh, 063h, 030h, 018h, 00Ch, 018h, 030h, 063h, 07Fh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 03Fh, 06Ch, 06Ch, 06Ch, 06Ch, 038h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 033h, 033h, 033h, 033h, 03Eh, 030h, 030h, 060h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Bh, 06Eh, 00Ch, 00Ch, 00Ch, 00Ch, 00Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 07Eh, 018h, 03Ch, 066h, 066h, 066h, 03Ch, 018h, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Ch, 036h, 063h, 063h, 07Fh, 063h, 063h, 036h, 01Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Ch, 036h, 063h, 063h, 063h, 036h, 036h, 036h, 077h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Eh, 030h, 018h, 00Ch, 03Eh, 066h, 066h, 066h, 03Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 07Eh, 0DBh, 0DBh, 07Eh, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 003h, 006h, 07Eh, 0DBh, 0DBh, 0F3h, 07Eh, 060h, 0C0h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 01Ch, 030h, 060h, 060h, 07Ch, 060h, 060h, 030h, 01Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 03Eh, 063h, 063h, 063h, 063h, 063h, 063h, 063h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 07Fh, 000h, 000h, 07Fh, 000h, 000h, 07Fh, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 018h, 0FFh, 018h, 018h, 018h, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 030h, 018h, 00Ch, 006h, 00Ch, 018h, 030h, 000h, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 00Ch, 018h, 030h, 060h, 030h, 018h, 00Ch, 000h, 07Eh, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 00Eh, 01Bh, 01Bh, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 000h, 000h
+	DB 018h, 018h, 018h, 018h, 018h, 018h, 018h, 018h, 0D8h, 0D8h, 070h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 018h, 018h, 000h, 000h, 0FFh, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Bh, 06Eh, 000h, 03Bh, 06Eh, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 038h, 06Ch, 06Ch, 038h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 018h, 018h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 018h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 00Fh, 00Ch, 00Ch, 00Ch, 00Ch, 00Ch, 0ECh, 06Ch, 03Ch, 01Ch, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 0D8h, 06Ch, 06Ch, 06Ch, 06Ch, 06Ch, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 070h, 0D8h, 030h, 060h, 0C8h, 0F8h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 03Eh, 03Eh, 03Eh, 03Eh, 03Eh, 03Eh, 000h, 000h, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h

include/pol8x8.inc

@@ -0,0 +1,128 @@
+ 	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 07Eh, 081h, 0A5h, 081h, 0BDh, 099h, 081h, 07Eh
+	DB 07Eh, 0FFh, 0DBh, 0FFh, 0C3h, 0E7h, 0FFh, 07Eh, 06Ch, 0FEh, 0FEh, 0FEh, 07Ch, 038h, 010h, 000h
+	DB 010h, 038h, 07Ch, 0FEh, 07Ch, 038h, 010h, 000h, 038h, 07Ch, 038h, 0FEh, 0FEh, 07Ch, 038h, 07Ch
+	DB 010h, 010h, 038h, 07Ch, 0FEh, 07Ch, 038h, 07Ch, 000h, 000h, 018h, 03Ch, 03Ch, 018h, 000h, 000h
+	DB 0FFh, 0FFh, 0E7h, 0C3h, 0C3h, 0E7h, 0FFh, 0FFh, 000h, 03Ch, 066h, 042h, 042h, 066h, 03Ch, 000h
+	DB 0FFh, 0C3h, 099h, 0BDh, 0BDh, 099h, 0C3h, 0FFh, 00Fh, 007h, 00Fh, 07Dh, 0CCh, 0CCh, 0CCh, 078h
+	DB 03Ch, 066h, 066h, 066h, 03Ch, 018h, 07Eh, 018h, 03Fh, 033h, 03Fh, 030h, 030h, 070h, 0F0h, 0E0h
+	DB 07Fh, 063h, 07Fh, 063h, 063h, 067h, 0E6h, 0C0h, 099h, 05Ah, 03Ch, 0E7h, 0E7h, 03Ch, 05Ah, 099h
+	DB 080h, 0E0h, 0F8h, 0FEh, 0F8h, 0E0h, 080h, 000h, 002h, 00Eh, 03Eh, 0FEh, 03Eh, 00Eh, 002h, 000h
+	DB 018h, 03Ch, 07Eh, 018h, 018h, 07Eh, 03Ch, 018h, 066h, 066h, 066h, 066h, 066h, 000h, 066h, 000h
+	DB 07Fh, 0DBh, 0DBh, 07Bh, 01Bh, 01Bh, 01Bh, 000h, 03Eh, 063h, 038h, 06Ch, 06Ch, 038h, 0CCh, 078h
+	DB 000h, 000h, 000h, 000h, 07Eh, 07Eh, 07Eh, 000h, 018h, 03Ch, 07Eh, 018h, 07Eh, 03Ch, 018h, 0FFh
+	DB 018h, 03Ch, 07Eh, 018h, 018h, 018h, 018h, 000h, 018h, 018h, 018h, 018h, 07Eh, 03Ch, 018h, 000h
+	DB 000h, 018h, 00Ch, 0FEh, 00Ch, 018h, 000h, 000h, 000h, 030h, 060h, 0FEh, 060h, 030h, 000h, 000h
+	DB 000h, 000h, 0C0h, 0C0h, 0C0h, 0FEh, 000h, 000h, 000h, 024h, 066h, 0FFh, 066h, 024h, 000h, 000h
+	DB 000h, 018h, 03Ch, 07Eh, 0FFh, 0FFh, 000h, 000h, 000h, 0FFh, 0FFh, 07Eh, 03Ch, 018h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 040h, 040h, 040h, 040h, 040h, 000h, 040h, 000h
+	DB 090h, 090h, 000h, 000h, 000h, 000h, 000h, 000h, 050h, 050h, 0F8h, 050h, 0F8h, 050h, 050h, 000h
+	DB 020h, 078h, 0A0h, 070h, 028h, 0F0h, 020h, 000h, 0C8h, 0C8h, 010h, 020h, 040h, 098h, 098h, 000h
+	DB 070h, 088h, 050h, 020h, 054h, 088h, 074h, 000h, 060h, 020h, 040h, 000h, 000h, 000h, 000h, 000h
+	DB 020h, 040h, 080h, 080h, 080h, 040h, 020h, 000h, 020h, 010h, 008h, 008h, 008h, 010h, 020h, 000h
+	DB 000h, 020h, 0A8h, 070h, 070h, 0A8h, 020h, 000h, 000h, 000h, 020h, 020h, 0F8h, 020h, 020h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 060h, 020h, 040h, 000h, 000h, 000h, 000h, 0F8h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 000h, 060h, 060h, 000h, 002h, 004h, 008h, 010h, 020h, 040h, 080h, 000h
+	DB 070h, 088h, 098h, 0A8h, 0C8h, 088h, 070h, 000h, 040h, 0C0h, 040h, 040h, 040h, 040h, 0E0h, 000h
+	DB 070h, 088h, 008h, 010h, 020h, 040h, 0F8h, 000h, 070h, 088h, 008h, 010h, 008h, 088h, 070h, 000h
+	DB 008h, 018h, 028h, 048h, 0FCh, 008h, 008h, 000h, 0F8h, 080h, 080h, 0F0h, 008h, 088h, 070h, 000h
+	DB 020h, 040h, 080h, 0F0h, 088h, 088h, 070h, 000h, 0F8h, 008h, 010h, 020h, 040h, 040h, 040h, 000h
+	DB 070h, 088h, 088h, 070h, 088h, 088h, 070h, 000h, 070h, 088h, 088h, 078h, 008h, 008h, 070h, 000h
+	DB 000h, 000h, 060h, 060h, 000h, 060h, 060h, 000h, 000h, 000h, 060h, 060h, 000h, 060h, 060h, 020h
+	DB 010h, 020h, 040h, 080h, 040h, 020h, 010h, 000h, 000h, 000h, 0F8h, 000h, 0F8h, 000h, 000h, 000h
+	DB 080h, 040h, 020h, 010h, 020h, 040h, 080h, 000h, 078h, 084h, 004h, 008h, 010h, 000h, 010h, 000h
+	DB 070h, 088h, 088h, 0A8h, 0B8h, 080h, 078h, 000h, 020h, 050h, 088h, 088h, 0F8h, 088h, 088h, 000h
+	DB 0F0h, 088h, 088h, 0F0h, 088h, 088h, 0F0h, 000h, 070h, 088h, 080h, 080h, 080h, 088h, 070h, 000h
+	DB 0F0h, 088h, 088h, 088h, 088h, 088h, 0F0h, 000h, 0F8h, 080h, 080h, 0E0h, 080h, 080h, 0F8h, 000h
+	DB 0F8h, 080h, 080h, 0E0h, 080h, 080h, 080h, 000h, 070h, 088h, 080h, 080h, 098h, 088h, 078h, 000h
+	DB 088h, 088h, 088h, 0F8h, 088h, 088h, 088h, 000h, 0E0h, 040h, 040h, 040h, 040h, 040h, 0E0h, 000h
+	DB 038h, 010h, 010h, 010h, 010h, 090h, 060h, 000h, 088h, 090h, 0A0h, 0C0h, 0A0h, 090h, 088h, 000h
+	DB 080h, 080h, 080h, 080h, 080h, 080h, 0F8h, 000h, 082h, 0C6h, 0AAh, 092h, 082h, 082h, 082h, 000h
+	DB 084h, 0C4h, 0A4h, 094h, 08Ch, 084h, 084h, 000h, 070h, 088h, 088h, 088h, 088h, 088h, 070h, 000h
+	DB 0F0h, 088h, 088h, 0F0h, 080h, 080h, 080h, 000h, 070h, 088h, 088h, 088h, 0A8h, 090h, 068h, 000h
+	DB 0F0h, 088h, 088h, 0F0h, 0A0h, 090h, 088h, 000h, 070h, 088h, 080h, 070h, 008h, 088h, 070h, 000h
+	DB 0F8h, 020h, 020h, 020h, 020h, 020h, 020h, 000h, 088h, 088h, 088h, 088h, 088h, 088h, 070h, 000h
+	DB 088h, 088h, 088h, 050h, 050h, 020h, 020h, 000h, 082h, 082h, 082h, 082h, 092h, 092h, 06Ch, 000h
+	DB 088h, 088h, 050h, 020h, 050h, 088h, 088h, 000h, 088h, 088h, 088h, 050h, 020h, 020h, 020h, 000h
+	DB 0F8h, 008h, 010h, 020h, 040h, 080h, 0F8h, 000h, 0E0h, 080h, 080h, 080h, 080h, 080h, 0E0h, 000h
+	DB 080h, 040h, 020h, 010h, 008h, 004h, 002h, 000h, 0E0h, 020h, 020h, 020h, 020h, 020h, 0E0h, 000h
+	DB 020h, 050h, 088h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 0F8h, 000h
+	DB 040h, 020h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 070h, 008h, 078h, 088h, 074h, 000h
+	DB 080h, 080h, 0B0h, 0C8h, 088h, 0C8h, 0B0h, 000h, 000h, 000h, 070h, 088h, 080h, 088h, 070h, 000h
+	DB 008h, 008h, 068h, 098h, 088h, 098h, 068h, 000h, 000h, 000h, 070h, 088h, 0F8h, 080h, 070h, 000h
+	DB 030h, 048h, 040h, 0E0h, 040h, 040h, 040h, 000h, 000h, 000h, 034h, 048h, 048h, 038h, 008h, 030h
+	DB 080h, 080h, 0B0h, 0C8h, 088h, 088h, 088h, 000h, 020h, 000h, 060h, 020h, 020h, 020h, 070h, 000h
+	DB 010h, 000h, 030h, 010h, 010h, 010h, 090h, 060h, 080h, 080h, 088h, 090h, 0A0h, 0D0h, 088h, 000h
+	DB 0C0h, 040h, 040h, 040h, 040h, 040h, 0E0h, 000h, 000h, 000h, 0ECh, 092h, 092h, 092h, 092h, 000h
+	DB 000h, 000h, 0B0h, 0C8h, 088h, 088h, 088h, 000h, 000h, 000h, 070h, 088h, 088h, 088h, 070h, 000h
+	DB 000h, 000h, 0B0h, 0C8h, 0C8h, 0B0h, 080h, 080h, 000h, 000h, 068h, 098h, 098h, 068h, 008h, 008h
+	DB 000h, 000h, 0B0h, 0C8h, 080h, 080h, 080h, 000h, 000h, 000h, 078h, 080h, 070h, 008h, 0F0h, 000h
+	DB 040h, 040h, 0E0h, 040h, 040h, 050h, 020h, 000h, 000h, 000h, 088h, 088h, 088h, 098h, 068h, 000h
+	DB 000h, 000h, 088h, 088h, 088h, 050h, 020h, 000h, 000h, 000h, 082h, 082h, 092h, 092h, 06Ch, 000h
+	DB 000h, 000h, 088h, 050h, 020h, 050h, 088h, 000h, 000h, 000h, 088h, 088h, 098h, 068h, 008h, 070h
+	DB 000h, 000h, 0F8h, 010h, 020h, 040h, 0F8h, 000h, 010h, 020h, 020h, 040h, 020h, 020h, 010h, 000h
+	DB 040h, 040h, 040h, 000h, 040h, 040h, 040h, 000h, 040h, 020h, 020h, 010h, 020h, 020h, 040h, 000h
+	DB 076h, 0DCh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 010h, 038h, 06Ch, 0C6h, 0C6h, 0FEh, 000h
+	DB 03Eh, 060h, 0C0h, 060h, 03Eh, 008h, 004h, 018h, 000h, 048h, 000h, 0CCh, 0CCh, 0CCh, 0CCh, 076h
+	DB 018h, 020h, 000h, 078h, 0CCh, 0FCh, 0C0h, 078h, 010h, 028h, 000h, 078h, 00Ch, 07Ch, 0CCh, 076h
+	DB 000h, 048h, 000h, 078h, 00Ch, 07Ch, 0CCh, 076h, 030h, 008h, 000h, 078h, 00Ch, 07Ch, 0CCh, 076h
+	DB 048h, 030h, 000h, 078h, 00Ch, 07Ch, 0CCh, 076h, 078h, 0CCh, 0C0h, 0CCh, 078h, 010h, 008h, 030h
+	DB 030h, 048h, 084h, 078h, 0CCh, 0FCh, 0C0h, 078h, 000h, 048h, 000h, 078h, 0CCh, 0FCh, 0C0h, 078h
+	DB 030h, 008h, 000h, 078h, 0CCh, 0FCh, 0C0h, 078h, 000h, 048h, 000h, 030h, 030h, 030h, 030h, 030h
+	DB 030h, 048h, 000h, 030h, 030h, 030h, 030h, 030h, 060h, 010h, 000h, 030h, 030h, 030h, 030h, 030h
+	DB 048h, 000h, 030h, 078h, 0CCh, 0CCh, 0FCh, 0CCh, 030h, 048h, 030h, 048h, 084h, 0FCh, 084h, 084h
+	DB 018h, 020h, 000h, 0F8h, 080h, 0F0h, 080h, 0F8h, 000h, 000h, 000h, 066h, 019h, 077h, 088h, 077h
+	DB 000h, 000h, 000h, 00Fh, 014h, 03Eh, 044h, 087h, 030h, 048h, 084h, 078h, 0CCh, 0CCh, 0CCh, 078h
+	DB 000h, 048h, 000h, 078h, 0CCh, 0CCh, 0CCh, 078h, 060h, 010h, 000h, 078h, 0CCh, 0CCh, 0CCh, 078h
+	DB 030h, 048h, 084h, 000h, 0CCh, 0CCh, 0CCh, 076h, 060h, 010h, 000h, 0CCh, 0CCh, 0CCh, 0CCh, 076h
+	DB 048h, 000h, 0CCh, 0CCh, 0CCh, 07Ch, 00Ch, 0F8h, 044h, 000h, 038h, 06Ch, 0C6h, 0C6h, 06Ch, 038h
+	DB 024h, 000h, 066h, 066h, 066h, 066h, 066h, 03Ch, 000h, 008h, 01Ch, 028h, 028h, 01Ch, 008h, 000h
+	DB 01Ch, 022h, 020h, 070h, 020h, 022h, 05Ch, 000h, 044h, 028h, 010h, 010h, 038h, 010h, 038h, 010h
+	DB 0F0h, 088h, 08Ah, 0F7h, 082h, 082h, 083h, 000h, 006h, 008h, 008h, 03Ch, 010h, 010h, 060h, 000h
+	DB 018h, 020h, 000h, 078h, 00Ch, 07Ch, 0CCh, 076h, 018h, 020h, 000h, 030h, 030h, 030h, 030h, 030h
+	DB 018h, 020h, 000h, 078h, 0CCh, 0CCh, 0CCh, 078h, 018h, 020h, 000h, 0CCh, 0CCh, 0CCh, 0CCh, 076h
+	DB 080h, 078h, 004h, 0F8h, 0CCh, 0CCh, 0CCh, 0CCh, 080h, 07Eh, 001h, 0C6h, 0E6h, 0D6h, 0CEh, 0C6h
+	DB 000h, 078h, 00Ch, 07Ch, 0CCh, 076h, 000h, 0FEh, 000h, 078h, 0CCh, 0CCh, 0CCh, 078h, 000h, 0FCh
+	DB 000h, 000h, 018h, 018h, 030h, 060h, 066h, 03Ch, 0FFh, 080h, 080h, 080h, 000h, 000h, 000h, 000h
+	DB 0FFh, 001h, 001h, 001h, 000h, 000h, 000h, 000h, 040h, 0C4h, 048h, 050h, 026h, 049h, 082h, 007h
+	DB 040h, 0C4h, 048h, 050h, 026h, 04Ah, 09Fh, 002h, 000h, 030h, 000h, 030h, 030h, 030h, 030h, 030h
+	DB 000h, 012h, 024h, 048h, 090h, 048h, 024h, 012h, 000h, 048h, 024h, 012h, 009h, 012h, 024h, 048h
+	DB 049h, 000h, 092h, 000h, 049h, 000h, 092h, 000h, 06Dh, 000h, 0B6h, 000h, 06Dh, 000h, 0B6h, 000h
+	DB 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 0AAh, 055h, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 010h
+	DB 010h, 010h, 010h, 010h, 0F0h, 010h, 010h, 010h, 010h, 010h, 010h, 0F0h, 010h, 0F0h, 010h, 010h
+	DB 028h, 028h, 028h, 028h, 0E8h, 028h, 028h, 028h, 000h, 000h, 000h, 000h, 0F8h, 028h, 028h, 028h
+	DB 000h, 000h, 000h, 0F0h, 010h, 0F0h, 010h, 010h, 028h, 028h, 028h, 0E8h, 008h, 0E8h, 028h, 028h
+	DB 028h, 028h, 028h, 028h, 028h, 028h, 028h, 028h, 000h, 000h, 000h, 0F8h, 008h, 0E8h, 028h, 028h
+	DB 028h, 028h, 028h, 0E8h, 008h, 0F8h, 000h, 000h, 028h, 028h, 028h, 028h, 0F8h, 000h, 000h, 000h
+	DB 010h, 010h, 010h, 0F0h, 010h, 0F0h, 000h, 000h, 000h, 000h, 000h, 000h, 0F0h, 010h, 010h, 010h
+	DB 010h, 010h, 010h, 010h, 01Fh, 000h, 000h, 000h, 010h, 010h, 010h, 010h, 0FFh, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 0FFh, 010h, 010h, 010h, 010h, 010h, 010h, 010h, 01Fh, 010h, 010h, 010h
+	DB 000h, 000h, 000h, 000h, 0FFh, 000h, 000h, 000h, 010h, 010h, 010h, 010h, 0FFh, 010h, 010h, 010h
+	DB 010h, 010h, 010h, 01Fh, 010h, 01Fh, 010h, 010h, 028h, 028h, 028h, 028h, 03Fh, 028h, 028h, 028h
+	DB 028h, 028h, 028h, 02Fh, 020h, 03Fh, 000h, 000h, 000h, 000h, 000h, 03Fh, 020h, 02Fh, 028h, 028h
+	DB 028h, 028h, 028h, 0EFh, 000h, 0FFh, 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 0EFh, 028h, 028h
+	DB 028h, 028h, 028h, 02Fh, 020h, 02Fh, 028h, 028h, 000h, 000h, 000h, 0FFh, 000h, 0FFh, 000h, 000h
+	DB 028h, 028h, 028h, 0EFh, 000h, 0EFh, 028h, 028h, 010h, 010h, 010h, 0FFh, 000h, 0FFh, 000h, 000h
+	DB 028h, 028h, 028h, 028h, 0FFh, 000h, 000h, 000h, 000h, 000h, 000h, 0FFh, 000h, 0FFh, 010h, 010h
+	DB 000h, 000h, 000h, 000h, 0FFh, 028h, 028h, 028h, 028h, 028h, 028h, 028h, 03Fh, 000h, 000h, 000h
+	DB 010h, 010h, 010h, 01Fh, 010h, 01Fh, 000h, 000h, 000h, 000h, 000h, 01Fh, 010h, 01Fh, 010h, 010h
+	DB 000h, 000h, 000h, 000h, 03Fh, 028h, 028h, 028h, 028h, 028h, 028h, 028h, 0FFh, 028h, 028h, 028h
+	DB 010h, 010h, 010h, 0FFh, 010h, 0FFh, 010h, 010h, 010h, 010h, 010h, 010h, 0F0h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 01Fh, 010h, 010h, 010h, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh, 0FFh
+	DB 000h, 000h, 000h, 000h, 0FFh, 0FFh, 0FFh, 000h, 0E0h, 0E0h, 0E0h, 0E0h, 0E0h, 0E0h, 0E0h, 0E0h
+	DB 007h, 007h, 007h, 007h, 007h, 007h, 007h, 007h, 0FFh, 0FFh, 0FFh, 0FFh, 000h, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 002h, 034h, 04Ch, 04Ch, 032h, 000h, 05Ch, 022h, 022h, 03Ch, 044h, 044h, 078h
+	DB 07Eh, 042h, 042h, 040h, 040h, 040h, 040h, 040h, 000h, 000h, 002h, 07Ch, 0A8h, 028h, 028h, 044h
+	DB 000h, 07Eh, 061h, 030h, 018h, 008h, 010h, 020h, 000h, 000h, 008h, 07Fh, 088h, 088h, 088h, 070h
+	DB 000h, 000h, 000h, 022h, 044h, 044h, 07Ah, 080h, 000h, 000h, 000h, 07Ch, 010h, 010h, 010h, 010h
+	DB 000h, 01Ch, 008h, 03Eh, 041h, 041h, 041h, 03Eh, 000h, 000h, 038h, 044h, 044h, 07Ch, 044h, 044h
+	DB 03Ch, 066h, 0C3h, 0C3h, 0C3h, 066h, 024h, 066h, 00Ch, 010h, 008h, 01Ch, 022h, 022h, 022h, 01Ch
+	DB 000h, 000h, 000h, 000h, 06Ch, 092h, 092h, 06Ch, 000h, 001h, 01Ah, 026h, 02Ah, 032h, 02Ch, 040h
+	DB 000h, 018h, 020h, 020h, 030h, 020h, 020h, 018h, 000h, 03Ch, 042h, 042h, 042h, 042h, 042h, 042h
+	DB 000h, 000h, 07Eh, 000h, 07Eh, 000h, 07Eh, 000h, 000h, 008h, 008h, 03Eh, 008h, 008h, 000h, 03Eh
+	DB 000h, 010h, 008h, 004h, 008h, 010h, 000h, 03Eh, 000h, 004h, 008h, 010h, 008h, 004h, 000h, 03Eh
+	DB 000h, 006h, 009h, 009h, 008h, 008h, 008h, 000h, 000h, 000h, 008h, 008h, 008h, 048h, 048h, 030h
+	DB 000h, 000h, 008h, 000h, 03Eh, 000h, 008h, 000h, 000h, 060h, 092h, 00Ch, 060h, 092h, 00Ch, 000h
+	DB 060h, 090h, 060h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 030h, 078h, 030h, 000h, 000h
+	DB 000h, 000h, 000h, 000h, 020h, 000h, 000h, 000h, 000h, 003h, 004h, 004h, 0C8h, 028h, 010h, 000h
+	DB 000h, 000h, 000h, 07Ch, 042h, 042h, 042h, 000h, 018h, 024h, 008h, 010h, 03Ch, 000h, 000h, 000h
+	DB 000h, 000h, 000h, 03Eh, 03Eh, 03Eh, 03Eh, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h, 000h

install/MAKEFILE

@@ -0,0 +1,16 @@
+lnk_boot = tlink /x
+asm= tasm /t/m5/zi
+lnk= tlink /x/t
+
+all: setup.com
+
+setup.com: setup.asm
+	$(asm) setup
+	$(lnk) setup
+
+clean:
+  del *.obj
+  del *.exe
+  del *.com
+  del *.sys
+  del *.err

install/setup.asm

@@ -10,28 +10,23 @@ ent equ 32h
 start:
 jmp CopyCOS
 
-DiskSectorsPerTrack dw 18   
+Message db 0Dh,0Ah,'COS 2000 V3.02Fr programme d''installation',0Dh,0AH,'Inserez une disquette formatee et appuyez sur entre...',0Dh,0AH,'Attention le contenu de celle ci peut etre altere !!!',0Dh,0AH,'$'
-DiskTracksPerHead dw 80
+Message2 db 0Dh,0AH,'Creation du secteur de demarrage...',0Dh,0Ah,'$'
-DiskHeads dw 2  
+Message3 db  0Dh,0AH,'Copie des fichiers systeme...',0Dh,0Ah,'$'
-
+Errormsg db 0Dh,0AH,'Erreur d''installation, contactez moi a COS2000@MULTIMANIA.COM !',0Dh,0AH,'$'
-Message db 0Dh,0Ah,'COS 2000b installation program (Celyn Operating System) !!',0Dh,0Ah,'Written By Nico',0Ah,0Dh,'Site online HTTP://WWW.MULTIMANIA.COM/COS2000',0Dh,0AH,'Copyright 2000',0Dh,0AH,'Please insert a floppy disk and press a key...',0Dh,0AH,'Be careful! All the disk is going to be deleted',0Dh,0AH,'$'
+Ok db 0Dh,0AH,'COS2000 a été correctement installé, veuillez redemarrer votre PC',0Dh,0AH,'$'
-Message2 db 0Dh,0AH,'Create boot sector$'
-systfile db  0Dh,0AH,'Creating file allocation table 16 bits$'
-systfile2 db  0Dh,0AH,'Creating file information table 32 bytes$'
-systfile3 db  0Dh,0AH,'Creating operating system files',0Dh,0Ah,'$'
-systfile4 db 0D,0Ah,'Creating system tools',0Dh,0Ah,'$'
-Errormsg db 0Dh,0AH,0Dh,0AH,'Installing error, please contact me at COS2000@MULTIMANIA.COM !',0Dh,0AH,'$'
-Ok db 0Dh,0AH,0Dh,0AH,'The boot sector and the system files had been succefully copied.',0Dh,0AH, 'To try COS reboot with this system disk',0Dh,0AH,'$'
 files db '*.*',0
-tools db '*.exe',0
+boot db 'boot.bin',0
-allboot db 0dh,0ah
-boot db 'boot.bin',0,'    $'
-retu db 0Dh,0AH,'$'
 dat db 'data',0
-dat2 db '..',0
+retu db 0Dh,0AH,'$'
 dta db 43 dup (0)
 
 copycos:
+        mov        ah,9
+        mov        dx,offset message
+        int        21h
+        xor        ax,ax
+        int        16h
         mov        ah,4ah
         mov        bx,1000h
         int        21h
@@ -44,54 +39,6 @@ copycos:
         mov        ah,3Bh
         mov        dx,offset dat
         int        21h
-mov ah,9
-mov dx,offset message
-int 21h
-jc error
-mov ax,0
-int 16h
-mov ah,9
-mov dx,offset systfile
-int 21h
-jc error
-mov cx,12
-mov bx,offset fat
-erase:
-call writesector
-jc error
-dec cx
-jnz erase
-mov ah,9
-mov dx,offset message2
-int 21h
-jc error
-mov dx,Offset allboot
-int 21h
-jc error
-mov dx,offset boot
-call addfile
-jc error
-mov ax,0F0FFh
-mov cx,14
-mov di,offset fat
-cld
-rep stosw
-mov bx,offset fat
-mov cx,1
-call writesector
-jc error
-mov ah,9
-mov dx,offset systfile2
-int 21h
-jc error
-mov eax,0
-mov cx,512/4
-mov di,offset fat
-cld
-rep stosd
-mov bx,offset fat
-mov cx,13
-call writesector
         jc         error
         mov        ah,1Ah
         mov        dx,offset dta
@@ -101,356 +48,117 @@ mov ah,4eh
         xor        cx,cx
         mov        dx,offset files
         int        21h
-mov ah,9
-mov dx,offset systfile3
-int 21h
         jc         error
+        mov        ah,09
+        mov        dx,offset message3
+        int        21h
 allfile:
-mov di,offset dta+43
+        mov        byte ptr [offset dta+43],'$'
-mov byte ptr [di],'$'
         mov        ah,9
-mov si,offset dta+30
+        mov        dx,offset dta+30
-mov cl,13
-call uppercasemem
-mov dx,si
-cmp dword ptr [si],'toob'
-clc
-je  allfilesend
         int        21h
-jc error
+        push       dx
-call addfile
+        mov        ah,09
-jc error
-call makefit
-jc error
-mov ah,9
         mov        dx,offset retu
         int        21h
-jc error
+        pop        dx
-mov di,offset dta+30
-mov al,0
-mov cl,13
-cld
-rep stosb
-allfilesend:
-mov ah,4fh
-int 21h
-jnc allfile
-mov ah,9
-mov dx,Offset ok
-int 21h
-mov ah,3Bh
-mov dx,offset dat2
-int 21h       
-ret
-
-error:
-mov ah,3Bh
-mov dx,offset dat2
-int 21h  
-mov ah,9
-mov dx,offset errormsg
-int 21h
-ret
-
-addfile:
-push ax bx dx si di bp ds es
-mov cx,1
-mov bx,offset fat
-call readsector
-jc error2
         mov        ax,3D00h
         int        21h
-jc error2
+        jc         error
-mov cs:temp,ax
         mov        bx,ax
         mov        ax,4202h
         xor        cx,cx
         xor        dx,dx
         int        21h
-jc error2
+        jc         error
         cmp        dx,0
-jne error2
+        jne        error
         cmp        ax,0
-je error2
+        je         error
-sub ax,1
-shr ax,9
-inc ax
         mov        bp,ax
         mov        ax,4200h
         xor        cx,cx
         xor        dx,dx
         int        21h
-jc error2
+        jc         error
         push       fs
         pop        ds
-push fs
-pop es
         mov        ah,3fh
         mov        cx,0FFFFh
         xor        dx,dx
         int        21h
         push       cs
         pop        ds
-jc error2
+        jc         error
-mov si,-2
+        mov        ah,3eh
-mov di,0
+        int        21h
-xor bx,bx
+        jc         error
-fats:
+        mov        ah,3ch
-add si,2
-cmp si,512
-jz error2
-cmp WORD PTR [si+offset fat],0h
-jne fats 
-mov ax,si
-shr ax,1 
-cmp di,0
-jne nonew
-mov entrie,ax
-jmp new
-nonew:
-mov [offset fat+di],ax
-new:
-mov di,si
-mov cx,ax
-call writesector
-jc error2
-add bx,512
-dec bp 
-jnz fats
-mov word ptr [offset fat+di],0FFFFh
-mov bx,offset fat
-mov cx,1
         push       cs
         pop        es
-call writesector
+        mov        di,offset dta+30-3
-mov cx,entrie
+        mov        word ptr [di],":a"
-end1:
+        mov        byte ptr [di+2],"\"
-mov ah,3eh
+        xor        cx,cx
-mov bx,cs:temp
-int 21h
-errorend:
-pop es ds bp di si dx bx ax
-ret
-entrie dw 0
-error2:
-mov ah,3eh
-mov bx,cs:temp
-int 21h
-stc
-jmp errorend
-temp dw 0
-
-makefit:
-push bx cx si di bp
-mov ax,cx
-mov bx,offset fat
-mov cx,13
-retry:
-call readsector
-jc error3
-xor si,si
-findfit:
-cmp byte ptr [si+bx],0
-je finishfit
-add si,32
-cmp si,512
-jb findfit
-inc cx
-jmp retry
-finishfit:
-mov di,si
-add di,bx
-mov si,dx
-call asciiztofit
-jc error3
-mov [di+26],ax
-call writesector
-jc error3
-end3:
-pop bp di si cx bx
-ret
-error3:
-stc
-jmp end3
-
-WriteSector:
-push cx dx si
-  mov AX, CX
-  xor DX, DX
-  div DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor DX, DX
-  div DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 3
-  int 13h
-  jnc Done
-  dec SI
-  jnz TryAgain
-Done:
-  jc enddd
-  mov cl, AH
-  mov ah,9
-  mov dx,offset sign
-  int 21h
-  cmp cl,0
-  enddd:
-  pop si dx cx
-ret
-
-ReadSector:
-push ax cx dx si
-  mov AX, CX     
-  xor DX, DX
-  div cs:DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div cs:DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor dX, DX
-  div cs:DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain2:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 2
-  int 13h
-  jnc Done2
-  dec SI
-  jnz TryAgain2
-Done2:
-  pop si dx cx ax
-ret
-
-;->name ds:si ->es:di
-AsciiZtoFit:
-push ax bx cx dx si di ds es
-xor bx,bx
         mov        dx,di
-noextens:
+        int        21h
-mov al,[si+bx]
+        jc         error
-cmp al,'.'
+        mov        bx,ax
-je extens
+        push       fs
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,namesize ;(.)
-jne noextens
-erro:
-stc
-jmp errortranslate
-extens:  
-add si,bx
-inc si
-sub bx,namesize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-xor bx,bx         
-wasextens:
-mov al,[si+bx]
-cmp al,0
-je endextens
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,extsize
-jne wasextens
-jmp erro
-endextens:        
-sub bx,extsize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-mov si,dx
-mov di,dx
-push es
         pop        ds
-mov cx,extsize+namesize
+        xor        dx,dx
-call uppercaseMEM  
+        mov        ah,40h
-clc
+        mov        cx,bp
-endtranslate:
+	int        21h
-pop es ds di si dx cx bx ax
+	push       cs
-ret
+	pop        ds
-errortranslate:
+        jc         error
-stc
+        mov        ah,3eh
-jmp endtranslate
+        int        21h
-
+        jc         error
-;Carry si al = caractŠre systŠme
+        mov        ah,4fh
-isSystchar:
+        int        21h
-push di
+ jnc        allfile
-mov di,offset exeptchar
+        mov        ah,09
-isexcept:
+        mov        dx,offset message2
-cmp al,cs:[di]
+        int        21h
-je nogood
+        mov        ax,3D00h
-inc di
+        mov        dx,offset boot
-cmp byte ptr cs:[di],0
+        int        21h
-jne isexcept
+        jc         error
-endanal:
+        push       fs
-pop di
+        pop        ds
-ret
+        mov        ah,3fh
-exeptchar db '/\<>:|.',01,0,0
+        mov        cx,000FFh
-nogood:
+        xor        dx,dx
-stc
+        int        21h
-jmp endanal
+        push       cs
-
+        pop        ds
-;Transforme les x caractŠres de la mem en ds:si en maj
+        jc         error
-uppercaseMEM: 
+        mov        ah,3eh
-push si di cx ax
+        int        21h
-mov di,si
+        jc         error
-uppercaser:
+        push       fs
-mov al,ds:[si]
+        pop        es
-inc si
+        mov        ax,0301h
-cmp al,'A'
+        mov        dx,0
-jb nonmaj
+        mov        cx,0001h
-cmp al,'Z'
+        xor        bx,bx
-ja nonmaj
+        int        13h
-add al,'a'-'A'
+        mov        ah,09
-nonmaj:
+        mov        dx,offset Ok
-mov es:[di],al
+        int        21h
-inc di
+        xor        ax,ax
-dec cx
+        int        16h
-jnz uppercaser
-enduppercase:
-clc
-pop ax cx di si
         ret
 
-namesize equ 12
-extsize equ 5
         
-sign db '.$'
+error:
-fat DB 512 dup (0)
+        mov        ah,09
-buffer db 0
+        mov        dx,offset errormsg
+        int        21h
+        xor        ax,ax
+        int        16h
+        ret
         
 end start

noyau/8237.asm

@@ -0,0 +1,266 @@
+;****************************************************************
+;								*
+;  Periph‚rique : DMA                                           *
+;  Plages Entr‚es-Sorties : 0000-000F                           *
+;			    00C0-00DF				*				
+;			    0080-0090				*
+;			   (0094-009F)	      			*
+;  Plages M‚moires : AUCUNES                                    *
+;								*
+DmaRead	equ 044h		;I/O to memory, no autoinit, increment, single mode
+DmaWrite 	equ 048h		;Memory to I/O, no autoinit, increment, single mode
+
+;Lecture des bits du registre d'‚tat (08, D0 )
+STATUS_REQ3 = 80h        ;Bit actif: le canal DMA concern‚  
+STATUS_REQ2 = 40h        ;re‡oit une requˆte DMA            
+STATUS_REQ1 = 20h        ;Request                           
+STATUS_REQ0 = 10h
+STATUS_TC3  = 08h        ;Bit actif: Un transfert DMA a ‚t‚  
+STATUS_TC2  = 04h        ;ex‚cut‚ depuis la derniŠre lecture  
+STATUS_TC1  = 02h        ;du registre d'‚tat.                 
+STATUS_TC0  = 01h        ;Terminal Count       
+               
+;Ecriture des bits du registre de commande (08, D0) 
+COMMAND_DACKLEVEL = 80h  ;Bit 7 actif: ligne DMA Acknowledge HIGH active                              
+COMMAND_DREQLEVEL = 40h  ;Bit 6 actif: ligne REQ Acknowledge LOW active                                
+COMMAND_EXTWRITE  = 20h  ;Bit 5 actif: EXTENDED Write,sinon LATE Write 
+COMMAND_FIXEDPRI  = 10h  ;Bit 4 actif: priorit‚ constante            
+COMMAND_COMPRESS  = 08h  ;Bit 3 actif: compression 
+COMMAND_INACTIVE  = 04h  ;Bit 2 actif: contr“leur d‚sactiv‚          
+COMMAND_ADH0      = 02h  ;Bit 1 actif: Adress Hold pour canal 0/4 d‚sactiv‚   
+COMMAND_MEM2MEM   = 01h  ;Bit 0 actif: m‚moire/m‚moire, sinon m‚moire/p‚riph‚rie   
+               
+;Ecriture des bits du registre de requˆte ( 09, D2 )
+REQUEST_RESERVED = 0F8h	 ;R‚glage des bits r‚serv‚s =0
+REQUEST_SET      = 04h	 ;D‚finir requˆte DMA 
+REQUEST_CLR      = 00h	 ;Supprimer requˆte DMA 
+REQUEST_MSK      = 03h	 ;Indiquer le canal dans les deux bits du bas 
+
+;Ecriture des bits du registre de masquage de canal ( 0A, D4 ) 
+CHANNEL_RESERVED = 0F8h	 ;R‚glage des bits r‚serv‚s =0 
+CHANNEL_SET      = 04h	 ;Masquer/verrouiller canal DMA
+CHANNEL_CLR      = 00h	 ;Lib‚rer canal DMA 
+CHANNEL_MSK      = 03h	 ;Indiquer le canal dans les deux bits du bas 
+
+;Ecriture des bits du registre de mode (0B,D6) 
+MODE_DEMAND     = 00h	 ;Transf‚rer … la demande  
+MODE_SINGLE     = 40h	 ;Transf‚rer valeurs uniques
+MODE_BLOCK      = 80h	 ;Transf‚rer en bloc 
+MODE_CASCADE    = 0C0h	 ;Transf‚rer en cascade 
+MODE_DECREMENT  = 20h	 ;D‚cr‚menter 
+MODE_AUTOINIT   = 10h	 ;Autoinitialisation vers la fin 
+MODE_VERIFY     = 00h	 ;V‚rifier 
+MODE_WRITE      = 04h	 ;Ecrire dans la m‚moire 
+MODE_READ       = 08h	 ;Lire depuis la m‚moire 
+MODE_INVALID    = 0Ch	 ;Incorrect 
+MODE_CHANNELMSK = 03h	 ;Indiquer le canal dans les deux bits du bas 
+
+;Ports du DMA esclave
+
+DmaStatusS	dw 08h          ;R SLAVE Registre d'‚tat
+DmaCommandS 	dw 08h          ;W SLAVE Registre de commande
+DmaRequestS	dw 09h          ;W SLAVE Ex‚cuter requˆte DMA
+DmachMaskS	dw 0ah          ;W SLAVE Masquer canaux
+DmaModeS 	dw 0bh          ;W SLAVE Mode de transfert
+DmaFlipFlopS	dw 0ch          ;W SLAVE Flipflop adr/compteur
+DmaTempS   	dw 0dh          ;R SLAVE Reset du contr“leur
+DmaClearS      	dw 0dh          ;R SLAVE Registre temporaire
+DmaMaskClrS     dw 0eh          ;R SLAVE Lib‚rer canaux 
+DmaMaskS        dw 0fh          ;R SLAVE Masquer canaux 
+
+;Ports du DMA esclave
+
+DmaStatusM      dw 0D0h         ;R MASTER Registre d'‚tat
+DmaCommandM     dw 0D0h         ;W MASTER Registre de commande
+DmaRequestM     dw 0D2h         ;W MASTER Ex‚cuter requˆte DMA
+DmaMaskM        dw 0D4h         ;W MASTER Masquer canaux
+DmaModeM        dw 0D6h         ;W MASTER  Mode de transfert
+DmaFlipFlopM    dw 0D8h         ;W MASTER Flipflop adr/compteur
+DmaTempM        dw 0DAh         ;R MASTER Reset du contr“leur
+DmaClearM       dw 0DAh         ;R MASTER Registre temporaire
+DmaMaskClrM     dw 0DCh         ;R MASTER Lib‚rer canaux 
+DmaMaskM2       dw 0DEh         ;R MASTER Masquer canaux 
+
+DmaAdress       db 00h          ;DMA address register 0
+                db 002h         ;DMA address register 1
+                db 004h         ;DMA address register 2
+                db 006h         ;DMA address register 3
+                db 0c0h         ;DMA address register 4
+                db 0c4h         ;DMA address register 5
+                db 0c8h         ;DMA address register 6
+                db 0cch         ;DMA address register 7
+
+DmaCount        db 001h         ;DMA count registers 0
+                db 003h         ;DMA count registers 1
+                db 005h         ;DMA count registers 2
+                db 007h         ;DMA count registers 3
+                db 0c2h         ;DMA count registers 4
+                db 0c6h         ;DMA count registers 5
+                db 0cah         ;DMA count registers 6
+                db 0ceh         ;DMA count registers 7
+
+DmaPage         db 087h         ;DMA page registers 0
+                db 083h         ;DMA page registers 1
+                db 081h         ;DMA page registers 2
+                db 082h         ;DMA page registers 3
+                db 08fh         ;DMA page registers 4
+                db 08bh         ;DMA page registers 5
+                db 089h         ;DMA page registers 6
+                db 08ah         ;DMA page registers 7
+
+;verouille le canal AL
+DisableDma:
+	push ax dx
+	cmp al, 4			
+	jae MasterDisableDma
+	mov dx, DmaMaskS
+	or al, 00000100b
+	out dx, al		
+	jmp EndDisableDma
+MasterDisableDma:
+	mov dx, DmaMaskS
+	and al, 00000011b
+	or al, 00000100b		
+	out dx, al			
+EndDisableDma:
+	pop dx ax
+	ret	
+
+;déverouille le canal AL
+EnableDma:
+	push ax dx
+	cmp al, 4			
+	jae MasterDisableDma
+	mov dx, DmaMaskS
+	out dx, al		
+	jmp EndEnableDma
+MasterEnableDma:
+	mov dx, DmaMaskS
+	and al, 00000011b
+	out dx, al			
+EndEnableDma:
+	pop dx ax
+	ret	
+
+;Efface le FlipFlop canal AL
+ClrDmaFlipFlop:
+	push ax dx
+	cmp al, 4			
+	jae MasterClrFlipFlopDma
+	mov dx,DmaFlipFlopS
+	xor ax, ax
+	out dx, al		
+	jmp EndClrFlipFlopDma
+MasterClrFlipFlopDma:
+	mov dx,DmaFlipFlopM
+	xor ax, ax
+	out dx, al			
+EndClrFlipFlopDma:
+	pop dx ax
+	ret				
+		
+;Met le mode du canal al à ah	
+SetDmaMode:
+	push ax dx
+	cmp al, 4			
+	jae MasterSetDmaMode
+	mov dx,DmaModeS
+	or al, ah
+	out dx, al	
+	jmp EndSetDmaMode
+MasterSetDmaMode:
+	mov dx,DmaModeM
+	and al, 00000011b
+	or al, ah
+	out dx, al		
+EndSetDmaMode:
+	pop dx ax
+	ret	
+
+
+;Met le page du canal al a ah
+SetDmaPage:
+	push ax bx dx si
+	cmp al, 4			
+	jae MasterSetDmaPage               
+        	mov si, offset DmaPage
+	xor dh, dh
+        	xor bh, bh
+        	mov bl, al
+	mov dl, cs:[si+bx]
+	xchg al, ah
+	out dx, al		
+	jmp EndSetDmaPage
+MasterSetDmaPage:			
+EndSetDmaPage:
+	pop si dx bx ax
+	ret				
+
+;Met l'adresse du canal al a DS:BX	
+SetDmaAdress:
+  	 push ax bx cx dx si
+	push ax
+   	   mov ax, ds
+     	   and ax, 0000111111111111b
+     	  shl ax,4       	  
+     	  add bx, ax
+     	  mov ax, ds
+   	  and ax, 1111000000000000b
+   	  shr ax, 4
+	mov cx,ax
+ 	pop ax
+	push ax
+	add ax,cx 	  
+    	 call SetDmaPage
+       	 pop ax
+       	 call ClrDmaFlipFlop
+        	mov si, offset DmaAdress
+	xor dh, dh
+	push  bx
+        	xor bh, bh
+        	mov bl, al
+        	mov dl, byte ptr cs:[si+bx]  
+	pop bx   
+	 cmp al, 4			
+	 jae MasterSetDmaAddress
+	mov al, bh		
+	out dx, al			
+	mov al, bl			
+	out dx, al			
+	jmp EndSetDmaAddress
+MasterSetDmaAddress:
+	 mov al, bh			
+	 out dx, al			
+	call ClrDmaFlipFlop		
+	mov al, bl			
+	out dx, al			
+EndSetDmaAddress:
+	pop si dx cx bx ax
+	ret		
+
+;Spécifie au controleur DMA le nombre d'octets à transférer dans CX
+SetDmaCount:
+	push ax bx dx si
+       	 call ClrDmaFlipFlop
+       	 mov si, offset DmaCount
+                  xor dh, dh
+    	  xor bh, bh
+   	  mov bl, al
+     	  mov dl, byte ptr cs:[si+bx]
+	cmp al, 4			
+	jae MasterSetDmaCount     
+	mov al, ch			
+	out dx, al			
+	mov al, cl			
+	out dx, al			
+	jmp EndSetDmaCount
+MasterSetDmaCount:
+	mov al, ch		
+	out dx, al					
+	call ClrDmaFlipFlop	
+	mov al, cl			
+	out dx, al		
+EndSetDmaCount:
+	pop si dx bx ax
+	ret				
+

noyau/MAKEFILE

@@ -0,0 +1,67 @@
+lnk_boot = tlink /x
+asm= tasm /t/m5/zi
+lnk= tlink /x/t
+
+all: boot.bin clavier.sys 8259a.sys disque.sys heure.sys horloge.sys manette.sys port.sys souris.sys systeme.sys video.sys
+
+boot.bin: boot.asm
+	$(asm) boot
+	$(lnk_boot) boot
+	exe2boot boot.exe boot.bin
+
+clavier.sys: clavier.asm
+	$(asm) clavier
+	$(lnk) clavier
+	ren clavier.com clavier.sys
+
+8259a.sys: 8259a.asm
+	$(asm) 8259a
+	$(lnk) 8259a
+	ren 8259a.com 8259a.sys
+
+disque.sys: disque.asm
+	$(asm) disque
+	$(lnk) disque
+	ren disque.com disque.sys
+
+heure.sys: heure.asm
+	$(asm) heure
+	$(lnk) heure
+	ren heure.com heure.sys
+
+horloge.sys: horloge.asm
+	$(asm) horloge
+	$(lnk) horloge
+	ren horloge.com horloge.sys
+
+manette.sys: manette.asm
+	$(asm) manette
+	$(lnk) manette
+	ren manette.com manette.sys
+
+port.sys: port.asm
+	$(asm) port
+	$(lnk) port
+	ren port.com port.sys
+
+souris.sys: souris.asm
+	$(asm) souris
+	$(lnk) souris
+	ren souris.com souris.sys
+
+systeme.sys: systeme.asm
+	$(asm) systeme
+	$(lnk) systeme
+	ren systeme.com systeme.sys
+
+video.sys: video.asm
+	$(asm) video
+	$(lnk) video
+	ren video.com video.sys
+
+clean:
+  del *.obj
+  del *.exe
+  del *.com
+  del *.sys
+  del *.err

noyau/asm.bat

@@ -1,55 +0,0 @@
-@echo off
-
-echo Assembling file %1... 
-..\util\tasm %1.asm /m5/x/t
-if errorlevel 1 goto end
-if "%1"=="boot" goto boot
-echo Linking file %1...
-..\util\tlink %1.obj /x/t
-if errorlevel 1 goto end
-echo Copying file %1...  
-if "%1"=="video" goto video
-if "%1"=="lpt" goto system
-if "%1"=="keyboard" goto system
-if "%1"=="mouse" goto system 
-if "%1"=="pic8259a" goto system 
-if "%1"=="timer" goto system
-if "%1"=="drive" goto system 
-if "%1"=="joystick" goto system 
-if "%1"=="system" goto system
-if "%1"=="setup" goto setup 
-if "%1"=="hours" goto system
-copy %1.com ..\data\%1.exe>nul
-goto end   
-
-:boot
-echo Linking file %1...
-..\util\tlink %1.obj /x
-if errorlevel 1 goto end
-echo Copying file %1...
-..\util\exe2boot %1.exe
-copy %1.bin ..\data\%1.bin>nul 
-goto end
-
-:video
-type thin8x8.fnt>>%1.com
-:system
-copy %1.com ..\data\%1.sys>nul
-goto end
-:setup
-copy %1.com ..\%1.com>nul
-goto end
-
-:end
-if not exist *.bin goto exes
-del *.bin
-:exes
-if not exist *.exe goto coms
-del *.exe
-:coms
-if not exist *.com goto objs
-del *.com
-:objs  
-if not exist *.obj goto nobjs
-del *.obj
-:nobjs

noyau/asmsys.bat

@@ -1,11 +0,0 @@
-@echo off
-call asm video
-call asm system
-call asm lpt
-call asm keyboard
-call asm pic8259a
-call asm timer
-call asm drive
-call asm mouse
-call asm joystick
-call asm boot

noyau/boot.asm

@@ -7,35 +7,32 @@ assume cs:boots,ds:boots
 start:
 jmp boot
 
-
 bootdb  db     'COS2000A'                ;Fabricant + n°série Formatage
 sizec   dw      512                      ;octet/secteur
         db      1                        ;secteur/cluster
 reserv  dw      1                        ;secteur reserv‚
-nbfat   db      1                        ;nb de copie de la FAT
+nbfat   db      2                        ;nb de copie de la FAT
-nbfit   dw      25                       ;taille rep racine
+nbfit   dw      224                      ;taille rep racine
 allclu  dw      2880                     ;nb secteur du volume si < 32 még
         db      0F0h                     ;Descripteur de média
-fatsize dw      12                       ;secteur/FAT
+fatsize dw      9                        ;secteur/FAT
 nbtrack dw      18                       ;secteur/piste       
 head    dw      2                        ;nb de tˆteb de lecture/écriture
 hidden  dd      0                        ;nombre de secteur cach‚s
         dd      0                        ;si nbsecteur = 0 nbsect                                       ; the number of sectors
 bootdrv db      0                        ;Lecteur de d‚marrage
-        db      0                        ;NA
+bootsig db      0                        ;NA
-bootsig db      29h                      ;boot signature 29h
+        db      29h                      ;boot signature 29h
-        dd      01020304h                ;no de serie
+bootsig2 dd     01020304h                ;no de serie
 pope    db      'COS2000    '            ;nom de volume
-        db      'FAT16   '               ;FAT
+        db      'FAT12   '               ;FAT
 specialboot:
 
-errorloading  db 'It''s not a COS disk!',0dh,0ah,0
+errorloading  db ' Erreur !!',0dh,0ah,0
-okloading db 'COS search system',0Dh,0ah,0
+okloading db 'Recherche noyau',0Dh,0ah,'   - system.sys',0
-syst db 'Ok',0dh,0ah,0
+syst db ' Ok',0dh,0ah,'Chargement',0
 dot db '.',0
-carry db 0dh,0ah,0
+Sys db 'SYSTEME SYS'
-Sys db 'system',0,0,0,0,0,0
-sys2 db 'sys',0
 
 errorboot:
         mov  si,offset errorloading
@@ -50,152 +47,156 @@ boot:
         mov  ss,ax
         mov  sp,0FFFFh
 	  sti
-        p:
+
+boot2:
         push cs
+        push cs
+        pop  es
         pop  ds
         xor  ax,ax
         int  13h
         jc   errorboot
         mov  si,offset okloading
         call showstr
-        mov cx,nbtrack       
+        mov  cx,Reserv  
-        les si,ds:[1Eh*4]
+	add  cx,word ptr [offset Hidden]
-        mov byte ptr es:[si+4], cl
+        adc  cx,word ptr [offset Hidden+2]
-        mov byte ptr es:[si+9], 0Fh
+	push cx
+	mov bx,fatsize 
+	mov di,offset bufferfat
+readfat:
+	call readsector
+	inc cx
+	add di,sizec
+	dec	bx
+	jnz readfat
+	pop	cx
         xor  ax,ax
         mov  al,NbFat
         mov  bx,FatSize
         mul  bx
-        mov cx,ax
+        add  cx,ax
-        add cx,word ptr [offset Hidden]
+	  mov  ax,32                 
-        adc cx,word ptr [offset Hidden+2]
+	  mul  nbfit   
-        add cx,Reserv     
+	  div  sizec
-        mov word ptr [offset BootSig],cx
+	  add  ax,cx
-        xor dx,dx
+	  sub  ax,2
-        mov ax,allclu
+        mov  word ptr [offset bootsig],ax 
-        div nbtrack
-        xor dx,dx
-        div head
-        mov word ptr [offset pope],ax
-        push cs
-        pop es
-        mov bx,offset buffer
-        mov si,bx
         xor  dx,dx 
 CheckRoot:
+	mov  di,offset buffer
 	  call readsector
 	  jc   errorboot
-xor di,di
+	  xor  bx,bx
 findnext:
-cmp byte ptr [bx+di],0
+        cmp  byte ptr [di],0
         je   errorboot
-push si di cx
+	cmp  byte ptr [di],0E5h
-mov si,di
+	je no
-add si,bx
+        cmp  byte ptr [di],041h
-call showstr
+	je no
-mov ax,si
 	mov  si,offset dot
         call showstr
-mov si,ax
+	push di cx
-add si,12
+	mov si,offset sys
-call showstr
+	mov  cx,11
-mov si,offset carry
-call showstr
-mov si,ax
-mov di,offset sys
-mov cx,12+4
         rep  cmpsb
-pop cx di si
+        pop  cx di
 	 je   oksystem
+no:
         add  di,32
+	  add  bx,32
         inc  dx
         cmp  dx,nbfit
 	  ja   errorboot
-cmp di,sizec
+        cmp  bx,sizec
 	  jb   findnext
         inc  cx
         jmp  Checkroot
 oksystem:
 	  mov  si,offset syst
         call showstr
-mov cx,[di+BX+26]
+	  mov  cx,[di+26]
-mov bx,200h
+	  mov  ax,0900h
-mov es,bx
+	  mov  es,ax
-push bx
+	  push es
-mov bx,0100h
+	  mov  di,100h
-push bx
+	  push di
 	  mov  si,offset dot
+	  xor	 ax,ax
 fatagain:
-cmp cx,0FFF0h
+	  cmp  cx,0FF0h
         jae  finishload
+	  push cx
+	  add  cx,word ptr [offset bootsig]
         call readsector
+        pop  cx
 	  jc   errorboot
+        inc	 ax
 	  call showstr
-add bx,sizec
+        add  di,sizec
         call getfat
         jnc  fatagain
 finishload:
-push es
-push es
-push es
-pop ds
-pop fs
-pop gs
-push 7202h
-popf
 	  db 0CBh
 
-
+;=============READSECTOR (Fonction 01H)===============
-         
+;Lit le secteur CX et le met en es:di
-;<-cx nøsecteur  ->cx code FAT
+;-> AH=1
-getfat:
+;<- Flag Carry si erreur
-push es bx
+;=====================================================
+ReadSector:
+	push 	ax bx cx dx si
 	mov	ax,cx
 	xor   dx,dx
-div sizec
-mov cx,ax
-add cx,reserv
-mov bx,offset buffer
-push cs
-pop es
-call readsector
-jc errorgetfat
-shl dx,1
-add bx,dx
-mov cx,[bx]
-errorgetfat:
-pop bx es
-ret
-
-ReadSector:
-push ax cx dx si
-  mov AX, CX
-  xor DX, DX
 	div   nbtrack 
-  mov CL, DL                    ;{ Set the sector                            }
+	inc   dl
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
+	mov 	bl,dl           
-  xor DX, DX
+	xor 	dx,dx                   
-  div word ptr pope
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor dX, DX
 	div 	head    
-  mov DH, DL                    ;{ Set the head                              }
+	mov 	dh, 0
-  inc CL
+	xchg 	dl,dh          
+	mov 	cx,ax              
+	xchg 	cl,ch             
+	shl 	cl,6                
+	or 	cl, bl       
+	mov 	bx,di                           
 	mov 	SI, 4
+	mov 	AL, 1
 TryAgain:
-  mov AX,0201h
+  	mov 	AH, 2
-  mov DL, bootdrv
   	int 	13h
   	jnc 	Done
   	dec 	SI
   	jnz 	TryAgain
 Done:
-  pop si dx cx ax
+  	pop 	si dx cx bx ax
+ret
+
+getfat:
+	push  ax bx dx di
+	mov   di,offset bufferfat
+	mov	ax,cx
+	mov	bx,ax
+	and   bx,0000000000000001b
+	shr   ax,1
+	mov   cx,3
+	mul   cx
+	add   di,ax
+	cmp   bx,0h
+	jnz   evenfat
+oddfat:
+	mov	dx,[di]
+      and   dx,0FFFh
+    	mov   cx,dx
+      jmp   endfat
+evenfat:
+      mov   dx,[di+1]
+      and   dx,0FFF0h
+      shr   dx,4
+      mov   cx,dx
+endfat:
+	pop di dx bx ax
 	ret
 
 showstr:
@@ -212,8 +213,9 @@ again:
         pop si bx ax
         ret
 
-
 Buffer equ $
+BufferFat equ $+2048
+
 boots ends
 end start
 

noyau/clavier.asm

@@ -24,6 +24,8 @@ tsr:
         mov cs:isstate,0
         jmp endof
         nostate:
+        cmp al,68
+        je F10
         cmp al,87
         je F11
         cmp al,88
@@ -35,6 +37,14 @@ tsr:
         isstate db 0
         infos db 40 dup (0)
 
+F10:
+	mov     ax,6000h
+        push    ax
+        mov     di,0100h
+        push    di
+sti
+ db      0CBh
+
 F11:
      push ax di es
      push cs
@@ -180,7 +190,7 @@ showallREG:
      push word ptr cs:fip  
      jmp endof
 
-reg db ' State of registers',0
+reg db ' Etats des registres',0
 fla db 'Eflags:',0 
 regs db 'EAX:',0
      db 'EBX:',0
@@ -199,7 +209,7 @@ regs db 'EAX:',0
      db ' IP:',0
 gr db '(',0
 dr db ')',0
-app db 'Press space to quit...',0
+app db 'Appuyez sur espace pour quitter...',0
 ffl dd 0
 fcs dw 0
 fip dw 0

noyau/clean.bat

@@ -1,3 +0,0 @@
-@echo off
-echo nettoyage en cours...
-del ..\data\*.* >nul

noyau/debog.bat

@@ -1,2 +0,0 @@
-@echo off
-..\util\td %1

noyau/disque.asm

@@ -0,0 +1,964 @@
+.model tiny
+.486
+smart
+.code
+
+org 0100h
+
+include ..\include\fat.h
+
+start:
+	jmp	tsr			;Saute à la routine résidente
+names db 'DRIVE'			;Nom drivers
+id    dw 1234h                ;Identifiant drivers
+Tsr:
+	cli				;Désactive interruptions logiciellement
+	cmp	ax,cs:ID         	;Compare si test de chargement
+	jne 	nomore		;Si pas test alors on continu
+      rol   ax,3*4            ;Rotation de 3 chiffre de l'ID pour montrer que le drivers est chargé
+	jmp 	itsok			;On termine l'int avec notre code d'ID preuve du bon chargement de VIDEO
+nomore:
+      cmp   ah,maxfunc
+      jbe   noerrorint
+      stc
+      jmp   itsok
+noerrorint:
+      clc
+	push 	bx
+	mov 	bl,ah			;On calcule d'aprés le n° de fonction
+	xor 	bh,bh			;quel sera l'entrée dans la table indexée
+	shl 	bx,1			;des adresses fonctions.
+	mov 	bx,cs:[bx+tables]	;On récupère cette adresse depuis la table
+	mov 	cs:current,bx	;On la stocke temporairement pour obtenir les registres d'origine
+	pop 	bx
+      clc
+      call 	cs:current		;Puis on execute la fonction
+itsok:
+	push 	bp		
+	mov 	bp,sp			;On prend sp dans bp pour adresser la pile
+	jnc 	noerror		;La fonction appelée a renvoyer une erreur :  Flag CARRY ?
+      or    byte ptr [bp+6],1b;Si oui on le retranscrit sur le registre FLAG qui sera dépilé lors du IRET
+      ;xor  eax,eax
+      ;mov  ax,cs                   ;On récupère le segment et l'offset puis en renvoie l'adresse physique
+      ;shl  eax,4                   ;de l'erreur.
+      ;add  ax,cs:current
+      jmp  endofint                ;on termine l'int
+noerror:
+	 and 	byte ptr [bp+6],0FEh;Si pas d'erreur on efface le Bit CARRY du FLAG qui sera dépilé lors du IRET
+endofint:
+       pop 	bp
+	 sti				;On réactive les interruptions logiciellement
+	 iret				;Puis on retourne au programme appelant.
+
+current dw 0			;Mot temporaire qui contient l'adresse de la fonction appelée
+tables  dw readsector
+        dw writesector
+        dw verifysector2
+        dw initdrive
+        dw loadfile
+        dw compressrle
+        dw decompressrle
+	dw FindFirstfile
+	dw Findnextfile    
+	dw GetFreeSpace   
+	dw Searchfile
+	dw Getname
+	dw Getserial
+	dw changedir
+	dw readcluster
+	dw writecluster
+	dw getdir
+
+maxfunc equ 24
+
+;DPT disquette 
+mydpt DPT ?
+
+;Secteur de boot
+myboot bootSector ?
+
+;Données Calculée
+clustersize		dw	0
+TracksPerHead 		dw 	0
+DriveSize         	dd     	0
+AdressBoot		dw	0
+AdressFat		dw	0
+AdressParent      	dw     	0
+AdressData		dw	0 
+AddingValue		dw     	0
+CurrentDir		dw	0 ;En cluster
+CurrentDirStr		db      128 dup (0)
+
+;Pour recherches
+EntryPlace		dw	0 ;En octet
+AdressDirectory		dw	0 ;En cluster
+firstsearch		dw	1 ;Premiere requete ?
+
+getfat:
+	push  	ax bx dx si
+	mov	ax,cx
+	mov	bx,ax
+	and   	bx,0000000000000001b
+	shr   	ax,1
+	mov   	cx,3
+	mul   	cx
+	mov   	si,offset bufferfat
+	add   	si,ax
+	cmp   	bx,0h
+	jnz   	evenfat
+oddfat:	
+	mov	dx,cs:[si]
+      	and   	dx,0FFFh
+    	mov   	cx,dx
+      	jmp   	endfat
+evenfat:
+      	mov   	dx,cs:[si+1]
+      	and   	dx,0FFF0h
+      	shr   	dx,4
+      	mov   	cx,dx
+endfat:
+	cmp	dx,0FF0h
+	jbe	nocarry
+	stc
+	pop 	si dx bx ax
+	ret
+nocarry:
+	clc
+	pop 	si dx bx ax
+	ret
+
+;============loadfile (Fonction 4)===============
+;Charge le fichier ds:si en es:di ->ecx taille
+;-> AH=4
+;<- Flag Carry si erreur
+;=====================================================
+loadfile:
+	push	eax bx di
+	push	es di
+	push	cs
+	pop	es
+	mov	di,offset tempfit
+	call	searchfile
+	pop	di es
+	jne   	errorload
+	jc	errorload
+	mov	cx,cs:tempfit.FileGroup
+	mov	eax,cs:tempfit.FileSize
+	call	loadway
+	jc    	errorload
+	clc
+	mov	ecx,eax
+	pop   	di bx eax
+	ret
+errorload:
+	stc
+	mov	ecx,0
+	pop   	di bx eax
+	ret
+
+tempfit db 32 dup (0)
+
+;=============SearchFile (Fonction 10)===============
+;Renvois dans ES:DI la fit du fichier DS:SI et non equal si pas existant
+;-> AH=10
+;<- Flag Carry si erreur
+;=====================================================
+SearchFile:
+	push	ax cx ds si di es
+	call	uppercase
+	push	ds si
+	call	findfirstfilez
+	push	ds
+	pop	es
+	mov	di,si
+	pop	si ds
+	jc	errorsearch
+	jmp	founded
+nextsearch:
+	push	ds si
+	call	findnextfilez
+	push	ds
+	pop	es
+	mov	di,si
+	pop	si ds
+founded:
+	cmp	byte ptr cs:[di],0
+	je	notgood
+	cmp	byte ptr cs:[di+FileAttr],0Fh
+	je	nextsearch
+	call	cmpnames
+	jc    	nextsearch
+okfound:
+	push	cs
+	pop	ds
+	mov	si,di
+	pop	es di
+	push	di es
+	mov	cx,32
+	rep	movsb
+	clc
+	pop	es di si ds cx ax
+	ret
+notgood:
+	cmp   	si,0FF5h
+	pop	es di si ds cx ax
+	ret
+errorsearch:
+	stc
+	pop	es di si ds cx ax
+	ret
+
+;Transforme la chaine ds:si en maj
+uppercase: 
+	push 	si ax
+	mov 	di,si
+uppercaser:
+	mov 	al,ds:[si]
+	cmp 	al,0
+	je 	enduppercase
+	cmp 	al,'a'
+	jb 	nonmaj
+	cmp 	al,'z'
+	ja 	nonmaj
+	sub 	al,'a'-'A'
+	mov 	ds:[si],al
+nonmaj:
+	inc 	si
+	jmp 	uppercaser
+enduppercase:
+	clc
+	pop 	ax si
+	ret
+
+;Compare le nom ds:si '.' avec es:di 
+CmpNames:
+	push 	ax cx si di
+	mov 	cx,8
+	repe 	cmpsb
+	jne 	nequal
+	inc 	si
+nequal:
+	cmp 	byte ptr [si-1],'.'
+	jne 	trynoext
+	mov 	al,' '
+	rep 	scasb
+	mov 	cx,3
+	rep 	cmpsb
+	jne 	notequal
+	cmp 	byte ptr [si],0
+	jne 	notequal
+	cmp 	cx,0
+	jl 	notequal
+itok:
+	pop 	di si cx ax
+	ret
+trynoext:
+	cmp	byte ptr [si-1],0
+	jne	notequal
+	jmp	itok
+notequal:
+	stc
+	pop 	di si cx ax
+	ret
+
+;charge le fichier de de groupe CX et de taille eax
+LoadWay:
+	push	eax bx dx si di ecx ds es			
+	cmp   	eax,0
+	je	Zeroload
+	rol	eax,16
+	mov	dx,ax
+	ror	eax,16
+	div	cs:clusterSize
+	mov	bx,ax
+	cmp	bx,1
+	jb	adjustlast
+Loadfat:
+	call	readcluster
+	jc 	noway
+	add	di,cs:clusterSize
+	call	getfat
+	dec	bx
+	jnz	loadfat
+AdjustLast:
+	push  	es di
+	push	cs
+	pop 	es
+	mov	di,offset bufferread
+	mov	si,di
+	call	Readcluster
+	pop   	di es
+	jc	noway
+	mov	cx,dx
+	push	cs
+	pop	ds
+	rep	movsb
+zeroload:
+	clc
+	pop	es ds ecx di si dx bx eax
+	ret
+noway:	
+	stc
+	pop	es ds ebp di si dx bx eax
+	ret
+
+;=============INITDRIVE (Fonction 04H)===============
+;Initialise le lecteur pour une utilisation ultérieure
+;-> AH=4
+;<- Flag Carry si erreur
+;=====================================================
+InitDrive:
+	push 	eax bx cx edx di ds es
+	push 	cs
+	pop 	ds
+	push	cs
+	pop	es
+	mov	di,3
+againtry:
+        xor  	ax,ax
+	mov	dx,0000h
+        int  	13h
+	mov	bx,offset myboot
+	mov	ax,0201h
+	mov	cx,0001h
+	mov	dx,0000h
+	int	13h
+	jnc	oknoagaintry
+	dec	di
+	jnz	againtry
+oknoagaintry:
+	mov	cs:lastseg,0
+	mov	cs:lastoff,0
+	mov 	cs:LastRead,0
+	mov	ax,myboot.sectorsize
+	mov	bl,myboot.SectorsPerCluster
+	xor	bh,bh
+	mul	bx
+	mov	clustersize,ax
+	mov 	bx,myboot.HiddenSectorsL
+	adc 	bx,myboot.HiddenSectorsH
+	mov 	AdressBoot,bx
+	add 	bx,myboot.ReservedSectors
+	mov 	AdressFat,bx
+	xor 	ax,ax
+	mov 	al,myboot.FatsPerDrive
+	mul 	myboot.SectorsPerFat
+	add 	bx,ax
+	mov 	AdressParent,bx
+	mov 	AdressDirectory,bx
+	mov 	ax,32                 
+	mul 	myboot.DirectorySize
+	div 	myboot.SectorSize
+	add 	bx,ax
+	mov 	AdressData,bx
+	sub	bx,2
+	mov	AddingValue,bx
+	mov 	ax,myboot.SectorsPerDrive
+	div 	myboot.SectorsPerTrack
+	xor 	dx,dx
+	div 	myboot.HeadsPerDrive     
+	mov 	TracksPerHead,ax
+	xor	eax,eax
+	mov	ax,myboot.SectorsPerDrive
+	sub	ax,AdressData
+	mul	myboot.SectorSize
+	shl   	edx,16
+	add   	edx,eax
+	mov	DriveSize,edx
+	mov	CurrentDir,0
+	mov	EntryPlace,0
+	mov	adressdirectory,0
+	mov	firstsearch,1
+	mov	currentdirstr,0
+	mov	di,offset bufferfat
+	mov	dx,myboot.SectorsPerFat
+	mov	cx,AdressFat
+SeeFat:
+	call	readsector
+	jc	ErrorInit
+	add	di,myboot.SectorSize
+	inc	cx
+	dec	dx
+	jnz	seefat
+	clc
+	pop 	es ds di edx cx bx eax
+	ret
+ErrorInit:
+	stc
+	pop 	es ds di edx cx bx eax
+	ret
+
+;=============FindFirstFile (Fonction 7)==============
+;Renvois dans ES:DI un bloc d'info
+;-> AH=7
+;<- Flag Carry si erreur
+;=====================================================
+FindFirstFile:
+	push	cx ds di si
+	call	FindFirstFileZ
+	mov	cx,32
+	rep	movsb
+	pop	si di ds cx
+	ret
+
+FindFirstFileZ:
+	push 	cx
+	mov 	cx,cs:CurrentDir
+	mov 	cs:AdressDirectory,cx
+	xor	cx,cx
+	mov 	cs:EntryPlace,cx
+	mov	cs:firstsearch,1
+	call 	findnextfileZ
+	pop 	cx
+	ret
+
+;=============FindnextFile (Fonction 8)==============
+;Renvois dans ES:DI un bloc d'info
+;-> AH=8
+;<- Flag Carry si erreur
+;=====================================================
+;Renvois dans ES:DI un bloc d'info
+FindnextFile:
+	push	cx ds di si
+	call	FindnextFileZ
+	mov	cx,32
+	rep	movsb
+	pop	si di ds cx
+	ret
+
+;fait pointer ds:si sur la prochaine entrée du repertoire courant
+FindnextFileZ:
+	push	ax bx cx es di
+	push	cs
+	pop	ds
+	mov	cx,cs:AdressDirectory
+	mov	bx,cs:Entryplace
+FindnextFileagain:
+	cmp	cs:firstsearch,1
+	je	first
+	add	bx,32
+	cmp	bx,cs:clusterSize
+	jb	nopop
+first:
+	mov	di,offset bufferentry
+	push	cs
+	pop	es
+	mov	bx,0
+	cmp	cs:currentdir,0
+	jne	notrootdir
+	cmp	cs:firstsearch,1
+	je	noaddfirst1
+	inc	cx
+noaddfirst1:
+	add	cx,cs:adressparent
+	mov	al,myboot.sectorspercluster
+readroot:
+	call	readsector
+	jc	notwell
+	add	di,myboot.sectorsize
+	dec	al
+	jnz	readroot
+	sub	cx,cs:adressparent
+	jmp	nopop
+notrootdir:
+	cmp	cs:firstsearch,1
+	je	noaddfirst2
+	call	getfat
+noaddfirst2:
+	jc	notwell
+	call	readcluster
+	jc	notwell
+nopop:
+	mov	cs:firstsearch,0
+	mov	si,offset bufferentry
+	add	si,bx
+	cmp	byte ptr cs:[si],0
+	je	notwell
+	mov	cs:entryplace,bx
+	mov	cs:AdressDirectory,cx
+	cmp	byte ptr cs:[si],0E5h
+	je	findnextfileagain
+	cmp	byte ptr cs:[si+fileattr],28h
+	je	findnextfileagain
+	cmp	byte ptr cs:[si+fileattr],0Fh
+	je	findnextfileagain
+	clc
+	pop	di es cx bx ax
+	ret
+notwell:
+	stc
+	pop	di es cx bx ax
+	ret
+
+;=============GetFreeSpace (Fonction 09H)===============
+;Renvoie en EDX l'espace disque libre du volume
+;-> AH=9
+;<- Flag Carry si erreur
+;=====================================================
+GetFreeSpace:
+	push  	eax
+	xor	eax,eax
+	call	getsector
+	mul	cs:myboot.SectorSize
+	shl	edx,16
+	add	edx,eax
+	pop   	eax
+	ret
+
+;ax=défectueux bx=libre
+GetSector:
+	push	cx dx
+	mov	dx,cs:myboot.SectorsPerDrive
+	sub	dx,cs:AddingValue
+	xor	ax,ax
+	xor	bx,bx
+	mov	cx,0
+goget:
+	push	cx	
+	call	getfat
+	cmp	cx,0FF7h
+	jne	notdefect
+	inc	bx
+notdefect:
+	cmp	cx,0
+	jne	notfree
+	inc	ax
+notfree:
+	pop  	cx
+	inc	cx
+	dec	dx
+	jnz	goget
+	pop 	dx cx
+	ret
+errorfree:
+	stc
+	pop dx cx
+	ret
+
+
+;=============READCLUSTER (Fonction 14)===============
+;Lit le secteur CX et le met en es:di
+;-> AH=14
+;<- Flag Carry si erreur
+;=====================================================
+readcluster:
+	push	ax bx cx dx di
+	mov	ax,cx
+	mov	bl,cs:myboot.sectorspercluster
+	xor	bh,bh
+	mul	bx
+	mov	cx,ax
+	add	cx,cs:addingvalue
+readsectors:
+	call	readsector
+	jc	errorreadincluster
+	add	di,cs:myboot.sectorsize
+	inc	cx
+	dec	bl
+	jnz	readsectors
+	clc
+	pop	di dx cx bx ax
+	ret
+errorreadincluster:
+	stc
+	pop	di dx cx bx ax
+	ret
+
+;=============WRITECLUSTER (Fonction 15)===============
+;Ecrit le cluster CX et le met en es:di
+;-> AH=14
+;<- Flag Carry si erreur
+;=====================================================
+writecluster:
+	push	ax bx cx dx si
+	mov	ax,cx
+	mov	bl,cs:myboot.sectorspercluster
+	xor	bh,bh
+	mul	cx
+	mov	cx,ax
+	add	cx,cs:addingvalue
+writesectors:
+	call	writesector
+	jc	errorwriteincluster
+	add	si,cs:myboot.sectorsize
+	inc	cx
+	dec	bx
+	jnz	writesectors
+	clc
+	pop	si dx cx bx ax
+	ret
+errorwriteincluster:
+	stc
+	pop	si dx cx bx ax
+	ret
+
+;=============READSECTOR (Fonction 01H)===============
+;Lit le secteur CX et le met en es:di
+;-> AH=1
+;<- Flag Carry si erreur
+;=====================================================
+ReadSector:
+	push 	ax bx cx dx si
+	cmp 	cx,cs:lastread
+	jne  	gom
+	mov	ax,es
+	cmp	cs:lastseg,ax
+	jne   	gom
+	cmp	di,cs:lastoff
+	jne   	gom
+	jmp	done
+gom:
+	mov	cs:lastseg,ax
+	mov	cs:lastoff,di
+	mov 	cs:LastRead,cx
+	mov	ax,cx
+	xor   	dx,dx
+	div   	cs:myboot.SectorsPerTrack
+	inc   	dl
+	mov 	bl,dl           
+	xor 	dx,dx                   
+	div 	cs:myboot.HeadsPerDrive
+	mov 	dh,cs:myboot.bootdrive
+	xchg 	dl,dh          
+	mov 	cx,ax              
+	xchg 	cl,ch             
+	shl 	cl,6                
+	or 	cl,bl       
+	mov 	bx,di                           
+	mov 	SI,4
+	mov 	AL,1
+TryAgain:
+  	mov 	AH, 2
+  	int 	13h
+  	jnc 	Done
+  	dec 	SI
+  	jnz 	TryAgain
+Done:
+  	pop 	si dx cx bx ax
+ret
+
+lastread dw 0
+lastseg  dw 0
+lastoff  dw 0
+   
+;=============WRITESECTOR (Fonction 02H)==============
+;Ecrit le secteur CX pointé par ds:si
+;-> AH=2
+;<- Flag Carry si erreur
+;=====================================================
+WriteSector:
+	push 	ax bx cx dx si es
+	cmp 	cs:Lastread,cx
+ 	jne 	nodestruct
+  	mov 	cs:Lastread,0ffffh
+nodestruct:
+	push 	ds
+  	pop 	es
+	mov	ax,cx
+	xor   	dx,dx
+	div   	cs:myboot.SectorsPerTrack
+	inc   	dl
+	mov 	bl,dl           
+	xor 	dx,dx                   
+	div 	cs:myboot.HeadsPerDrive
+	mov 	dh,cs:myboot.BootDrive
+	xchg 	dl,dh          
+	mov 	cx,ax              
+	xchg 	cl,ch             
+	shl 	cl,6                
+	or 	cl, bl         
+	mov 	bx,si                         
+	mov 	SI, 4
+	mov 	AL,1
+TryAgains:
+  	mov 	AH, 3
+  	int 	13h
+  	jnc 	Dones
+  	dec 	SI
+  	jnz 	TryAgains
+Dones:
+  	pop 	es si dx cx bx ax
+ret
+
+;=============Getname (Fonction 11)==============
+;Renvoie le nom en ES:DI
+;-> AH=11
+;<- Flag Carry si erreur
+;=====================================================
+getname:
+	push 	ax cx dx si di ds es	
+	push	cs
+	pop	ds
+	mov	dx,di
+	mov	si,offset myboot.DriveName
+	mov	cx,11
+	rep	movsb
+	mov	al,' '
+	mov	di,dx
+	mov	cx,11
+	repne	scasb
+	mov 	byte ptr es:[di],0
+	pop 	es ds di si dx cx ax
+	ret
+
+;=============Getserial (Fonction 12)==============
+;Renvoie le numéro de serie en EDX
+;-> AH=12
+;<- Flag Carry si erreur
+;=====================================================
+getserial:
+	mov	edx,cs:myboot.serialnumber
+	ret
+
+;=============VERIFYSECTOR (Fonction 03H)==============
+;Vérifie le secteur CX
+;-> AH=3
+;<- Flag Carry si erreur, Flag Equal si secteurs égaux
+;=====================================================
+VerifySector:
+	push 	bx cx si di ds es
+	push 	cs
+	pop 	es
+	push 	cs
+	pop 	ds
+	mov 	bx,offset bufferread
+	call 	ReadSector        
+	jc 	errorverify
+	call 	inverse
+	call 	WriteSector
+	jc 	errorverify
+	mov 	bx,offset bufferwrite
+	call 	ReadSector        
+	call 	inverse
+	jc 	errorverify
+	mov 	bx,offset bufferread
+	call 	inverse
+	call 	WriteSector
+	jc 	errorverify
+	mov 	cx,cs:myboot.SectorSize
+	shr	cx,2
+	mov 	si,offset bufferread
+	mov 	di,offset bufferwrite
+	cld
+	rep 	cmpsd
+errorverify:
+	pop 	es ds di si cx bx
+	ret
+
+Inverse:
+	mov 	si,cs:myboot.sectorsize
+	shr	si,2
+invert:
+	shl 	si,2
+	not 	dword ptr [bx+si-4]
+	shr 	si,2
+	dec 	si
+	jnz 	invert
+	ret
+
+VerifySector2:
+	call 	verifysector
+	jne 	nook
+	or 	byte ptr [bp+6],10b
+nook:
+	ret
+
+;=============DecompressRle (Fonction 05H)==============
+;decompress ds:si en es:di taille bp d‚compress‚ cx compress‚
+;-> AH=5
+;<- Flag Carry si erreur, Flag Equal si secteurs égaux
+;=====================================================
+DecompressRle:
+	push 	cx dx si di
+	mov 	dx,cx
+	mov 	bp,di
+decompression:
+	mov 	eax,[si]
+	cmp 	al,'/'
+	jne 	nocomp
+	cmp 	si,07FFFh-6
+	jae 	thenen
+	mov 	ecx,eax
+	ror 	ecx,16
+	cmp 	cl,'*'
+	jne 	nocomp
+	cmp 	byte ptr [si+4],'/'
+	jne 	nocomp
+	mov 	al,ch
+	mov 	cl,ah
+	xor 	ah,ah
+	xor 	ch,ch
+	rep 	stosb
+	add 	si,5
+	sub 	dx,5
+	jnz 	decompression
+	jmp 	thenen
+nocomp:
+	mov 	es:[di],al
+	inc 	si
+	inc 	di
+	dec 	dx
+	jnz 	decompression
+thenen:
+	mov 	ax,dx
+	sub 	bp,di
+	neg 	bp
+	clc
+	pop 	di si dx cx
+	ret
+
+;=============CompressRle (Fonction 06H)==============
+;compress ds:si en es:di taille cx d‚compress‚ BP compress‚
+;-> AH=6
+;<- Flag Carry si erreur, Flag Equal si secteurs égaux
+;=====================================================
+CompressRle:
+	push 	ax bx cx dx si di ds es
+	mov 	bp,di
+	xchg 	si,di
+	push 	es
+	push 	ds
+	pop 	es
+	pop 	ds
+	mov 	dx,cx
+	;mov 	bp,cx
+againcomp:
+	mov 	bx,di
+	mov 	al,es:[di]
+	mov 	cx,dx
+	cmp 	ch,0
+	je 	poo
+	mov 	cl,0ffh
+	;mov 	cx,bp
+	;sub 	cx,di
+	;mov 	ah,cl
+poo:
+	mov 	ah,cl
+	inc 	di
+	xor 	ch,ch
+	repe 	scasb
+	sub 	cl,ah
+	neg 	cl
+	cmp 	cl,6
+	jbe 	nocomp2
+	mov 	dword ptr [si],' * /'
+	mov 	byte ptr [si+4],'/'
+	mov 	[si+1],cl
+	mov 	[si+3],al
+	add 	si,5
+	dec 	di
+	xor 	ch,ch
+	sub 	dx,cx
+	jnz 	againcomp
+	jmp 	fini
+nocomp2:
+	mov 	[si],al
+	inc 	si
+	inc 	bx
+	mov 	di,bx
+	dec 	dx
+	jnz 	againcomp
+fini:
+	sub 	bp,si
+	neg 	bp
+	clc
+	pop 	es ds di si dx cx bx ax
+	ret
+
+;=============Changedir (Fonction 13)==============
+;Change le repertoire courant a DS:SI
+;-> AH=13
+;<- Flag Carry si erreur, Flag Equal si secteurs égaux
+;=====================================================
+Changedir:
+	push	ax cx dx si di ds es
+	push	cs
+	pop	es
+	;cmp	[si],005Ch ;'\',0 (root dir)
+	mov	di,offset tempdir
+	call	searchfile
+	jc	noch
+	mov	cx,cs:tempdir.Filegroup
+	mov	cs:CurrentDir,cx
+	mov	cs:EntryPlace,0
+	mov	cs:adressdirectory,cx
+	mov	cs:firstsearch,1
+	cmp	cs:[di],'  ..'
+	jne	notback
+	cmp	cs:[di],'   .'
+	je	theend
+	mov	di,offset currentdirstr
+	mov	cx,128
+	mov	al,0
+	repne	scasb
+	mov	al,'\'
+	std	
+	repne	scasb
+	cld
+	inc 	di
+	mov	byte ptr es:[di],0
+	jmp	theend
+notback:
+	mov	di,offset currentdirstr
+	mov	cx,128
+	mov	al,0
+	repne	scasb
+	dec	di
+	mov	al,'\'
+	stosb
+	mov	dx,di
+	push	ds
+	pop	es
+	mov	di,si
+	mov	cx,128
+	mov	al,0
+	repne	scasb
+	sub	cx,128
+	neg	cx
+	push	cs
+	pop	es
+	mov	di,dx
+	rep	movsb
+theend:
+	pop	es ds di si dx cx ax 
+	clc
+	ret
+noch:
+	pop	es ds di si dx cx ax 
+	stc
+	ret
+
+tempdir db 32 dup (0)
+
+;=============getdir (Fonction 16)==============
+;Recupere le repertoire courant a ES:DI
+;-> AH=16
+;<- Flag Carry si erreur
+;=====================================================
+getdir:
+	push	ax cx si di ds es
+	push	es di
+	push	cs
+	pop	es
+	mov	di,offset currentdirstr
+	mov	cx,128
+	mov	al,0
+	repne	scasb
+	sub	cx,128
+	neg	cx
+	pop	di es
+	push	cs
+	pop	ds
+	mov	si,offset currentdirstr
+	rep	movsb
+	pop	es ds di si cx ax
+	clc
+	ret
+
+
+bufferread  	equ $
+bufferwrite 	equ $+2048
+bufferentry	equ $+2048+2048
+bufferFat 	equ $+2048+2048+2048
+
+end start

noyau/drive.asm

@@ -1,505 +0,0 @@
-.model tiny
-.486
-smart
-.code
-
-org 0100h
-
-
-start:
-jmp tsr
-db 'DRIVE'
-Tsr:
-cli
-cmp ax,1234h
-jne nomore
-mov ax,4321h
-jmp itsok
-nomore:
-push bx
-mov bl,ah
-xor bh,bh
-shl bx,1
-mov bx,cs:[bx].tables
-mov cs:current,bx
-pop bx
-call cs:current
-itsok:
-jnc noerror
-push bp
-mov bp,sp
-or byte ptr [bp+6],1b
-pop bp
-mov ax,cs
-shl eax,16
-mov ax,cs:current
-jmp endofint
-noerror:
-push bp
-mov bp,sp
-and byte ptr [bp+6],0FEh
-pop bp
-endofint:
-sti
-iret
-current dw 0
-tables   dw readsector
-         dw writesector
-         dw verifysector2  
-         dw loadfatway
-         dw loadfile
-         dw compressrle
-         dw decompressrle
-
-;cx entr‚e -> fatway chemin
-getfatway:
-push bx cx 
-mov bx,offset fatway
-fatagain:
-mov cs:[bx],cx
-add bx,2 
-cmp cx,0FFF0h
-jae finishload
-call getfat
-jnc fatagain
-finishload:  
-pop cx bx
-ret
-
-;Charge le fichier de chemin cx -> taille dx
-loadfatway:
-push ax bx cx di 
-call getfatway
-jc endload
-mov di,offset fatway
-xor dx,dx
-loadagain:
-mov cx,cs:[di]
-cmp cx,0FFF0h
-jae endload
-add di,2
-mov al,1
-call readsector
-jc endload
-add bx,cs:sizec
-add dx,cs:sizec
-jmp loadagain
-endload:
-pop di cx bx ax
-ret        
-
-
-;<-cx nøsecteur  ->cx code FAT
-getfat:
-push es ax bx dx
-push cs
-pop ds
-push cs
-pop es
-mov ax,cx
-xor dx,dx
-div sizec
-mov cx,ax
-add cx,reserv
-mov bx,offset buffer
-call readsector
-jc errorgetfat
-shl dx,1
-add bx,dx
-mov cx,[bx]
-errorgetfat:
-pop dx bx ax es
-ret
-
-ReadSector:
-push ax cx dx si
-  cmp al,1
-  je pr
-  cmp cx,cs:lastread
-  je done
-  pr:
-  mov cs:LastRead,cx
-  mov AX, CX     
-  xor DX, DX
-  div cs:DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div cs:DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor dX, DX
-  div cs:DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 2
-  int 13h
-  jnc Done
-  dec SI
-  jnz TryAgain
- mov word ptr cs:lastread,0ffffh
-Done:
-  pop si dx cx ax
-ret
-
-WriteSector:
-push ax cx dx si
-  cmp cs:Lastread,cx
-  jne nodestruct
-  mov cs:Lastread,0ffffh
-  nodestruct:
-  mov AX, CX
-  xor DX, DX
-  div cs:DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div cs:DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor DX, DX
-  div cs:DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain2:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 3
-  int 13h
-  jnc Done2
-  dec SI
- jnz TryAgain2
-Done2:
-  pop si dx cx ax
-ret
-
-Lastread dw 0FFFFh
-
-Inverse:
-mov si,512/4
-invert:
-shl si,2
-not dword ptr [bx+si-4]
-shr si,2
-dec si
-jnz invert
-ret
-
-VerifySector:
-push bx cx si di ds es
-push cs
-pop es
-push cs
-pop ds
-mov bx,offset buffer
-call ReadSector        
-jc errorverify
-call inverse
-call WriteSector
-jc errorverify
-mov bx,offset buffer2
-call ReadSector        
-call inverse
-jc errorverify
-mov bx,offset buffer
-call inverse
-call WriteSector
-jc errorverify
-mov cx,512/4
-mov si,offset buffer
-mov di,offset buffer2
-cld
-rep cmpsd
-errorverify:
-pop es ds di si cx bx
-ret
-
-VerifySector2:
-call verifysector
-jne nook
-or byte ptr [bp+6],10b
-nook:
-ret
-
-;Charge le fichier Ds:si en es:di taille-> cx
-loadfile:
-push bx 
-call searchfile
-jc errorloadfile
-mov bx,di
-call loadfatway
-jc errorloadfile
-mov cx,dx
-errorloadfile:
-pop bx
-ret   
-
-;Recherche le fichier et retourne sont path et en cx sont debut
-Searchfile:
-push ax bx dx si di ds es
-push cs
-pop es
-xor dx,dx
-mov di,offset temp
-call asciiztofit
-push cs
-pop ds
-mov cx,13
-check:
-mov al,1
-mov bx,offset buffer  
-call readsector
-jc errorboot
-xor di,di
-findnext:
-cmp byte ptr [bx+di],0
-je errorboot
-push si di cx
-mov si,di
-add si,bx
-mov di,offset temp
-mov cx,12+4
-cld
-rep cmpsb
-pop cx di si
-je oksystem
-add di,32
-inc dx
-cmp dx,nbfit
-ja errorboot
-cmp di,sizec
-jb findnext
-inc cx
-jmp Check
-oksystem:
-mov cx,[di+BX+26]
-cld
-jmp goodboot
-errorboot:
-stc
-goodboot:
-pop es ds di si dx bx ax
-ret
-
-;->name ds:si ->es:di
-AsciiZtoFit:
-push ax bx cx dx si di ds es
-xor bx,bx
-mov dx,di
-noextens:
-mov al,[si+bx]
-cmp al,'.'
-je extens
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,namesize ;(.)
-jne noextens
-erro:
-stc
-jmp errortranslate
-extens:  
-add si,bx
-inc si
-sub bx,namesize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-xor bx,bx         
-wasextens:
-mov al,[si+bx]
-cmp al,0
-je endextens
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,extsize
-jne wasextens
-jmp erro
-endextens:        
-sub bx,extsize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-mov si,dx
-mov di,dx
-push es
-pop ds
-mov cx,extsize+namesize
-call uppercaseMEM  
-clc
-endtranslate:
-pop es ds di si dx cx bx ax
-ret
-errortranslate:
-stc
-jmp endtranslate
-
-;Carry si al = caractŠre systŠme
-isSystchar:
-push di
-mov di,offset exeptchar
-isexcept:
-cmp al,cs:[di]
-je nogood
-inc di
-cmp byte ptr cs:[di],0
-jne isexcept
-endanal:
-clc
-pop di 
-ret
-nogood:
-stc
-jmp endanal
-
-;Transforme les x caractŠres de la mem en ds:si en maj
-uppercaseMEM: 
-push si di cx ax
-mov di,si
-uppercaser:
-mov al,ds:[si]
-inc si
-cmp al,'A'
-jb nonmaj
-cmp al,'Z'
-ja nonmaj
-add al,'a'-'A'
-nonmaj:
-mov es:[di],al
-inc di
-dec cx
-jnz uppercaser
-enduppercase:
-clc
-pop ax cx di si
-ret
-
-;decompress ds:si en es:di taille bp d‚compress‚ cx compress‚
-DecompressRle:
-push cx dx si di
-mov dx,cx
-mov bp,di
-decompression:
-mov eax,[si]
-cmp al,'/'
-jne nocomp
-cmp si,07FFFh-6
-jae thenen
-mov ecx,eax
-ror ecx,16
-cmp cl,'*'
-jne nocomp
-cmp byte ptr [si+4],'/'
-jne nocomp
-mov al,ch
-mov cl,ah
-xor ah,ah
-xor ch,ch
-rep stosb
-add si,5
-sub dx,5
-jnz decompression
-jmp thenen
-nocomp:
-mov es:[di],al
-inc si
-inc di
-dec dx
-jnz decompression
-thenen:
-mov ax,dx
-sub bp,di
-neg bp
-pop di si dx cx
-ret
-
-;compress ds:si en es:di taille cx d‚compress‚ BP compress‚
-CompressRle:
-push ax bx cx dx si di ds es
-mov bp,di
-xchg si,di
-push es
-push ds
-pop es
-pop ds
-mov dx,cx
-;mov bp,cx
-againcomp:
-mov bx,di
-mov al,es:[di]
-mov cx,dx
-cmp ch,0
-je poo
-mov cl,0ffh
-;mov cx,bp
-;sub cx,di
-;mov ah,cl
-poo:
-mov ah,cl
-inc di
-xor ch,ch
-repe scasb
-sub cl,ah
-neg cl
-cmp cl,6
-jbe nocomp2
-mov dword ptr [si],' * /'
-mov byte ptr [si+4],'/'
-mov [si+1],cl
-mov [si+3],al
-add si,5
-dec di
-xor ch,ch
-sub dx,cx
-jnz againcomp
-jmp fini
-nocomp2:
-mov [si],al
-inc si
-inc bx
-mov di,bx
-dec dx
-jnz againcomp
-fini:
-sub bp,si
-neg bp
-pop es ds di si dx cx bx ax
-ret
-
-nbfit equ 255
-namesize equ 12
-extsize equ 5
-exeptchar db '/\<>:|.',01,0,0
-temp db 12+5+1+90 dup (0) 
-DiskSectorsPerTrack dw 18   
-DiskTracksPerHead dw 80
-DiskHeads dw 2
-sizec dw 512
-reserv dw 1
-buffer equ $
-buffer2 equ $+512 
-fatway equ $+512
-
-end start

noyau/format.asm

@@ -0,0 +1,911 @@
+.model tiny
+.486
+smart
+.code
+
+org 0100h
+
+start:
+	jmp	tsr			;Saute à la routine résidente
+names db 'FORMAT'			;Nom drivers
+id    dw 1234h                ;Identifiant drivers
+Tsr:
+	cli				;Désactive interruptions logiciellement
+	cmp 	ax,cs:ID         	;Compare si test de chargement
+	jne 	nomore		;Si pas test alors on continu
+      rol     ax,3*4            ;Rotation de 3 chiffre de l'ID pour montrer que le drivers est chargé
+	jmp 	itsok			;On termine l'int avec notre code d'ID preuve du bon chargement de VIDEO
+nomore:
+        cmp     ah,maxfunc
+        jbe     noerrorint
+        stc
+        jmp     itsok
+        noerrorint:
+        clc
+	push 	bx
+	mov 	bl,ah			;On calcule d'aprés le n° de fonction
+	xor 	bh,bh			;quel sera l'entrée dans la table indexée
+	shl 	bx,1			;des adresses fonctions.
+	mov 	bx,cs:[bx+tables]	;On récupère cette adresse depuis la table
+	mov 	cs:current,bx	;On la stocke temporairement pour obtenir les registres d'origine
+	pop 	bx
+        clc
+        call 	cs:current		;Puis on execute la fonction
+itsok:
+	push 	bp		
+	mov 	bp,sp			;On prend sp dans bp pour adresser la pile
+	jnc 	noerror		;La fonction appelée a renvoyer une erreur :  Flag CARRY ?
+        or      byte ptr [bp+6],1b;Si oui on le retranscrit sur le registre FLAG qui sera dépilé lors du IRET
+        ;xor   eax,eax
+        ;mov     ax,cs                   ;On récupère le segment et l'offset puis en renvoie l'adresse physique
+        ;shl     eax,4                   ;de l'erreur.
+        ;add     ax,cs:current
+        ;jmp     endofint                ;on termine l'int
+noerror:
+	and 	byte ptr [bp+6],0FEh;Si pas d'erreur on efface le Bit CARRY du FLAG qui sera dépilé lors du IRET
+endofint:
+	pop 	bp
+	sti				;On réactive les interruptions logiciellement
+	iret				;Puis on retourne au programme appelant.
+
+current dw 0			;Mot temporaire qui contient l'adresse de la fonction appelée
+tables dw setvideomode		;Table qui contient les adresses de toutes les fonctions de VIDEO (WORD)
+
+
+;Librairie qui prend en charge le format de STR ASCIIZ
+;# nombre   8
+;@ str      7
+;& nom      6
+
+;High          Low
+;0 variable    4 hex
+;1 byte        3 dec
+;2 word        2 oct
+;3 3 octets    1 bin
+;4 dword       5 adresse
+;5 5 octets    6 nom
+;6 ...         7 str
+	;       8 nombre
+
+
+;Renvoie carry si la syntaxe de ds:si n'est pas respect‚ par rapport a es:di
+CheckSyntax0:
+        push    ax bx dx bp si di ds es
+        push    es di
+        push    cs
+        pop     es
+        mov     di,offset temp2
+        call    copy0
+        mov     si,di
+        push    cs
+        pop     ds
+        pop     di es
+        call    getdelimiter0
+        mov     bp,dx
+        mov     dl,' '
+        call    setdelimiter0
+        call    compressdelimiter0
+        call    uppercase0
+        call    getnbitems0
+        ;call    xch 
+        ;mov     ax,cx
+        ;call    getnbitem0
+        ;call    xch
+        ;cmp     ax,cx
+        ;call    xch
+        ;jne     notequalatall
+        mov     bx,cx
+        xor     cx,cx
+itemer:
+        call    whatisitem0
+        mov     dx,ax
+        call    xch
+        call    whatisitem0
+        call    xch
+        cmp     ax,dx
+        jne     prob
+        cmp     al,6
+        jb      equal
+        call    cmpitems0
+        je      equal
+prob:
+        cmp     dl,4
+        ja      nosize
+        cmp     al,8
+        je      equal
+        cmp     al,4
+        jne     notequalatall
+        cmp     dh,ah
+        ja      notequalatall
+        jmp     equal
+nosize:
+        cmp     al,7
+        jne     noname
+        cmp     ah,0
+        jne     notequalatall
+        jmp     equal
+noname:
+        cmp     al,8
+        je      equal
+        jmp     notequalatall
+equal:
+        inc     cx
+        cmp     cx,bx
+        jne     itemer
+        cld
+ackno:
+        mov     dx,bp
+        call    setdelimiter0
+        pop     es ds di si bp dx bx ax
+        ret
+notequalatall:
+        stc
+        jmp     ackno
+xch:
+        push    ds
+        push    es
+        pop     ds
+        pop     es
+        xchg    si,di
+        ret
+
+temp2 db 256 dup (0)
+
+;Compare les ‚l‚ments cx de deux chaine ds:si et es:di
+Cmpitems0:
+        push    cx dx si di
+        push    cx di
+        call    getpointeritem0
+        mov     si,di
+        xor     cx,cx
+        inc     cx
+        call    getpointeritem0
+        mov     dx,di 
+        sub     dx,si
+        dec     cx
+        pop     di cx
+        push    ds si
+        push    es
+        pop     ds
+        mov     si,di
+        call    getpointeritem0
+        pop     si ds
+        mov     cx,dx
+        rep     cmpsb
+        pop     di si dx cx
+        ret
+
+
+                                
+;Renvoie l'‚l‚ment cx de ds:si dans edx si nb et dans es:di si str ou name
+gettypeditem0:
+        push    bx cx si
+        call    getpointeritem0
+        mov     si,di 
+        xor     cx,cx
+        inc     cl
+        call    getpointeritem0
+        mov     bx,di
+        dec     bx
+        mov     cl,0
+        xchg    cl,ds:[bx]
+        call    gettyped0
+        xchg    cl,ds:[bx]
+        pop     si cx bx
+        ret
+
+;Renvoie ds:si dans edx si nb et dans es:di si str ou name
+gettyped0:
+        push    ax
+        call    whatis0
+        cmp     al,5
+        jb      number
+        cmp     al,6
+        je      pointer
+        push    ds
+        pop     es
+        call    getpointeritem0
+        jmp     endofGettypeditem0
+number:
+        mov     edx,cs:lastnumber              
+        jmp     endofgettypeditem0
+pointer:
+        call    str0toadress
+endofgettypeditem0:
+        pop      ax
+        ret     
+
+;Renvoie dans ax le type de la str0 point‚e par ds:si ‚l‚ment cx
+whatisitem0:
+        push    bx cx si di
+        call    getpointeritem0
+        mov     si,di 
+        xor     cx,cx
+        inc     cl
+        call    getpointeritem0
+        mov     bx,di
+        dec     bx
+        mov     cl,0
+        xchg    cl,ds:[bx]
+        call    whatis0
+        xchg    cl,ds:[bx]
+        pop     di si cx bx
+        ret
+
+;Renvoie dans ax le type de la str0 point‚e par ds:si
+;High          Low
+;0 variable    4 hex
+;1 byte        3 dec
+;2 word        2 oct
+;3 3 octets    1 bin
+;4 dword       5 adresse
+;5 5 octets    6 name
+;6 ...         7 str
+whatis0:
+        push    bx cx edx
+        mov     cl,2
+        call    str0isbase
+        jnc      finbase
+        mov     cl,8
+        call    str0isbase
+        jnc      finbase
+        mov     cl,10
+        call    str0isbase
+        jnc      finbase
+        mov     cl,16
+        call    str0isbase
+        jc     testadress
+finbase:
+        mov     bx,cx
+        xor     ch,ch
+        mov     al,cs:[bx+offset basenn-2]
+        call    str0toint
+        mov     cs:Lastnumber,edx
+        cmp     edx,0000FFFFh
+        ja      bits32
+        cmp     dx,00FFh
+        ja      bits16
+        mov     ah,1
+        jmp     endofwhat
+bits16:
+        mov     ah,2
+        jmp     endofwhat
+bits32:
+        mov     ah,3
+        jmp     endofwhat
+testadress:
+        call    str0isadress
+        jc      testname
+        mov     ax,0005h
+        jmp     endofwhat
+testname:
+        ;call    str0isname
+        ;jc      testvarstr
+        ;jnc	isok
+	;mov     al,06h
+        cmp     byte ptr [si],'&'
+        jne     testvarstr
+	mov     al,06h
+        call    getlength0
+	dec	cl
+        mov     ah,cl
+	jmp     endofwhat
+testvarstr:       
+        cmp     byte ptr [si],'@'
+        jne     testnumber
+        mov     al,07h
+        call    getlength0
+	dec	cl
+        mov     ah,cl
+        jmp     endofwhat 
+testnumber:
+        cmp     byte ptr [si],'#'
+        jne     isstr
+	mov	al,8
+        call    getlength0
+        dec	cl
+	mov	ah,cl
+        jmp     endofwhat
+isstr:
+        mov     al,07h
+        call    getlength0
+        mov     ah,cl
+endofwhat:
+        pop     edx cx bx 
+        ret
+
+Lastnumber dd 0
+
+;Renvoie non carry si la str ds:si point‚e peut ˆtre une adresse
+str0isadress:
+        ;push
+        stc
+        ;pop
+        ret
+
+;Renvoie en es:di le pointeur str0 ds:si
+Str0toAdress:
+        ;push
+        stc
+        ;pop
+        ret
+
+;Renvoie non carry si la str ds:si point‚e peut ˆtre un nom de fichier
+str0isname:
+        push    ax si di
+isname:
+        mov     al,[si]
+        inc     si
+        cmp     al,0
+        je      itsok
+        mov     di,offset non
+verify:
+        mov     ah,[di]
+        inc     di
+        cmp     ah,0FFh
+        je      isname
+        cmp     ah,al
+        jne     verify
+        stc
+        jmp     itsdead
+itsok:
+        clc
+itsdead:        
+        pop    di si ax
+        ret
+
+non db '/<>|"?*:\',01,0FFh
+
+;Renvoie non carry si le texte point‚ par si est de la base cl
+str0isbase:
+        push    ax cx si di es
+        push    cs
+        pop     es
+        mov     ah,cl
+isstrbase:
+        mov     al,[si]         
+        cmp     al,0
+        je      okbase
+        mov     cl,ah 
+        xor     ch,ch
+        mov     di,cx
+        cmp     al,es:[di-2+offset basen]
+        je      verifbase
+        xor     ch,ch
+        inc     cl
+        mov     di,offset base
+        cld
+        repne   scasb
+        cmp     cx,0
+        je      nobase
+        inc     si
+        jmp     isstrbase
+okbase:
+        clc
+endbase:
+        pop     es di si cx ax
+        ret
+verifbase:
+        cmp     byte ptr [si+1],0
+        je      okbase  
+nobase:
+        stc
+        jmp     endbase  
+
+temp dw 0
+
+;Converti un str de base cl en int dans edx
+str0toint:
+        push    eax bx ecx si edi ebp es
+        push    cs
+        pop     es
+        mov     ah,cl
+        mov     cs:temp,si 
+gotos:         
+        cmp     byte ptr [si+1], 0
+        je      oklo
+        inc     si
+        jmp     gotos
+oklo:
+        mov     edi,1
+        xor     ebp,ebp
+        mov     bl,cl
+baseto:                        
+        cmp     si,cs:temp
+        jb      endbaseto
+        mov     al,[si]
+        xor     ecx,ecx
+        mov     cl,bl
+        inc     cl
+        push    di
+        mov     di,offset base
+        cld
+        repne   scasb
+        pop     di
+        jne     noop
+        sub     cl,bl
+        neg     cl
+        mov     eax,edi
+        mul     ecx
+        add     ebp,eax
+        mov     eax,edi
+        mov     cl,bl
+        mul     ecx
+        mov     edi,eax
+noop:
+        dec     si
+        jmp     baseto
+endbaseto:
+        mov     edx,ebp
+        pop     es ebp edi si ecx bx eax
+ret  
+base   db '0123456789ABCDEF'
+basen  db 'B     O D     H'            
+basenn db 1,0,0,0,0,0,2,0,3,0,0,0,0,0,4
+
+;Renvoie en es:di la partie de cx caractŠres a partir de la gauche de ds:si
+Left0:
+        push    ax cx si di
+        cld
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     di si cx ax
+        ret
+
+;Renvoie en es:di la partie de cx caractŠres a partir de la droite de ds:si
+Right0:
+        push    ax cx dx si di
+        mov     dx,cx
+        call    getlength0
+        add     si,cx
+        sub     si,dx
+        mov     cx,dx
+        cld
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     di si dx cx ax
+        ret
+
+;Renvoie en es:di la partie de cx caractŠres a partir de la position bx de ds:si
+middle0:
+        push    ax cx si di
+        add     si,bx
+        cld
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     di si cx ax
+        ret
+
+;Rempli de cx caractŠres dl a partir de la position bx de ds:si
+Fill0:
+        push    ax bx cx si di es
+        push    ds
+        pop     es
+        add     si,bx
+        mov     al,dl
+        mov     di,si
+        cld
+        rep     stosb
+        pop     es di si cx bx ax
+        ret
+
+;Remplace tout les caractŠres al de ds:si par des caractŠres dl
+ReplaceAllchar0:
+        push    ax cx di es
+        call    GetLength0
+        push    ds
+        pop     es
+        mov     di,si
+findandchange:
+        repne   scasb
+        cmp     cx,0
+        je      endofchange
+        mov     es:[di-1],dl
+        jmp     findandchange
+endofchange:
+        pop     es di cx ax
+        ret
+
+
+;Recherche un caractŠre dl dans la chaŒne ds:si
+SearchChar0:
+        push    ax cx di es
+        call    GetLength0
+        push    ds
+        pop     es
+        mov     di,si
+        mov     al,dl
+        repne   scasb
+        pop     es di cx ax
+        ret
+
+;Inverse la chaine point‚e en ds:si
+invert0:
+        push    ax cx si di es
+        call    GetLength0
+        push    ds
+        pop     es
+        mov     di,si
+        add     di,cx
+        dec     di
+revert:
+        mov     al,[si]
+        xchg    al,es:[di]
+        mov     [si],al
+        inc     si
+        dec     di
+        cmp     si,di
+        je      finishinvert
+        dec     di
+        cmp     si,di
+        je      finishinvert
+        inc     di
+        jmp     revert
+finishinvert:
+        pop     es di si cx ax
+        ret
+
+;Compares 2 chaines de caractŠres DS:SI et ES:DI zerof si non equal
+cmpstr0:
+        push    cx dx si di
+        call    GetLength0
+        mov     dx,cx
+        push    ds si
+        push    es
+        pop     ds
+        mov     si,di
+        call    GetLength0       
+        pop     si ds
+        cmp     cx,dx
+        jne     NotEqual
+        repe    cmpsb
+NotEqual:
+        pop     di si dx cx
+        ret
+
+;Compares 2 chaines de caractŠres DS:SI et ES:DI zerof si non equal et renvoie le nb de caractŠre egaux dans dx
+evalue0:
+        push    cx si di
+        push    ds si
+        push    es
+        pop     ds
+        mov     si,di
+        call    GetLength0       
+        pop     si ds
+        mov     dx,cx
+        repe    cmpsb
+        pushf
+        sub     dx,cx
+        popf
+        pop     di si cx
+        ret
+
+
+;Insert une chaine ds:si en es:di a partir du caractŠre cx
+insert0:
+        push    cx di si
+        add     di,cx
+        call    getlength0
+        push    si di ds
+        push    es
+        pop     ds
+        mov     si,di
+        add     di,cx
+        call    copy20
+        pop     ds di si
+        cld
+        inc     di
+        rep     movsb
+        pop     si di cx
+        ret
+
+;Detruit CX caractŠres a partir du caractŠre BX de DS:SI
+delete0:
+        push    cx dx si di es
+        push    ds
+        pop     es
+        mov     dx,cx
+        call    getlength0
+        sub     cx,dx
+        sub     cx,bx
+        inc     cx
+        add     si,bx
+        mov     di,si
+        add     si,dx
+        cld
+        rep     movsb
+        pop     es di si dx cx
+        ret
+        
+;Copie une chaine de ds:si en es:di
+Copy0:
+        push    ax cx si di
+        call    GetLength0
+        cld
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     di si cx ax
+        ret
+
+;Copie une chaine de ds:si en es:di
+Copy20:
+        push    ax cx si di
+        call    GetLength0
+        cld
+        add     si,cx
+        add     di,cx
+        inc     cx
+        std
+        rep     movsb
+        pop     di si cx ax
+        ret
+
+;ConcatŠne le chaine ds:si avec es:di
+Concat0:
+        push    ax cx dx si di
+        call    GetLength0
+        mov     dx,cx
+        xchg    si,di
+        push    ds
+        push    es
+        pop     ds
+        call    GetLength0
+        pop     ds
+        xchg    si,di
+        add     di,cx
+        mov     cx,dx
+        cld
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     di si dx cx ax
+        ret
+
+;Met DL comme d‚limiteur par d‚faut 
+SetDelimiter0:
+        mov     cs:delim,dl
+        ret
+
+;Renvoie le d‚limiteur par d‚faut dans dl
+GetDelimiter0:
+        mov     dl,cs:delim
+        ret
+delim db 0
+
+;D‚truit les d‚limiteur qui sont cons‚cutifs dans ds:si
+CompressDelimiter0:
+        push    ax dx si di es
+        call    Getlength0
+        push    ds
+        pop     es
+        mov     di,si
+        mov     al,cs:delim
+        xor     dx,dx
+Compressitems:
+        repne   scasb
+        inc     dx
+againcomp:
+        cmp     [di],al
+        jne     nosup
+        mov     si,di
+        mov     bx,0
+        push    cx
+        mov     cx,1
+        call    delete0
+        pop     cx
+        jmp     againcomp
+nosup:
+        cmp     cx,0
+        jne     compressitems
+        mov     cx,dx
+        pop     es di si dx ax
+        ret
+
+;Met le nombre d'‚l‚ments … cx
+Setnbitems0:
+        push    ax cx dx di es
+        mov     dx,cx
+        call    Getnbitems0
+        cmp     cx,dx
+        je      noadjust
+        ja      subsome
+        push    ds
+        pop     es
+        mov     di,si
+        sub     cx,dx
+        neg     cx
+        push    cx
+        call    getlength0
+        add     di,cx
+        pop     cx
+        mov     al,cs:delim
+        mov     ah,'a'
+        rep     stosw
+        mov     al,0
+        stosb
+        jmp     noadjust
+subsome:
+        mov     cx,dx
+        call    GetPointeritem0
+        dec     di
+        mov     byte ptr [di],0
+noadjust:
+        pop     es di dx cx 
+        ret
+
+;Renvoie la taille dx de l'‚l‚ment cx
+Getitemsize:
+        push    cx di
+        call    getpointeritem0
+        mov     dx,di
+        inc     cx
+        call    getpointeritem0
+        sub     dx,di
+        neg     dx 
+        dec     dx
+        pop     di cx
+        ret
+
+;Renvoie en es:di l'‚l‚ment cx de ds:si
+Getitem0:
+        push    si di cx ax
+        push    di
+        call    getPointeritem0
+        call    getitemsize    
+        mov     si,di
+        pop     di
+        mov     cx,dx    
+        rep     movsb
+        mov     al,0
+        stosb
+        pop     ax cx di si
+        ret
+
+;renvoi un pointeur di sur l'‚l‚ment cx de ds:si
+GetPointeritem0:
+        push    ax bx cx dx es
+        mov     bx,cx
+        call    Getlength0
+        push    ds
+        pop     es
+        mov     di,si
+        mov     al,cs:delim
+        xor     dx,dx
+Countnbitems:
+        cmp     bx,dx
+        je      finishpointer
+        repne   scasb
+        inc     dx
+        cmp     cx,0
+        jne     countnbitems
+        inc     di
+finishpointer:
+        pop     es dx cx bx ax
+        ret 
+
+;Renvoie le nombre d'‚l‚ments cx de ds:si
+GetNbitems0:
+        push    ax dx di es
+        call    Getlength0
+        push    ds
+        pop     es
+        mov     di,si
+        mov     al,cs:delim
+        xor     dx,dx
+Countitems:
+        repne   scasb
+        inc     dx
+        cmp     cx,0
+        jne     countitems
+        mov     cx,dx
+        pop     es di dx ax
+        ret
+
+;renvoie la taille en octets CX de la chaine point‚e en ds:si
+GetLength0:
+        push    ax di es
+        push    ds
+        pop     es
+        mov     di,si
+        mov     al,0
+        mov     cx,0FFFFh
+        cld
+        repne   scasb
+        neg     cx
+        dec     cx
+        dec     cx
+        pop     es di ax
+        ret
+
+;Met la taille en octets de la chaine point‚e ds:si a CX 
+SetLength0:                                   
+        push    bx
+        mov     bx,cx
+        mov     byte ptr [si+bx],0
+        pop     bx
+        ret  
+
+;met en majuscule la chaine ds:si
+UpperCase0: 
+        push    si ax
+UpperCase:
+        mov     al,ds:[si]
+        inc     si
+        cmp     al,0
+        je      EndUpperCase
+        cmp     al,'a'
+        jb      UpperCase
+        cmp     al,'z'
+        ja      UpperCase
+        sub     byte ptr [si-1],'a'-'A'
+        jmp     UpperCase
+EndUpperCase:
+        clc
+        pop ax si
+        ret
+
+;met en majuscule la premiŠre lettre chaine ds:si
+OneCase0:
+        push    ax
+OneUpperCase:
+        mov     al,ds:[si]
+        cmp     al,'a'
+        jb      OneEndUpperCase
+        cmp     al,'z'
+        ja      OneEndUpperCase
+        sub     byte ptr [si],'a'-'A'
+OneEndUpperCase:
+        clc
+        pop ax 
+        ret  
+
+;met en minuscule la chaine ds:si
+LowerCase0: 
+        push    si ax
+LowerCase:
+        mov     al,ds:[si]
+        inc     si
+        cmp     al,0
+        je      EndLowerCase
+        cmp     al,'A'
+        jb      LowerCase
+        cmp     al,'Z'
+        ja      LowerCase
+        add     byte ptr [si-1],'a'-'A'
+        jmp     LowerCase
+EndLowerCase:
+        clc
+        pop ax si
+        ret
+
+;Inverse la casse la chaine ds:si
+InvertCase0:
+        push    si ax
+InvertCase:
+        mov     al,ds:[si]
+        inc     si
+        cmp     al,0
+        je      EndInvertCase
+        cmp     al,'A'
+        jb      InvertCase
+        cmp     al,'Z'
+        jbe     GoInvertCase
+        cmp     al,'a'
+        jb      InvertCase
+        cmp     al,'z'
+        ja      InvertCase 
+        sub     byte ptr [si-1],'a'-'A'
+        jmp     InvertCase
+GoInvertCase:
+        add     byte ptr [si-1],'a'-'A'
+        jmp     InvertCase
+EndInvertCase:
+        clc
+        pop ax si
+        ret          
+
+end start

noyau/mcb.asm

@@ -0,0 +1,119 @@
+FirstMB dw 0
+
+;Initialise les blocs de mémoire
+MBinit:
+	push	ax cx es
+	mov	ax,gs
+	mov	cs:Firstmb,ax
+	dec	ax
+	mov	es,ax
+	mov	cx,0A000h
+	sub	cx,ax
+	dec	cx
+	mov   es:[MB.Reference],Free
+	mov   es:[MB.Sizes],cx
+	mov   es:[MB.Check],'NH'
+	mov	es:[MB.IsNotLast],False
+	clc
+	pop	es cx ax
+	ret
+notforfree:
+	stc
+	pop	es cx ax
+	ret
+
+;Libère le bloc de mémoire GS
+MBFree:
+	push	bx es
+	mov	bx,gs
+	dec   bx
+	mov	es,bx
+	cmp	es:[MB.Check],'NH'
+	je	notforfree
+	mov	es:[MB.IsResident],0
+	mov	es:[MB.Reference],Free
+	mov	dword ptr es:[MB.Names],'eerF'
+	mov	dword ptr es:[MB.Names+4],0
+	pop	es bx
+	ret	
+
+;Creér un bloc de nom ds:si de taille cx (octets) -> n°segement dans GS
+MBCreate:
+	push	ax bx cx dx si di es	
+	shr	cx,4
+	inc	cx
+	mov	bx,cs:firstmb
+	dec	bx
+searchfree:
+	mov   es,bx
+	cmp	es:[MB.Check],'NH'
+	jne	wasntgood
+	cmp	es:[MB.IsNotLast],True
+	sete  dl
+	cmp	es:[MB.Reference],Free
+	je	weregood
+	cmp	dl,False
+	je	wasntgood	
+notsogood:
+	inc	bx
+	add	bx,es:[MB.Sizes]
+	jmp	searchfree
+weregood:
+	mov	ax,es:[MB.Sizes]
+	cmp	cx,ax
+	ja	notsogood
+	mov	es:[MB.IsNotLast],True 
+	mov	es:[MB.Reference],cs
+	mov	es:[MB.IsResident],False
+	mov	es:[MB.Sizes],cx
+	mov   di,MB.Names
+	push	ax cx
+	mov 	cx,8
+loops:
+	mov	dh,[si]
+	inc 	si
+	dec	cx
+	jz	endofloops
+	cmp	dh,0
+	je 	endofloops
+	mov	es:[di],dh
+	inc	di
+	jmp	loops
+endofloops:
+	inc	cx
+	mov	al,0
+	rep	stosb
+	pop	cx ax
+      mov   word ptr es:[MB.Check],'NH'
+	sub	ax,cx
+	dec	ax
+	js	nofree
+	inc   bx
+	mov	gs,bx
+	add	bx,cx
+	mov	es,bx
+	mov	es:[MB.IsNotLast],dl
+	mov	es:[MB.IsResident],False
+	mov	es:[MB.Reference],Free
+	mov	es:[MB.Sizes],ax
+	mov	dword ptr es:[MB.Names],'eerF'
+	mov	dword ptr es:[MB.Names+4],0
+	mov	es:[MB.Check],'NH'
+nofree:
+	clc
+	pop	es di si dx cx bx ax
+	ret
+wasntgood:
+	stc
+	pop	es di si dx cx bx ax
+	ret
+
+;Rend le segment GS résident
+MBresident:
+	push	bx es
+	mov	bx,gs
+	dec	bx
+	mov	es,bx
+	mov	es:[MB.IsResident],True
+	pop	es bx
+	ret

noyau/system.asm

@@ -1,676 +0,0 @@
-.model tiny
-.486
-smart
-.code
-
-org 0100h
-
-start:
-mov si,offset video
-mov bx,400h
-mov ax,47h
-call installhandler
-jc erroron
-mov si,offset timer
-mov bx,900h
-mov ax,8h
-call replacehandler
-jc erroron
-mov si,offset pic
-mov bx,950h
-mov ax,50h
-call installhandler
-jc erroron
-mov si,offset drive
-mov bx,1020h
-mov ax,48h
-call installhandler
-jc erroron
-mov si,offset keyboard
-mov bx,1400h
-mov ax,9h
-call replacehandler
-jc erroron
-mov ax,40h
-mov es,ax
-mov dx,es:[8]
-cmp dx,0
-je nolpt1
-mov al,0FFh
-add dx,2
-out dx,al
-mov si,offset lpt
-mov bx,1500h
-mov ax,0Fh
-call installhandler
-jc erroron
-mov es,bx
-sub al,8
-xor ah,ah
-int 50h
-mov byte ptr es:[105h],'1'
-nolpt1:
-push es
-mov ax,40h
-mov es,ax
-mov dx,es:[10]
-pop es
-cmp dx,0
-je nolpt2
-mov al,0FFh
-add dx,2
-out dx,al
-mov si,offset lpt
-mov bx,1700h
-mov ax,0Dh
-call installhandler
-jc erroron
-sub al,8
-xor ah,ah
-int 50h
-mov es,bx
-mov byte ptr es:[105h],'2'
-nolpt2:
-mov si,offset mouse
-mov bx,1900h
-mov ax,74h
-call installhandler   
-jc erroron
-mov ax,0012
-int 50h         
-mov ah,2
-int 74h
-;mov si,offset joystick
-;mov bx,2700h
-;mov ax,08h
-;call replacehandler   
-mov si,offset hours
-mov bx,2900h
-mov ax,08h
-call replacehandler   
-
-start2:
-push cs
-push cs
-pop ds
-pop es
-mov ah,21
-mov cl,7
-int 47h
-mov ax,0002
-int 47h   
-mov ah,2
-int 47h
-mov ah,25
-mov bx,0
-int 47h
-mov ah,13
-mov si,offset msg1
-int 47h
-mov ah,6
-int 47h
-int 47h
-mov ah,13
-mov si,offset prompt
-int 47h
-mov ah,6
-int 47h
-xor di,di
-mov ax,0001h
-mov bx,offset buffer
-mov cx,13  
-int 48h       
-xor bp,bp
-showall:
-cmp byte ptr [bx+di],0
-je endof2
-mov al,[bx+di+12]
-mov byte ptr [bx+di+12],0
-mov si,bx
-add si,di
-mov ah,13
-int 47h
-mov si,offset spaces
-int 47h
-mov [bx+di+12],al
-mov byte ptr [bx+di+12+5],0
-mov si,bx
-add si,di
-add si,12
-int 47h
-mov ah,6
-int 47h
-add di,32
-inc bp
-jmp showall
-endof2:
-mov ah,21
-mov cl,112
-int 47h
-mov ah,13
-mov si,offset menu
-int 47h  
-mov xx,1
-mov xxold,2
-call Select
-endof:
-mov ax,0
-int 16h
-     cmp ah,50h
-     jne tre1
-     cmp xx,bp
-     je endof
-     inc xx
-     call select
-     jmp endof
-tre1:
-     cmp ah,48h
-     jne tre2
-     cmp xx,1
-     je endof
-     dec xx
-     call select
-     jmp endof
-tre2:
-     cmp al,0Dh
-     jne tre3 
-     mov di,xx
-     dec di
-     shl di,5
-     mov dx,[di+bx+26]
-     cmp [di+bx+12],00657865h ;EXE
-     jne tre3
-     mov ah,6
-     int 47h
-     int 47h
-     mov ah,21
-     mov cl,7
-     int 47h
-     mov ah,13
-     mov si,offset msg2
-     int 47h
-     mov cx,dx
-     call executefatway
-tre3:
-     cmp ah,59
-     jne tre4
-     mov lastread,0FFFFh
-     jmp start2
-tre4:
-     cmp ah,67
-     jne endof
-     mov ax,0001
-     int 47h
-     mov ah,2
-     int 47h
-     mov ah,21
-     mov cl,4
-     int 47h
-     mov ah,13
-     mov si,offset msg3
-     int 47h
-     mov ax,0
-     int 16h
-     mov ax,40h
-     mov ds,ax
-     mov bx,1234h
-     mov ds:[072h],bx
-     push 0FFFFh  
-     push 0000h
-     db 0CBh
-
-executefatway:
-     push cs
-     mov bx,offset start2
-     push bx     
-     mov bx,03000h
-     mov es,bx
-     push bx
-     mov bx,0100h
-     push bx
-     call loadfatway
-     push es
-     push es
-     push es
-     pop ds
-     pop fs
-     pop gs
-     push 7202h
-     popf
-     db 0CBh
-
-;selectionne la ligne xx
-Select:
-push ax di
-mov di,xxold
-mov al,7
-add di,2
-mov ah,32
-int 47h
-mov ax,xx
-mov xxold,ax
-mov di,xx
-mov ah,32
-mov al,112
-add di,2
-int 47h
-pop di ax
-ret      
-
-xx dw 1
-xxold dw 0
-menu db 'F1 Read disk F2 Read file F9 Quit F11 Change video F12 Debug                   ',0
-msg1 db '  Cos 2000 menu loader release 1.0',0
-msg2 db 'The program is loading',0
-msg3 db ' Cos will restart your computer, eject the floppy disk and press a key',0                                                      
-prompt db '>',0
-spaces db '   ',0
-dot db '.',0
-               
-;cx entr‚e -> fatway chemin
-getfatway:
-push bx cx 
-mov bx,offset fatway
-fatagain:
-mov cs:[bx],cx
-add bx,2 
-cmp cx,0FFF0h
-jae finishload
-call getfat
-jnc fatagain
-finishload:  
-pop cx bx
-ret
-
-;Charge le fichier de chemin cx -> taille dx
-loadfatway:
-push ax bx cx di 
-call getfatway
-jc endload
-mov di,offset fatway
-mov si,offset dot
-mov ah,13
-xor dx,dx
-loadagain:
-mov cx,cs:[di]
-cmp cx,0FFF0h
-jae endload
-add di,2
-call readsector
-jc endload
-add bx,cs:sizec
-add dx,cs:sizec
-jmp loadagain
-endload:
-pop di cx bx ax
-ret        
-
-
-sizec dw 512
-reserv dw 1
-
-;<-cx nøsecteur  ->cx code FAT
-getfat:
-push es ax bx dx
-push cs
-pop ds
-push cs
-pop es
-mov ax,cx
-xor dx,dx
-div sizec
-mov cx,ax
-add cx,reserv
-mov bx,offset buffer
-call readsector
-jc errorgetfat
-shl dx,1
-add bx,dx
-mov cx,[bx]
-errorgetfat:
-pop dx bx ax es
-ret
-
-ReadSector:
-push ax cx dx si
-  cmp cx,cs:lastread
-  je done
-  mov cs:LastRead,cx
-  mov AX, CX     
-  xor DX, DX
-  div cs:DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div cs:DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor dX, DX
-  div cs:DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 2
-  int 13h
-  jnc Done
-  dec SI
-  jnz TryAgain
-mov word ptr cs:lastread,0ffffh
-Done:
-  pop si dx cx ax
-ret
-
-WriteSector:
-push ax cx dx si
-  cmp cs:Lastread,cx
-  jne nodestruct
-  mov cs:Lastread,0ffffh
-  nodestruct:
-  mov AX, CX
-  xor DX, DX
-  div cs:DiskSectorsPerTrack
-  mov CL, DL                    ;{ Set the sector                            }
-  and CL, 63                    ;{ Top two bits are bits 8&9 of the cylinder }
-  xor DX, DX
-  div cs:DiskTracksPerHead
-  mov CH, DL                    ;{ Set the track bits 0-7                    }
-  mov AL, DH
-  ror AL, 1
-  ror AL, 1
-  and AL, 11000000b
-  or CL, AL                     ;{ Set bits 8&9 of track                     }
-  xor DX, DX
-  div cs:DiskHeads
-  mov DH, DL                    ;{ Set the head                              }
-  inc CL
-  mov SI, 4
-TryAgain2:
-  mov AL, 1
-  mov DL, 0
-  mov AH, 3
-  int 13h
-  jnc Done2
-  dec SI
-  jnz TryAgain2
-Done2:
-  pop si dx cx ax
-ret
-
-Lastread dw 0FFFFh
-
-;remplace le handler pointer par ds:si en bx:100h interruption ax
-replacehandler:
-push ax bx cx si di ds es
-mov es,bx
-mov di,0100h
-call loadfile
-jc reph
-mov bx,ax
-call getint
-mov es:[102h],si
-mov es:[104h],ds
-call setint
-reph:
-pop es ds di si cx bx ax
-ret
-      
-;install le handler pointer par ds:si en bx:100h interruption ax
-installhandler:
-push bx cx di es
-mov es,bx
-mov di,100h
-call loadfile
-jc insh
-mov bx,ax
-call setint
-insh:
-pop es di cx bx
-ret
-
-;Charge le fichier Ds:si en es:di taille-> cx
-loadfile:
-push bx 
-call searchfile
-jc errorloadfile
-mov bx,di
-call loadfatway
-jc errorloadfile
-mov cx,dx
-errorloadfile:
-pop bx
-ret   
-                              
-;met es:di le handle de l'int bx
-setint:
-push ax bx ds
-cli
-shl bx,2
-xor ax,ax
-mov ds,ax
-mov ds:[bx],di
-mov ds:[bx+2],es
-pop ds bx ax
-sti
-ret
-
-;met ds:si le handle de l'int bx
-getint:
-push ax bx es
-shl bx,2
-xor ax,ax
-mov es,ax
-mov si,es:[bx]
-mov ds,es:[bx+2]
-pop es bx ax
-ret 
-
-;Recherche le fichier et retourne sont path et en cx sont debut
-Searchfile:
-push ax bx dx si di ds es
-push cs
-pop es
-xor dx,dx
-mov di,offset temp
-call asciiztofit
-push cs
-pop ds
-mov cx,13
-check:
-mov bx,offset buffer  
-call readsector
-jc errorboot
-xor di,di
-findnext:
-cmp byte ptr [bx+di],0
-je errorboot
-push si di cx
-mov si,di
-add si,bx
-mov di,offset temp
-mov cx,12+4
-cld
-rep cmpsb
-pop cx di si
-je oksystem
-add di,32
-inc dx
-cmp dx,nbfit
-ja errorboot
-cmp di,sizec
-jb findnext
-inc cx
-jmp Check
-oksystem:
-mov cx,[di+BX+26]
-cld
-jmp goodboot
-errorboot:
-stc
-goodboot:
-pop es ds di si dx bx ax
-ret
-
-;->name ds:si ->es:di
-AsciiZtoFit:
-push ax bx cx dx si di ds es
-xor bx,bx
-mov dx,di
-noextens:
-mov al,[si+bx]
-cmp al,'.'
-je extens
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,namesize ;(.)
-jne noextens
-erro:
-stc
-jmp errortranslate
-extens:  
-add si,bx
-inc si
-sub bx,namesize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-xor bx,bx         
-wasextens:
-mov al,[si+bx]
-cmp al,0
-je endextens
-call Issystchar
-jc errortranslate
-mov es:[di],al
-inc di
-inc bx
-cmp bx,extsize
-jne wasextens
-jmp erro
-endextens:        
-sub bx,extsize
-neg bx
-mov al,0
-mov cx,bx
-cld
-rep stosb
-mov si,dx
-mov di,dx
-push es
-pop ds
-mov cx,extsize+namesize
-call uppercaseMEM  
-clc
-endtranslate:
-pop es ds di si dx cx bx ax
-ret
-errortranslate:
-stc
-jmp endtranslate
-
-;Carry si al = caractŠre systŠme
-isSystchar:
-push di
-mov di,offset exeptchar
-isexcept:
-cmp al,cs:[di]
-je nogood
-inc di
-cmp byte ptr cs:[di],0
-jne isexcept
-endanal:
-clc
-pop di 
-ret
-nogood:
-stc
-jmp endanal
-
-;Transforme les x caractŠres de la mem en ds:si en maj
-uppercaseMEM: 
-push si di cx ax
-mov di,si
-uppercaser:
-mov al,ds:[si]
-inc si
-cmp al,'A'
-jb nonmaj
-cmp al,'Z'
-ja nonmaj
-add al,'a'-'A'
-nonmaj:
-mov es:[di],al
-inc di
-dec cx
-jnz uppercaser
-enduppercase:
-clc
-pop ax cx di si
-ret
-
-erroron:
-push cs
-pop ds
-xor edx,edx
-mov dx,ax
-mov ax,0001h
-int 47h
-mov ah,6
-int 47h
-mov ah,6
-int 47h
-mov ah,13
-mov si,offset errormsg
-int 47h
-mov ah,10
-mov cx,16
-int 47h
-mov ah,6
-int 47h
-mov ah,6
-int 47h
-mov ah,13
-mov si,offset errormsg2 
-int 47h
-mov ax,0
-int 16h
-push 0FFFFh
-push 0
-db 0CBh
-
-errormsg db 'Error with drivers loading on interrupt nø',0
-errormsg2 db 'Press a key to restart...',0
-namesize equ 12
-extsize equ 5       
-nbfit equ 255
-hours db 'hours.sys',0
-joystick db 'joystick.sys',0
-mouse db 'mouse.sys',0
-pic db 'pic8259a.sys',0
-drive db 'drive.sys',0
-timer db 'timer.sys',0
-lpt db 'lpt.sys',0
-video db 'video.sys',0
-keyboard db 'keyboard.sys',0
-temp db 12+5+1 dup (0)
-exeptchar db '/\<>:|.',01,0,0
-DiskSectorsPerTrack dw 18   
-DiskTracksPerHead dw 80
-DiskHeads dw 2
-
-fatway equ $
-
-buffer equ $+3000
-
-end start

noyau/systeme.asm

@@ -0,0 +1,897 @@
+.model tiny
+.486
+smart
+.code
+
+org 0100h
+
+include ..\include\fat.h
+
+start:
+push cs
+push cs
+push cs
+push cs
+pop ds
+pop es
+pop fs
+pop gs
+	;xor 	ax,ax
+	;mov 	ds,ax
+	;mov 	si,7C00h
+mov si,offset eepop
+	mov 	di,offset myboot
+	mov 	cx,type bootsector
+	push 	cs
+	pop 	es
+	rep 	movsb
+jmp noone
+
+eepop db 0,0,0
+bootdb  db     'COS2000A'                ;Fabricant + n°série Formatage
+sizec   dw      512                      ;octet/secteur
+        db      1                        ;secteur/cluster
+reserv  dw      1                        ;secteur reserv‚
+nbfat   db      2                        ;nb de copie de la FAT
+nbfit   dw      224                      ;taille rep racine
+allclu  dw      2880                     ;nb secteur du volume si < 32 még
+        db      0F0h                     ;Descripteur de média
+fatsize dw      9                        ;secteur/FAT
+nbtrack dw      18                       ;secteur/piste       
+head    dw      2                        ;nb de tˆteb de lecture/écriture
+hidden  dd      0                        ;nombre de secteur cach‚s
+        dd      0                        ;si nbsecteur = 0 nbsect                                       ; the number of sectors
+bootdrv db      0                        ;Lecteur de d‚marrage
+bootsig db      0                        ;NA
+        db      29h                      ;boot signature 29h
+bootsig2 dd     01020304h                ;no de serie
+pope    db      'COS2000    '            ;nom de volume
+        db      'FAT12   '               ;FAT
+
+
+	xor ax,ax
+	mov es,ax
+	mov di,1Eh*4
+	lds si,es:[di]
+	mov es:[di],cs
+	mov word ptr es:[di],offset myDPT
+	push cs
+	pop es
+	mov cx,type DPT
+	rep movsb
+	mov ax,cs:[Bootsector.SectorsPerTrack]
+	mov es:[DPT.SectorPerTracks],al    
+noone:
+	push 	cs
+	push 	cs
+	push 	cs
+	push 	cs
+	pop 	ds
+	pop 	es
+	pop 	fs
+	pop 	gs
+
+	call 	InitDrive
+
+	mov	si,offset premice
+	mov	bx,7
+	call	showstr
+	mov	si,offset next
+	call	showstr
+	mov	si,offset conf
+	call	showstr
+	mov	al,0
+	mov	cx,2000
+	mov	di,offset loadinglist
+	rep	stosb
+	mov	di,offset loadinglist
+	call	loadfile
+	jc 	noconfread
+
+	mov	si,offset debut
+	mov	bx,7
+	call	showstr
+	mov	bx,500h
+	xor	cx,cx
+	mov  	si,offset loadinglist
+suiteloading:
+	call 	readline
+	jc	noconfload
+	push	bx si
+	mov	bl,7
+	mov	si,offset next
+	call	showstr
+	pop	si bx
+	call	showstr
+	mov	dx,bx
+	push	bx si
+	mov	bx,7
+	mov	si,offset address
+	call	showstr
+	mov	cx,16
+	call	showhex
+	mov	si,offset addressend
+	call	showstr
+	xor	bp,bp
+	mov	dx,ax
+	cmp	ax,8h
+	jb	noadder
+	cmp	ax,10h
+	ja	noadder
+	mov	bp,1	
+	sub	dx,8
+	jmp	haveirq
+noadder:
+	cmp	ax,70h
+	jb	noadd
+	cmp	ax,78h
+	ja	noadd
+	mov	bp,1
+	sub	dx,68h
+haveirq:
+	mov	si,offset irqs
+	call	showstr
+	mov	cx,4
+	call	showhex
+	mov	si,offset irqsend
+	call	showstr
+noadd:
+	pop	si bx
+	cmp	bp,1
+	jne	install
+	call	replacehandler
+	jmp	suites
+install:
+	call 	installhandler
+suites:	
+	jc 	nohandlerload
+	add	bx,0F00h
+	inc	cx
+	call 	nextline
+	jnz 	suiteloading
+
+	mov	si,offset fini
+	mov	bl,7
+	call	showstr
+	mov	si,offset next
+	call	showstr
+	mov	si,offset prompt
+	call	showstr
+	mov     ax,6000h
+      	mov     es,ax
+        push    ax
+        mov     di,0100h
+        push    di
+	call 	loadfile
+	jc	nopromptload
+        push    7202h
+        popf
+	push	es
+	push	es
+	push	es
+	pop	ds
+	pop	fs
+	pop	gs
+        db      0CBh
+
+nopromptload:
+	mov	si,offset prompte
+	mov	bl,4
+	call	showstr
+	jmp	erroron
+
+nohandlerload:
+	mov	si,offset handlere
+	mov	bl,4
+	call	showstr
+	jmp	erroron
+
+noconfread:
+	mov	si,offset confee
+	mov	bl,4
+	call	showstr
+	jmp	erroron
+
+noconfload:
+	mov	di,si
+	mov	si,offset confe
+	mov	bl,4
+	call	showstr
+	mov	dx,cx
+	mov	cx,16
+	call	showhex
+	mov	si,offset confe2
+	mov	bl,3
+	call	showstr
+	mov	dx,di
+	mov	cx,16
+	call	showhex
+
+erroron:
+	push 	cs
+	pop 	ds
+	mov 	si,offset erreur
+	mov 	bl,4
+	call 	showstr
+	mov 	ax,0
+	int 	16h
+	push 	0FFFFh
+	push 	0
+	db 	0CBh
+
+address db ' [',0
+addressend db ':0100] ',0
+irqs db ' (IRQ ',0
+irqsend db ')',0
+prompt db 'commande.exe',0
+conf db 'systeme.ini',0
+premice 	db 0Dh,0Ah,'Chargement du fichier de configuration:',0
+debut 	db 0Dh,0Ah,'Chargement des pilotes systeme:',0
+fini	db 0Dh,0Ah,'Chargement de l''interpreteur de commande:',0
+next db 0Dh,0Ah,'   - ',0
+prompte db 0Dh,0Ah,'Erreur lors du chargement de l''interpreteur',0
+handlere db 0Dh,0Ah,'Erreur lors du chargement des pilotes',0
+confe db 0Dh,0Ah,'Erreur dans le fichier de configuration a la ligne ',0
+confee db 0Dh,0Ah,'Erreur de lecture du fichier de configuration',0
+confe2 db ' caractere ',0
+erreur 	db 0Dh,0Ah,'Pressez une touche pour redemarrer...',0
+
+;==positionne si sur l'entrée suivante de la loading liste jusqu'a equal
+nextline:
+push ax cx di
+mov di,si
+mov al,0Ah
+mov cx,20
+repnz scasb
+mov si,di
+cmp byte ptr [di],0
+pop di cx ax
+ret
+
+;==Lit la loading list et initialise SI(Fichier) BX(adresse) AX(interruption)
+readline:
+push cx dx di es
+push ds
+pop es
+;Voir taille de la ligne -> DX
+mov di,si
+mov al,0Dh
+mov cx,20
+repne scasb
+sub cx,20
+neg cx
+mov dx,cx
+;N° interruption ??
+mov di,si
+mov al,'('
+repne scasb
+jne noaddr
+;Non, je recherche l'int positionnement parenthese de fin
+mov al,')'
+repne scasb
+jne errorlist
+;Je lit l'interruption dans DL
+xor dl,dl
+xor cx,cx
+dec di
+readingint:
+dec di
+mov al,[di]
+cmp al,'('
+je finishint
+call eval
+jc errorlist
+shl ax,cl
+add dl,al
+add cx,4
+cmp cx,8
+ja errorlist
+jmp readingint
+noaddr:
+dec di
+mov dl,0
+finishint:
+;mise d'un 0 a la fin du nom
+mov byte ptr [di],0
+mov al,dl
+pop es di dx cx
+clc
+ret
+errorlist:
+sub di,si
+mov si,di
+pop es di dx cx
+stc
+ret
+
+
+;return carry si pas hexa pour al et renvoie dans al la valeur décimale
+eval:
+push si
+xor si,si 
+searchex:
+cmp al,cs:[si+offset hexas]
+je endsearchex
+inc si
+cmp si,15
+jbe searchex
+pop si
+stc
+ret
+endsearchex:
+mov ax,si
+pop si
+clc
+ret
+
+hexas db '0123456789ABCDEF',0
+
+;==============================Affiche le nombre nb hexa en EDX de taille CX et couleur BL==============
+ShowHex:
+        push    ax bx cx edx si di
+        mov     di,cx
+        sub     cx,32
+        neg     cx
+        shl     edx,cl
+        shr     di,2
+        mov 	ah,0Eh
+        and 	bx,1111b
+Hexaize:
+        rol     edx,4
+        mov     si,dx
+	and	si,1111b
+	mov	al,[si+offset tab]
+        int 	10h
+        dec     di
+        jnz     Hexaize
+        pop     di si edx cx bx ax
+        ret
+Tab db '0123456789ABCDEF'
+
+;==============================Affiche une chaine DS:SI de couleur BL==============
+showstr:
+        push ax bx si
+again:
+        lodsb
+        or al,al
+        jz fin
+        mov ah,0Eh
+        and bx,1111b
+        int 10h
+        jmp again
+        fin:
+        pop si bx ax
+        ret
+
+;================================================
+;Routine de gestion de handler
+;================================================
+
+;remplace le handler pointer par ds:si en bx:100h interruption ax
+replacehandler:
+push ax bx cx si di ds es
+mov es,bx
+mov di,0100h
+call loadfile
+jc reph
+mov bx,ax
+call getint
+mov es:[102h],si
+mov es:[104h],ds
+call setint
+reph:
+pop es ds di si cx bx ax
+ret
+      
+;install le handler pointer par ds:si en bx:100h interruption ax
+installhandler:
+push bx cx di es
+mov es,bx
+mov di,100h
+call loadfile
+jc insh
+mov bx,ax
+call setint
+insh:
+pop es di cx bx
+ret
+                              
+;met es:di le handle de l'int bx
+setint:
+push ax bx ds
+cli
+shl bx,2
+xor ax,ax
+mov ds,ax
+mov ds:[bx],di
+mov ds:[bx+2],es
+pop ds bx ax
+sti
+ret
+
+;met ds:si le handle de l'int bx
+getint:
+push ax bx es
+shl bx,2
+xor ax,ax
+mov es,ax
+mov si,es:[bx]
+mov ds,es:[bx+2]
+pop es bx ax
+ret 
+
+;================================================
+;Routine de gestion de systeme de fichier FAT12
+;================================================
+
+;DPT disquette 
+mydpt DPT ?
+
+;Secteur de boot
+myboot bootSector ?
+
+;Données Calculée
+clustersize		dw	0
+TracksPerHead 		dw 	0
+DriveSize         	dd     	0
+AdressBoot		dw	0
+AdressFat		dw	0
+AdressParent      	dw     	0
+AdressData		dw	0 
+AddingValue		dw     	0
+CurrentDir		dw	0 ;En cluster
+CurrentDirStr		db      128 dup (0)
+
+;Pour recherches
+EntryPlace		dw	0 ;En octet
+AdressDirectory		dw	0 ;En cluster
+firstsearch		dw	1 ;Premiere requete ?
+
+getfat:
+	push  	ax bx dx si
+	mov	ax,cx
+	mov	bx,ax
+	and   	bx,0000000000000001b
+	shr   	ax,1
+	mov   	cx,3
+	mul   	cx
+	mov   	si,offset bufferfat
+	add   	si,ax
+	cmp   	bx,0h
+	jnz   	evenfat
+oddfat:	
+	mov	dx,cs:[si]
+      	and   	dx,0FFFh
+    	mov   	cx,dx
+      	jmp   	endfat
+evenfat:
+      	mov   	dx,cs:[si+1]
+      	and   	dx,0FFF0h
+      	shr   	dx,4
+      	mov   	cx,dx
+endfat:
+	cmp	dx,0FF0h
+	jbe	nocarry
+	stc
+	pop 	si dx bx ax
+	ret
+nocarry:
+	clc
+	pop 	si dx bx ax
+	ret
+
+;============loadfile (Fonction 4)===============
+;Charge le fichier ds:si en es:di ->ecx taille
+;-> AH=4
+;<- Flag Carry si erreur
+;=====================================================
+loadfile:
+	push	eax bx di
+	push	es di
+	push	cs
+	pop	es
+	mov	di,offset tempfit
+	call	searchfile
+	pop	di es
+	jne   	errorload
+	jc	errorload
+	mov	cx,cs:tempfit.FileGroup
+	mov	eax,cs:tempfit.FileSize
+	call	loadway
+	jc    	errorload
+	clc
+	;mov	ecx,eax
+	pop   	di bx eax
+	ret
+errorload:
+	stc
+	mov	ecx,0
+	pop   	di bx eax
+	ret
+
+tempfit db 32 dup (0)
+
+;=============SearchFile (Fonction 10)===============
+;Renvois dans ES:DI la fit du fichier DS:SI et non equal si pas existant
+;-> AH=10
+;<- Flag Carry si erreur
+;=====================================================
+SearchFile:
+	push	ax cx ds si di es
+	call	uppercase
+	push	ds si
+	call	findfirstfilez
+	push	ds
+	pop	es
+	mov	di,si
+	pop	si ds
+	jc	errorsearch
+	jmp	founded
+nextsearch:
+	push	ds si
+	call	findnextfilez
+	push	ds
+	pop	es
+	mov	di,si
+	pop	si ds
+founded:
+	cmp	byte ptr cs:[di],0
+	je	notgood
+	cmp	byte ptr cs:[di+FileAttr],0Fh
+	je	nextsearch
+	call	cmpnames
+	jc    	nextsearch
+okfound:
+	push	cs
+	pop	ds
+	mov	si,di
+	pop	es di
+	push	di es
+	mov	cx,32
+	rep	movsb
+	clc
+	pop	es di si ds cx ax
+	ret
+notgood:
+	cmp   	si,0FF5h
+	pop	es di si ds cx ax
+	ret
+errorsearch:
+	stc
+	pop	es di si ds cx ax
+	ret
+
+;Transforme la chaine ds:si en maj
+uppercase: 
+	push 	si ax
+	mov 	di,si
+uppercaser:
+	mov 	al,ds:[si]
+	cmp 	al,0
+	je 	enduppercase
+	cmp 	al,'a'
+	jb 	nonmaj
+	cmp 	al,'z'
+	ja 	nonmaj
+	sub 	al,'a'-'A'
+	mov 	ds:[si],al
+nonmaj:
+	inc 	si
+	jmp 	uppercaser
+enduppercase:
+	clc
+	pop 	ax si
+	ret
+
+;Compare le nom ds:si '.' avec es:di 
+CmpNames:
+	push 	ax cx si di
+	mov 	cx,8
+	repe 	cmpsb
+	jne 	nequal
+	inc 	si
+nequal:
+	cmp 	byte ptr [si-1],'.'
+	jne 	trynoext
+	mov 	al,' '
+	rep 	scasb
+	mov 	cx,3
+	rep 	cmpsb
+	jne 	notequal
+	cmp 	byte ptr [si],0
+	jne 	notequal
+	cmp 	cx,0
+	jl 	notequal
+itok:
+	pop 	di si cx ax
+	ret
+trynoext:
+	cmp	byte ptr [si-1],0
+	jne	notequal
+	jmp	itok
+notequal:
+	stc
+	pop 	di si cx ax
+	ret
+
+;charge le fichier de de groupe CX et de taille eax
+LoadWay:
+	push	eax bx dx si di ecx ds es			
+	cmp   	eax,0
+	je	Zeroload
+	rol	eax,16
+	mov	dx,ax
+	ror	eax,16
+	div	cs:clusterSize
+	mov	bx,ax
+	cmp	bx,1
+	jb	adjustlast
+Loadfat:
+	call	readcluster
+	jc 	noway
+	add	di,cs:clusterSize
+	call	getfat
+	dec	bx
+	jnz	loadfat
+AdjustLast:
+	push  	es di
+	push	cs
+	pop 	es
+	mov	di,offset bufferread
+	mov	si,di
+	call	Readcluster
+	pop   	di es
+	jc	noway
+	mov	cx,dx
+	push	cs
+	pop	ds
+	rep	movsb
+zeroload:
+	clc
+	pop	es ds ecx di si dx bx eax
+	ret
+noway:	
+	stc
+	pop	es ds ebp di si dx bx eax
+	ret
+
+;=============INITDRIVE (Fonction 04H)===============
+;Initialise le lecteur pour une utilisation ultérieure
+;-> AH=4
+;<- Flag Carry si erreur
+;=====================================================
+InitDrive:
+	push 	eax bx cx edx di ds es
+	push 	cs
+	pop 	ds
+	push	cs
+	pop	es
+	mov	cs:lastseg,0
+	mov	cs:lastoff,0
+	mov 	cs:LastRead,0
+	mov	ax,myboot.sectorsize
+	mov	bl,myboot.SectorsPerCluster
+	xor	bh,bh
+	mul	bx
+	mov	clustersize,ax
+	mov 	bx,myboot.HiddenSectorsL
+	adc 	bx,myboot.HiddenSectorsH
+	mov 	AdressBoot,bx
+	add 	bx,myboot.ReservedSectors
+	mov 	AdressFat,bx
+	xor 	ax,ax
+	mov 	al,myboot.FatsPerDrive
+	mul 	myboot.SectorsPerFat
+	add 	bx,ax
+	mov 	AdressParent,bx
+	mov 	AdressDirectory,bx
+	mov 	ax,32                 
+	mul 	myboot.DirectorySize
+	div 	myboot.SectorSize
+	add 	bx,ax
+	mov 	AdressData,bx
+	sub	bx,2
+	mov	AddingValue,bx
+	mov 	ax,myboot.SectorsPerDrive
+	div 	myboot.SectorsPerTrack
+	xor 	dx,dx
+	div 	myboot.HeadsPerDrive     
+	mov 	TracksPerHead,ax
+	xor	eax,eax
+	mov	ax,myboot.SectorsPerDrive
+	sub	ax,AdressData
+	mul	myboot.SectorSize
+	shl   	edx,16
+	add   	edx,eax
+	mov	DriveSize,edx
+	mov	CurrentDir,0
+	mov	EntryPlace,0
+	mov	adressdirectory,0
+	mov	firstsearch,1
+	mov	currentdirstr,0
+	mov	di,offset bufferfat
+	mov	dx,myboot.SectorsPerFat
+	mov	cx,AdressFat
+SeeFat:
+	call	readsector
+	jc	ErrorInit
+	add	di,myboot.SectorSize
+	inc	cx
+	dec	dx
+	jnz	seefat
+	clc
+	pop 	es ds di edx cx bx eax
+	ret
+ErrorInit:
+	stc
+	pop 	es ds di edx cx bx eax
+	ret
+
+;=============FindFirstFile (Fonction 7)==============
+;Renvois dans ES:DI un bloc d'info
+;-> AH=7
+;<- Flag Carry si erreur
+;=====================================================
+FindFirstFileZ:
+	push 	cx
+	mov 	cx,cs:CurrentDir
+	mov 	cs:AdressDirectory,cx
+	xor	cx,cx
+	mov 	cs:EntryPlace,cx
+	mov	cs:firstsearch,1
+	call 	findnextfileZ
+	pop 	cx
+	ret
+
+;=============FindnextFile (Fonction 8)==============
+;Renvois dans ES:DI un bloc d'info
+;-> AH=8
+;<- Flag Carry si erreur
+;=====================================================
+;fait pointer ds:si sur la prochaine entrée du repertoire courant
+FindnextFileZ:
+	push	ax bx cx es di
+	push	cs
+	pop	ds
+	mov	cx,cs:AdressDirectory
+	mov	bx,cs:Entryplace
+FindnextFileagain:
+	cmp	cs:firstsearch,1
+	je	first
+	add	bx,32
+	cmp	bx,cs:clusterSize
+	jb	nopop
+first:
+	mov	di,offset bufferentry
+	push	cs
+	pop	es
+	mov	bx,0
+	cmp	cs:currentdir,0
+	jne	notrootdir
+	cmp	cs:firstsearch,1
+	je	noaddfirst1
+	inc	cx
+noaddfirst1:
+	add	cx,cs:adressparent
+	mov	al,myboot.sectorspercluster
+readroot:
+	call	readsector
+	jc	notwell
+	add	di,myboot.sectorsize
+	dec	al
+	jnz	readroot
+	sub	cx,cs:adressparent
+	jmp	nopop
+notrootdir:
+	cmp	cs:firstsearch,1
+	je	noaddfirst2
+	call	getfat
+noaddfirst2:
+	jc	notwell
+	call	readcluster
+	jc	notwell
+nopop:
+	mov	cs:firstsearch,0
+	mov	si,offset bufferentry
+	add	si,bx
+	cmp	byte ptr cs:[si],0
+	je	notwell
+	mov	cs:entryplace,bx
+	mov	cs:AdressDirectory,cx
+	cmp	byte ptr cs:[si],0E5h
+	je	findnextfileagain
+	cmp	byte ptr cs:[si+fileattr],28h
+	je	findnextfileagain
+	cmp	byte ptr cs:[si+fileattr],0Fh
+	je	findnextfileagain
+	clc
+	pop	di es cx bx ax
+	ret
+notwell:
+	stc
+	pop	di es cx bx ax
+	ret
+
+
+;=============READCLUSTER (Fonction 14)===============
+;Lit le secteur CX et le met en es:di
+;-> AH=14
+;<- Flag Carry si erreur
+;=====================================================
+readcluster:
+	push	ax bx cx dx di
+	mov	ax,cx
+	mov	bl,cs:myboot.sectorspercluster
+	xor	bh,bh
+	mul	bx
+	mov	cx,ax
+	add	cx,cs:addingvalue
+readsectors:
+	call	readsector
+	jc	errorreadincluster
+	add	di,cs:myboot.sectorsize
+	inc	cx
+	dec	bl
+	jnz	readsectors
+	clc
+	pop	di dx cx bx ax
+	ret
+errorreadincluster:
+	stc
+	pop	di dx cx bx ax
+	ret
+
+;=============READSECTOR (Fonction 01H)===============
+;Lit le secteur CX et le met en es:di
+;-> AH=1
+;<- Flag Carry si erreur
+;=====================================================
+ReadSector:
+	push 	ax bx cx dx si
+	cmp 	cx,cs:lastread
+	jne  	gom
+	mov	ax,es
+	cmp	cs:lastseg,ax
+	jne   	gom
+	cmp	di,cs:lastoff
+	jne   	gom
+	jmp	done
+gom:
+	mov	cs:lastseg,ax
+	mov	cs:lastoff,di
+	mov 	cs:LastRead,cx
+	mov	ax,cx
+	xor   	dx,dx
+	div   	cs:myboot.SectorsPerTrack
+	inc   	dl
+	mov 	bl,dl           
+	xor 	dx,dx                   
+	div 	cs:myboot.HeadsPerDrive
+	mov 	dh,cs:myboot.bootdrive
+	xchg 	dl,dh          
+	mov 	cx,ax              
+	xchg 	cl,ch             
+	shl 	cl,6                
+	or 	cl,bl       
+	mov 	bx,di                           
+	mov 	SI,4
+	mov 	AL,1
+TryAgain:
+  	mov 	AH, 2
+  	int 	13h
+  	jnc 	Done
+  	dec 	SI
+  	jnz 	TryAgain
+Done:
+  	pop 	si dx cx bx ax
+ret
+
+lastread dw 0
+lastseg  dw 0
+lastoff  dw 0
+   
+bufferread  	equ $
+bufferFat 	equ $+2048
+bufferentry	equ $+2048+2048
+loadinglist	equ $+2048+2048+2048
+end start

noyau/systeme.ini

@@ -0,0 +1,7 @@
+video.sys(47)
+horloge.sys(8)
+8259a.sys(50)
+disque.sys(48)
+souris.sys(74)
+clavier.sys(9)
+heure.sys(8)

noyau/video.asm

@@ -5,6 +5,8 @@ smart
 
 org 0100h
 
+include ..\include\bmp.h
+
 start:
 	jmp	tsr			;Saute à la routine résidente
 names db 'VIDEO'			;Nom drivers
@@ -93,6 +95,11 @@ tables dw setvideomode		;Table qui contient les adresses de toutes les fonctions
          dw restorestate
          dw enablescroll
          dw disablescroll
+	 dw showdate
+	 dw showtime
+	 dw showname
+	 dw showattr
+	 dw showsize
 
 ;================================Table des modes videos (64 BYTES) ============================================
 ;40*25 16 couleurs
@@ -219,7 +226,7 @@ Attribs 	equ 03C0h
 graphics    	equ 03CEh
 statut 		equ 03DAh
 
-maxfunc equ 43
+maxfunc equ 48
 maxmode	equ 9
 planesize	equ 64000
 ;============================================Fonctions de l'int VIDEO===========================================
@@ -237,11 +244,196 @@ planesize	equ 64000
 ;D‚sactive le d‚filement
 ;-> AH=43
 ;<- 
-;==============================================x=======
+;=====================================================
 DisableScroll:
         mov     cs:scrolling,0
         ret
 
+;================SHOWDATE (Fonction 2Ch)==============
+;Affiche la date contenu en DX
+;-> AH=44
+;<- 
+;=====================================================
+ShowDate:
+	push	ax cx edx
+	mov	ax,dx
+	mov	cx,2
+	xor	edx,edx
+	mov	dx,ax
+	and	dx,11111b
+	call	showfixint
+	mov	dl,'/'
+	call	showchar
+	mov	dx,ax
+	shr	dx,5
+	and	dx,111b
+	call	showfixint
+	mov	dl,'/'
+	call	showchar
+	mov	dx,ax
+	shr	dx,8
+	and	dx,11111111b
+	add	dx,1956
+	mov	cx,4
+	call	showfixint
+	pop	edx cx ax
+	ret
+
+;================SHOWTIME (Fonction 2Dh)==============
+;Affiche l'heure contenu en DX
+;-> AH=45
+;<- 
+;=====================================================
+ShowTime:
+	push 	ax cx edx
+	mov	ax,dx
+	mov	cx,2
+	xor 	edx,edx
+	mov	dx,ax
+	shr	dx,11
+	and	dx,11111b
+	call	showfixint
+	mov	dl,':'
+	call	showchar
+	mov	dx,ax
+	shr	dx,5
+	and	dx,111111b
+	call	showfixint
+	mov	dl,':'
+	call	showchar
+	mov	dx,ax
+	and	dx,11111b
+	shl	dx,1
+	call	showfixint
+	pop	edx cx ax
+	ret
+
+;================SHOWNAME (Fonction 2Eh)==============
+;Affiche le nom pointé par SI
+;-> AH=46
+;<- 
+;=====================================================
+ShowName:
+	push	cx dx si
+	xor	cx,cx
+showthename:
+	mov	dl,ds:[si]
+	call	showchar
+	inc	si
+	inc	cx
+	cmp	cx,8
+	jne	suiteaname
+	mov	dl,' '
+	call	showchar
+suiteaname:
+	cmp	cx,8+3
+	jb	showthename
+	pop	si dx cx
+	ret
+
+;================SHOWATTR (Fonction 2Fh)==============
+;Affiche les attributs spécifié par DL
+;-> AH=47
+;<- 
+;=====================================================
+ShowAttr:
+	push	dx
+	mov	al,dl	
+
+	test 	al,00000001b
+	je	noreadonly
+	mov	dl,'L'	
+	jmp	readonly
+noreadonly:
+	mov	dl,'-'
+readonly:
+	call	showchar
+
+	test 	al,00000010b
+	je	nohidden
+	mov	dl,'C'	
+	jmp	hidden
+nohidden:
+	mov	dl,'-'
+hidden:
+	call	showchar
+
+	test 	al,00000100b
+	je	nosystem
+	mov	dl,'S'	
+	jmp	system
+nosystem:
+	mov	dl,'-'
+system:
+	call	showchar
+
+	test 	al,00100000b
+	je	noarchive
+	mov	dl,'A'	
+	jmp	archive
+noarchive:
+	mov	dl,'-'
+archive:
+	call	showchar
+
+	test 	al,00010000b
+	je	nodirectory
+	mov	dl,'R'	
+	jmp	directory
+nodirectory:
+	mov	dl,'-'
+directory:
+	call	showchar
+
+	pop	dx
+	ret
+
+;================SHOWSIZE (Fonction 30h)==============
+;Affiche le nom pointé par DI
+;-> AH=48
+;<- 
+;=====================================================
+ShowSize:
+	push 	cx edx si ds
+	push	cs
+	pop	ds
+	mov	cx,4
+	cmp	edx,1073741824
+	ja	giga
+	cmp	edx,1048576*9
+	ja	mega
+	cmp	edx,1024*9
+	ja	kilo
+	call	showintR
+	mov	si,offset unit
+	call	showstring0
+	jmp	finsize
+kilo:
+	shr	edx,10
+	call	showintR
+	mov	si,offset unitkilo
+	call	showstring0
+	jmp	finsize
+mega:
+	shr	edx,20
+	call	showintR
+	mov	si,offset unitmega
+	call	showstring0
+	jmp	finsize
+giga:
+	shr	edx,30
+	call	showintR
+	mov	si,offset unitgiga
+	call	showstring0
+finsize:
+	pop	ds si edx cx
+	ret
+
+unit db ' o ',0
+unitkilo db ' ko',0
+unitmega db ' mo',0
+unitgiga db ' go',0
+
 ;=============SetVideoMode (Fonction 00h)=========
 ;Fixe le mode vidéo courant a AL
 ;-> AH=0, AL mode d'écran
@@ -251,6 +443,12 @@ setvideomode:
 	push 	ax cx dx di
       cmp   al,maxmode
 	ja	errorsetvideomode
+	cmp    cs:mode,5h
+	jb	nographic
+	cmp	al,5h
+	jae	nographic
+	call	initvideo
+nographic:
         cmp    cs:mode,0FFh
         jne    noinit
 	call	initvideo
@@ -359,6 +557,10 @@ initvideo:
 	mov 	cl,8	
       	mov 	bl,1
 	call 	loadfont
+	mov 	si,offset font8x16
+	mov 	cl,16	
+      	mov 	bl,0
+	call 	loadfont
 	mov 	cs:pagesize,64000
 	call 	clearscreen
 	pop 	ds si cx bx
@@ -553,6 +755,7 @@ errorloadfont:
 	stc
 	pop 	es di si dx cx bx ax
 	ret
+  
 reg2 	dw 0100h, 0302h, 0304h, 0300h 
      	dw 0004h, 1005h, 0E06h 
 reg1 	dw 0100h, 0402h, 0704h, 0300h
@@ -644,6 +847,96 @@ showinteger:
     
 showbuffer 	db 35 dup (0FFh)
 
+;==========SHOWFIXINT (Fonction h)===========
+;Affiche un entier EDX aprés le curseur de taille cx
+;-> AH=8, EDX un entier et al="cara"
+;<- 
+;===========================================
+ShowfixInt:
+	push	eax bx cx edx esi di
+	mov	di,cx
+      	xor	cx,cx
+	mov   	eax,edx
+      	mov   	esi,10
+      	mov   	bx,offset showbuffer+27
+decint2:
+      	xor   	edx,edx
+      	div   	esi
+      	add   	dl,'0'
+      	inc   	cx
+      	mov   	cs:[bx],dl
+	dec   	bx
+	cmp 	cx,di
+	jae 	nomuch
+      	cmp   	ax,0
+      	jne   	decint2
+	mov 	ax,di
+  	xchg 	cx,di
+	sub 	cx,di
+rego:
+	mov 	byte ptr cs:[bx],'0'
+	dec    	bx
+	dec    	cx
+	jnz	rego
+	jmp 	finishim
+nomuch:
+	mov	ax,di
+finishim:
+	mov	ch,cs:colors
+showinteger2:
+	inc	bx
+	mov	cl,cs:[bx]
+	call	charout
+	dec	ax
+	jnz	showinteger2
+      	pop  	di esi edx cx bx eax 
+	ret   
+
+;==========SHOWINTR (Fonction h)===========
+;Affiche un entier EDX aprés le curseur de taille cx
+;-> AH=8, EDX un entier
+;<- 
+;===========================================
+ShowIntR:
+	push	eax bx cx edx esi di
+	mov	di,cx
+      	xor	cx,cx
+	mov   	eax,edx
+      	mov   	esi,10
+      	mov   	bx,offset showbuffer+27
+decint3:
+      	xor   	edx,edx
+      	div   	esi
+      	add   	dl,'0'
+      	inc   	cx
+      	mov   	cs:[bx],dl
+	dec   	bx
+	cmp 	cx,di
+	jae 	nomuch
+      	cmp   	ax,0
+      	jne   	decint3
+	mov 	ax,di
+  	xchg 	cx,di
+	sub 	cx,di
+rego2:
+	mov 	byte ptr cs:[bx],' '
+	dec    	bx
+	dec    	cx
+	jnz	rego2
+	jmp 	finishim2
+nomuch2:
+	mov	ax,di
+finishim2:
+	mov	ch,cs:colors
+showinteger3:
+	inc	bx
+	mov	cl,cs:[bx]
+	call	charout
+	dec	ax
+	jnz	showinteger3
+      	pop  	di esi edx cx bx eax 
+	ret   
+
 ;==========SHOWSIGNED (Fonction 09h)===========
 ;Affiche un entier EDX de taille CX aprés le curseur
 ;-> AH=9, EDX un entier, CX la taille
@@ -706,6 +999,7 @@ Hexaize:
        	jnz   	Hexaize
        	pop   	edx cx bx ax
        	ret
+
 Tab 	db '0123456789ABCDEF'
 
 ;==========SHOWBIN (Fonction 0Bh)===========
@@ -1146,6 +1440,8 @@ viewbmp:
 ;=========================================
 showbmp:
 	push 	ax bx cx dx
+	cmp	word ptr ds:[si+BMP_file.BMP_FileType],"MB"
+	jne     errorshowing
 	mov 	cs:xc,bx
 	mov 	cs:yc,cx
 	xor 	cx,cx
@@ -1162,14 +1458,21 @@ bouclette:
 	pop 	cx bx
 	inc 	bx
 	inc 	dx
-	cmp 	dx,[si+offset BMP_width]
+	cmp 	dx,[si+offset BMP_File.BMP_width]
 	jb 	bouclette
 	xor 	dx,dx
 	inc 	cx
-	cmp 	cx,[si+offset BMP_height]
+	cmp 	cx,[si+offset BMP_File.BMP_height]
 	jb 	bouclette
+	clc
 	pop 	dx cx bx ax
 	ret
+	
+errorshowing:
+        stc
+        pop  dx cx bx ax
+        ret
+        
 xc dw 0
 yc dw 0
 
@@ -1435,16 +1738,25 @@ ret
 savedac:
 push ax cx dx di
 mov dx,3C7h
-xor ax,ax
+mov cx,256
-out dx,al
-mov cx,256*3
-inc dx
-inc dx
 mov di,offset dac
 save:
+mov al,cl
+dec al
+out dx,al
+inc dx
+inc dx
 in al,dx
 mov cs:[di],al
 inc di
+in al,dx
+mov cs:[di],al
+inc di
+in al,dx
+mov cs:[di],al
+inc di
+dec dx
+dec dx
 dec cx
 jne save 
 pop di dx cx ax
@@ -1454,29 +1766,30 @@ ret
 restoredac:
 push ax cx dx si
 xor ax,ax
-cli
-mov dx,3DAh
-in al,dx
-mov dx,0
-out dx,al
 mov dx,3C8h
-out dx,al
+mov cx,256
-mov cx,256*3
 mov si,offset dac
 save2:
+mov al,cl
+dec al
+out dx,al
+inc dx 
 mov al,cs:[si]
 inc si
 out dx,al
+mov al,cs:[si]
+inc si 
+out dx,al
+mov al,cs:[si]
+inc si  
+out dx,al
+dec dx
 dec cx
 jne save2
-mov dx,3DAh
-in al,dx
-mov dx,32
-out dx,al
 pop si dx cx ax
 ret
 
-;couleur al pour ligne di
+;couleur al pour ligne di  A SUPPRIMER
 changelineattr:
 push ax bx di es
 mov bx,ax
@@ -1496,65 +1809,13 @@ jnz popep
 pop es di bx ax
 ret   
 
+font8x8:
+include ..\include\pol8x8.inc
+font8x16:
+include ..\include\pol8x16.inc
 
+copy 		equ $
+copy2           equ $+8192
+dac             equ $+8192+8192
 
-
-
-
-
-
-
-
-
-
-
-
-
-
-BMP_File         		struc
-BMP_FileType            db      'BM'
-BMP_FileSize            dd      ?       ; taille du fichier
-BMP_Reserved            dd      0       ; toujours 0
-BMP_BitMapOffset        dd      ?       ; offset de l'image
-BMP_HeaderSize          dd      ? ; taille de l'entete en octects
-BMP_Width               dd      ? ; largeur en pixels de l'image
-BMP_Height              dd      ? ; hauteur en pixels de l'image
-BMP_Planes              dw      1 ; nombre de plan utilisés
-BMP_BitsPerPixel        dw      ? ; nombre de bits par pixels
-BMP_Compression         dd      ? ; méthode de compression 
-BMP_SizeOfBitMap        dd      ? ; taille de l'image en octects
-BMP_HorzResolution      dd      ? ; resolution horizontale en pixels par mètre
-BMP_VertResolution      dd      ? ; resolution verticale en pixels  par mètre
-BMP_ColorsUsed          dd      ? ; nombre de couleur dans la palette  si 0: palette entière si BitPerPixel<=8
-BMP_ColorsImportant     dd      ? ; nombre de couleurs importantes masques pour les modes de plus de 8 bits par pixels
-BMP_RedMask             dd      ?
-BMP_GreenMask           dd      ?
-BMP_BlueMask            dd      ?
-BMP_AlphaMask           dd      ?
-BMP_ColorSpaceType      dd      ?
-BMP_RedX                dd      ?
-BMP_RedY                dd      ?
-BMP_RedZ                dd      ?
-BMP_GreenX              dd      ?
-BMP_GreenY              dd      ?
-BMP_GreenZ              dd      ?
-BMP_BlueX               dd      ?
-BMP_BlueY               dd      ?
-BMP_BlueZ               dd      ?
-BMP_GammaRed            dd      ?
-BMP_GammaGreen          dd      ?
-BMP_GammeBlue           dd      ?
-BMP_file       		ends
-
-;BMP_Compression peut prendre les valeurs suivantes: 
-BMP_COMP_UNCOMP         equ     0       ; pas de compression
-BMP_COMP_RLE8           equ     1       ; 8-bit run length encoding
-BMP_COMP_RLE4           equ     2       ; 4-bit tun length encoding
-BMP_COMP_BFE            equ     3       ; bitfields encoding
-
-
-font8x8 	equ $
-copy 		equ $+3000
-copy2   equ $+8000
-dac             equ $+16000
 end start

noyau/write.bat

@@ -1,4 +0,0 @@
-@echo off
-cd ..
-setup
-cd sources

outils/exe2boot.asm

@@ -1,67 +0,0 @@
-.model tiny
-.486
-smart
-.code
-
-org 0100h
-
-
-start:
-jmp transform
-NameBoot db 'Boot.exe',0
-nameboot2 db 'Boot.bin',0
-buffer db 510 dup (0)
-       dw 0AA55h
-message db 0ah,0dh,'Transformation of boot.com to boot.bin...',0ah,0dh,'By Nico',0ah,0dh,'Copyright 2000',0ah,0dh,'$'
-ok db 0ah,0dh,'The transformation was done succefully !',0ah,0dh,'$'
-errormsg db 0ah,0dh,'Some errors has been detected !',0ah,0dh,'$'
-transform:
-mov ah,09
-mov dx,offset message
-int 21h
-mov ax,3D00h
-mov dx,offset nameboot
-int 21h
-jc error
-mov bx,ax
-mov ax,4202h
-xor cx,cx
-xor dx,dx
-int 21h
-jc error
-cmp dx,0
-jne error
-mov ax,4200h
-xor cx,cx
-mov dx,7E00h
-int 21h
-jc error
-mov ah,3fh
-mov cx,512
-mov dx,offset buffer
-int 21h
-jc error
-mov ah,3eh
-int 21h
-jc error
-mov ah,3ch
-xor cx,cx
-mov dx,offset nameboot2
-int 21h
-jc error
-mov ah,40h
-mov cx,512
-mov dx,offset buffer
-int 21h
-jc error
-mov ah,09
-mov dx,offset ok
-int 21h
-ret
-error:
-mov ah,09
-mov dx,offset errormsg
-int 21h
-ret
-
-end start

outils/rip.asm

@@ -1,108 +0,0 @@
-net segment
-
-org 0100h
-assume cs:net,ds:net
-
-start:
-jmp deb
-taille dw 0
-signe db 'rip'
-signe2 db 64 dup (0)
-p1 db '@'
-p2 db '@'
-min db 4
-deb:
-mov	BL,DS:[0080h]			
-xor 	BH,BH				
-or 	BX,BX				
-mov 	byte ptr [0081h+BX],00h		
-mov 	AX,3D02h			
-mov 	DX,0082H			
-int 	21h		
-mov bx,ax
-mov ah,3fh
-mov cx,0ffffh
-mov dx,offset data
-int 21h
-mov taille,ax
-mov ah,3eh
-int 21h
-mov si,82h
-mov di,offset signe2
-mov cx,64
-rep movsb
-mov di,offset signe2
-mov cx,64
-mov al,2eh
-repne scasb
-push di
-mov si,di
-mov di,offset data
-add di,taille
-mov cx,3
-rep movsb
-mov ax,di
-pop di
-mov cx,3
-mov si,offset signe
-rep movsb
-mov di,ax
-mov cx,taille
-mov si,offset data
-mov dx,1
-boucle:
-lodsb
-cmp al,[si]
-jne pas
-inc dl
-loop boucle
-jmp fin
-pas:
-cmp dl,min
-jb suite
-cmp dl,1
-jne go
-suite:
-mov bx,cx
-mov cx,dx
-rep stosb
-mov cx,bx
-mov dl,1
-loop boucle
-jmp fin
-go:
-mov ah,al
-mov al,p1
-stosb
-mov al,dl
-stosb
-mov al,ah
-stosb
-mov al,p2
-stosb
-mov dl,1
-loop boucle
-fin:
-mov ah,3ch
-mov cx,0
-mov dx,offset signe2
-int 21h
-mov bx,ax
-mov ah,40h
-mov cx,di
-sub cx,offset data
-sub cx,taille
-mov dx,offset data
-add dx,taille
-int 21h
-mov ah,3eh
-int 21h
-mov ah,41h
-mov dx,82h
-int 21h
-ret
-data db 0
-net ends
-end start
- 
-net

outils/unrip.asm

@@ -1,88 +0,0 @@
-net segment
-
-org 0100h
-assume cs:net,ds:net
-
-start:
-jmp deb
-taille dw 0
-signe2 db 64 dup (0)
-p1 db '@'
-p2 db '@'
-deb:
-mov	BL,DS:[0080h]			
-xor 	BH,BH				
-or 	BX,BX				
-mov 	byte ptr [0081h+BX],00h		
-mov 	AX,3D02h			
-mov 	DX,0082H			
-int 	21h		
-mov bx,ax
-mov ah,3fh
-mov cx,0ffffh
-mov dx,offset data
-int 21h
-mov taille,ax
-mov ah,3eh
-int 21h
-mov si,82h
-mov di,offset signe2
-mov cx,64
-rep movsb
-mov di,offset signe2
-mov cx,64
-mov al,2eh
-repne scasb
-mov si,offset data
-mov cx,3
-rep movsb
-mov cx,taille
-mov di,offset data
-add di,taille
-mov dx,1
-boucle:
-lodsb
-cmp al,p1
-je pas
-suite:
-stosb
-loop boucle
-jmp fin
-pas:
-mov al,p2
-cmp [si+2],al
-jne suite
-lodsb
-mov bx,cx
-mov cl,al
-xor ch,ch
-lodsb
-rep stosb
-mov cx,bx
-sub cx,3
-inc si
-loop boucle
-fin:
-mov ah,3ch
-mov cx,0
-mov dx,offset signe2
-int 21h
-mov bx,ax
-mov ah,40h
-mov cx,di
-sub cx,offset data
-sub cx,taille
-mov dx,offset data
-add dx,taille
-int 21h
-mov ah,3eh
-int 21h
-mov ah,41h
-mov dx,82h
-int 21h
-ret
-data db 0
-net ends
-end start
- 
-net

programs/MAKEFILE

@@ -0,0 +1,57 @@
+lnk_boot = tlink /x
+asm= tasm /t/m5/zi
+lnk= tlink /x/t
+
+all: detect.exe editeur.exe gestion.exe logo.exe pmode.exe souris.exe test.exe verifier.exe volume.exe
+
+detect.exe: detect.asm
+	$(asm) detect
+	$(lnk) detect
+	ren detect.com detect.exe
+
+editeur.exe: editeur.asm
+	$(asm) editeur
+	$(lnk) editeur
+	ren editeur.com editeur.exe
+
+gestion.exe: gestion.asm
+	$(asm) gestion
+	$(lnk) gestion
+	ren gestion.com gestion.exe
+
+logo.exe: logo.asm
+	$(asm) logo
+	$(lnk) logo
+	ren logo.com logo.exe
+
+pmode.exe: pmode.asm
+	$(asm) pmode
+	$(lnk) pmode
+	ren pmode.com pmode.exe
+
+souris.exe: souris.asm
+	$(asm) souris
+	$(lnk) souris
+	ren souris.com souris.exe
+
+test.exe: test.asm
+	$(asm) test
+	$(lnk) test
+	ren test.com test.exe
+
+verifier.exe: verifier.asm
+	$(asm) verifier
+	$(lnk) verifier
+	ren verifier.com verifier.exe
+
+volume.exe: volume.asm
+	$(asm) volume
+	$(lnk) volume
+	ren volume.com volume.exe
+
+clean:
+  del *.obj
+  del *.exe
+  del *.com
+  del *.sys
+  del *.err

programs/asm.bat

@@ -1,54 +0,0 @@
-@echo off
-
-echo Assembling file %1... 
-..\util\tasm %1.asm /m5/x/t
-if errorlevel 1 goto end
-if "%1"=="boot" goto boot
-echo Linking file %1...
-..\util\tlink %1.obj /x/t
-if errorlevel 1 goto end
-echo Copying file %1...  
-if "%1"=="video" goto video
-if "%1"=="lpt" goto system
-if "%1"=="keyboard" goto system
-if "%1"=="mouse" goto system 
-if "%1"=="pic8259a" goto system 
-if "%1"=="timer" goto system
-if "%1"=="drive" goto system 
-if "%1"=="joystick" goto system 
-if "%1"=="system" goto system
-if "%1"=="setup" goto setup 
-copy %1.com ..\data\%1.exe>nul
-goto end   
-
-:boot
-echo Linking file %1...
-..\util\tlink %1.obj /x
-if errorlevel 1 goto end
-echo Copying file %1...
-..\util\exe2boot %1.exe
-copy %1.bin ..\data\%1.bin>nul 
-goto end
-
-:video
-type thin8x8.fnt>>%1.com
-:system
-copy %1.com ..\data\%1.sys>nul
-goto end
-:setup
-copy %1.com ..\%1.com>nul
-goto end
-
-:end
-if not exist *.bin goto exes
-del *.bin
-:exes
-if not exist *.exe goto coms
-del *.exe
-:coms
-if not exist *.com goto objs
-del *.com
-:objs  
-if not exist *.obj goto nobjs
-del *.obj
-:nobjs