Hebdogiciel, Les Listings... La mémoire papier!

Tout sur les ordinateurs, liens, infos...Avec un thread par machine. Si la machine n'y est pas , créez le premier post la concernant dans ce forum

Modérateur : Politburo

Répondre
Avatar du membre
fabu
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 1346
Enregistré le : 16 oct. 2003 22:54
Localisation : Aveyron

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par fabu »

Que de souvenirs!
Deux ou trois jeux s'inspiraient pas mal de Parsec.
Je recherche du soft C64,Amstrad,Amiga,Msx
Avatar du membre
mandrake
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 2293
Enregistré le : 27 avr. 2006 22:41
Localisation : Chateauneuf les Martigues en face d'Ajaccio
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par mandrake »

Image

Disponible en Basic Etendu pour TI-99/4A au format texte à télécharger ici :
Jumpman Hebdogiciel numéro 083.

En fichier FIAD
En Image DSK

ImageImage
ImageImage

A faire tourner aussi dans l'émulateur Classic99
A suivre.....
Rien n'est jamais perdu, tant qu'il reste quelque chose à trouver. (pierre DAC)
Amiga 1000 512k + lecteur externe 1010 + 1081s + Parceiro II+
Amiga 1200 3.2.1 + Amitek A1200 FPU 68882 8M + CF 32G
Amiga 1200 3.1 + MTECH 1230/28 8M + CF 32G
Juke-box Rock-ola Max 477 (capacité 80 single 45 tours) 1979
Revox B77 MKII 1975
Collection audio :
https://urlz.fr/j10t
Avatar du membre
bkg2018
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 359
Enregistré le : 30 mai 2012 16:57

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par bkg2018 »

mandrake a écrit :Image

Disponible en Basic Etendu pour TI-99/4A au format texte à télécharger ici :
Jumpman Hebdogiciel numéro 083.
.....
C'est marrant j'ai jeté un oeil au listing, où l'on voit la richesse du basic ti99 d'ailleurs, et je trouve un truc super bizarre : l'auteur a reprogrammé le caractère "Q" pour dessiner un "I" majuscule :
110 I$="Q"::GOSUB 1210
...
140 CALL CHAR(72,"0103070F0F0C0C0F0F0F0E0E1F3C78780080C0E0E06060E0E0E0E0E0F0783C3C")
...
550 DISPLAY AT(16,9)SIZE(16):"2 PROFESS";I$;"ONNEL"
560 DISPLAY AT(21,9)SIZE(13):"3 F";I$;"N"

Comme je suis curieux de nature je me demande bien quelle est la finalité de tout çà : le "I" majuscule standard du TI99 est-il si moche que cela ?
HP : 67 25 34C 15C 41CX 48S* 48SX 48GX 35S* WP34S* 39gII*
TI : SR52 57 58C* 59 Programmer 66 74S 65
Sharp : PC 1245 1251* 1262 G-850S G-850V
Canon : X-07* F-800P*
Casio : CG-8 SF5300E*
*: persos d'époque
Avatar du membre
Melaure
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 1455
Enregistré le : 04 août 2008 11:57
Localisation : Lugdunum
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Melaure »

Il a voulu donner un style je pense, par contre il fallait redéfinir le I puisqu'il ne l'utilise pas ...

Ha ces CALL CHAR, c'était quelque chose. Je m'étais amusé a dessiner un beau F-14 Tomcat avec ça ;)
MBP 2.6 2012 HD 16Go/960GoSSD • iMac 27" • MB 2.26 • Cube • iMac DV 600 • iBooks Tangerine/Blueberry/Graphite/Indigo/Key Lime • 6100/66 • 1400CS • PB520c SC2200 • Duo 210 • PB 145b • Q660av • Q700 • LC475 • Classic II • LCIII-040/66 • LC III • 2 LC II • PDS IIe • SE/30 • SE • Mac Plus • Mac 512 • Mac 128 • MacPortable • eMate • IIc • IIe • QT150/200 • A500 • A1200 • CPC6128 • TI-99/4A, TI-74 • TouchPad 32 GB
Les Gones du Mac
Avatar du membre
gege
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 7141
Enregistré le : 31 janv. 2008 14:24
Localisation : Banlieue Paârisienne
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par gege »

Bizarre mais en tout cas carrément pas optimisé son code, voire absurdement compliqué.
Un PRINT "FQN" marchait aussi bien...
Y a des fois on se demande.
G.E.
Avatar du membre
Melaure
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 1455
Enregistré le : 04 août 2008 11:57
Localisation : Lugdunum
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Melaure »

gege a écrit :Bizarre mais en tout cas carrément pas optimisé son code, voire absurdement compliqué.
Un PRINT "FQN" marchait aussi bien...
Y a des fois on se demande.
G.E.
Vivement la version 2, par gege !!! ;)
MBP 2.6 2012 HD 16Go/960GoSSD • iMac 27" • MB 2.26 • Cube • iMac DV 600 • iBooks Tangerine/Blueberry/Graphite/Indigo/Key Lime • 6100/66 • 1400CS • PB520c SC2200 • Duo 210 • PB 145b • Q660av • Q700 • LC475 • Classic II • LCIII-040/66 • LC III • 2 LC II • PDS IIe • SE/30 • SE • Mac Plus • Mac 512 • Mac 128 • MacPortable • eMate • IIc • IIe • QT150/200 • A500 • A1200 • CPC6128 • TI-99/4A, TI-74 • TouchPad 32 GB
Les Gones du Mac
Xavier
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 684
Enregistré le : 10 mars 2006 15:48
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Xavier »

Salut,
le i$ c'est pour donner une couleur differente en fond d'écran (PAPER) !
cf: "UDGs" pour les zonnages CHAR
Avatar du membre
mandrake
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 2293
Enregistré le : 27 avr. 2006 22:41
Localisation : Chateauneuf les Martigues en face d'Ajaccio
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par mandrake »

Image

Disponible en Basic Etendu pour TI-99/4A au format texte à télécharger ici :
Supermec Hebdogiciel numéro 061.

En fichier FIAD
En Image DSK

ImageImage
ImageImage

A faire tourner aussi dans l'émulateur Classic99
A suivre.....
Rien n'est jamais perdu, tant qu'il reste quelque chose à trouver. (pierre DAC)
Amiga 1000 512k + lecteur externe 1010 + 1081s + Parceiro II+
Amiga 1200 3.2.1 + Amitek A1200 FPU 68882 8M + CF 32G
Amiga 1200 3.1 + MTECH 1230/28 8M + CF 32G
Juke-box Rock-ola Max 477 (capacité 80 single 45 tours) 1979
Revox B77 MKII 1975
Collection audio :
https://urlz.fr/j10t
Avatar du membre
mandrake
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 2293
Enregistré le : 27 avr. 2006 22:41
Localisation : Chateauneuf les Martigues en face d'Ajaccio
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par mandrake »

Image

Disponible en Basic Etendu pour TI-99/4A au format texte à télécharger ici :
Bon Baisers De Saturne Hebdogiciel numéro 060.

En fichier FIAD
En Image DSK

ImageImage
ImageImage

A faire tourner aussi dans l'émulateur Classic99
A suivre.....
Rien n'est jamais perdu, tant qu'il reste quelque chose à trouver. (pierre DAC)
Amiga 1000 512k + lecteur externe 1010 + 1081s + Parceiro II+
Amiga 1200 3.2.1 + Amitek A1200 FPU 68882 8M + CF 32G
Amiga 1200 3.1 + MTECH 1230/28 8M + CF 32G
Juke-box Rock-ola Max 477 (capacité 80 single 45 tours) 1979
Revox B77 MKII 1975
Collection audio :
https://urlz.fr/j10t
Avatar du membre
bkg2018
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 359
Enregistré le : 30 mai 2012 16:57

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par bkg2018 »

Xavier a écrit :Salut,
le i$ c'est pour donner une couleur differente en fond d'écran (PAPER) !
cf: "UDGs" pour les zonnages CHAR
Dans Call CHAR on peut mettre d'autres commandes que juste la définition du caractère ?
HP : 67 25 34C 15C 41CX 48S* 48SX 48GX 35S* WP34S* 39gII*
TI : SR52 57 58C* 59 Programmer 66 74S 65
Sharp : PC 1245 1251* 1262 G-850S G-850V
Canon : X-07* F-800P*
Casio : CG-8 SF5300E*
*: persos d'époque
Avatar du membre
Melaure
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 1455
Enregistré le : 04 août 2008 11:57
Localisation : Lugdunum
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Melaure »

bkg2018 a écrit :
Xavier a écrit :Salut,
le i$ c'est pour donner une couleur differente en fond d'écran (PAPER) !
cf: "UDGs" pour les zonnages CHAR
Dans Call CHAR on peut mettre d'autres commandes que juste la définition du caractère ?
Pas dans mes souvenirs ...
MBP 2.6 2012 HD 16Go/960GoSSD • iMac 27" • MB 2.26 • Cube • iMac DV 600 • iBooks Tangerine/Blueberry/Graphite/Indigo/Key Lime • 6100/66 • 1400CS • PB520c SC2200 • Duo 210 • PB 145b • Q660av • Q700 • LC475 • Classic II • LCIII-040/66 • LC III • 2 LC II • PDS IIe • SE/30 • SE • Mac Plus • Mac 512 • Mac 128 • MacPortable • eMate • IIc • IIe • QT150/200 • A500 • A1200 • CPC6128 • TI-99/4A, TI-74 • TouchPad 32 GB
Les Gones du Mac
Avatar du membre
gege
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 7141
Enregistré le : 31 janv. 2008 14:24
Localisation : Banlieue Paârisienne
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par gege »

Oui, ça m'étonnait, d'où ma remarque.
CALL CHAR remplace juste la forme du caractère.
G.E.
Xavier
Fonctionne à 1200 bauds
Fonctionne à 1200 bauds
Messages : 684
Enregistré le : 10 mars 2006 15:48
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Xavier »

Salut,

Alors comme ça ... Vous doutez de mon explication ?

C'est vrai que je ne me suis pas étendu sur ma théorie.

La question était :
"Pourquoi redéfinir un caractère déjà existant avec la fonction CALL CHAR ?"

J'ai répondu, "Paceque la couleur de fond est différente!"

En fait, c'est du à un problème de programmation de la commande CALL COLOR(x,x,x) en BASIC Etendu.
Cette fonction ne donne pas un attribut couleur directement à l'écran, mais à un groupe de caractères ASCII.
Ils appellent ça des "SET" de caractères.
En deux mots, si l'on veut attribuer une couleur de fond et de premier plan à un caractère affiché, on doit paramétrer un groupe de caractère et non un seul caractère.
Sur d'autres machines, l'attribut couleur est fixé par zonage écran ou avec des caractères d'attribut d'écran présent dans les PRINTs, ou modifiés à la demande...

Voici donc ces fameux « SET » de caractères ASCII.

Code : Tout sélectionner

Le SET 0= CHR$(30) à CHR$(31)
Le SET 1= CHR$(32) à CHR$(39)
Le SET 2= CHR$(40) à CHR$(47)
Le SET 3= CHR$(48) à CHR$(55)
Le SET 4= CHR$(56) à CHR$(63)
Le SET 5= CHR$(64) à CHR$(71)
Le SET 6= CHR$(72) à CHR$(79)
Le SET 7= CHR$(80) à CHR$(87)
Le SET 8= CHR$(88) à CHR$(95)
Le SET 9= CHR$(96) à CHR$(103)
Le SET 10= CHR$(104) à CHR$(111)
Le SET 11= CHR$(112) à CHR$(119)
Le SET 12= CHR$(120) à CHR$(127)
Le SET 13= CHR$(128) à CHR$(135)
Le SET 14= CHR$(136) à CHR$(143)
Donc dans notre exemple le "i", CHR$(105) se trouve dans le SET n°10.

Avec CALL COLOR(10,5,8) [bleu foncé en avant plan et cyan en arrière plan]

Se qui veut dire que "hijklmno" seront paramétrés en même temps, avec les mêmes attributs couleur!
Supposons que l'on veuille changer la couleur de fond du "i" sans toucher aux autres caractères...
Et bien... on peut Po!

Donc, dans ce cas, il est nécessaire de redéfinir un caractère "i" dans un SET diffèrent avec CALL CHAR, puis de définir les nouveaux attributs couleurs du caractère autres que le SET n°10.
… pour les couleurs, mais aussi pour la transparence.

Voilà....
Fallait pas demander!
Avatar du membre
gege
Fonctionne à 14400 bauds
Fonctionne à 14400 bauds
Messages : 7141
Enregistré le : 31 janv. 2008 14:24
Localisation : Banlieue Paârisienne
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par gege »

Eh bien... merci !
C'est maintenant clair.
G.E.
Avatar du membre
Melaure
Fonctionne à 2400 bauds
Fonctionne à 2400 bauds
Messages : 1455
Enregistré le : 04 août 2008 11:57
Localisation : Lugdunum
Contact :

Re: Hebdogiciel, Les Listings... La mémoire papier!

Message par Melaure »

Merci j'avais oublié ça, pourtant j'ai beaucoup programmé sur cette machine, mais je me rend compte que 25 ans sont passés depuis .... :cry:
MBP 2.6 2012 HD 16Go/960GoSSD • iMac 27" • MB 2.26 • Cube • iMac DV 600 • iBooks Tangerine/Blueberry/Graphite/Indigo/Key Lime • 6100/66 • 1400CS • PB520c SC2200 • Duo 210 • PB 145b • Q660av • Q700 • LC475 • Classic II • LCIII-040/66 • LC III • 2 LC II • PDS IIe • SE/30 • SE • Mac Plus • Mac 512 • Mac 128 • MacPortable • eMate • IIc • IIe • QT150/200 • A500 • A1200 • CPC6128 • TI-99/4A, TI-74 • TouchPad 32 GB
Les Gones du Mac
Répondre

Retourner vers « Tous les ordinateurs »