Changeset 142 for trunk/SRC/ToBeReviewed/PLOTS/DESSINE/splot.pro
- Timestamp:
- 07/21/06 14:47:49 (18 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/PLOTS/DESSINE/splot.pro
r134 r142 3 3 ;------------------------------------------------------------ 4 4 ;+ 5 ; NAME:splot (super plot)6 5 ; 7 ; PURPOSE: meme chose que plot mais compatible avec l''ensemble de8 ; l'environnement (common.pro est inclu)6 ; file_comments 7 ; Same thing that plot but compatible with the whole environnement (common.pro inclued) 9 8 ; 10 ; CATEGORY:dessine 11 ; 12 ; CALLING SEQUENCE: PLOT, [X,] Y 9 ; @categories graphics 13 10 ; 14 11 ; INPUTS:cd IDL> ?plot 15 12 ; 16 ; KEYWORD PARAMETERS: 17 ; meme que ceux de plot avec en plus: 13 ; @keyword NOREINITPLT 14 ; We active it if we do not want environnement variables !p, !x, !y, !z 15 ; to be reinitilalizted by the procedure reinitplt 16 ; 17 ; @keyword _EXTRA 18 ; used to pass your keywords 18 19 ; 19 ; NOREINITPLT: a actier si on ne veut pas que les variables 20 ; d''environnemet !p, !x, !y, !z soient reinitialisees par la 21 ; procedure reinitplt 20 ; @uses 21 ; common.pro 22 22 ; 23 ; OUTPUTS: 23 ; @restrictions 24 ; If NOREINITPLT is not activated, all environnement 25 ; variables !p, !x, !y, !z are reinitializtedby the procedure reinitplt 24 26 ; 25 ; Si NOREINITPLT n''est pas ective toutes les variables 26 ; d''environnemet !p, !x, !y, !z sont reinitialisees par la 27 ; procedure reinitplt 28 ; 29 ; COMMON BLOCKS:common.pro 30 ; 31 ; SIDE EFFECTS: 32 ; 33 ; RESTRICTIONS: 34 ; 35 ; EXAMPLE: 36 ; 27 ; @examples 37 28 ; IDL> splot, indgen(10),ystyle=1,small=[1,2,1],/portrait 38 29 ; IDL> splot, -indgen(10),ystyle=1,small=[1,2,2],/noerase 39 ; IDL> @ps30 ; IDL> \@ps 40 31 ; 41 ; MODIFICATION HISTORY:Sebastien Masson (smasson@lodyc.jussieu.fr) 32 ; @history 33 ; Sebastien Masson (smasson@lodyc.jussieu.fr) 42 34 ; 18/10/1999 35 ; 36 ; @version 37 ; $Id$ 38 ; 43 39 ;- 44 40 ;------------------------------------------------------------ … … 50 46 ; 51 47 @common 52 ; 1) je reinitialise l''environnememt graphique(les variables !x, !y et !p):48 ; 1) I reinitializate the graphic environment (les variables !x, !y et !p): 53 49 if NOT keyword_set(NOREINITPLT) then reinitplt, _extra = ex 54 ; 2) je place le dessin a l'ecran comme sur le postcript50 ; 2) i put the drawing on the screen like on the postcript 55 51 placedessin, 'autre', _extra = ex 56 ; 3) je fais mon joli dessin52 ; 3) Drawing 57 53 if n_elements(y) EQ 0 then plot, x, xstyle = 1, ystyle = 1, _EXTRA = ex $ 58 54 ELSE plot, x, y, xstyle = 1, ystyle = 1, _EXTRA = ex 59 ; 4) je termine le dessin55 ; 4) End of drawing 60 56 terminedessin, _extra=ex 61 57 ;
Note: See TracChangeset
for help on using the changeset viewer.