Changeset 325 for trunk/SRC/ToBeReviewed/UTILITAIRE
- Timestamp:
- 12/06/07 11:04:53 (17 years ago)
- Location:
- trunk/SRC/ToBeReviewed/UTILITAIRE
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/SRC/ToBeReviewed/UTILITAIRE/get_extra.pro
r232 r325 1 ;+2 ; @todo3 ; seb4 ;-5 1 ; 6 2 ; elle fait quoi ? … … 26 22 27 23 ; extra=get_extra(_extra=extra, name='Guillaume' ) 28 24 ; 25 ;+ 26 ; 27 ; @todo 28 ; seb 29 ; 30 ;- 29 31 FUNCTION get_extra, _EXTRA = extra 30 32 ; -
trunk/SRC/ToBeReviewed/UTILITAIRE/oups.pro
r297 r325 2 2 ; 3 3 ; @file_comments 4 ; Kind of UNDO: 5 ; Allows to redo all the chain of drawing since the opening of the last window without 6 ; reexecute the last order Example: I do a drawing with 10 plot over it, if I make a 7 ; mistake, I execute this program and i can redo the only plot missed. 4 ; Kind of UNDO: 5 ; Allows to redo all the chain of drawing since the opening of the last window 6 ; without reexecute the last order 7 ; 8 ; Example: I do a drawing with 10 plot over it, if I make a 9 ; mistake, I execute this program and I can redo the only plot missed. 8 10 ; 9 11 ; @categories … … 24 26 ; 25 27 ;- 28 ; Close the journal! 29 journal 26 30 ; 27 ;------------------------------------------------------------28 ; Close the journal!29 ;------------------------------------------------------------30 journal31 31 ; we recuperate the journal as a vector of string: 32 32 vectjournal = getfile(myuniquetmpdir+'idlsave.pro') … … 57 57 if strpos(vectjournal[i],'text_box' ) NE -1 then $ 58 58 vectjournal[i] = vectjournal[i]+strmid(vectjournal[i+1], 1) & endfor 59 60 61 59 ; 62 60 ; we erase the last line to reexecute all the program but the last order. … … 74 72 for i = 0, n_elements(vectjournal)-1 DO $ 75 73 journal, vectjournal[i] 76 77 78
Note: See TracChangeset
for help on using the changeset viewer.