Quizz Informatique 2 (Suite)...

[Casio]

Je reprends ici le post "Quizz Informatique...", devenu un peu trop... heu ... confus

Bien...
Bon !

Concevez moi un petit programme SIMPLE en Basic (standard ou GW, pas visual), qui va, successivement :

Effacer l'écran
Choisir une couleur fond/police sympa (je verifierais !)
Se positionner au centre de l'écran (en mode Screen 0, pas besoin de mode graphique)
Afficher en boucle (12 fois !) un texte amical de facon verticale
Effacer à nouveau l'écran au bout de 10 secondes

... Allez, c'est simple
hihihihi

[karl]

Héhé ...
Depuis que tu as repris le basic.
Ca te manquait.

[Krys TOFF]

Ouh la la, y'a longtemps que je n'ai plus fait de Basic... (je ne parle pas des macros en Visual Basic dans Excel au boulot, ça ne compte pas)

Et c'était sur C64 à l'époque, donc un basic particulier avec des POKE et des PEEK partout.

Dès que j'ai découvert le Pascal, j'ai arrêté le basic. C'était bien plus structuré en Turbo Pascal car en Basic, avec les GOTO et les GOSUB, on pouvait faire des programmes vraiment incohérents et tarabiscotés...

[Casio]

Mouais, tout ca ne reponds pas au pb

(En fait, ca me rapelle les exams "d'informatique" que j'avais a long time ago, à l'ecole... c'était tout à fait le genre de question qu'on pouvait avoir ..)

[Krys TOFF]

Voici le coeur du programme:
100 FOR A =1 TO 12
110 PRINT "BON ANNIVERSAIRE CASIO"
120 NEXT A


Particularités du Commodore 64 (en italique les touches qu'il fallait taper et qui faisaient des jolies images à l'écran) :
- pour effacer l'écran, il fallait écrire PRINT"touche commodore"
- idem pour descendre à la Xième ligne : PRINT"touche bas" autant de fois que de lignes à descendre pour atteindre le milieu de l'écran.
- pour les couleurs, pareil, fallait taper PRINT"encore une combinaison de touches, CTRL+chiffre je crois bien"
- pour attendre 10 secondes, il fallait utiliser la commande WAIT (mais je ne sais plus comment on entrait les paramètres).

[Casio]

Bon, ok

Alors, en GW-BASIC, cela donne un truc du genre :

Code: Tout sélectionner

10 CLS
20 SCREEN 0,4,4
30 Locate 12,20
40 FOR A =1 TO 12
50 PRINT "MERCI KRYS TOFF :)"
60 NEXT A
70 FOR i = 1 TO 50000:NEXT i
80 CLS

Ceci était une suggestion

[Krys TOFF]

70 FOR i = 1 TO 50000:NEXT i

Ca, c'est trop aléatoire.
Selon les ordis et la rapidité du processeur, tu vas avoir une attente plus ou moins longue.

J'ai fait à la fac un petit programme en Turbo Pascal qui servait à tester les réflèxes. Un temps aléatoire passait puis l'ordi faisait un "bip" (sur le speaker, oui, oui).
Il fallait appuyer sur un touche le plus vite possible après le bip.
Pour calculer le temps, je me servait de l'horloge interne : je prenais le temps juste avant le bip puis juste après lapression d'une touche, puis je faisiant la différence.
En TP, la fonction c'est gettime.

Je ne sais pas si un basic a une fonction similaire, mais si c'est le cas il faudrait faire une boucle du genre :

10 gettime
20 repeat
30 goto 30
40 until time = (temps prélevé + 12 secondes)

Bon, là c'est un mélange barbare de TP et de Basic, mais je pense que vous avez compris l'idée.

[Casio]

(...)
Bon, là c'est un mélange barbare de TP et de Basic, mais je pense que vous avez compris l'idée.

Oui
Et si vous relanciez, cher ami ?

[Krys TOFF]

Pourquoi pas, en effet.

Voici une console à cartouches, sortie avant la VCS d'Atari.


Elle ne connue que peu de succès aux USA et ne fût quasiment pas diffusée en Europe (un peu en Allemagne seulement).
Une de ses particularités est les joysticks : ils consistent en une sorte de crosse au sommet de laquelle se trouve un bouton qui peut être incliné, avec le pouce, dans 8 directions et poussé, faisant office à la fois de joystick et de bouton de tir.
Année de sortie et nom de la "bête" ?

[Casio]

S'agirait il, par hasard, de :

Marque/Modele : Fairchild Video Entertainment System (VES)
Année de sortie : 1976 (tres bonne année )
Son prix d'epoque : 169.95$




Je pense que nous avons les mêmes lectures
http://www.classicgaming.com/museum/channelf/

P.s : la prochaine fois, cher ami, n'hesitez pas à uploader la photo en local, pour l'archivage, it's better.

[Krys TOFF]

Bravo Casio, bonne réponse : c'est la Fairchild Channel F.
Je ne savais pas que je pouvais uploader des images, alors j'ai utilisé ImageShack.

Pour la source, la mienne c'est Gros Pixels : http://www.grospixels.com/site/fcf.php

[Casio]

Oups, j'avais pas fais gaffe, mais la on est dans le Quizz Informatique, pas jeux-vidéo...

[Krys TOFF]

Oups, j'avais pas fais gaffe, mais la on est dans le Quizz Informatique, pas jeux-vidéo...

Argh. Exact. bon, faut que je mette un autre quizz alors.

[Krys TOFF]

Bon, là on est à fond dans les ordinausaures !
Il faut me trouver le nom et la date de sortie du monstre présent sur la photo qui nécessitait pas moins de 9m² de surface au sol pour être posé, le tout sous air conditionné et pièce insonnorisée de préférence.

Cet ordinausaure est Allemand, sans écran, avec pour sortie des lampes (montrant l'état d'avancement du programme) et une imprimante (enfin, plutôt un truc du genre machine à écrire perfectionnée). La mémoire de la bête était sur bande magnétique.

Petit détail amusant, le langage de programmation "pur langage machine" était dénommé PS1, et le langage "évolué" (avec des instructions type IF...THEN ou encore GOTO, bref, un basic primitif) s'appelait PS2.
Sony paye-t'il des droits sur ces dénominations au constructeur allemand de cette grosse bécane ?

Voici la couverture du manuel de programmation, dont j'ai retiré le titre pour ne laisser visible que le PS2 :

[Casio]

Bon, là on est à fond dans les ordinausaures !
Il faut me trouver le nom et la date de sortie du monstre présent sur la photo qui nécessitait pas moins de 9m² de surface au sol pour être posé, le tout sous air conditionné et pièce insonnorisée de préférence.(...)

Paf, la réponse :

Il s'agit du Cellatron 8205 (C 8205), fabriqué par Büromaschinenwerke Zella-Mehlis (DE), en 1963.
Construit a 3000 exs. environ...
http://www.old-computers.com/museum/com ... t=1&c=1028

Bon, je sais, presque un an pour répondre... Mais bon, j'ai trouvé
Gnark