home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / BIGED.ZIP / BIGED.ICD < prev    next >
Encoding:
Text File  |  1990-12-08  |  6.2 KB  |  141 lines
  1. {*********************************************************}
  2. {*                    BIGED.ICD 1.03                     *}
  3. {*********************************************************}
  4.  
  5.   {.F-}
  6. const
  7.   ccCopy = ccUser54;
  8.   ccCut = ccUser53;
  9.   ccPaste = ccUser52;
  10.   
  11.   {Keystroke to command mapping}
  12.   BigEdKeyMax = 500;   {last available slot in EditorKeySet}
  13.   {ID string for installation programs}
  14.   BigEdKeyID : string[17] = 'opbiged key array';
  15.   {default key assignments}
  16.   BigEdKeySet : array[0..BigEdKeyMax] of Byte = (
  17.    {length keys         command type      key sequence}
  18.     3,     $00, $3B,    ccHelp,          {F1}
  19.     3,     $00, $3C,    ccSaveFile,      {F2}
  20.     3,     $00, $3D,    ccNewFile,       {F3}
  21.     3,     $00, $41,    ccBlkBegin,      {F7}
  22.     3,     $00, $42,    ccBlkEnd,        {F8}
  23.     3,     $00, $47,    ccHome,          {Home}
  24.     3,     $00, $48,    ccUp,            {Up}
  25.     3,     $00, $49,    ccPageUp,        {PgUp}
  26.     3,     $00, $4B,    ccLeft,          {Left}
  27.     3,     $00, $4D,    ccRight,         {Right}
  28.     3,     $00, $4F,    ccEnd,           {End}
  29.     3,     $00, $50,    ccDown,          {Down}
  30.     3,     $00, $51,    ccPageDn,        {PgDn}
  31.     3,     $00, $52,    ccIns,           {Ins}
  32.     3,     $00, $53,    ccDel,           {Del}
  33.     3,     $00, $73,    ccWordLeft,      {^Left}
  34.     3,     $00, $74,    ccWordRight,     {^Right}
  35.     3,     $00, $75,    ccScreenBot,     {^End}
  36.     3,     $00, $76,    ccEndOfFile,     {^PgDn}
  37.     3,     $00, $77,    ccScreenTop,     {^Home}
  38.     3,     $00, $84,    ccTopOfFile,     {^PgUp}
  39.     2,     $01,         ccWordLeft,      {^A}
  40.     2,     $02,         ccReformatP,     {^B}
  41.     2,     $03,         ccPageDn,        {^C}
  42.     2,     $04,         ccRight,         {^D}
  43.     2,     $05,         ccUp,            {^E}
  44.     2,     $06,         ccWordRight,     {^F}
  45.     2,     $07,         ccDel,           {^G}
  46.     2,     $08,         ccBack,          {^H, Bksp}
  47.     2,     $09,         ccTab,           {^I, Tab}
  48.     2,     $0C,         ccReSearch,      {^L}
  49.     2,     $0D,         ccSelect,        {^M, Enter}
  50.     2,     $0E,         ccInsertLine,    {^N}
  51.     2,     $10,         ccCtrlChar,      {^P}
  52.     2,     $12,         ccPageUp,        {^R}
  53.     2,     $13,         ccLeft,          {^S}
  54.     2,     $14,         ccDelWord,       {^T}
  55.     2,     $16,         ccIns,           {^V}
  56.     2,     $17,         ccScrollUp,      {^W}
  57.     2,     $18,         ccDown,          {^X}
  58.     2,     $19,         ccDelLine,       {^Y}
  59.     2,     $1A,         ccScrollDn,      {^Z}
  60.     2,     $7F,         ccBack,          {^Bksp}
  61.     3,     $0A, $03,    ccCopy,          {^J^C}  {!! Copy to clipboard}
  62.     3,     $0A, $0B,    ccCut,           {^J^K}  {!! Cut to clipboard}
  63.     3,     $0A, $0C,    ccJmpLine,       {^J^L}
  64.     3,     $0A, $10,    ccPaste,         {^J^P}  {!! Paste from clipboard}
  65.     3,     $0B, $02,    ccBlkBegin,      {^K^B}
  66.     3,     $0B, $03,    ccBlkCopy,       {^K^C}
  67.     3,     $0B, $04,    ccSaveSwitch,    {^K^D}
  68.     3,     $0B, $07,    ccReformatG,     {^K^G}
  69.     3,     $0B, $08,    ccBlkToggle,     {^K^H}
  70.     3,     $0B, $09,    ccBlkIndent,     {^K^I}
  71.     3,     $0B, $0B,    ccBlkEnd,        {^K^K}
  72.     3,     $0B, $0D,    ccMarkToggle,    {^K^M}
  73.     3,     $0B, $0E,    ccSaveNamed,     {^K^N}
  74.     3,     $0B, $10,    ccBlkPrint,      {^K^P}
  75.     3,     $0B, $11,    ccAbandonFile,   {^K^Q}
  76.     3,     $0B, $12,    ccBlkRead,       {^K^R}
  77.     3,     $0B, $13,    ccSaveFile,      {^K^S}
  78.     3,     $0B, $14,    ccBlkWord,       {^K^T}
  79.     3,     $0B, $15,    ccBlkUnindent,   {^K^U}
  80.     3,     $0B, $16,    ccBlkMove,       {^K^V}
  81.     3,     $0B, $17,    ccBlkWrite,      {^K^W}
  82.     3,     $0B, $18,    ccSaveExit,      {^K^X}
  83.     3,     $0B, $19,    ccBlkDelete,     {^K^Y}
  84.     3,     $0B, $30,    ccSetMark0,      {^K0}
  85.     3,     $0B, $31,    ccSetMark1,      {^K1}
  86.     3,     $0B, $32,    ccSetMark2,      {^K2}
  87.     3,     $0B, $33,    ccSetMark3,      {^K3}
  88.     3,     $0F, $02,    ccSetIndent,     {^O^B}
  89.     3,     $0F, $03,    ccCenterLine,    {^O^C}
  90.     3,     $0F, $06,    ccTabToggle,     {^O^F}
  91.     3,     $0F, $09,    ccIndent,        {^O^I}
  92.     3,     $0F, $0F,    ccBlkTCase,      {^O^O}
  93.     3,     $0F, $12,    ccRtMargin,      {^O^R}
  94.     3,     $0F, $13,    ccStripHigh,     {^O^S} {!!}
  95.     3,     $0F, $14,    ccTabSize,       {^O^T}
  96.     3,     $0F, $15,    ccBlkUCase,      {^O^U}
  97.     3,     $0F, $16,    ccBlkLCase,      {^O^V}
  98.     3,     $0F, $17,    ccWordWrap,      {^O^W}
  99.     3,     $11, $01,    ccReplace,       {^Q^A}
  100.     3,     $11, $02,    ccJmpBegin,      {^Q^B}
  101.     3,     $11, $03,    ccEndOfFile,     {^Q^C}
  102.     3,     $11, $04,    ccEnd,           {^Q^D}
  103.     3,     $11, $05,    ccScreenTop,     {^Q^E}
  104.     3,     $11, $06,    ccSearch,        {^Q^F}
  105.     3,     $11, $0B,    ccJmpEnd,        {^Q^K}
  106.     3,     $11, $0C,    ccRestore,       {^Q^L}
  107.     3,     $11, $10,    ccPrevPos,       {^Q^P}
  108.     3,     $11, $12,    ccTopOfFile,     {^Q^R}
  109.     3,     $11, $13,    ccHome,          {^Q^S}
  110.     3,     $11, $18,    ccScreenBot,     {^Q^X}
  111.     3,     $11, $19,    ccDelEol,        {^Q^Y}
  112.     3,     $11, $30,    ccJmpMark0,      {^Q0}
  113.     3,     $11, $31,    ccJmpMark1,      {^Q1}
  114.     3,     $11, $32,    ccJmpMark2,      {^Q2}
  115.     3,     $11, $33,    ccJmpMark3,      {^Q3}
  116.   {$IFDEF UseMouse}
  117.     3,     $00, $EF,    ccMouseSel,      {click left  = mouse select}
  118.     3,     $00, $ED,    ccHelp,          {click both  = help}
  119.   {$ELSE}
  120.           0, 0, 0, 0, 0, 0, 0, 0,
  121.   {$ENDIF}
  122.     {-----------pad to end of array----------}
  123.     
  124.                          0, 0, 0,        {380}
  125.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {390}
  126.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {400}
  127.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {410}
  128.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {420}
  129.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {430}
  130.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {440}
  131.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {450}
  132.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {460}
  133.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {470}
  134.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {480}
  135.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0,        {490}
  136.     0, 0, 0, 0, 0, 0, 0, 0, 0, 0);       {500}
  137. {.F+}
  138.  
  139. const
  140.   BigEdCfgEnd : Byte = 0;
  141.