Novembre 2024 | Lun | Mar | Mer | Jeu | Ven | Sam | Dim |
---|
| | | | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | | Calendrier |
|
|
| Simulation de la fonction IIF | |
| | |
Auteur | Message |
---|
papydall
Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
| Sujet: Simulation de la fonction IIF Sam 11 Mai 2013 - 20:50 | |
| Salut tout le monde. Comme le calme règne sur le FORUM, voici de quoi le remuer !En FREEBASIC, il existe une fonction fort intéressante qui s’appelle IIF.Exrait du manuel FreeBASIC: --------------------------------------------------------------------------------------------------- IIf Fonction conditionnelle qui retourne une des deux valeurs. Syntaxe IIf ( condition, expr_if_true, expr_if_false ) Paramètres condition La condition à tester. expr_if_true Une expression à évaluer et à retourner si la condition est vraie. Elle doit retourner une valeur numérique, qui peut être un nombre entier, un nombre à virgule flottante ou un pointeur. expr_if_false Une expression à évaluer et à retourner si la condition est fausse. Elle doit avoir le même type de nombre que expr_if_true. ------------------------------------------------------------------------------------------------------------------------------------------------------------ Comme cette fonction n’existe pas en PANORAMIC, voici comment la simuler dans une SUB. Bien sûr, on peut la coder autrement et on peut même s’en passer complètement. - Code:
-
' ****************************************************************************** ' Extrait du manuel FreeBASIC: ' ----------------------------
' IIf ' Fonction conditionnelle qui retourne une des deux valeurs. ' Syntaxe ' IIf ( condition, expr_if_true, expr_if_false ) ' Paramètres ' condition ' La condition à tester. ' expr_if_true ' Une expression à évaluer et à retourner si la condition est vraie. ' Elle doit retourner une valeur numérique, qui peut être un nombre entier, ' un nombre à virgule flottante ou un pointeur. ' expr_if_false ' Une expression à évaluer et à retourner si la condition est fausse. ' Elle doit avoir le même type de nombre que expr_if_true. rem ============================================================================ ' La fonction IIf n'exist pas en PANORAMIC ' Voici une SUB qui permet de la simuler et comment l'utiliser
rem ============================================================================ dim IIf : ' Pour récuperer le resultat de la SUB puisque PANORAMIC ne permet pas ' de définir les FUNC dim i : ' compteur de boucle dim somme : ' résultat du calcul
somme = 0 For i = 1 To 99 ' Appel à la fonction IIf simulée et affectation du résultat à la variable SOMME IIf(odd(i),i,0) : somme = somme + IIf next i print "La somme des nombres impairs compris entre 1 et 99 est égale à "; somme
End
' ****************************************************************************** ' Simulation de la fonction IIF SUB IIf(condition,a,b) If condition = 1 Then IIf = a : Else : IIf = b END_SUB ' ******************************************************************************
| |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| Sujet: Re: Simulation de la fonction IIF Sam 11 Mai 2013 - 21:26 | |
| bonsoir a tous peut on s'imaginer Papydall s'ennuie allez allez, un petit effort , tu vas nous sortir un physicien ou mathematicien peut connue ... mindstorm | |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 0:29 | |
| Je constate moi aussi un calme inquiétant sur le forum mais là, à ce point là, c' est toi qui commence à m'inquiéter... tu n' as nul besoin de passer par une sub tu mets ton : if odd(i)=1 : iif=i :else : iif=0 :end_if à la place de ton appel à la sub puis : somme =somme+ifftu dois vraiment t' ennuyer... | |
| | | papydall
Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 12:39 | |
| Bonjour Ygeronimi. Tu as raison de dire que je m’ennuie et aussi que l’on peut coder - Code:
-
if odd(i)=1 : iif=i :else : iif=0 :end_if somme = somme + iif au lieu de - Code:
-
IIf(odd(i),i,0) : somme = somme + IIf sans passer par une SUB. Mais - Code:
-
IIf(odd(i),i,0) est qu’en même plus simple que : - Code:
-
if odd(i)=1 : iif=i :else : iif=0 :end_if Mais que veux-tu ? Ce calme du Forum me pèse lourd ! Est-ce le calme avant le déchaînement ? S’attendra-t-on à une avalanche de code portant avec elle du nouveau ? Espérons ! Espérons ! NB : Dans mon post ci-haut, j'ai écris : Bien sûr, on peut la coder autrement et on peut même s’en passer complètement. | |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 13:29 | |
| @Papydall,Rassures toi, moi même j' éprouve un grand vide depuis la réalisation de mon application. Elle serait perfectible mais l' éditeur, tel qu' il est, rend les choses trop brouillonnent dès que l'on dépasse quelques centaines de lignes. La navigation dans le code est trop longue. Et l' utilisation d'autres éditeurs n'est pas des plus pratique pour l' exécution du code en pré-visualisation. Du coup, je me demande si les prochaines améliorations ne devrait pas le concerner lui plutôt que le langage. Lignes rétractables par bloc...par exemple, avec la correction de quelques désagréments à l'ouverture. Puis c'est un peu la panne d' inspiration. Reprendre de vieux code me semble ré- inventer la roue et cela m'ennuie. Alors, j' en profite pour jouer avec les jeux de mon cru... | |
| | | Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 13:37 | |
| - Citation :
- Je constate moi aussi un calme inquiétant sur le forum
Rien d’inquiétant, c'est simplement quelques jours fériés à la suite.... @Papydall, Ta petite procédure ressemble à la fonction Excel SI , moi j'aime bien. A+ | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 13:49 | |
| Bonjour, - Citation :
- l' éditeur, tel qu' il est, rend les choses trop brouillonnent dès que l'on dépasse
quelques centaines de lignes. La navigation dans le code est trop longue. Et l' utilisation d'autres éditeurs n'est pas des plus pratique pour l' exécution du code en pré-visualisation. Là je suis obligé de réagir, car je ne suis pas d'accord. Il y a des tas de possibilités, et j'en ai déjà parlé. Il faut seulement le vouloir. Même avec mon Memorich, j'ai fait pu faire du lancement automatique. Mais il y a des éditeurs qui vont très bien. Le mieux pour nous est PsPad. L'avantage de celui-ci est qu'il est facile de faire la coloration syntaxique de Panoramic. De plus Nardo a fait un lanceur pour Panoramic, en appuyant sur <shift< <F9> La plupart des éditeurs se lance facilement avec un programme fait par Panoramic, il suffit de faire <CTRL> <S> avant, et appuyer sur un îcone. A propos, avec Panoramic, il y a une chose qui n'est pas mis en avant, c'est: <CTRL> plus <MAJ> + une touche numérique du clavier: CTRL0 CTRL1... ce qui met un signet. avec <CTRL0> ... on retrouve la ligne. J'en dirait plus si cela veut-être intéressant, mais on m'appelle pour l'apéro ! Salut JC, mais ça fait 3 fois qu'on m'appelle. |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 15:20 | |
| @ Cosmos 70, J' ai sur ma machine un nombre d'éditeur à faire peur. ( NotePad++, PsPad,Rexedit, ....) Bref, sans compter ceux au langage dédié. Et à chaque fois c'est une galère pour recréer la liste des mots clés, la coloration synthaxique, et le reste. Je programme (du moins j' essaye... ) en Panoramic donc je m'attends à avoir un éditeur Panoramic et pas à avoir besoin d'aller voir chez un autre même si j'ai un disque dur assez gros pour supporter quelques éditeurs. Quand tu vas à la poste, il serait incongru de devoir mettre ton courrier dans une boite au lettres placée chez le boucher...non ? ( quoi que par les temps qui courent cela devient un mauvais exemple... ) | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 15:30 | |
| |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 15:46 | |
| bonjour a tous là je suis de l'avis de Cosmos70 le choix de chacun doit etre libre cela dit si les signets pouvaient se transformer en onglets se serai super je par de se pas tester les signets mindstorm | |
| | | mindstorm
Nombre de messages : 685 Age : 55 Localisation : charente Date d'inscription : 13/02/2013
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 15:58 | |
| @papydall j'ai perdu la fonction defilement scroll?? @tous la fonction signet est tres pratique , je confirme. il resterai juste a faire un menu et a pouvoir les renommer deja mindstorm | |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 16:02 | |
| Heu... je ne crois pas avoir dit que l'on devait tous se servir du même éditeur... Il me semble que nous sommes sur le forum Panoramic, donc,il me semble donc logique de faire des propositions pour l' amélioration de l' éditeur Panoramic... Tout comme il me semble normal de souhaiter un éditeur dédié de bonne facture... Ps : Ceci étant, je veux bien en savoir plus sur l' histoire des signets | |
| | | papydall
Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 18:47 | |
| - mindstorm a écrit:
- @papydall j'ai perdu la fonction defilement scroll??
NB : pas d'espaces entre les crochets !!!@Jean Claude Si tu aimes bien, c'est tant mieux! Voilà au moins un qui aime bien; les autres, peut-être, aiment tout court !!! | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 19:52 | |
| - Citation :
- Ps : Ceci étant, je veux bien en savoir plus sur l' histoire des signets
Panoramic possède des signets comme pour PsPad. C'est je crois une découverte de "Nicolas" qui s'est désengagé depuis. Un appui sur <CTRL> et <SHIFT> + un numéro du clavier alpha-numeric, et non du clavier de droite, provoque un signet soit une marque sur la ligne en cours. Et <CTRL> + le n° du signet reporte le curseur à l'endroit où le curseur était lors de l'ajout du signet. Pour ma part, je travaille principalement avec PsPad. La coloration syntaxique une fois qu'elle est faite, c'est pas tous les jours qu'on a besoin de la faire. J'ai fait avec un Atari un programme de 22000 lignes. Je n'avais pas de coloration des mots clés. L'écran faisant 64000 pixels, je n'avais que 25 lignes, et selon la résolution 80 caractères de visible ou je ne sais plus, 110 en "haute résolution" (par rapport aux écrans d'aujourd'hui, la haute résolution d'Atari est plus que dépassé.). Et il n'y avait pas de signet, mais on pouvait avec GFA Basic, 2ème génération replier les procédures.. C'est plus qu'une question de méthode. Je travail aussi avec Panoramic Editor pour les essais, ou pour des petits programmes 'rapidos'. J'ai un autre programme que je fais avec Xed, un éditeur type rtf qui permet de mettre des images et des commentaires pour un programme qui me demande de bien comprendre ce que je fais, et avec une dizaine d'onglets qui sont réassemblés. Ce programme va me prendre du temps, car je suis en formation de C++ et qui est en relation avec ce programme. Les possibilités ne manquent pas, mais il faut faire des lanceurs spécifiques pour ce type d'éditeur ou de conception de programme. Pour faire un programme avec plein d'onglets, c'est pas difficile. J'ai déjà mis des solutions pour le faire. On peut en reparler. Quand à l'amélioration de l'éditeur, on est tous d'accord, seulement Jack avait dit qu'il voulais un jour ou l'autre, le refaire avec Scintilla je crois. Mais Jack fait plein de choses, et je pense qu'il faudra attendre un bon moment pour voir cet éditeur. Quand à moi, je réfléchi pour voir ce que cela donnerait avec un memoRich. Il serait hors de question de colorier tous le programme à la fois, sauf pour reprendre un fichier bas au départ (car ce serait trop long), mais je pense que cela est possible de colorier en direct une ligne. Ça m'intéresse de voir le résultat. |
| | | Jean Claude
Nombre de messages : 5950 Age : 70 Localisation : 83 Var Date d'inscription : 07/05/2009
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 20:15 | |
| | |
| | | papydall
Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 20:59 | |
| Hé, quand je m’ennuie, voilà où nous en sommes ! - Code:
-
' ****************************************************************************** ' Papydall_s_ennuie.bas ' ' Qand Papydall s'ennuie, il rédéfini 2D_PEN_COLOR et 2D_FILL_COLOR ' ****************************************************************************** dim Papydall_s_ennuie : Papydall_s_ennuie = 255 caption 0,"!!! Papydall s'ennuie !!! <CLICK> pour arrêter" repeat color 0,rnd(Papydall_s_ennuie ),rnd(Papydall_s_ennuie ),rnd(Papydall_s_ennuie ) : display RGBp(255,0,0) : RGBf(255,0,0) 2d_circle 200,200,50 : 2d_circle 400,200,50 2d_circle 300,100,50 : 2d_circle 300,300,50 RGBp(255,255,0) : RGBf(255,255,0) 2d_circle 200,100,50 : 2d_circle 400,100,50 2d_circle 200,300,50 : 2d_circle 400,300,50
RGBp(0,255,0) : RGBf(0,255,0) : 2d_rectangle 200,100,400,300 RGBp(0,0,255) : RGBf(0,0,255) : 2d_circle 300,200,50 : wait 500 RGBp(255,0,0) : RGBf(255,255,255) : 2d_circle 300,200,50 : wait 500 until scancode <> 0
end ' ****************************************************************************** ' Redéfinition de 2d_pen_color SUB RGBp(r,g,b) 2d_pen_color r,g,b END_SUB ' ****************************************************************************** ' Redéfinition de 2d_fill_color SUB RGBf(r,g,b) 2d_fill_color r,g,b END_SUB ' ******************************************************************************
| |
| | | JL35
Nombre de messages : 7112 Localisation : 77 Date d'inscription : 29/11/2007
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 21:04 | |
| Parfaitement inutile, mais très joli ! | |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 22:08 | |
| @ Cosmos 70,
J' ai PsPad mais pas moyen d'enregistrer Panoramic.ini | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Dim 12 Mai 2013 - 23:08 | |
| C'est embétant on a un double sujet. @Papydall, je rejoins JL35. C'est beau @Ygenomini Je le cache car on est hors sujet. - Spoiler:
Mon fichier ini, le voici; - Spoiler:
- Code:
-
;PSPad user HighLighter definition file [Settings] Name=Panoramic HTMLGroup=0 Label=1 FileType=*.bas CommentString= REMComment=1 Preprocessors=1 IndentChar= UnIndentChar= TabWidth=4 SingleQuote=1 KeyWordChars=_$2_3_ CodeExplorer=ftAHK [KeyWords] 3D_CONE= 3D_CUBE= 3D_CYLINDER= 3D_SPHERE= 3D_TEAPOT= 3D_TEXT= 3D_TORUS= ALPHA= BUTTON= CHECK= COMBO= CONTAINER= CONTAINER_OPTION= DLIST= EDIT= FORM= GRID= IMAGE= LIST= MAIN_MENU= MEMO= MOVIE= OPEN_DIALOG= OPEN_DIALOG= OPTION= PICTURE= PROGRESS_BAR= SAVE_DIALOG= SCENE2D= SCENE3D= SCROLL_BAR= SOUND= SPIN= SPRITE= SUB_MENU= TIMER= TRACK_BAR= [ReservedWords] 2D_CIRCLE= 2D_CLEAR= 2D_FILL_COLOR= 2D_FLOOD= 2D_LINE= 2D_PEN_COLOR= 2D_PEN_WIDTH= 2D_POINT= 2D_POLY_FROM= 2D_POLY_TO= 2D_RECTANGLE= 2D_TARGET_IS= 3D_ACTOR= 3D_BOX= 3D_CHAIN= 3D_CHAIN_BREAK= 3D_COLLISION_AS_CUBE= 3D_COLLISION_AS_ELLIPSOID= 3D_COLLISION_AS_FACES= 3D_COLLISION_AS_POINT= 3D_COLLISION_AS_SPHERE= 3D_COLOR= 3D_DELETE= 3D_DELETE_ALL= 3D_DODECAHEDRON= 3D_HIDE= 3D_LINE= 3D_LINE_WIDTH= 3D_LOAD_OBJECT= 3D_MESH= 3D_MOVE= 3D_POINT_OBJECT= 3D_POSITION= 3D_ROTATE= 3D_SCALE= 3D_SHOW= 3D_TARGET_IS= 3D_TEXT_CHANGE= 3D_TRANSPARENT= 3D_X_POSITION= 3D_X_ROTATE= 3D_X_SCALE= 3D_Y_POSITION= 3D_Y_ROTATE= 3D_Y_SCALE= 3D_Z_POSITION= 3D_Z_ROTATE= 3D_Z_SCALE= ABS= ACOS= ACTIVE= ADR= AND= APPLICATION_TITLE= ASC= ASIN= ATN= AXES_HIDE= AXES_SHOW= BAR_BOTH= BAR_HORIZONTAL= BAR_NONE= BAR_VERTICAL= BEEP= BEEP_ERROR= BEEP_EXCLAMATION= BEEP_INFORMATION= BEEP_QUESTION= BIN_AND= BIN_OR= BIN_XOR= BORDER_HIDE= BORDER_NORMAL= BORDER_SMALL= BRIGHTNESS= CAM_POSITION= CAM_X_POSITION= CAM_Y_POSITION= CAM_Z_POSITION= CAPTION= CAPTION$= CARET_POSITION= CASE= CHAIN= CHECKED= CHR$= CLEAR= CLICKED= CLIPBOARD_COPY= CLIPBOARD_CUT= CLIPBOARD_PASTE= CLIPBOARD_STRING_COPY= CLIPBOARD_STRING_PASTE$= CLS= COLOR= COLOR_PIXEL_BLUE(= COLOR_PIXEL_GREEN(= COLOR_PIXEL_RED(= COMMAND_TARGET_IS= CONTRAST= COUNT= DATA= DELETE= DIM= DIM_LOCAL= DIR_CHANGE= DIR_CURRENT$= DIR_DIALOG= DIR_EXISTS= DIR_MAKE= DIR_REMOVE= DLL_CALL2= DLL_CALL3= DLL_OFF= DLL_ON= ELSE= END= END_IF= END_SELECT= END_WHILE= ERROR_FRENCH= ERROR_LINE= ERROR_TYPE$= EXECUTE= EXIT_FOR= EXIT_REPEAT= EXIT_WHILE= FICHE_CLEAR= FILE_ADD= FILE_CLOSE= FILE_DELETE= FILE_EOF= FILE_EXISTS(= FILE_EXTRACT_DISK$= FILE_EXTRACT_EXTENSION$= FILE_EXTRACT_NAME$= FILE_EXTRACT_PATH$= FILE_LOAD= FILE_NAME$= FILE_OPEN_READ= FILE_OPEN_WRITE= FILE_READLN= FILE_RENAME= FILE_SAVE= FILE_WRITELN= FILEBIN_BLOCK_READ= FILEBIN_BLOCK_WRITE= FILEBIN_CLOSE= FILEBIN_OPEN_READ= FILEBIN_OPEN_WRITE= FILEBIN_SIZE= FILTER= FONT_ADD= FONT_BOLD= FONT_BOLD_OFF= FONT_COLOR= FONT_ITALIC= FONT_ITALIC_OFF= FONT_LOAD= FONT_NAME= FONT_NAMES_LOAD= FONT_SIZE= FONT_STRIKE= FONT_STRIKE_OFF= FONT_UNDERLINE= FONT_UNDERLINE_OFF= FOR= FULL_SPACE= GRID_COLUMN= GRID_COLUMN_FIXED= GRID_COLUMN_SIZING_OFF= GRID_COLUMN_SIZING_ON= GRID_COLUMN_WIDTH= GRID_FIXED_COLOR= GRID_ONE_COLUMN_WIDTH= GRID_ONE_ROW_HEIGHT= GRID_READ$= GRID_ROW= GRID_ROW_FIXED= GRID_ROW_HEIGHT= GRID_ROW_SIZING_OFF= GRID_ROW_SIZING_ON= GRID_WRITE= HANDLE= HANDLE_FORM= HEIGHT= HIDE= HINT= IF= INACTIVE= INACTIVE= INCLUDE= INSTR= ITEM_ADD= ITEM_DELETE= ITEM_INDEX= ITEM_INDEX$= ITEM_INSERT= ITEM_READ$= KEY_DOWN_CODE= KEY_DOWN_SPECIAL= KEY_UP_CODE= KEY_UP_SPECIAL= LABEL= LEFT= LEFT$= LEN= LOCAL= LOWER$= LTRIM$= MARK_OFF= MARK_ON= MAX= MESSAGE= MESSAGE_CONFIRMATION_OK= MESSAGE_CONFIRMATION_YES_NO= MESSAGE_ERROR_OK= MESSAGE_ERROR_YES_NO= MESSAGE_INFORMATION_OK= MESSAGE_INFORMATION_YES_NO= MESSAGE_INPUT= MESSAGE_INPUT$= MESSAGE_TEXT$= MESSAGE_WARNING_OK= MESSAGE_WARNING_YES_NO= MID$= MIN= MOUSE_LEFT_DOWN= MOUSE_LEFT_UP= MOUSE_RIGHT_DOWN= MOUSE_RIGHT_UP= MOUSE_X_POSITION(= MOUSE_Y_POSITION(= NEXT= NUMBER_CLICK= NUMBER_CURRENT_LINE= NUMBER_OBJECTS= NUMERIC= O3D_COLLISION= OBJECT_EXISTS(= OBJECT_TYPE(= OFF_CHANGE= OFF_CLICK= OFF_ERROR_GOTO= OFF_KEY_DOWN= OFF_KEY_UP= OFF_TIMER= ON_CHANGE= ON_CLICK= ON_CLOSE= ON_DOUBLE_CLICK= ON_ERROR_GOTO= ON_KEY_DOWN= ON_KEY_UP= ON_TIMER= OR= PARAM_VALUE$= PARENT= PAUSE= POSITION= PRINT= PRINT_LOCATE= PRINT_TARGET_IS= PRINT_X_LOCATE= PRINT_Y_LOCATE= READ= REPEAT= RESTORE= RETURN= RIGHT= RIGHT$= RTRIM$= SCANCODE= SCENE2D= SCREEN_X= SCREEN_Y= SELECT= SELECT_READ$= SELECT_TEXT= SET_FOCUS= SHOW= SORT= STEP= STOP= STR$= STRETCH_OFF= STRETCH_ON= STRING$= TERMINATE= TEXT= TEXT$= TEXT_HEIGHT= TEXT_WIDTH= THEN= TIMER_INTERVAL= TIMER_OFF= TIMER_OFF_ALL= TIMER_ON= TO= TO_BACKGROUND= TO_FOREGROUND= TOP= TRIM$= UNTIL= UPPER$= VAL= WAIT= WHILE= WIDTH= [KeyWords2] ajouter= annule= choisir= copier= défaut= liste= méthode_de_sauvegarde= mettre_un_bouton= nom_donné_au_fichier= normal= Note= nouveau= ouvre_image= reprendre= retour= run= run_avec_sauvegarde= sauve= sauvegarde_auto= sauvegarde_par_fichier= supprime= teste= teste_sélection_ou_tout= valide= [KeyWords3] ajout_list= ajout_memo= ajout_un_objet= centrer_module= choisi_couleur= choix_objet= clic_menu_page= clic_modifie_ancre= clic_valide_alpha= clic_valide_feuille= clic_valide_feuille= compresse= delete_objet= END_SUB= enregistre= etiquette= explode= explode_bis= file_save_110= font_attribut_modele= GOSUB= GOTO= gui= invalide= limite_alpha= look_alpha= look_form= main_alpha= mode= modifie= ON_CHANGE= ON_CLICK= ON_DOUBLE_CLICK= picture_essai_= position_105= reglage_ecrit= size_6= SUB= teste_dimension= valide= valide_ancre= variable=
Il suffit de le copier, et de le mettre dans PsPad editor/Syntax Si il y a une suite, je pense qu'il faudra ouvrir un autre sujet. Dans le fichier ini, il y a plein de chose qui ne sont pas des mots-clés. Cela me permettait de mieux me repérer pour un programme. Ils doivent être dans la 4ème colonne de <outils> <coloration syntaxique personnalisées> et ouvrir le fichier panoramic.ini.
|
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Dim 12 Mai 2013 - 23:12 | |
| @ cosmos 70,
Pas de suite mais un grand merci. | |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Lun 13 Mai 2013 - 0:16 | |
| @ Papydall, La situation commence à devenir grave... Cela relève presque du psy, tu dois vraiment te faire ch... pour pondre un truc pareil... Je te confirme le commentaire de JL35 mais bon....j'en suis presque au même point... | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Lun 13 Mai 2013 - 0:43 | |
| J'avais pas regardé le code Papydall. Au vu de tes problèmes, j'ai apporté quelques modifications. Cela peut parfois être utile. (Je ne le referais pas 2 fois) - Spoiler:
- Code:
-
' ****************************************************************************** ' Papydall_s_ennuie.bas ' ' Qand Papydall s'ennuie et demande a faire l'amour !, il rédéfini 2D_PEN_COLOR et 2D_FILL_COLOR ' ****************************************************************************** dim Papydall_s_ennuie_et_demande_a_faire_L_AMOUR : Papydall_s_ennuie_et_demande_a_faire_L_AMOUR = 255 caption 0,"!!! Papydall s'ennuie et demande à faire l'amour !!! <CLICK> pour arrêter" repeat color 0,rnd(Papydall_s_ennuie_et_demande_a_faire_L_AMOUR ),rnd(Papydall_s_ennuie_et_demande_a_faire_L_AMOUR ),rnd(Papydall_s_ennuie_et_demande_a_faire_L_AMOUR ) : display RGBp(255,0,0) : RGBf(255,0,0) 2d_circle 200,200,50 : 2d_circle 400,200,50 2d_circle 300,100,50 : 2d_circle 300,300,50
RGBp(255,255,0) : RGBf(255,255,0) 2d_circle 200,100,50 : 2d_circle 400,100,50 2d_circle 200,300,50 : 2d_circle 400,300,50
RGBp(0,255,0) : RGBf(0,255,0) : 2d_rectangle 200,100,400,300 RGBp(0,0,255) : RGBf(0,0,255) : 2d_circle 300,200,50 : wait 500 RGBp(255,0,0) : RGBf(255,255,255) : 2d_circle 300,200,50 : wait 500 until scancode <> 0
end ' ****************************************************************************** ' Redéfinition de 2d_pen_color SUB RGBp(r,g,b) 2d_pen_color r,g,b END_SUB ' ****************************************************************************** ' Redéfinition de 2d_fill_color SUB RGBf(r,g,b) 2d_fill_color r,g,b END_SUB '
(heureusement que je dis de vouloir diminuer ma présence) |
| | | papydall
Nombre de messages : 7017 Age : 74 Localisation : Moknine (Tunisie) Entre la chaise et le clavier Date d'inscription : 03/03/2012
| Sujet: Re: Simulation de la fonction IIF Lun 13 Mai 2013 - 1:18 | |
| En réalité, je suis sur un jeu qui utilise justement une grille avec symboles de couleurs différentes sur les cases de la grille. Pour cela, j’ai construit la grille avec des 2_d_rectangles. Après avoir presque fini de coder le jeu, je me suis heurté à un os ! Plusieurs solutions se bousculaient dans la RAM de ma pauvre tête. Alors, pour tromper l’ennui, j’ai codé ce que j’ai posté ci-haut. Maintenant, avec l’idée de Ygeronimi (dans un autre post) d’utiliser un tableau de EDIT pour remplacer le GRID, je reprendrais à zéro mon code, mais pas tout de suite ! Maintenant, j'ai besoin de repos. Voilà, vous savez tout, maintenant ! | |
| | | Invité Invité
| Sujet: Re: Simulation de la fonction IIF Lun 13 Mai 2013 - 4:39 | |
| J'avais fait cela à l'époque: éditeur à cellulesJ'avais un problème à l'époque: (Google faisait une traduction en français, et je n'avais pas compris ce qu'il se passait. D'où mes messages d'incompréhension.) |
| | | Yannick
Nombre de messages : 8635 Age : 53 Localisation : Bretagne Date d'inscription : 15/02/2010
| Sujet: re Lun 13 Mai 2013 - 4:48 | |
| Perso, je me rappelle que j'avais trouvé ton prog très chouette mais je ne maîtrisais pas encore assez bien Panoramic pour me plonger à fond dans son utilisation. Je viens de revoir le sujet et tu avais fais fait un sacré boulot ! Bon, aller, au maintenant. | |
| | | Contenu sponsorisé
| Sujet: Re: Simulation de la fonction IIF | |
| |
| | | | Simulation de la fonction IIF | |
|
Sujets similaires | |
|
| Permission de ce forum: | Vous ne pouvez pas répondre aux sujets dans ce forum
| |
| |
| |