Kdos : langage (de base) interprété)

0/5 (7 avis)

Vue 4 865 fois - Téléchargée 507 fois

Description

Ce code vous permet de remonter aux sources ancestrales du bon vieux dos avec sa fenêtre de commande la ligne et l'interprétation parfois étrange des logues lignes de codes tapées sans pouvoir faire de retour en arrière. en bref ça n'a rien d'extraordinaire mais ça peut peut-être servir pour apprendre ou s'amuser, voir si ya des courageux à faire de magnifiques démonstrations de leur talent. Moins le langage est évolué plus le talent du programmeur l'utilisant est grand

Source / Exemple :


Voici les principales commandes utilisables :
cd		change le répertoire courant
dir		affiche tous les fichiers et les dossiers
cls		efface la console
ver		affiche la version du KDos
cd..		remonte d'un niveau
getattr		affiche les attributs [getattr fichier]
kill		supprime un fichier
print		affiche une phrase dans la console [print phrase]
date		affiche et permet de modifier la date, si suivie d'un $ la date est seulement renvoyée
time		affiche et permet de modifier l'heure, si suivie d'un $ l'heure est seulement renvoyée
run		lance un script nécessite d être dans le répertoire [run script]
newdir		crée un nouveau sous-dossier le répertoire courant [newdir rep]
deldir		supprime un répertoire nécessite d être dans le répertoire [deldir rep]
root		retourne sur la racine
filecopy	copie un fichier avec les chemins d'acccès complet [filecopy(source,dest)]
end		ferme le KDos
for		exécute une boucle for [for 1,100]
rename		renomme un fichier nécessite les chemins d'accès complet
setattr		change les attributs d'un fichier [setattr fichier,attr]
maximize	agrandit la fenetre
minimize	reduit la fenetre en icone
normal		taille par defaut de la fenêtre
filelen		recupere la taille d'un fichier [filelen (nomfichier)]
line		dessine un ligne [line(x1;y1)-(x2;y2),color]
surface		dessine une surface vide [surface(x1;y1)-(x2;y2),color]
clrdraw		efface l'ecran graphique
=		suivi d'un calcul effectue l'operation
fullsurface 	dessine une surface pleine [fullsurface(x1;y1)-(x2;y2),color]
edit 		affiche le contenu d'un fichier
pset 		dessine un point [pset(x,y),color]
drawwidth	change l'épaisseur des traits
circle(X,Y),rayon,couleur,[debut;fin],rapport
		X,Y coordonnees du centre
		rayon du cercle
		couleur du cercle
		[debut,fin] facultatif, debut et fin de l'arc de cercle entre -2pi et +2pi
		rapport facultatif, rapport v/h pour une ellipse (v le plus grand)
integre		laisse la console toujours visible
each		Execute une boucle each [Each file in folder]
keditor		Lance l'éditeur de script
pause 		marque une pause de la longueur indiquée en millisecondes [Pause 3]
beep		Emet un son   [Beep fréquence,longueur]
openkey		Ouvre une clé de la base de registre [Openkey HKEY_LOCAL_MACHINE//Software]
setvalue	Modifie la valeur d'une chaine [setvalue(Clé//Chaine=valeur)]
closekey	Ferme toutes les clés registre ouverte
deletekey	supprime une clé registre [deletekey(Software//Clé supprimée)]
deletevalue	supprime une valeur du registre [deletevalue(clé//valeur supprimée)]
ftp		se connecte au serveur ftp spécifié [Ftp(adresse,username,password)]
exitftp		se déconnecte du serveur ftp [Exitftp]
download	télécharge un fichier du ftp [Download(ftpfile,localfile)]
upload		envoie un fichier au serveur ftp [Upload(localfile,ftpfile)]
open		ouvre  un fichier et mémorise un pointeur [open(fichier,nombre)]
put		insère des caractères dans un fichier [put(fichier,position,phrase)] si position n'est pas spécifiée c'est automatiquement
		la fin du fichier. Dans phrase <§> est remplacé par un retour à la ligne
close		ferme un fichier dont on spécifie le pointeur ou tous les fichiers si pas de pointeur [close number]
get		Renvoi une partie du contenu d'un fichier [get(pointeur,position,longueur)]
dim		Déclare une variable. [Dim var1,var2] Une variable peut être déclarée seule.
asc		Renvoie le code ASCII d'un caractère [asc(a)]
cbase		Converti un nombre dans un base non décimale [Cbase(nombre,base)]Base < 10
eof		Renvoie la longueur en bytes d'un fichier [Eof(pointeur)]
savepicture	Enregistre l'image courante dans un fichier [Savepicture fichier ou savepicture chemin\fichier]
drives		Affiche la liste de tous les lecteurs

Conclusion :


Les constantes de couleur sont à écrire en anglais (blue, green, red...) sinon vous pouvez y mettre des entiers qui seront interprétés comme le code décimal de la couleur.
Ben là jecrois que c'est à peu près tout. Ah si ne faites pas attention à l'éditeur de script vraiment moche mais il n'en est qu'à ses tout débuts alors il est d'un nul ! c'est inqualifiable, mais bon je compte sur votre indulgence)
Bon cette fois j'arrête,
@+ et bonne prog.

MAJ : maintenaint il y a des variables des boucles for encastrables, des blocs if, et kkes autres fonctions...
The Pingouin.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_Pingouin
Messages postés
262
Date d'inscription
lundi 26 août 2002
Statut
Membre
Dernière intervention
24 août 2005
-
Merci pour la note ;-)
Oui en effet ca ressemble assez à l'invite de commande, c'était le but à l'origine. Néanmoins il y a tout de même un petit éditeur de script (koike le bloc notes suffit mais bon il y a une ebauche de coloration syntaxique (vraiment une ebauche)). Bref. C'est certain ke pour des progammes évolués c'est pas forcément le mieux mais bon ca permet de faire kkes petites choses malgré tout...

@+

Pingouin
CCJ
Messages postés
565
Date d'inscription
mercredi 19 mai 2004
Statut
Membre
Dernière intervention
30 avril 2008
1 -
aller un ptit 8/10 je trouve ca bien mais bon ca ressemble beaucoup a l'invite de commande
cs_Pingouin
Messages postés
262
Date d'inscription
lundi 26 août 2002
Statut
Membre
Dernière intervention
24 août 2005
-
Je sais bien et encorte vous n'avez pas tout vu je prépare une nouvelle version avec des variables des blocs if ...
Plein de bonnes choses
Si pour vous amusez vous l'utilisiez ya peut-etre moyen que vous communiquiez qques scripts histoire de le tester et d'augmenter la dose de nostalgie ....

Merci à tous

Pingouin.
Fab707
Messages postés
54
Date d'inscription
lundi 10 novembre 2003
Statut
Membre
Dernière intervention
5 février 2006
-
Cela me rappelle une ancienne version de QuickBasic .
Nostalgie ,Nostalgie .
8 / 10
carlvb
Messages postés
199
Date d'inscription
mercredi 23 avril 2003
Statut
Contributeur
Dernière intervention
25 mai 2017
2 -
Super le travail
j'ai pas encore pu tester toutes les possibilités de ton application (vb me dit qu'il y a des ressources qui me manquent) mais à première vue j'adore ce que tu fais.
Allez 9/10 avec mention trop bien.
Bonne prog à toi.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.