Var 1001, name iocp_teclas Var 1002, name teclado, Link IOCARD_KEYS, device 13 { if &teclado = 71 // menu { &k = 994 } if &teclado = 79 // perf init { &k = 989 } if &teclado = 78 // rte { &k = 990 } if &teclado = 75 // des { &k = 993 } if &teclado = 70 // legs { &k = 995 } if &teclado = 67 // prog { &k = 998 } if &teclado = 63 // n1 altn { &k = 999 } if &teclado = 62 // fix { &k = 1000 } if &teclado = 77 // clb { &k = 991 } if &teclado = 76 // crz { &k = 992 } if &teclado = 69 // dep { &k = 996 } if &teclado = 68 // hold { &k = 997 } if &teclado = 66 // ENTER { &k = 1003 } if &teclado = 55 // Prev Pg { &k = 1001 } if &teclado = 54 // Next Pg { &k = 1002 } if &teclado = 7 // 0 { &k = 1013 } if &teclado = 32 // 1 { &k = 1004 } if &teclado = 31 // 2 { &k = 1005 } if &teclado = 30 // 3 { &k = 1006 } if &teclado = 24 // 4 { &k = 1007 } if &teclado = 23 // 5 { &k = 1008 } if &teclado = 22 // 6 { &k = 1009 } if &teclado = 16 // 7 { &k = 1010 } if &teclado = 15 // 8 { &k = 1011 } if &teclado = 14 // 9 { &k = 1012 } if &teclado = 8 // . { &k = 1014 } if &teclado = 2 // barra { &k = 1042 } if &teclado = 6 // + { &k = 1015 } if &teclado = 3 // Delete { &k = 1043 } if &teclado = 1 // Clr { &k = 1044 } if &teclado = 4 // Clr { &k = 1045 } if &teclado = 61 // A { &k = 1016 } if &teclado = 60 // B { &k = 1017 } if &teclado = 59 // C { &k = 1018 } if &teclado = 58 // D { &k = 1019 } if &teclado = 57 // E { &k = 1020 } if &teclado = 53 // F { &k = 1021 } if &teclado = 52 // G { &k = 1022 } if &teclado = 51 // H { &k = 1023 } if &teclado = 50 // I { &k = 1024 } if &teclado = 49 // J { &k = 1025 } if &teclado = 29 // K { &k = 1026 } if &teclado = 28 // L { &k = 1027 } if &teclado = 27 // M { &k = 1028 } if &teclado = 26 // N { &k = 1029 } if &teclado = 25 // O { &k = 1030 } if &teclado = 21 // P { &k = 1031 } if &teclado = 20 // Q { &k = 1032 } if &teclado = 19 // R { &k = 1033 } if &teclado = 18 // S { &k = 1034 } if &teclado = 17 // T { &k = 1035 } if &teclado = 13 // U { &k = 1036 } if &teclado = 12 // V { &k = 1037 } if &teclado = 11 // W { &k = 1038 } if &teclado = 10 // X { &k = 1039 } if &teclado = 9 // Y { &k = 1040 } if &teclado = 5 // Z { &k = 1041 } if &teclado = 56 // Linea 1L { &k = 975 } if &teclado = 64 // Linea 2L { &k = 976 } if &teclado = 72 // Linea 3L { &k = 977 } if &teclado = 80 // Linea 4L { &k = 978 } if &teclado = 88 // Linea 5L { &k = 979 } if &teclado = 87 // Linea 6L { &k = 980 } if &teclado = 86 // Linea 1R { &k = 981 } if &teclado = 85 // Linea 2R { &k = 982 } if &teclado = 84 // Linea 3R { &k = 983 } if &teclado = 83 // Linea 4R { &k = 984 } if &teclado = 82 // Linea 5R { &k = 985 } if &teclado = 74 // Linea 6R { &k = 986 } } var 1005, name k, link subrutine { &commands3 = &k &commands3 = -2 } Var 1006, name commands3, Link IOCP, Offset 1000 // Send commands Var 1007, name FMC1_EXEC_led, Link IOCARD_OUT, device 13, Output 2 // FMC EXEC green led Var 1008, name FMC1_MSG_led, Link IOCARD_OUT, device 13, Output 1 // FMC MSG amber led Var 1009, name FMC1_FAIL_led, Link IOCARD_OUT, device 13, Output 4 // FMC FAIL red led Var 1010, name FMC1_OFST_led, Link IOCARD_OUT, device 13, Output 0 // FMC OFST amber led Var 1011, name FMC1_DSPY_led, Link IOCARD_OUT, device 13, Output 3 // FMC DSPY red led Var 1012, name FMC1_leds, Link FSUIPC_IN, Offset $9427, Length 2 { &fmc1_exec_led = TESTBIT &FMC1_leds, 2 // EXEC LED &fmc1_msg_led = TESTBIT &FMC1_leds, 0 // MSG LED &fmc1_fail_led = TESTBIT &FMC1_leds, 4 // FAIL LED &fmc1_ofst_led = TESTBIT &FMC1_leds, 6 // OFST LED &fmc1_dspy_led = TESTBIT &FMC1_leds, 4 // DSPY LED }