Derniers sujets
» aide requise pour afficher ligne de texte de differente couleur
Base de données listings ? EmptyLun 19 Aoû 2019 - 17:19 par Dbug

» Oricutron & RS232 "loopback"
Base de données listings ? EmptyLun 19 Aoû 2019 - 12:29 par Jede

» Pallida mors
Base de données listings ? EmptyLun 19 Aoû 2019 - 6:50 par didierv

» recherche un son de bruit de saut
Base de données listings ? EmptyDim 18 Aoû 2019 - 20:33 par ]0[v]

» Lancement de jeux - Messages d'erreur
Base de données listings ? EmptySam 17 Aoû 2019 - 21:54 par Symoon

» CEO MAG 350
Base de données listings ? EmptySam 17 Aoû 2019 - 10:36 par Dom50

» Bocco's adventures - nouveau jeu pour Oric
Base de données listings ? EmptySam 17 Aoû 2019 - 7:32 par kenneth

» CEO-MAG 351-352
Base de données listings ? EmptyVen 16 Aoû 2019 - 21:00 par retroric

» Citadelle V2
Base de données listings ? EmptyJeu 15 Aoû 2019 - 21:03 par fred72

» Ghost Town
Base de données listings ? EmptyJeu 15 Aoû 2019 - 18:08 par retroric

» Oric Atmos : problème de son
Base de données listings ? EmptyMer 14 Aoû 2019 - 18:03 par froggy

» Apprendre l'Assembleur ORIC
Base de données listings ? EmptyMar 13 Aoû 2019 - 15:09 par ]0[v]

» The last warrior
Base de données listings ? EmptyVen 9 Aoû 2019 - 19:13 par Symoon

» Devoirs de vacances
Base de données listings ? EmptyVen 9 Aoû 2019 - 11:22 par fred72

» Joyeux Anniversaire Totoshampoing
Base de données listings ? EmptyMer 7 Aoû 2019 - 19:08 par TotoShampoin

Qui est en ligne ?
Il y a en tout 3 utilisateurs en ligne :: 0 Enregistré, 0 Invisible et 3 Invités

Aucun

Le record du nombre d'utilisateurs en ligne est de 29 le Mer 25 Fév 2015 - 14:01
Connexion

Récupérer mon mot de passe

Statistiques
Nous avons 192 membres enregistrés
L'utilisateur enregistré le plus récent est Иван

Nos membres ont posté un total de 7637 messages dans 659 sujets
Portail ORIC




Base de données listings ?

Aller en bas

Base de données listings ? Empty Base de données listings ?

Message par Symoon le Lun 15 Juil 2019 - 6:33

Hello,
Est-ce qu'il existe une base de données contenant les listings des jeux Oric et leur provenance (livre, mag, K7 commerciale), au moins ceux en Basic ? Ou sans aller jusque là, un gros fichier texte ?

Je demande parce qu'en ce moment je transfère le contenu de K7 non commerciales, récupérées dans des lots, et je tombe parfois sur des softs dont j'ignore la provenance. Savoir de où ils viennent et s'ils ont déjà été transférés me ferait gagner du temps en cas de K7 récalcitrante: je cherche une phrase du jeu et hop, je vois si je tombe dessus, et de où il provient.

Là par exemple, j'ai un fragment de programme mal décodé, mais dont je ne retrouve la phrase "votre vaisseau est touche" dans aucun fichier TAP (ou DSK, mais avec les DSK, la phrase peut être coupée entre deux pistes).

Code:
10. 400.'0F.n .. pazt.e0............ ;..<.:.. "vovre 6a.s{eau.a e|e0tou.ku...B....`..&.. "In 6o}s reste";.V."vaisse0u(x)"

Dois-je m'acharner pour un bout de code inconnu...Ah, si on avait des listings Wink (bon, on n'a déjà pas le temps de tout mettre à jour sur Oric.org, mais on peut rêver non !)
Symoon
Symoon

Messages : 687
Date d'inscription : 26/04/2014

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Jede le Lun 15 Juil 2019 - 9:52

Salut,

A la limite cela serait possible de faire une moulinette qui prend les .tap et essaye de les convertir en ascii dans le cas du basic. Cela ne marche pas pour l'asm.

Sauf que si tu ne l'a pas trouvé en cherchant "vaisseau", pas sûr qu'on trouve par la moulinette Smile
Jede
Jede

Messages : 276
Date d'inscription : 20/04/2016
Localisation : Var

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Symoon le Mar 16 Juil 2019 - 6:45

En fait les .TAP, ça va, on peut chercher dedans. Mis à part les mot-clé Basic, une chaîne de caractères ça passe.
Le pb est sur les DSK où les listings sont tronqués à chaque secteur, donc une chaîne peut être coupée.
Et bien sûr le contenu des magazines qui n'est "cherchable" que si on a fait de l'OCR (et pas sûr que le résultat sorte avec une simple recherche Windows ?)

Mais bon, le boulot semble colossal.
Symoon
Symoon

Messages : 687
Date d'inscription : 26/04/2014

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par didierv le Mar 16 Juil 2019 - 7:08

J'ai une autre proposition, c'est d'ajouter la fonction à Oric Explorer et lui demander la recherche en scannant dans tous ses fichiers catalogués (mais c'est aussi un job à plein temps)

_________________
DidierV - CEO Mag
alias coco.oric sur Defence-Force
didierv
didierv

Messages : 700
Date d'inscription : 19/01/2014
Age : 56
Localisation : Nord de la France

http://www.dmacoco.fr

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Ladywasky le Mar 16 Juil 2019 - 12:26

didierv a écrit:J'ai une autre proposition, c'est d'ajouter la fonction à Oric Explorer et lui demander la recherche en scannant dans tous ses fichiers catalogués (mais c'est aussi un job à plein temps)

Au moins je peux rajouter ça à taptap...

Déjà, avec taptap, tu peux exploser tous les fichiers .tap en fichiers "élémentaires" (fichiers Basic, ou assembleur/data), puis tu peux faire une recherche avec l'explorateur windows sur les fichiers obtenus par rapport à leur contenu (c'est une option dans la recherche des fichiers)
.
Ladywasky
Ladywasky

Messages : 208
Date d'inscription : 25/08/2018
Age : 49

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Ladywasky le Mar 16 Juil 2019 - 12:36

"Votre vaisseau a ete touche", ça me rappelle le jeu SAGA de chez ERE informatique. Je peux me tromper.
Ladywasky
Ladywasky

Messages : 208
Date d'inscription : 25/08/2018
Age : 49

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Ladywasky le Mar 16 Juil 2019 - 12:54

taptap est disponible ici :
https://github.com/DJChloe/taptap

La commande pour "éclater" un fichier tap, c'est :
Code:
taptap split mytape.tap

Pour convertir en fichiers basic, dans l'OSDK, il s'agit alors d'utiliser "bas2tap -t2b"

voir l'OSDK :
http://osdk.defence-force.org/index.php?page=documentation&subpage=bas2tap

ou bien
Code:
Bin2Txt -f3
http://osdk.defence-force.org/index.php?page=documentation&subpage=bin2txt


Avec une bonne boucle des familles dans un fichier Batch (.bat), je dis que c'est jouable
Ladywasky
Ladywasky

Messages : 208
Date d'inscription : 25/08/2018
Age : 49

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Symoon le Mar 16 Juil 2019 - 20:05

Ladywasky a écrit:"Votre vaisseau a ete touche", ça me rappelle le jeu SAGA de chez ERE informatique. Je peux me tromper.

Bien tenté, mais non Wink J'avais déjà scanné le TAP, et je viens de revérifier.
Sinon il y a ensuite la phrase "il vous reste" "vaisseau(x)", ce qui semble indiquer un jeu d'action. Je vais tenter d'améliorer le signal pour avoir un meilleur transfert, mais de toute façon il manquera le début du programme, effacé.
Symoon
Symoon

Messages : 687
Date d'inscription : 26/04/2014

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Symoon le Mer 17 Juil 2019 - 7:17

J'obtiens ça, avec une dizaine d'erreurs de parité. Il manque donc le début.
Il est probable, si j'en crois la K7, que le programme s'appelle "observateurs". Visiblement une création perso ou issu d'un magazine, mais lequel ?
Code:
9238 þúCURSETBONNERELEASECHANCE`!"
460 PRINT
465 PRINT" Appuyez sur la touche pour    commencer"
470 GET A$
500 REM *******************
510 REM * Debut de partie *
520 REM *******************
530 PRINT CHR$(17) CHR$(6)
540 MS=0
550 S=0:J=20:NV=5
560 LORES 1:Z=0
570 REM -------------
572 REM ** Couleur **
575 REM -------------
580 FOR Y=1 TO 24
590 X=INT (RND(1)*7)+1
600 PLOT 1,Y,X
610 NEXT Y
620 REM ---------------------------
622 REM ** Deplacement vaisseaux **
625 REM ---------------------------
630 GOSUB 1000 ' Cree les cibles
640 PLOT J,25," (- "
650 CALL#E93D
660 DOKE#306,3000
670 GET A$
680 A=ASC(A$)
690 IF A=8 AND J>1 THEN J=J-1
700 IF A=9 AND J<36 THEN J=J+1
710 IF A=32 THEN GOSUB 1500 ' Tir sur la cible
720 IF A=3 THEN GOSUB 4000 'Aff du score
740 ON Z GOTO 560,550
750 GOTO 640
1000 REM -------------------
1010 REM * Cree les cibles *
1020 REM  -------------------
1030 C=INT (RND(1)*35)+3
1040 D=INT (RND(1)*18)+3
1050 PLOT C,D,"."
1060 RETURN
1500 REM -----------------
1510 REM * Tir sur cible *
1520 REM -----------------
1530 CALL#E57A
1540 ZAP
1550 K=0
1560 FOR T=24 TO 2 STEP -1
1570 PLOT J+2,T," "
1580 PLOT J+2,T-1,"$"
1590 IF SCRN(J+2,T-2)=46 THEN EXPLODEREMK=K+1
1600 NEXT T
1610 PLOT J+2,T," "
1620 IF K<>0 THEN GOSUB 2000 ' Cible touchee
1630 GOSUB 1000 ' Cree les cibles
1640 RETURN
2000 REM -----------------
2010 REM * Cible touchee *  
2020 REM -----------------
2030 S=S+K*10
2040 PLOT J+2,T+2," "
2050 REM -------------------------
2052 REM ** Vaisseau adversaire **
2055 REM -------------------------
2060 FORH=1 TO 36
2070 PLOT EXPLODE,1," 99"
2080 CALL#E93D
2090 DOKE#306,3000
2100 K=0
2110 A$=KEY$
2120 IF A$=" DATATHEN GOSUB 2500 ' Tir sur adversaire
2130 IF H>J+2 THEN CALL#E57A
2140 IF Z<>0 THEN H=36 :GOTO 2170
2150 NEXT H
2160 PLOT H,1,"  "
2170 RETURN
2500 REM ----------------------
2510 REM * Tir sur adversaire *
2520 REM ----------------------
2530 CALL#E57A
2540 ZAP
2550 FOR T=24 TO2 STEP -1
2560 PLOT J+2,T," "
2570 PLOT J+2,T-1,"$"
2580 IF SCRN(J+2,T-2)=57 THEN K=1
2590 NEXT *
2600 PLOT J+2,T," "
2610 IFK<>1 THEN 2680
2620 REM CHR$----------------------
2622 REM ** Adversaire touche **
2625 REM -----------------------
2630 EXPLODE
2640 S=S+100
2650 PLOT H,1,"   "
2660 H=36
2670 GOTO 2800
2680 REM -------------------------
2682 REM ** Reaction adversaire **
2685 REM -------------------------
2690 K=0
2700 FOR V=2 TO 24
2710 PLOT H,V,"  "
2720 PLOT H,V+1,"$ $"
2730 SHOOT
2740 H1=SCRN(H,V+2)
2750 H2=SCRN(H+2,V+2)
2760 IF H1=40 OR H1=45 OR H2=40 OR H2=45 THEN K=1
2770 NEXT V
2780 PLOT H,V,"   "
2790 IF K=1 THEN GOSUB 3000
2800 RETURN
3000 REM -------------------
3010 REM * Vaisseau touche *
3020 REM -------------------
3030 EXPLODE
3040 Z=1
3050 NV=NV-1
3060 IF NV<1 THEN 4000' Fin de partie
3070 CLS
3080 PRINT :PRINT
3090 PRINT "Votre vaisseau a ete touche."
3100 PRINT
3110 PRINT "Il vous reste";NV;"vaisseau(x)"
3120 PRINT:PRINT
3130 PRINT"Vous avez";S;"Points"
3140 PRINT
3150 IF S<MS THEN PRINT"Le score a battre est";MS;"Points"
3160 CALL#E93D
3170 WAIT 300
3180 RETURN
4000 REM ----------------------
4010 REM * Affichage du score *
4020 REM ----------------------
4030 CLS
4040 Z=2
4050 CALL#E93D
4060 PRINT:PRINT
4070 PRINT "Votre scor& est :";S;"Points."
4080 IF S>MS THEN MS=S
4090 PRINT
4100 PRINT"Le meilleur score est :";MS;"Points"
4110 PRINT:PRINT
4120 PRINT"Une autre partie ?(O/N)"
4130 GET A$
4140 IF A$<>"O" AND A$<>"N" THEN 4130
4150 IF A$="O" THEN RETURN
4160 PRINT CHR$(6)CHR$(17)
4170 CLS
4180 END
Symoon
Symoon

Messages : 687
Date d'inscription : 26/04/2014

Revenir en haut Aller en bas

Base de données listings ? Empty Re: Base de données listings ?

Message par Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum