Forum tama's team

cp: ne peut évaluer `brain': Aucun fichier ou dossier de ce type
AccueilPortailGalerieCalendrierFAQRechercherS'enregistrerMembresGroupesConnexion
Connexion
Nom d'utilisateur:
Mot de passe:
Connexion automatique: 
:: Récupérer mon mot de passe
Derniers sujets
» Network, essai 1
par godbod Dim 09 Juil 2017, 02:18

» GODBOD
par godbod Sam 08 Juil 2017, 14:05

» Numbers
par godbod Sam 08 Juil 2017, 13:54

» Mort ?
par godbod Sam 08 Juil 2017, 13:47

» mon humeur
par Ver2guerre Sam 30 Juil 2016, 19:44

» [A voir] Programme de traduction original : WikiTranslate
par AdRiWeB Lun 01 Fév 2016, 04:50

» Reprise ?
par Emyl Jeu 14 Juin 2012, 21:17

» Euh, ah ?
par Ver2guerre Dim 27 Mai 2012, 12:11

» Problème TI 89 Titanium non visible après mise à jour
par abdoukid Mer 23 Mai 2012, 13:37

» Y'a quelqu'un ?
par Ver2guerre Sam 21 Avr 2012, 23:10

Quick message
Qui est en ligne ?
Il y a en tout 1 utilisateur en ligne :: 0 Enregistré, 0 Invisible et 1 Invité

Aucun

Le record du nombre d'utilisateurs en ligne est de 367 le Dim 18 Oct 2009, 00:16

Partagez | 
 

 [z80] Compression

Voir le sujet précédent Voir le sujet suivant Aller en bas 
Aller à la page : 1, 2  Suivant
AuteurMessage
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: [z80] Compression   Jeu 25 Sep 2008, 22:58

Reprise du sujet effacé Dimanche ......

Je rappelle le but du jeu :
A partir d'une liste L1, supprimer les éléments qui se répètent pour obtenir une liste "compressée" contenant 1 élément de chaque élément différent de la liste initiale

exemple : {1,7,12,3,3,12,4,7} -> {1,7,12,3,4} dans cet ordre

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Sam 27 Sep 2008, 19:10

j'aurais bien un truc a proposer, mais c'est trop lourd et bourrin ^^'
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Sam 27 Sep 2008, 22:18

double boucle for ?

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Dim 30 Nov 2008, 16:40

Code:

:{0
:For(Z,1,dim(L1
:If min(Ans=!L1(Z
:augment(Ans,{L1(Z
:End
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Dim 30 Nov 2008, 19:49

franchement, c'est bien, mais pourquoi la variable Z ??

C'est la variable la plus lente de la calto ! (sérieux !)

la plus rapide est theta Very Happy
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Dim 30 Nov 2008, 20:17

Et comment tu fais un thêta sur ce forum ? Pourquoi Z est plus lent ?

edit : je suis vénère.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Lun 01 Déc 2008, 16:45

ben tu fais comme ca : θ

c'est simple non ?


lol



et pourquoi c'est la plus rapide ? parceque TI l'a placée avant le 'A' de l'alphabet, donc c'est la 1ere variable sur 27, donc la plus rapide en acces memoire.

Les temps d'acces sont importans opur un programme qui joue sur les boucles Very Happy

D'ailleurs qqun avaient fait des tests pour montrer que theta etait plus rapide et z la variable la moins rapide...
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Lun 01 Déc 2008, 16:55

Enfin le choix de la var est complètement négligeable devant l'optimisation plus globale appliquée ici.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Lun 01 Déc 2008, 21:07

bof oué enfin c'est de l'ordre de quelques millisecondes, et encore ^^

Baruch > que pasa ?


EDIT : en excellent administrateur que je suis [/auto-proclamation], j'ai rajouté une censure pour pouvoir écrire théta facilement, il suffit d'écrire : théta: (sans l'espace entre le : et le t)
d'autres caractères spéciaux à venir (racine carrée par exemple ...)

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Lun 01 Déc 2008, 21:34

Ben je fais une optimisation super et on me reproche un truc complétement HS.

:théta: s'écrit thêta.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Lun 01 Déc 2008, 21:53

nan mais elle est bien ton optimisation

bah, pour théta j'vais l'écrire en anglais (= sans accent) ça sera plus simple :p

... besoin de l'avis d'un expert : , qu'est-ce que tu peux dire sur θ ? :p

...

...

ah non c'est bon j'avais déjà écrit : theta: sans accent ^^

test : θ

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Mar 02 Déc 2008, 02:17

Baruch a écrit:
Ben je fais une optimisation super et on me reproche un truc complétement HS.

:théta: s'écrit thêta.

non mais je parlais pas de ton optimisation, la preuve, je ne l'ai pas critiqué.... j'ai juste remarqué que si tu remplace Z par theta, c'esrt juste plus rapide..


rholala, on dirait que j'ai completement détruit ton code en disant que c'est de la merde... pas du tout !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Mar 02 Déc 2008, 21:34

Ok ok dsl.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Mer 03 Déc 2008, 02:14

non non tkt pas lol


bon, stop hs lol
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Mer 03 Déc 2008, 23:35

oui stop HS, en attendant quelqu'un a quelque chose d'autre à proposer ? parce que c'est pas drôle si Baruch est le seul à proposer :p
osef si c'est tout pourri, l'important c'est de proposer quelque chose Wink

(PS : z'avez pas une liste de caractères spéciaux souvent utilisés pour que j'puisse faire comme pour theta et mettre directement les caractères ?)

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 02:10

Mais en fait j'arrive pas à comprendre pourquoi j'arrive mieux que vous à faire des optimisations.

Dans cet exemple :

Ce que j'ai fait ici est totalement intuitif : j'ai ma liste L1 dont je ne veux qu'un certain nombre d'éléments respectant certaines conditions. Ben ya pas 36 solutions, je regarde le premier élément, je me demande s'il vérifie la condition, si c'est la cas je le stocke dans L2 ; puis je regarde le 2e, etc.

Donc déjà j'ai :

For(Z,1,dim(L1
If [condition]
Then
{Stocker dans L2}
End
End

Ensuite, c'est quoi la condition ? C'est que l'élément testé ne soit pas déjà dans L2. Là ça fait tilt, pour tester un mec par rapport à une liste, pas obligé de faire une boucle.
Bon ok après c'est de l'astuce, si le mec est déjà dans la liste, il y aura 1 dans la liste mec=L2, donc si max(mec=L2)=1, le mec existe déjà dans L2. Donc notre condition doit être not(max(mec=L2)). Et puis classique on dissout le not(), ce qui fait (en vérifiant) min(mec=!L2).

Comment stocker dans L2 ? Ben ya 2 façons, soit L2 a dès le début une taille définie, et du coup il suffit de stocker le mec dans une case de la liste. Mais dans ce cas, ya 2 problèmes, on ne connaît pas la taille de L2 (on sait qu'au max elle vaut dim(L1), mais sinon, ça peut être génant et il faudrait réduire la taille de L2) ; et puis si on veut stocker le mec dans une case de L2, laquelle ? La Z-ième ? On aurait donc des trous dans L2. Ou alors on fait un compteur annexe ? Très moyen.
Bon ben la 2e façon c'est augment(), ça pose pas de problèmes, peu importe L2, on ajoute le mec au bout. Il faut juste initialiser L2.

Donc on a :

{0->L2
For(Z,1,dim(L1
If min(mec=!L2
Then
augment(L2,mec->L2
End
End

Bon, on pourrait peut-être traduire "mec" : c'est L1(Z).

{0->L2
For(Z,1,dim(L1
If min(L2=!L1(Z // remarquez l'inversion pour gagner 1o ^^
augment(L2,{L1(Z->L2
End

Bon ben c'est pas mal. Avant de finir mon code, il faut bien sûr se demander si je peux utiliser Ans. Je remarque que Ans désigne toujours la même chose dans la boucle, L2. A la fin de la boucle, Ans=L2, et puis au début, on a besoin de L2. En plus, lors de l'entrée dans la boucle, on a déjà Ans=L2 (avec l'init.). Ben voilà quoi :

{0
For(Z,1,dim(L1
If min(Ans=!L1(Z
augment(Ans,{L1(Z
End

Perso, je trouve ça magnifique, on arrive à créer une liste par itérations sans jamais la matérialiser ^^.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 15:39

loool j'ai lu la 1ère phrase j'me suis dit "il s'la pête, là !" XD

n'empêche que augment c'est lent, non ?

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
AdRiWeB
amis
amis
avatar

Nombre de messages : 3655
Age : 25
Localisation : Juste sous mes cheveux
Loisirs : Internet, programmation, TI, musique, tennis-de-table ...
Humeur : ^^
items : o
Personalized field :
Réputation : 0
Points : 3929
Date d'inscription : 12/08/2007

Profil
TI: TI-84 Plus, nspire CAS
TO: 2429 {2}
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 16:37

ba c'est le plus court, je pense
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://www.adriweb.net
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 19:39

oué c'est vrai c'est le but, mais bon si c'est possible de faire aussi quelque chose de rapide , ça serait pas mal Wink

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 21:10

Roo ok je me la pète dans la première phrase, mais vous devriez lire tout le post. J'expose comment j'ai créé ce code, et j'aimerais bien que vous me disiez le moment où ça coince pour vous. En plus j'y ai passé pas mal de temps, donc la moindre des politesses serait quand même de ne pas dire que tu ne l'as pas lu. Concernant le augment, j'en parle dans le post.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 21:17

yep, mais j'l'ai lu ton post et il est intéressant, c'est vrai, moi aussi j'fonctionne souvent à l'intuit'


(HS : d'ailleurs ce matin en cours d'info, une fois de plus j'ai été l'un des seuls à pouvoir faire le programme demandé Wink c'est un truc assez marrant à faire, il faut afficher tous les points (n,p) jusqu'à une certaine valeur de n et une certaine valeur de p tels que (n parmi p) soit impair, ça fait une jolie fractale (essayer avec p jusqu'à 127 et n jusqu'à 127))

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 21:26

Ben au contraire je montre ici que l'intuition ne joue qu'un rôle minime.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
tama
Admin
Admin
avatar

Nombre de messages : 12375
Age : 26
Localisation : DTC ? :triso:
Humeur : =)
items : o
Personalized field : huh ? oO
Réputation : 3
Points : 7087
Date d'inscription : 08/08/2007

Profil
TI: 84+, 89 tita, 89 tita
TO: infini :p
Spécialité: C 68k

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 21:28

C'est pas comme ça que j'l'ai compris Very Happy
mais bon, d'toute façon avant de faire le programme super-optimisé il faut bien une idée, c'est comme les maths, une intuition et hop ! Very Happy

_________________


Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Baruch
OPTIMIZATOR
OPTIMIZATOR
avatar

Nombre de messages : 193
Age : 26
items :
Personalized field :
Réputation : 0
Points : 3507
Date d'inscription : 07/08/2008

Profil
TI: 83+
TO: 200
Spécialité: Basic z80

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 21:36

Oué sorry j'aurais pas dû utiliser le mot "intuitif" ^^. Ca me rassure, t'as au moins lu les 2 premières phrases... ^^
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
nay0w
légende
légende


Nombre de messages : 797
Age : 24
Localisation : Dans l'coin!
Humeur : Bonne x)
items : o
Personalized field : 10 jetons
Réputation : 0
Points : 3899
Date d'inscription : 11/02/2008

Profil
TI: 82Fr / 89-Titanium
TO: 3 825
Spécialité: Autre

MessageSujet: Re: [z80] Compression   Jeu 04 Déc 2008, 23:26

Interessant ton explication :)

Par contre j'ai pas compris ce que c'etait L1(Z)? Enfet j'ai utilisé vite fait les listes dans certains prog, sans vraiment utiliser les differentes commandes qui y sont rattachées donc jsais pas trop xD
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: [z80] Compression   

Revenir en haut Aller en bas
 

[z80] Compression

Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 2Aller à la page : 1, 2  Suivant

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
Forum tama's team :: TI :: Défis-
Créer un forum | © phpBB | Forum gratuit d'entraide | Contact | Signaler un abus | Forum gratuit