home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD1.iso / Editor / FREDV19A.LHA / FrexxEd / fpl / DoubleMode.FPL < prev    next >
Encoding:
Text File  |  1995-07-21  |  1.0 KB  |  32 lines
  1. // $Id: DoubleMode.FPL 1.5 1995/07/21 10:33:09 jskov Exp $
  2. // $VER: DoubleMode.FPL 1.3 (02.04.95) © Jesper Skov
  3.  
  4. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» DoubleMode() ««
  5. int __DMcounter;
  6.  
  7. void export DoubleMode(int normal, int special)
  8. {
  9.   if ((GetChar(ReadInfo("byte_position")-1) == special) && (ReadInfo("counter")-1 == __DMcounter)){
  10.     Backspace();
  11.     Output(itoc(normal));
  12.   } else {
  13.     Output(itoc(special));
  14.     __DMcounter = ReadInfo("counter");
  15.   }
  16. }
  17.  
  18.  
  19. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» Danish key bindings ««
  20. AssignKey("DoubleMode('[','å');","[","double_mode");
  21. AssignKey("DoubleMode('{','Å');","{","double_mode");
  22. AssignKey("DoubleMode(';','æ');",";","double_mode");
  23. AssignKey("DoubleMode(':','Æ');",":","double_mode");
  24. AssignKey("DoubleMode('\'','ø');","'0x2a'","double_mode");
  25. AssignKey("DoubleMode('\"','Ø');","\"","double_mode");
  26.  
  27.  
  28. //»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»» DoubleMode Settings ««
  29. ConstructInfo("double_mode","","","LBH","",0,1,0);
  30.  
  31. AddMode(0, "double_mode", "","");
  32.