home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 May / macformat-024.iso / Shareware City / Science / Survival Folder / Macros / Recode.Macro < prev    next >
Encoding:
Text File  |  1994-07-10  |  233 b   |  13 lines  |  [TEXT/MJUA]
  1. MACRO 'Macro_Recode'
  2.  
  3. var
  4. grado,stage:integer;
  5.  
  6. begin
  7.     grado:= 4;
  8.  stage:= 5;
  9. {recode(4:1:2;5:2:3:9);an alternative way}
  10. {recode(grade:1:2;stage:2:3:9); another way}
  11.  recode(rVar[4]:1:2;rVar[5]:2:3:9){this also works}
  12. list(8,0);
  13. end;