[ Sites | Jeux | Utilitaires | Deulignes | Vies infinies | Bidouilles ]

Le monde Oric

Savez-vous que vous pouvez transformer votre vilain PC en superbe ORIC ? Savez-vous que vous pouvez faire tourner les jeux qui hantèrent vos nuits dans les années 1983-1986 ? Personnellement, j'ai commencé à programmer sur cette petite merveille. J'ai alors été mordu par le (tristement célèbre) virus de l'informatique et... je n'ai jamais retrouvé un tel plaisir de créer depuis.

Vous pouvez télécharger depuis cette page mes jeux et utilitaires...

Jetez également un oeil sur les deulignes, les vies infinies ou encore sur les bidouilles.

Si vous rencontrez des difficultés pour faire fonctionner Euphoric (l'émulateur Oric pour PC) sous Windows XP, n'hésitez par à installer DOSBox. Lisez également ce qu'en dit Fabrice Francès, le père d'Euphoric, dans le CEO-MAG n°195 de juillet 2006

Les sites Oric

• The Oric Site. Le site Oric.
• Bienvenue dans le monde Oric !. C'est le site des fans de l'Oric, des vrais ! Pas beaucoup de monde certes, mais de la passion, de l'authentique, de la vie quoi ! Ce site est tenu de main de maître par Fabrice Francès.
• Swedish ORIC Homepage. Le site de Håkan Karlsson. Une qualité exceptionnelle, du grand art !
• Le journal du Club Europe Oric (CEO)

Les jeux

Ceux que j'ai réalisés...

• Mille bornes (10 Ko)
  Le top du top du top ! Enfin... c'est sans doute ce que j'ai fait de mieux en informatique. Voulez-vous jouer contre Oric aux 1000 bornes ? Voir aussi les commentaires des joueurs.
• Othello (7 Ko)
  C'est mon premier jeu. On ne joue pas contre l'ordinateur mais à 2 joueurs, l'un contre l'autre (y'a des fois où tu es consternant, Marc...).

Ceux que j'ai recopiés des revues de l'époque, puis « débogués » et arrangés.

• Schtroumpfs (4 Ko) : petit jeu de plate-forme pour les enfants de 5 à 8 ans. Micro7 - « Cahier des As » (12/1984).
• Poule (6 Ko) : jeu de reconnaissance de couleurs pour 3 à 6 ans. Théoric no 16 p 47.
• Drapeaux (6 Ko) : reconnaître à quel pays appartient un drapeau... Jean-Pierre Suau (1984).
• Pilote (10 Ko) : course automobile. Frédéric Ciesielski.
• Toutou (3 Ko) : jeu d'adresse. Micr'oric no 7 p 58.
• Mille pattes (2 Ko) : jeu d'arcade immortel. Micr'oric no 3 p 38.

Ceux qu'on peut télécharger à partir de la page Oric.

Les utilitaires

Titre	Sujet	Source / Auteur
10 tris (3 Ko)	10 algorithmes de tris	Marc Goldstein
Arnak (2 Ko)	Musique de l'Arnaque (The entertainment) Pgm basic de lancement + code (71CF-97FF)	Adapté par Marc Goldstein
Bin-Data	Conversion Binaire-Data (7000-70C0)	Manuel de référence (André Chénière) Tome 2 p 42
Bytes	Affichage du nombre d'octets libres	Théoric no 15 p 24
DEN	D(el) - E(dit) - N(um) (9400-97B0)	Manuel de référence (André Chénière) Tome 1 p 147
Dumpvar	Liste des variables et de leur valeur (9800-98E2) Pour utiliser le programme : CALL #9800 Pour lister sur imprimante : POKE #2F1,128:CALL#9800	l'Ordinateur Individuel no 76 p 201 (12/1985)
Fenêtres (2 Ko)	ou Windows façon Oric...	Théoric no 13, 14 et 15
Mon+Elm (3 Ko)	Moniteur relogeable + Editeur de langage machine Mon : (8A00-91FF), Elm : (9200-97FF)	Manuel de référence (André Chénière) Tome 2 p 3 à 86
Renum	Syntaxe : ! P(as), O(rigine), D(ébut), ou F(in) (9400-9701)	Micr'oric no 7 p 13
Reset0-2	Réinitialisation des pages 0, 1 et 2	Micr'oric no 9 p 56
Scat	S(auvegarde) C(hargement) A(rrêt) T(itre) (9200-93CF)	Théoric no 5 p 28
Scroll	Scrolling latéraux (écrans Text et Hires) (9600-9748) Syntaxe : !SCROLL d x, y, z où : d = L(eft) ou R(ight) x = première ligne à décaler : 0 (haut) à 27 (bas) y = nombre de lignes à décaler z = nombre de décalages	Théoric no 14 p 40
Using	Print using (formatage d'un nombre) (B800-B89D) Listing ATMOS : 10 DOKE #2FC, #B800 20 POKE 0,2 30 FOR I=1 TO 20 40 PRINT &(I*SQR(I)) 50 NEXT	Micr'oric no 9 p 23
W-Cody	Placer du langage machine dans les REM	Soft & Micro p 134 (12/1984)

« Deulignes »

Je ne résiste pas à l'envie de vous donner les programmes sur 2 lignes que j'ai écrits du temps d'Hebdogiciel...

• Applaudissements
0 FORT=1TO30: H=RND(1)*32: W=RND(1)*4+10: SOUND4,H,0: PLAY0,1,1,750: WAITW: NEXT
  (Hebdogiciel no 73, 8 mars 1985)
• Fenêtres
10 LORES0: PRINT@0,0;: POKE#2F2,128: LIST: PRINT: PRINT: INPUT"F (5-19)";F: H=27-F: PRINT@0,0;
20 DOKE632,48040+H*40: DOKE634,48E3+H*40: DOKE636,F*40: POKE638,F: CLS: LIST: LIST
  (Hebdogiciel no 84, 25 mai 1985)
• Bytes free (version Atmos)
0 DATA20,B0,CC,A5,A2,38,E5,A0,AA,A5,A3,E5,A1,20,C5,E0,A9,88, A0,ED,20,B0,CC,60
1 FORT=400TO423: READX$: X=VAL("#"+X$): POKET,X: NEXT: DOKE#1B,400
• Fond fun
0 INPUT"ENTRER 32<N<96";N: FORT=0TO7: POKE#B500+T,PEEK(#B800+N*8+T): NEXT
1 CALL#E5F5: INK2: PAPER0: REM CALL#E563 sur ORIC-1
essayer N=53, 44, 85 et 32.
• Chronomètre
0 DOKE#276,0: REPEAT: UNTILKEY$<>"": A=(#FFFF-DEEK(#276))/100: C=A-INT(A)
1 C=INT(C*100+.5): M%=INT(A)/60: S=INT(A)-M%*60: PRINTM%"min"S"sec"C"cent",,A
• Nuages
0 HIRES: CURSET100,30,1: PAPER4: INK7: FORT=1TO3: FORR=1TO8+RND(1)*7: CIRCLER,1
1 NEXT: CURMOV4^T+6/T,RND(1)*5,3: NEXT
• Bruit des vagues
0 PLAY 0, N, 4, 6000 (avec N impair)
• Bannière
1 T$="*** TITRE (20 car.) ": T$=T$+T$+T$+T$: FORX=1TO40: B$=RIGHT$(T$,X)
2 PLOT0,0,B$: WAIT9: NEXT: FORX=40TO1STEP-1: C$=MID$(T$,X,40): PLOT0,0,C$: WAIT9: NEXT
• Jingle
1 Y=3: FORT=1TO6: X=INT(RND(1)*6+3): IFX=4THENX=12: IFX=6THENX=10: IFX=7THENY=4
2 MUSIC1,Y,N,0: PLAY1,0,1,500: WAIT10: NEXT: WAIT100: GOTO1
• Protection
1 DOKE#BFE0,#820: DOKE#BFE2,#4CC7: DOKE#BFE4,#C8C1: DOKE#1B,#BFE0: C=RND(1)*7
2 PLOT2,10,C: PLOT4,10,"Ce programme a une protection d'enfer!": END

Vies infinies

Je vous les livre tels quels car je ne les ai pas testés depuis...

• 3D-Fongus : (dernier bloc) POKE#26C8,44:POKE#270A,44
• Doggy : (255 vies) POKE#1EF1,#FF
• Driver :
10 CLOAD""
20 POKE#6333,234
30 DOKE#6334,#1A9
40 CLOAD""
• Frelon : (2ème bloc) DOKE#7385,#EAEA:DOKE#7387,#EAEA:POKE#7389,234
• Ghost Gobbler : POKE#16EE,10:POKE10,127 ou DOKE#16ED,#EAEA:DOKE#16EF,#EAEA
• Hu*bert : 727 GOTO 700
• Lone Raider : DOKE#8E86,#EAA9:POKE#8E88,3:CALL#6A02: CALL#91E0
ou encore POKE#6A26, nombre de vies
• Manic Miner : DOKE#683,#EAEA
• Mr Wimpy : POKE#4A3D,125 ou POKE#4AA2,X:POKE#4ABD,X avec X inférieur à 125
• Psychiatric : DOKE#7839,#EAEA:POKE#783B,234
• Painter : POKE#8FC,X (avec X inférieur à 128)
• Styx : DOKE#5BDF,#EAEA:DOKE#5BF0,#31A9:DOKE#3032,#EAEA: DOKE#4D62,#EAEA
• Super Jeep : DOKE#9C,#2175, en ligne 545: GOSUB540 et supprimer la ligne 547
• Trouble in Store : POKE#505B, nombre de vies
• The Ultra : (255 vies) POKE#6B4,255, puis CALL #5BD
• Xenon 1 : DOKE#6029,#EAEA:DOKE#602B,#EAEA:POKE#602D,234
• Zorgons Revenge : DOKE#836,#EAEA:POKE#838,234:DOKE#855,#EAEA:POKE#857,234: DOKE#98B,#EAEA:POKE#98D,234

Curiosités et bidouilles...

Vous voulez rire ? Ben, voilà le genre de notes manuscrites que je retrouve dans mon
« carnet » de l'époque :

A propos de FRE...
« Lors de la mise sous tension, la routine d'affichage des octets libres (CALL #ED62) effectue DEEK(#A6)-DEEK(#9A), soit MEMSIZ-TXTTAB, ce qui donne 2 octets de plus que FRE(0) qui effectue DEEK(#A2)-DEEK(#A0), soit FRETOP-STREND (voir la ROM à partir de #D47E...). »

ou bien encore :
« Nous avons remarqué que dans l'ORIC, l'opération < était environ 1,3 fois plus rapide que les opérations > ou =. » (Théoric no 7 p 22)

Etonnant, non ?

Membre de L'anneau internet Oric
[Précédent] [Suivant] [5 Précédents] [5 suivants] [Aléatoire] [Liste des sites]

Courriel : marc.goldstein@noos.fr Signez le Livre d'Or de Marc Page