Existence d'une variable ? - Page 1

Une tite question au passage : comment je peux vérifier l'existence d'une variable ?
Par exemple comment vérifier qu'il y'a quelque chose dans y1 ?

La réponse de doubleK sera la même que la mienne:

: Local notexist
: if getType(y1)=getType(notexist)
: Text "y1 n'existe pas"

Ca marche dans toutes langues!

okay merci beaucoup Link

If gettype(y1)="NONE"
text "y1 existe pas"

c moins universel, mais c plus rapide et ça prend moins de place.

MacIntoc a écrit :
If gettype(y1)="NONE"
text "y1 existe pas"

c moins universel, mais c plus rapide et ça prend moins de place.

Et oui.
(put1 'Faut qu'j'arrête, je suis en train de me transformer en Double-K)

MacIntoc a écrit :
If gettype(y1)="NONE"
text "y1 existe pas"
c moins universel, mais c plus rapide et ça prend moins de place.

C'est aussi moins logique. Il est plus logique de comparer les types de 2 variables, pas le type d'une variable avec une chaîne de caractères.

Et ton code ne marche pas avec la calculatrice en français ou d'autres langues non-anglaises.

allez, je vote, pour la v2.2, Kevin change son pseudo en "DoubleK"

certe, mais le programme serat 2* plus rapide

une solution intermédiaire :

Local noexist,none
getType(noexist)->none
If getType(f1)=none
disp "f1 n'existe pas"

me plait pas ta solution. C ou l'une ou l'autre. Ca, ca gache des lignes de code...

pareils, y a deus gettype

À la différence que le getType(noexist)->none est appelé une seule fois au début du programme, et peut être réutilisé autant de fois qu'on veut. D'ailleurs, j'ai mieux:

:Local none
:getType(none)->none
:If getType(f1)=none
:disp "f1 n'existe pas"

hum, ca ve etre dur d'optimiser plus

y a plus rapide, tu fait une liste correspondant à chaque langue contenant chaque mots clés que tu utilise

et tu l'identifie comment la langue utilisée ?

azerty83 a écrit :
hum, ca ve etre dur d'optimiser plus

Bah, il y a ce que j'utilise dans mes programmes:

:Local t
:getType(t)->t
:If getType(f1)=t
:disp "f1 n'existe pas"

Vive les noms de variables d'une lettre!

local notexist
if gettype(notexist)=/="NONE" then
text "Met ta calc en anglais, blaireau !"
stop
endif

et ensuite :

if(gettype(var)="NONE") : .......

ouais comme ca tu gagne 20 octets...
enfin bon..

Vertyos a écrit :

local notexist
if gettype(notexist)=/="NONE" then
text "Met ta calc en anglais, blaireau !"
stop
endif

et ensuite :

if(gettype(var)="NONE") : .......

C'est plus gros que:

:Local none
:getType(none)->none

et ensuite:

:If getType(var)=none
:...

Et puis, moi, à:
text "Met ta calc en anglais, blaireau !"
, je réponds:
DelVar tonprog:©apprends à programmer, blaireau!

hu²

J'ai quand même le niveau pour faire un prog compatible multi-language... Ce qui manque c'est la volonté, et ça je crois que je ne l'aurais jamais

azerty83 a écrit :
et tu l'identifie comment la langue utilisée ?

je fait un teste de barbare jusqu'a ce que ça fonctionne

rah, vraiment... #non"

t'as pas plus bourrin et plus inéficace comme methode sinon ?

si tu fais 8 fois le programme et tu le livre dans un autre qui te sort celui que l'user demande

si, pour le lancement de Shellian
je lance le programme de démarrage avec un autre petit programme. Le programme de démmarrage change l'extension du pack shellian puis quitte et le petit programme de départ lance Shellian

hum

je vois (non pas du tout )

erf... t'en fait pas
avant le lancement, le pack fait 8Ko, aprés, il fait 22