2350 lines
80 KiB
C
2350 lines
80 KiB
C
/*
|
||
* License (GPL):
|
||
|
||
This program is free software: you can redistribute it and/or modify
|
||
it under the terms of the GNU General Public License as published by
|
||
the Free Software Foundation, either version 2 of the License, or
|
||
(at your option) any later version.
|
||
|
||
This program is distributed in the hope that it will be useful,
|
||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
GNU General Public License for more details.
|
||
|
||
You should have received a copy of the GNU General Public License
|
||
along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||
|
||
* Author: © 2019, 2020 by Jos Boersema
|
||
*
|
||
*/
|
||
|
||
/* This file contains mostly the Unicode and special macros.
|
||
It contains the function: process_record_user(...)
|
||
*/
|
||
|
||
#include "./unicode_macros.h"
|
||
#include "./unicode_weurope.h"
|
||
|
||
// Definition of ƒ (Dutch currency symbol).
|
||
// Best changed in user_config.h, if you like a Euro symbol instead.
|
||
//
|
||
# ifndef UNICODE_CURRENCY // Prior optional definition in user_config.h
|
||
# define UNICODE_CURRENCY 0x0192 // Hex number. The unicode hex number for position ƒ in the default keymap.
|
||
# endif
|
||
|
||
//
|
||
// 🛠
|
||
#define CS_USER_DEFINED 0x1F6E0 // Hammer & wrench (place holder).
|
||
|
||
#define DIV10POINT TRUE // suggest to function write_number, to divide by 10 and print as a fraction: N.N
|
||
|
||
// Gives Unicode code points to the relevant QMK functions.
|
||
// Handles Dvorak 'descramble' Unicode mode, if compiled (only tested on Linux).
|
||
void unicode_hex2output (long unsigned int unshifted, long unsigned int shifted) {
|
||
|
||
long unsigned int input; // which argument to work on
|
||
|
||
# ifdef DVORAK_DESCRAMBLE // Do the letter descramble if needed.
|
||
|
||
char output[10]; // will hold the ascii for output
|
||
int index; // count backwards 'to left' in the string
|
||
long unsigned int bitmove; // move computation to next digit.
|
||
long unsigned int work; // temporary value for computation
|
||
|
||
# endif
|
||
|
||
// What to work on
|
||
if(shift_ison) input = shifted; // Trying to get everything possible here in this function, to reduce firmware size.
|
||
else input = unshifted;
|
||
|
||
# ifndef DVORAK_DESCRAMBLE // Only normal mode
|
||
|
||
register_unicode ( (uint32_t) input ) ;
|
||
|
||
# else
|
||
|
||
if(_FULL_ != alternate){
|
||
|
||
register_unicode ( (uint32_t) input ) ; // normal Unicode mode
|
||
|
||
}else{ // Special Dvorak-descramble mode: 0-9=0-9, a=a, b=n, c=i, d=h, e=d, f=y
|
||
|
||
// Take the hex value 4 bits at a time, starting with the least significant, convert to ascii, store
|
||
index = 9;
|
||
output[index] = '\0'; // terminator
|
||
bitmove = 0x1;
|
||
while ((work = (input / bitmove)) && (index >= 0)) {
|
||
index --;
|
||
work &= 0xF;
|
||
if (work < 0xA){ // numbers
|
||
output[index] = work + 0x30; // pad to ASCII
|
||
}else{ // alphas
|
||
if (0xA == work) output[index] = 'a';
|
||
if (0xB == work) output[index] = 'n';
|
||
if (0xC == work) output[index] = 'i';
|
||
if (0xD == work) output[index] = 'h';
|
||
if (0xE == work) output[index] = 'd';
|
||
if (0xF == work) output[index] = 'y';
|
||
}
|
||
bitmove *= 0x10; // next digit
|
||
}
|
||
|
||
SEND_STRING ( SS_DOWN(X_LCTRL) SS_DOWN(X_LSHIFT) "f" SS_UP(X_LSHIFT) SS_UP(X_LCTRL) ); // lead-in for Unicode on Linux, 'descramble' mode
|
||
send_string (output + index); // pointer to argument with formatted string
|
||
SEND_STRING ( " " ); // Ends the Unicode numerical input mode
|
||
}
|
||
|
||
# endif // DVORAK_DESCRAMBLE mode for that Base layer & mode setting is compiled in
|
||
|
||
}
|
||
|
||
|
||
// Wrapper for unicode keys that do have the same on shift.
|
||
void unicode_hex2output_single (long unsigned int either) {
|
||
unicode_hex2output (either, either);
|
||
}
|
||
|
||
|
||
// Required by QMK Unicode
|
||
const uint32_t PROGMEM unicode_map[] = {
|
||
|
||
};
|
||
|
||
// Macro name definitions. The Unicode layers _ACC, _DRA and _BON are defined here,
|
||
// because the Unicode map system does not have enough space (at time of this programming, year 2020).
|
||
enum custom_keycodes {
|
||
|
||
// Macro, allowing the upper left button to switch to either _DEF_BASE base layer, or the _ALT_BASE base layer.
|
||
// Alternate is set on/half/off in the _RAR layer. The word "base" is used to avoid "default," because the default
|
||
// layer system call DF() is not being used.
|
||
CTO_BASE = SAFE_RANGE, // 'C' for costum, "TO" for to, "BASE" for chosen base layer
|
||
|
||
OTHER_BASE, // cycles modes: use _DEF_BASE, _ALT_BASE. For “dvorak²” layout (descramble) compile option, there is a third mode.
|
||
|
||
# if defined(BASE_NUMPAD__ALT_BASE)
|
||
OTHER_BASE_GO, // Like OTHER_BASE, but also immediately switches to the other BASE layer.
|
||
# endif
|
||
|
||
CTO_NUMS, // activates number-symbols layer, taking into account the dual layout mode
|
||
CTO_ACCE, // accented ''
|
||
CTO_DRAW, // drawings ''
|
||
|
||
# ifndef CHOLTAP_ACCE_NOP
|
||
CHOLTAP_ACCE, // Go to accented layer, or others in combination with other keys.
|
||
# endif
|
||
|
||
// Keys can be pressed together for a separate layer (like 'adjust layer' on the Planck).
|
||
DUO_HOLD,
|
||
|
||
CHOLTAP_RSHFT, // Go to _FUN layer, or shift modifier.
|
||
CHOLTAP_LSHFT, // Go to <configurable> layer, or shift modifier.
|
||
CHOLTAP_LAYR, // Go to _RAR layer, or right arrow
|
||
|
||
// Shifts which on tap produce a key
|
||
|
||
RSFT_TILDE,
|
||
LSFT_DASH,
|
||
|
||
// Special macro to make F-keys one-shot or not.
|
||
_FUN_STAY,
|
||
|
||
// Layer toggle to be guaranteed on up-key, therefore macro definition here.
|
||
_MOV_UP,
|
||
|
||
// These macros protect the critical keys like 'Power' from accidental press, by needing Shift to be pressed.
|
||
C_KC_PWR, // Powers computer off.
|
||
C_KC_WAKE,
|
||
C_KC_SLEP, // sleep computer
|
||
C_KC_PAUS, // pauze computer
|
||
|
||
// Toggles side leds on/off.
|
||
LEDS_ON,
|
||
RGBTOG_,
|
||
|
||
// Typing speed measuring
|
||
SPEED_TOG,
|
||
SPEED_REPORT,
|
||
|
||
// Word/character counting
|
||
COUNT_TOG, // starts word counting
|
||
COUNT_REPORT, // writes to the computer as if typing, gives count report
|
||
COUNT_WORDMIN, // reduces the word count
|
||
COUNT_NULL, // resets count to zero
|
||
LT__MOV__KC_ENT, // move to layer _MOV, or <enter>
|
||
|
||
// The _ACC layer, additional Unicode.
|
||
# ifndef REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
XP_ACC_AA ,
|
||
XP_ACC_AB ,
|
||
XP_ACC_AC ,
|
||
XP_ACC_AD ,
|
||
XP_ACC_AE ,
|
||
XP_ACC_AF ,
|
||
XP_ACC_AG ,
|
||
XP_ACC_AH ,
|
||
XP_ACC_AI ,
|
||
XP_ACC_AJ ,
|
||
XP_ACC_BA ,
|
||
XP_ACC_BB ,
|
||
XP_ACC_BC ,
|
||
XP_ACC_BD ,
|
||
XP_ACC_BE ,
|
||
XP_ACC_BF ,
|
||
XP_ACC_BG ,
|
||
XP_ACC_BH ,
|
||
XP_ACC_BI ,
|
||
XP_ACC_BJ ,
|
||
XP_ACC_BK ,
|
||
XP_ACC_CA ,
|
||
XP_ACC_CB ,
|
||
XP_ACC_CC ,
|
||
XP_ACC_CD ,
|
||
XP_ACC_CE ,
|
||
XP_ACC_CF ,
|
||
XP_ACC_CG ,
|
||
XP_ACC_CH ,
|
||
XP_ACC_CI ,
|
||
XP_ACC_CJ ,
|
||
# endif // REMOVE_ACC
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer
|
||
// The _DRA layer, additional Unicode.
|
||
XP_DRA_AA ,
|
||
XP_DRA_AB ,
|
||
XP_DRA_AC ,
|
||
XP_DRA_AD ,
|
||
XP_DRA_AE ,
|
||
XP_DRA_AF ,
|
||
XP_DRA_AG ,
|
||
XP_DRA_AH ,
|
||
XP_DRA_AI ,
|
||
XP_DRA_AJ ,
|
||
XP_DRA_BA ,
|
||
XP_DRA_BB ,
|
||
XP_DRA_BC ,
|
||
XP_DRA_BD ,
|
||
XP_DRA_BE ,
|
||
XP_DRA_BF ,
|
||
XP_DRA_BG ,
|
||
XP_DRA_BH ,
|
||
XP_DRA_BI ,
|
||
XP_DRA_BJ ,// XP_DRA_BK , // no 'BK' key definition on this layer
|
||
XP_DRA_CA ,
|
||
XP_DRA_CB ,
|
||
XP_DRA_CC ,
|
||
XP_DRA_CD ,
|
||
XP_DRA_CE ,
|
||
XP_DRA_CF ,
|
||
# endif // REMOVE_DRA
|
||
XP_DRA_CG , // Needed for ☑ on Unicode tester key in _RAR
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer
|
||
XP_DRA_CH ,
|
||
XP_DRA_CI ,
|
||
XP_DRA_CJ ,
|
||
# endif // REMOVE_DRA
|
||
|
||
// The _BON layer, additional Unicode.
|
||
# ifndef REMOVE_BON // Removes this layer entirely, if set.
|
||
XP_BON_AA ,
|
||
XP_BON_AB ,
|
||
XP_BON_AC ,
|
||
XP_BON_AD ,
|
||
XP_BON_AE ,
|
||
XP_BON_AF ,
|
||
XP_BON_AG ,
|
||
XP_BON_AH ,
|
||
XP_BON_AI ,
|
||
XP_BON_AJ ,
|
||
XP_BON_BA ,
|
||
XP_BON_BB ,
|
||
XP_BON_BC ,
|
||
XP_BON_BD ,
|
||
XP_BON_BE ,
|
||
XP_BON_BF ,
|
||
XP_BON_BG ,
|
||
XP_BON_BH ,
|
||
XP_BON_BI ,
|
||
XP_BON_BJ ,
|
||
XP_BON_BK ,
|
||
XP_BON_CA ,
|
||
XP_BON_CB ,
|
||
XP_BON_CC ,
|
||
XP_BON_CD ,
|
||
XP_BON_CE ,
|
||
XP_BON_CF ,
|
||
XP_BON_CG ,
|
||
XP_BON_CH ,
|
||
XP_BON_CI ,
|
||
XP_BON_CJ ,
|
||
# endif // REMOVE_BON
|
||
};
|
||
|
||
// Pre-existing function, called for every key up and down.
|
||
// This function is sortof the hub of the whole thing.
|
||
bool process_record_user(uint16_t keycode, keyrecord_t *record) {
|
||
|
||
// User input for the word count menu
|
||
if (sizecount_menu) {
|
||
if (record->event.pressed) { // key down
|
||
|
||
switch (keycode) {
|
||
case KC_0: // read in how many is maximum
|
||
sizecount_max = (sizecount_max * 10);
|
||
break;
|
||
|
||
case KC_1:
|
||
sizecount_max = (sizecount_max * 10) + 1;
|
||
break;
|
||
|
||
case KC_2:
|
||
sizecount_max = (sizecount_max * 10) + 2;
|
||
break;
|
||
|
||
case KC_3:
|
||
sizecount_max = (sizecount_max * 10) + 3;
|
||
break;
|
||
|
||
case KC_4:
|
||
sizecount_max = (sizecount_max * 10) + 4;
|
||
break;
|
||
|
||
case KC_5:
|
||
sizecount_max = (sizecount_max * 10) + 5;
|
||
break;
|
||
|
||
case KC_6:
|
||
sizecount_max = (sizecount_max * 10) + 6;
|
||
break;
|
||
|
||
case KC_7:
|
||
sizecount_max = (sizecount_max * 10) + 7;
|
||
break;
|
||
|
||
case KC_8:
|
||
sizecount_max = (sizecount_max * 10) + 8;
|
||
break;
|
||
|
||
case KC_9:
|
||
sizecount_max = (sizecount_max * 10) + 9;
|
||
break;
|
||
|
||
case KC_C: // count characters
|
||
sizecount_max_type = SIZECOUNT_CHAR;
|
||
sizecount_menu = FALSE;
|
||
break;
|
||
|
||
case KC_W: // count words
|
||
sizecount_max_type = SIZECOUNT_WORD;
|
||
sizecount_menu = FALSE;
|
||
break;
|
||
|
||
// Anything else ends menu input.
|
||
case KC_DOT:
|
||
case KC_ESC:
|
||
sizecount_menu = FALSE; // break out
|
||
break;
|
||
|
||
}
|
||
if (!sizecount_menu) { // end
|
||
send_string ("->");
|
||
write_number (sizecount_max, FALSE); // just indicate something
|
||
}
|
||
}
|
||
}
|
||
|
||
// Go back to base-layer after pressing an F-key, on key-up to avoid BASE key activation
|
||
if ((_fun_stay == FALSE) && //
|
||
(((keycode >= KC_F1) && (keycode <= KC_F12))
|
||
||
|
||
((keycode >= KC_F13) && (keycode <= KC_F24)))) { // assumes keycodes 1-12 and 13-24 are consequtive, which seems likely, although using 1-24 failed (probably not consequtive)
|
||
// Go back to base layer
|
||
if (!(record->event.pressed)) { // key up
|
||
if (alternate) { //
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
}
|
||
|
||
// Detect if Shift was pressed in isolation, by seeing if another key was pressed during the time
|
||
// the right shift key was held down.
|
||
// This system is also used by CHOLTAP_ACCE
|
||
// This helps make sure a tapped use of these keys is correctly differentiated from their use as a
|
||
// modifier/layer-hold key. The Shift and CHOLTAP_ACCE should not normally interfere with each other.
|
||
if (isolate_trigger) { // speed: hoping this statement to execute a little quicker overall, than the next
|
||
if ((keycode != CHOLTAP_RSHFT) // not right shift up
|
||
&&
|
||
(keycode != CHOLTAP_LSHFT) // not left shift up
|
||
&&
|
||
(keycode != CHOLTAP_ACCE) // _ACC layer (and others)
|
||
&&
|
||
(keycode != RSFT_TILDE) // Shift on _NSY
|
||
&&
|
||
(keycode != LSFT_DASH) // Shift on _NSY
|
||
&&
|
||
(keycode != CHOLTAP_LAYR))
|
||
{ // _RAR layer, or RAlt/Alt-Gr
|
||
isolate_trigger = FALSE; // another key was pressed
|
||
}
|
||
}
|
||
|
||
// This block contains the complex macros, which should not count in speed counting or word/character counting,
|
||
// because they aren't typed characters.
|
||
switch (keycode) {
|
||
|
||
// Typing speed measuring
|
||
case SPEED_TOG: // Toggle speed measuring on/off
|
||
if (record->event.pressed) { // key down
|
||
if (speed_measure) {
|
||
speed_measure = FALSE;
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
rgblight_sethsv_noeeprom (HSV_PURPLE); // indicates stop (_RAR color)
|
||
# endif
|
||
|
||
}else{
|
||
// initialization of measurements
|
||
speed_measure = TRUE; // activates
|
||
speed = 0; // start at 0 k/s
|
||
speed_countdown = SPEED_COUNTDOWN; // reset, speed is measured in batches of keypresses
|
||
speed_counttime = timer_read32 ();// get current time
|
||
speed_add = 0;// speed average accumulator, it keeps adding the *speed* of each batch to this total
|
||
speed_batches = 0; // divider for speed_add to get the average
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
// set middle led
|
||
rgblight_sethsv_noeeprom (HSV_WHITE); // indicates start
|
||
# endif
|
||
|
||
}
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
isolate_rgblight_set ();
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case SPEED_REPORT: // Report the current typing speed by writing it, as if typing
|
||
if (record->event.pressed) { // down
|
||
short added = 5; // This counts how many characters the report itself is adding into the current text,
|
||
// to later delete it from the character count for text-size counting.
|
||
|
||
if (speed_measure) {
|
||
|
||
# ifdef WORDS_PER_MINUTE
|
||
|
||
// The speed is recorded as an accumulation of keystrokes-per-second, times 10 for added precision.
|
||
// This will be converted into words-per-minute by dividing by 5 characters for a word including
|
||
// blank space and punctuation, and multiplied by 60 for seconds per minute. ⁶⁰/₅ = 12. Multiplied
|
||
// by 12 is the simple conversion.
|
||
send_string ("<"); // +1 character written // analogue to '<POWER>'
|
||
added += write_number ((long int)((speed*12)/10), FALSE); // writes the speed
|
||
send_string ("wpm"); // +3 character written
|
||
if (0 != speed_batches) {
|
||
long int average_times_ten;
|
||
average_times_ten =(long int) ((speed_add * 12) / speed_batches); // *12 converts k/s to wpm
|
||
|
||
send_string (";"); // +① ''
|
||
added += write_number (average_times_ten / 10, FALSE); // writes the average speed, cannot use decimal because precision is not there
|
||
send_string ("wpm"); // +③
|
||
added += write_number ((long int) speed_batches, FALSE); // amount of batches
|
||
send_string ("x"); // +①
|
||
added += 9 + write_number ((long int) SPEED_COUNTDOWN, FALSE); // amount of batches
|
||
send_string ("keys"); // +④ = ⑨
|
||
|
||
speed_led ( (int) (average_times_ten / 12));// on report, show the average
|
||
// we need to convert back to k/s now
|
||
}
|
||
|
||
# else // keystrokes per second, k/s
|
||
|
||
send_string ("<"); // +1 character written // analogue to '<POWER>'
|
||
added += write_number ((long int)(speed/10), FALSE); // writes the speed
|
||
send_string ("k/s"); // +3 character written
|
||
if (0 != speed_batches) {
|
||
long int average_times_ten;
|
||
average_times_ten =(long int) (speed_add / speed_batches);
|
||
|
||
send_string (";"); // +① ''
|
||
added += write_number (average_times_ten, DIV10POINT); // writes the average speed
|
||
send_string ("k/s"); // +③
|
||
added += write_number ((long int) speed_batches, FALSE); // amount of batches
|
||
send_string ("x"); // +①
|
||
added += 9 + write_number ((long int) SPEED_COUNTDOWN, FALSE); // amount of batches
|
||
send_string ("keys"); // +④ = ⑨
|
||
|
||
speed_led ( (int) average_times_ten );// on report, show the average. speed_led divides by 10
|
||
}
|
||
|
||
# endif
|
||
|
||
send_string (">"); // +1 = 5
|
||
if (sizecount_measure) sizecount_chars += added; // the user is expected to hit <backspace>
|
||
}else{
|
||
send_string ("<Soff>"); // indicates off
|
||
if (sizecount_measure) sizecount_chars += 5; // user: <backspace>, to take it down again
|
||
}
|
||
|
||
key_timer = timer_read ();
|
||
|
||
}else{ // key up
|
||
// This use of the key is for callibrating your colors; it is difficult otherwise to see.
|
||
// This is not part of normal usage, therefore it is kept bare bones to reduce firmware size
|
||
if (timer_elapsed (key_timer) > 999) { // held for one second
|
||
speed += 10;
|
||
write_number ((long int)(speed/10), FALSE); // writes the speed
|
||
speed_led (speed); // update led
|
||
}
|
||
}
|
||
break;
|
||
|
||
case COUNT_TOG: // Toggle start/stop text size measuring
|
||
if (record->event.pressed) { // key down
|
||
|
||
key_timer = timer_read ();
|
||
|
||
}else{ // up
|
||
if (timer_elapsed (key_timer) < 500) { // held for less than half a second (tapped)
|
||
if (sizecount_measure) {
|
||
|
||
sizecount_measure = FALSE;
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
rgblight_sethsv_noeeprom (HSV_PURPLE); // indicates stop (color of _RAR)
|
||
isolate_rgblight_set ();
|
||
# endif
|
||
|
||
}else{
|
||
|
||
sizecount_measure = TRUE; // start counting
|
||
sizecount_word = FALSE; // detect double blanks. leading blanks are not a word
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
if (0 == sizecount_max) {
|
||
rgblight_sethsv_noeeprom (HSV_BLUE); // indicates start/activated, but only without maximum set
|
||
isolate_rgblight_set (); // .. if maximum set, led goes green to red.
|
||
}else{
|
||
rgblight_sethsv_noeeprom (HSV_GREEN); // indicates start/activated, but only without maximum set
|
||
isolate_rgblight_set (); // .. if maximum set, led goes green to red.
|
||
}
|
||
# endif
|
||
|
||
}
|
||
}else{ // held longer
|
||
sizecount_menu = TRUE;
|
||
send_string ("<Nc|w>"); // Menu: N amount, c|w character|word counting. Input is a number then ‛c’ or ‛w’
|
||
sizecount_max = 0;
|
||
}
|
||
}
|
||
break;
|
||
|
||
case COUNT_NULL: // Sets the count to zero, which allows on/off to have a suspend/resume
|
||
if (record->event.pressed) { // key up
|
||
sizecount_blanks = 0; //
|
||
sizecount_chars = 0;
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
rgblight_sethsv_noeeprom (HSV_CYAN); // indicates reset
|
||
isolate_rgblight_set ();
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case COUNT_REPORT: // Report the current typing speed
|
||
if (record->event.pressed) {
|
||
// We assume the user is writing a report in its active document, and then likely deleting it.
|
||
short added = 0; // This counts how much characters the report adds into the user document.
|
||
|
||
if (sizecount_measure) {
|
||
send_string ("<"); // + 1 and ① characters (1 is one logical stream, ① another)
|
||
if (0 == sizecount_max) { // no size counting maximum, print both characters and words
|
||
|
||
added += write_number (sizecount_chars, FALSE); // returns how many characters where printed
|
||
send_string ("c;"); // + 2
|
||
added += write_number (sizecount_blanks, FALSE) + 5; // adds here
|
||
send_string ("w>"); // + 2 = 5
|
||
|
||
}else{ // Only show the one for which the maximum is set, don't throw off that mental focus
|
||
if (SIZECOUNT_WORD == sizecount_max_type ) {
|
||
|
||
added += write_number (sizecount_blanks, FALSE) + 3;
|
||
send_string ("w>"); // + ② = ③
|
||
|
||
}else{ // characters
|
||
|
||
added += write_number (sizecount_chars, FALSE) + 3; // returns how many characters where printed
|
||
send_string ("c>"); // + ② = ③
|
||
|
||
}
|
||
// add current maximum setting
|
||
send_string ("["); // + 1
|
||
added += write_number (sizecount_max, FALSE) + 3;
|
||
if (SIZECOUNT_WORD == sizecount_max_type) send_string ("w]"); // + 2
|
||
else send_string ("c]"); // + 2
|
||
}
|
||
sizecount_chars += added; // Account for the written characters in the report itself.
|
||
|
||
}else{ // no size counting, also here: keep the report terse
|
||
send_string ("<Coff>"); // indicates off (no need to add to count, since counting is off)
|
||
}
|
||
}
|
||
break;
|
||
|
||
// This allows the user to manually remove word counts, when he has deleted a word.
|
||
// This is not needed for character count, because <backspace> counts as minus.
|
||
case COUNT_WORDMIN: // Take down one word in the word-count.
|
||
if (record->event.pressed) { // down
|
||
key_timer = timer_read ();
|
||
}else{ // up
|
||
if (timer_elapsed (key_timer) < 500) { // held for less than half a second (tapped)
|
||
sizecount_blanks--;
|
||
}else{
|
||
sizecount_blanks -= 10;
|
||
}
|
||
}
|
||
break;
|
||
|
||
// Shift detection system.
|
||
// Disused because it turned out 'one shot' like Unicode input. Shift detection copied from.
|
||
// https://github.com/kyleterry/qmk_firmware/blob/master/quantum/quantum.c
|
||
//uint8_t shifted = get_mods() & (MOD_BIT(KC_LSHIFT)|MOD_BIT(KC_RSHIFT));
|
||
|
||
// Crude but self contained in this source file shift detection.
|
||
// ... right shift
|
||
case KC_RSFT:
|
||
// + ... left shift
|
||
case KC_LSFT:
|
||
if (record->event.pressed) { // key down
|
||
shift_ison = 1; // shift depressed
|
||
}else{ // key up
|
||
shift_ison = 0; // shift released
|
||
}
|
||
// There are macros on Shift who also alter this variable.
|
||
break;
|
||
|
||
case OTHER_BASE: // Switching through the default/alternate BASE modes, and Descramble for that Dvorak compile
|
||
if (record->event.pressed) {
|
||
;
|
||
}else{ // key up
|
||
|
||
// Cycles through the modes
|
||
# ifdef DVORAK_DESCRAMBLE // version Dvorak+Dvorak-descramble has 3 modes
|
||
if (_NORMAL_ == alternate) {
|
||
alternate = _FULL_;// alternate layers
|
||
default_layer_set (_ALT_BASE_MASK); // This is needed only for a rare case,
|
||
// where _DEF_BASE and _ALT_BASE their layer switching keys don't line up,
|
||
// such as with Qwerty Base Arrow
|
||
} else if (_HALF_ == alternate) {
|
||
alternate = _NORMAL_;// normal layers
|
||
default_layer_set (_DEF_BASE_MASK);
|
||
}else{ // _FULL_ == alternate
|
||
alternate = _HALF_;// alternate layers, without 'descramble' recomputing Unicode
|
||
//default_layer_set (_ALT_BASE_MASK);
|
||
// it cycles, and this comes always after it was set _FULL_
|
||
}
|
||
# else // Only switching the BASE layers between alternate and default
|
||
|
||
if (_NORMAL_ == alternate) {
|
||
alternate = _FULL_;// alternate base layers
|
||
default_layer_set (_ALT_BASE_MASK);
|
||
}else{
|
||
alternate = _NORMAL_;// default base layers
|
||
default_layer_set (_DEF_BASE_MASK);
|
||
}
|
||
# endif
|
||
|
||
indicate_base (); // activate led change
|
||
}
|
||
break;
|
||
|
||
# if defined(BASE_NUMPAD__ALT_BASE)
|
||
|
||
case OTHER_BASE_GO: // Switching through the default/alternate BASE modes, and Descramble for that Dvorak compile
|
||
if (record->event.pressed) {
|
||
;
|
||
}else{ // key up
|
||
|
||
// Cycles through the modes
|
||
# ifdef DVORAK_DESCRAMBLE // version Dvorak+Dvorak-descramble has 3 modes
|
||
if (_NORMAL_ == alternate) {
|
||
alternate = _FULL_;// alternate layers
|
||
default_layer_set (_ALT_BASE_MASK);
|
||
} else if (_HALF_ == alternate) {
|
||
alternate = _NORMAL_;// normal layers
|
||
default_layer_set (_DEF_BASE_MASK);
|
||
}else{ // _FULL_ == alternate
|
||
alternate = _HALF_;// alternate layers, without 'descramble' recomputing Unicode
|
||
//default_layer_set (_ALT_BASE_MASK);
|
||
// it cycles, and this comes always after it was set _FULL_
|
||
}
|
||
# else // Only switching the BASE layers between alternate and default
|
||
|
||
if (_NORMAL_ == alternate) {
|
||
alternate = _FULL_;// alternate base layers
|
||
default_layer_set (_ALT_BASE_MASK);
|
||
}else{
|
||
alternate = _NORMAL_;// default base layers
|
||
default_layer_set (_DEF_BASE_MASK);
|
||
}
|
||
# endif
|
||
// make the switch to the other Base layer
|
||
if (alternate) { //
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
break;
|
||
# endif
|
||
|
||
// Switching to layers:
|
||
|
||
case CTO_BASE:
|
||
// User pressed upper/left button, while not on BASE layer: ‛escape’ from a layer to BASE layer.
|
||
// On BASE itself, that key is <Escape>.
|
||
if (record->event.pressed) { // key down
|
||
;
|
||
}else{ // key up
|
||
if (alternate) { // go to the alternate version (bit of a hack maybe, but all alternate
|
||
// ... modes are non-zero)
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
break;
|
||
|
||
case CTO_NUMS: // activates number-symbols layer
|
||
if (record->event.pressed) { // key down
|
||
;
|
||
}else{ // key up, so that upon key down the target layer isn't already activated, triggering that key on up
|
||
if (alternate) { // go to the alternate version
|
||
layer_move (_ALT_NSY);
|
||
}else{
|
||
layer_move (_DEF_NSY);
|
||
}
|
||
}
|
||
break;
|
||
|
||
case CTO_ACCE: // Unicode layer
|
||
if (record->event.pressed) { // key down
|
||
;
|
||
}else{ // key up
|
||
|
||
# ifndef REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
layer_move (_ACC); // activates normal accented layer
|
||
# else
|
||
# ifdef _ACC_KEY_ALT_LAYER
|
||
layer_move (_ACC_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case CTO_DRAW: // Unicode layer
|
||
if (record->event.pressed) { // key down
|
||
;
|
||
}else{ // key up
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer.
|
||
layer_move (_DRA); // activates normal accented layer
|
||
# else
|
||
# ifdef _DRA_KEY_ALT_LAYER
|
||
layer_move (_DRA_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
}
|
||
break;
|
||
|
||
// The below are a simulated LT(layer,kc), layer-tap.
|
||
// Double-tap-hold repeater functionality: not done.
|
||
// They switch what layer to use depending on 'alternate' variable
|
||
// Basically it starts the right layer on key down, goes back to base layer on key up,
|
||
// and throws in a keypress as well if tapped.
|
||
// It also integrates with DUO_HOLD, to reach the _BON layer.
|
||
|
||
# ifndef CHOLTAP_ACCE_NOP // When this key has been eviscerated, this macro becomes useless
|
||
case CHOLTAP_ACCE: // Works with DUO_HOLD macro to activate one of several layers.
|
||
if (record->event.pressed) { // key down
|
||
key_timer = timer_read ();
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed.
|
||
|
||
duo_press_acc_bon ++; // This signals to the two DUO_HOLD keys, whether a move to _BON is desired.
|
||
|
||
if (duo_press_nsy_dra) { // One or more of the DUO_HOLD layer keys was already pressed; move to _BON
|
||
|
||
# ifndef REMOVE_BON // Removes this layer entirely, if set.
|
||
layer_move (_BON); // Bonus Unicode layer
|
||
# else
|
||
# ifdef _BON_KEY_ALT_LAYER
|
||
layer_move (_BON_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}else{ // pressed in isolation
|
||
|
||
# ifndef REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
layer_move (_ACC); // Accented layer
|
||
# else
|
||
# ifdef _ACC_KEY_ALT_LAYER
|
||
layer_move (_ACC_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}
|
||
}else{ // key up
|
||
|
||
duo_press_acc_bon --;
|
||
|
||
if (1 == duo_press_nsy_dra) { // One DUO_HOLD layer keys is still pressed; move to numbers/symbols
|
||
|
||
if (_FULL_ == alternate) {
|
||
layer_move (_ALT_NSY);
|
||
}else{
|
||
layer_move (_DEF_NSY);
|
||
}
|
||
}else if (2 == duo_press_nsy_dra) { // Two of the DUO_HOLD layer keys are still pressed: move to _DRA
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer.
|
||
layer_move (_DRA); // activates normal accented layer
|
||
# else
|
||
# ifdef _DRA_KEY_ALT_LAYER
|
||
layer_move (_DRA_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}else{
|
||
if (alternate) { // No _DEF_NSY layer keys remain pressed; Go back to base layer
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
|
||
// Pressed in isolation
|
||
if (isolate_trigger)
|
||
{
|
||
if (timer_elapsed (key_timer) <= TAPPING_TERM_HOLTAP) { // tapped
|
||
SEND_STRING (SS_TAP (X_DEL));
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
# endif // CHOLTAP_ACCE_NOP
|
||
|
||
case CHOLTAP_LAYR: //to _RAR on hold, otherwise a keycode
|
||
if (record->event.pressed) { // key down
|
||
key_timer = timer_read ();
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed.
|
||
|
||
# ifdef BASE_RIGHT_ALT
|
||
SEND_STRING (SS_DOWN (X_RALT));
|
||
# else
|
||
layer_move (_RAR); // activates descrambled drawings layer
|
||
# endif
|
||
|
||
}else{ // key up
|
||
// Go back to base layer
|
||
if (speed_measure) speed_led (speed); // The _RAR layer overwrites the middle led,
|
||
//.. for use with alternate _HALF_ led colors (middle); thus needs to be set back to speed
|
||
// led color upon leaving.
|
||
|
||
# ifdef BASE_RIGHT_ALT
|
||
SEND_STRING (SS_UP (X_RALT));
|
||
# else
|
||
if (alternate) {
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
# endif
|
||
|
||
// Pressed in isolation
|
||
if (isolate_trigger)
|
||
{
|
||
if (timer_elapsed (key_timer) <= TAPPING_TERM_HOLTAP) { // tapped
|
||
SEND_STRING (SS_TAP (X_RIGHT));
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
|
||
# ifndef DUO_HOLD_BASIC
|
||
// This is the normal 'big' version, dealing with switching between _DEF_NSY/_ALT_NSY, _ACC, _DRA and _BON, in
|
||
// .. conjunction with the CHOLTAP_ACCE macro.
|
||
case DUO_HOLD: // The macro around the split space-bar. Both keys come to this macro.
|
||
if (record->event.pressed) { // key down
|
||
|
||
duo_press_nsy_dra ++; // simple way to keep track of how many are pressed
|
||
|
||
if (duo_press_acc_bon){ // Preceded by holding the _ACC/_BON layer switch key: move to _BON
|
||
|
||
# ifndef REMOVE_BON // Removes this layer entirely, if set.
|
||
layer_move (_BON); // Bonus Unicode layer
|
||
# else
|
||
# ifdef _BON_KEY_ALT_LAYER
|
||
layer_move (_BON_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}else if (1 == duo_press_nsy_dra) { // This is the first press of either of the DUO_HOLD keys on BASE
|
||
|
||
if (_NORMAL_ == alternate) {
|
||
layer_move (_DEF_NSY);
|
||
}else{
|
||
layer_move (_ALT_NSY);
|
||
}
|
||
}
|
||
else if (2 == duo_press_nsy_dra) { // both are pressed
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer.
|
||
layer_move (_DRA); // activates normal accented layer
|
||
# else
|
||
# ifdef _DRA_KEY_ALT_LAYER
|
||
layer_move (_DRA_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
}
|
||
|
||
}else{ // key up
|
||
|
||
duo_press_nsy_dra --;
|
||
|
||
if (1 == duo_press_nsy_dra) {
|
||
if (duo_press_acc_bon){ // Still holding the _ACC/_BON layer switch key, and one DUO_HOLD keys
|
||
|
||
# ifndef REMOVE_BON // Removes this layer entirely, if set.
|
||
layer_move (_BON); // Bonus Unicode layer
|
||
# else
|
||
# ifdef _BON_KEY_ALT_LAYER
|
||
layer_move (_BON_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}else{
|
||
if (_NORMAL_ == alternate) {
|
||
layer_move (_DEF_NSY);
|
||
}else{
|
||
layer_move (_ALT_NSY);
|
||
}
|
||
}
|
||
}
|
||
else { // Has to be zero.
|
||
if (duo_press_acc_bon){ // Still holding the _ACC/_BON layer switch key, but zero DUO_HOLD layer keys
|
||
|
||
# ifndef REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
layer_move (_ACC); // Accented layer
|
||
# else
|
||
# ifdef _ACC_KEY_ALT_LAYER
|
||
layer_move (_ACC_KEY_ALT_LAYER); // Alternative layer user configuration
|
||
# endif
|
||
# endif
|
||
|
||
}else{
|
||
if (alternate) { // Back to letters
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
# else
|
||
// This is the eviscerated version, compiled when all Unicode layers _ACC, _DRA, _BON are cut, and layer key
|
||
// .. combinations have not been assigned other uses.
|
||
case DUO_HOLD: // The macro for the keys around the split space-bar. Both keys come to this macro.
|
||
if (record->event.pressed) { // key down
|
||
|
||
duo_press_nsy_dra ++; // simple way to keep track of how many are pressed
|
||
|
||
if (0 != duo_press_nsy_dra) { // One or more of the DUO_HOLD keys is pressed
|
||
if (_NORMAL_ == alternate) {
|
||
layer_move (_DEF_NSY);
|
||
}else{
|
||
layer_move (_ALT_NSY);
|
||
}
|
||
}
|
||
}else{ // key up
|
||
|
||
duo_press_nsy_dra --;
|
||
|
||
if (0 == duo_press_nsy_dra) { // None of the DUO_HOLD keys remains pressed
|
||
if (alternate) { // Back to letters
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
# endif // DUO_HOLD_BASIC
|
||
|
||
// When held the key is shift. When tapped it is computed if the tap is short enough,
|
||
// and if no other key was pressed, in which case: right-shift-up is a toggle to the _FUN layer.
|
||
// The timing is meant to be able to undo an erroneous shift press just by holding longer,
|
||
// and the test if another key was pressed is to prevent an erroneous detection when typing
|
||
// very fast.
|
||
// The reason for this on shift is to isolate GUI, where _FUN was previously more easily
|
||
// located. No alternative tapping function with GUI because some systems do not treat GUI
|
||
// purely as a modifier it seems. Since it is a toggle anyway, _FUN can fit away from the thumb-hold row.
|
||
case CHOLTAP_RSHFT: // When tapped it toggles the _FUN layer, when held it is Shift
|
||
|
||
if (record->event.pressed) { // key down
|
||
|
||
SEND_STRING (SS_DOWN (X_RSFT));
|
||
shift_ison = 1; // shift depressed
|
||
|
||
key_timer = timer_read ();
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed until key-up
|
||
|
||
}else{ // key up
|
||
|
||
SEND_STRING (SS_UP (X_RSFT));
|
||
shift_ison = 0; // shift released
|
||
|
||
if (isolate_trigger) { // no other key was hit since key down
|
||
|
||
|
||
// Held medium long: _PAD, long: _MOV.
|
||
// The reason to have a switch to _MOV on the left hand, is to be able to reach arrows on a toggle,
|
||
// all by the left hand, when the right hand is on the mouse.
|
||
if ((timer_elapsed (key_timer) <= 200)) { // tapped short (milliseconds)
|
||
|
||
# ifndef SWITCH_RSHIFT_FUN_RAR // user config to reverse what this key its timing toggles to
|
||
|
||
layer_move (_FUN); // activates function layer as a toggle
|
||
|
||
} else { // held for longer
|
||
|
||
layer_move (_RAR);
|
||
|
||
# else
|
||
|
||
layer_move (_RAR); // activates function layer as a toggle
|
||
|
||
} else { // held for longer
|
||
|
||
layer_move (_FUN);
|
||
|
||
# endif
|
||
|
||
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
|
||
// The left-shift version of the above keycode. User can configure something (_PAD is default)
|
||
case CHOLTAP_LSHFT: // When tapped it toggles the _MOV layer, when held it is Shift
|
||
// _RAR was the first idea, but some of its keys are too dangerous regarding accidents.
|
||
if (record->event.pressed) { // key down
|
||
|
||
SEND_STRING (SS_DOWN (X_LSFT));
|
||
shift_ison = 1; // shift depressed
|
||
|
||
# ifndef REMOVE_PAD // The _PAD layer exists, we will use a timer …
|
||
|
||
key_timer = timer_read ();
|
||
|
||
# endif
|
||
|
||
|
||
// This variable is re-used, for speed and because using both shifts is useless,
|
||
// .. thus very rare, and also not a usage problem if it occured.
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed.
|
||
|
||
}else{ // key up
|
||
|
||
SEND_STRING (SS_UP (X_LSFT));
|
||
shift_ison = 0; // shift released
|
||
|
||
if (isolate_trigger) { // no other key was hit since key down
|
||
|
||
# ifndef REMOVE_PAD // The _PAD layer exists, differentiate meaning by timer.
|
||
|
||
// Held medium long: _PAD, long: _MOV.
|
||
// The reason to have a switch to _MOV on the left hand, is to be able to reach arrows on a toggle,
|
||
// all by the left hand, when the right hand is on the mouse.
|
||
if ((timer_elapsed (key_timer) <= 200)) { // tapped medium-long (milliseconds)
|
||
|
||
# ifndef SWITCH_LSHIFT_PAD_MOV // user config to reverse what this key its timing toggles to
|
||
|
||
layer_move (_PAD);
|
||
|
||
} else { // held for longer
|
||
|
||
layer_move (_MOV);
|
||
|
||
# else
|
||
|
||
layer_move (_MOV);
|
||
|
||
} else { // held for longer
|
||
|
||
layer_move (_PAD);
|
||
|
||
# endif
|
||
|
||
}
|
||
|
||
# else // _PAD layer was eviscerated
|
||
|
||
layer_move (_MOV);
|
||
|
||
# endif
|
||
|
||
}
|
||
}
|
||
break;
|
||
|
||
/*
|
||
case RSFT_TILDE:
|
||
|
||
if (record->event.pressed) { // key down
|
||
|
||
SEND_STRING (SS_DOWN (X_RSFT));
|
||
shift_ison = 1; // shift depressed
|
||
|
||
key_timer = timer_read ();
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed until key-up
|
||
|
||
}else{ // key up
|
||
|
||
SEND_STRING (SS_UP (X_RSFT));
|
||
shift_ison = 0; // shift released
|
||
|
||
if (isolate_trigger) { // no other key was hit since key down
|
||
|
||
|
||
// Held medium long: _PAD, long: _MOV.
|
||
// The reason to have a switch to _MOV on the left hand, is to be able to reach arrows on a toggle,
|
||
// all by the left hand, when the right hand is on the mouse.
|
||
if ((timer_elapsed (key_timer) <= 200)) { // tapped short (milliseconds)
|
||
|
||
SEND_STRING ("~");
|
||
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
*/
|
||
|
||
case RSFT_TILDE: // firmware size optimization, saves 36 bytes
|
||
case LSFT_DASH:
|
||
|
||
if (record->event.pressed) { // key down
|
||
|
||
if (RSFT_TILDE == keycode) { // this is probably not needed, both can be left or right shift
|
||
SEND_STRING (SS_DOWN (X_RSFT));
|
||
}else{
|
||
SEND_STRING (SS_DOWN (X_LSFT));
|
||
}
|
||
shift_ison = 1; // shift depressed
|
||
|
||
key_timer = timer_read ();
|
||
isolate_trigger = TRUE; // keep track of whether another key gets pressed until key-up
|
||
|
||
}else{ // key up
|
||
|
||
if (RSFT_TILDE == keycode) {
|
||
SEND_STRING (SS_UP (X_RSFT));
|
||
}else{
|
||
SEND_STRING (SS_UP (X_LSFT));
|
||
}
|
||
|
||
shift_ison = 0; // shift released
|
||
|
||
if (isolate_trigger) { // no other key was hit since key down
|
||
|
||
|
||
// Held medium long: _PAD, long: _MOV.
|
||
// The reason to have a switch to _MOV on the left hand, is to be able to reach arrows on a toggle,
|
||
// all by the left hand, when the right hand is on the mouse.
|
||
if ((timer_elapsed (key_timer) <= 200)) { // tapped short (milliseconds)
|
||
|
||
if (RSFT_TILDE == keycode) {
|
||
SEND_STRING ("~");
|
||
}else{
|
||
SEND_STRING ("-");
|
||
}
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
|
||
case _FUN_STAY: // toggles if the f-keys return _FUN layer to BASE after one press
|
||
if (record->event.pressed) { // key down
|
||
|
||
if (_fun_stay == FALSE) {
|
||
_fun_stay = TRUE;
|
||
}else{
|
||
_fun_stay = FALSE;
|
||
}
|
||
indicate_fun_stay (); // leds
|
||
}
|
||
break;
|
||
|
||
# ifdef MOREKEY2_ARROW_CLUSTER
|
||
|
||
case _MOV_UP: // To be sure it activates on up key, and not already has triggered the _MOV layer during up-key.
|
||
if (record->event.pressed) { // key down
|
||
;
|
||
}else{ // key up
|
||
layer_move (_MOV);
|
||
}
|
||
break;
|
||
# endif
|
||
|
||
// These keys are so disruptive on an erroneous key press, that they are behind a shift lock.
|
||
// When used unshifted, they print a memory aid string: their name.
|
||
case C_KC_PWR:
|
||
if (record->event.pressed) { // key down
|
||
if (shift_ison) {
|
||
SEND_STRING (SS_TAP (X_PWR));
|
||
}else{
|
||
SEND_STRING ("<POWER>"); // Memory aid
|
||
}
|
||
}
|
||
break;
|
||
|
||
case C_KC_WAKE:
|
||
if (record->event.pressed) { // key down
|
||
if (shift_ison) {
|
||
SEND_STRING (SS_TAP (X_WAKE));
|
||
}else{
|
||
SEND_STRING ("<WAKE>"); // Memory aid
|
||
}
|
||
}
|
||
break;
|
||
|
||
case C_KC_SLEP:
|
||
if (record->event.pressed) { // key down
|
||
if (shift_ison) {
|
||
SEND_STRING (SS_TAP (X_SLEP));
|
||
}else{
|
||
SEND_STRING ("<SLEEP>"); // Memory aid
|
||
}
|
||
}
|
||
break;
|
||
|
||
case C_KC_PAUS:
|
||
if (record->event.pressed) { // key down
|
||
if (shift_ison) {
|
||
SEND_STRING (SS_TAP (X_PAUS));
|
||
}else{
|
||
SEND_STRING ("<PAUSE>"); // Memory aid
|
||
}
|
||
}
|
||
break;
|
||
|
||
case LEDS_ON: // Toggles left/right leds on or off
|
||
if (record->event.pressed) { // key down
|
||
if (leds_on == FALSE) {
|
||
leds_on = TRUE;
|
||
}else{
|
||
leds_on = FALSE;
|
||
}
|
||
}
|
||
break;
|
||
|
||
# ifdef LEDS_OFF_BASE_DEF // This messes with led effect on/off, so we need to track the state of this setting now.
|
||
case RGBTOG_: // Toggles middle led on or off
|
||
if (record->event.pressed) { // key down
|
||
if (led_middle_on == FALSE) {
|
||
led_middle_on = TRUE;
|
||
rgblight_enable_noeeprom ();
|
||
}else{
|
||
led_middle_on = FALSE;
|
||
rgblight_disable_noeeprom ();
|
||
}
|
||
}
|
||
break;
|
||
# endif
|
||
|
||
// Some keycodes treated specially for the two counting systems (speed, text size)
|
||
// Deletions:
|
||
case KC_BSPC: // non-counting speed
|
||
case KC_DEL: // non-counting speed
|
||
if (record->event.pressed) { // key down
|
||
if (sizecount_measure) sizecount_chars--; // minus count for text size (removed a character)
|
||
}
|
||
break;
|
||
|
||
// White space for counting words
|
||
case LT__MOV__KC_ENT: // We want to count the <enter> for word-counts, sadly this looses the key repetition of LT(…)
|
||
if (record->event.pressed) { // key down
|
||
|
||
key_timer = timer_read ();
|
||
layer_move (_MOV);
|
||
|
||
}else{ // key up
|
||
if (alternate) { // Back to letters
|
||
layer_move (_ALT_BASE);
|
||
}else{
|
||
layer_move (_DEF_BASE);
|
||
}
|
||
if (timer_elapsed (key_timer) <= TAPPING_TERM_HOLTAP) { // tapped
|
||
send_string ("\n");
|
||
if (sizecount_measure) {
|
||
sizecount_chars++;
|
||
|
||
if (sizecount_word) sizecount_blanks++; // count a word
|
||
sizecount_word = FALSE; // don't count immediately next blank as a word
|
||
}
|
||
}
|
||
}
|
||
break;
|
||
|
||
// Word counting
|
||
case KC_SPC:
|
||
if (record->event.pressed) { // key down
|
||
if (sizecount_measure) {
|
||
sizecount_chars++;
|
||
|
||
if (sizecount_word) sizecount_blanks++; // count a word
|
||
sizecount_word = FALSE; // don't count immediately next blank as a word
|
||
}
|
||
}
|
||
break;
|
||
|
||
// These are excluded from counting for text size/speed, they prevent the “default“ in the case statement to execute.
|
||
|
||
case KC_LEFT:
|
||
case KC_UP:
|
||
case KC_DOWN:
|
||
case KC_RIGHT:
|
||
case KC_PGUP:
|
||
case KC_PGDN:
|
||
case KC_HOME:
|
||
case KC_END:
|
||
case LALT_T ( KC_LEFT ):
|
||
if (speed_measure) speed_countdown++; // Navigation could be integral to someone typing and correcting mistakes,
|
||
// but those keys don't add any text.
|
||
// Mouse movement is discounted in both speed and text size
|
||
case KC_WH_L:
|
||
case KC_WH_D:
|
||
case KC_WH_U:
|
||
case KC_WH_R:
|
||
case KC_MS_L:
|
||
case KC_MS_D:
|
||
case KC_MS_U:
|
||
case KC_MS_R:
|
||
case KC_BTN1:
|
||
case KC_BTN5:
|
||
case KC_BTN4:
|
||
case KC_BTN3:
|
||
case KC_BTN2:
|
||
break;
|
||
|
||
|
||
default: // If something else, it is a speed- and text measurement counting key
|
||
if (record->event.pressed) { // key down
|
||
if (speed_measure) speed_countdown--;
|
||
if (sizecount_measure) sizecount_chars++;
|
||
}
|
||
}
|
||
|
||
// If speed measuring is on, count keypresses
|
||
// The idea is to more/less follow common standard with typing speed counting: shift is not counted,
|
||
// layer-switching or its equivalent is neither. Arrows are not counted.
|
||
if (speed_measure) {
|
||
if (record->event.pressed) { // key down
|
||
|
||
if (0 >= speed_countdown) {
|
||
|
||
// key presses per second, but times ten for added precision of one digit
|
||
// This calculation quickly looses precision if not calculated with high enough numbers, but low enough to fit.
|
||
speed = (int) ( (SPEED_COUNTDOWN * 1000 ) / ((timer_read32 () - speed_counttime)/10) ); // counts time in ms
|
||
speed_led (speed); // updates led
|
||
|
||
// record for average
|
||
if (0 < (speed/10)) { // ignore 0 k/s batches, we assume the typer took a break
|
||
speed_batches++;
|
||
speed_add += speed;
|
||
}
|
||
|
||
// reset for next batch
|
||
speed_countdown = SPEED_COUNTDOWN; // reset
|
||
speed_counttime = timer_read32 ();
|
||
}
|
||
}
|
||
}
|
||
|
||
// For word-counting, ignore double blanks
|
||
if (sizecount_measure) {
|
||
if (record->event.pressed) {
|
||
bool within = TRUE; // When text size is maximized, this indicates we are not yet at that maximum.
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
unsigned short size_fraction = 0; // Used to compute led color as a fraction of a set maximum which is already typed.
|
||
# endif
|
||
|
||
// ignoring blanks wordcount
|
||
if ((keycode != KC_SPC)
|
||
&&
|
||
(keycode != KC_TAB) // This is ok, but a tab on BASE layer combo with Control, is not caught by this XXX (problem ignored, I never write Tab in a text worth counting)
|
||
&&
|
||
(keycode != LT__MOV__KC_ENT)
|
||
&&
|
||
(keycode != LT__MOV__KC_ENT)) {
|
||
|
||
sizecount_word = TRUE; // current key is not a blank, so we set this trigger for next key press
|
||
}
|
||
|
||
// computing maximum count effects: leds
|
||
if (0 != sizecount_max) {
|
||
|
||
if (SIZECOUNT_WORD == sizecount_max_type) {
|
||
if (sizecount_blanks > sizecount_max) within = FALSE;
|
||
}else{ // count chars
|
||
if (sizecount_chars > sizecount_max) within = FALSE;
|
||
}
|
||
|
||
// led colors
|
||
if (within) { // green to red middle led
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
if (SIZECOUNT_WORD == sizecount_max_type) {
|
||
size_fraction = (90 * sizecount_blanks) / sizecount_max;
|
||
}else{
|
||
size_fraction = (90 * sizecount_chars) / sizecount_max;
|
||
}
|
||
|
||
rgblight_sethsv_noeeprom (90 - size_fraction , 255, 255); // green to red, full saturation, full lit
|
||
# endif
|
||
|
||
}else{ // when at or over the limit: blink led red/white
|
||
if ((KC_BSPC != keycode)
|
||
&& (KC_DEL != keycode) // User already deleting, doubling is confusing
|
||
&& (CHOLTAP_LAYR != keycode)) { // This brings up the _RAR layer, to access the Count settings.
|
||
|
||
SEND_STRING (SS_TAP(X_BSPC)); // refuses to type further, the user is stopped from typing to make it obvious
|
||
|
||
}
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
if (sizecount_chars & 0x1) { // flip by every keypress
|
||
rgblight_sethsv_noeeprom (HSV_RED);
|
||
}else{
|
||
rgblight_sethsv_noeeprom (HSV_WHITE);
|
||
}
|
||
# endif
|
||
|
||
}
|
||
|
||
# ifdef RGBLIGHT_ENABLE
|
||
rgblight_set (); // only center led is altered, no need to go through isolate_rgblight_set()
|
||
# endif
|
||
|
||
}
|
||
}
|
||
}
|
||
|
||
// Simple macros, printing a character.
|
||
switch (keycode) {
|
||
|
||
/* _ACC layer definitions. */
|
||
|
||
// ------------------------- row 4
|
||
|
||
# ifndef REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
case XP_ACC_AA: // because a
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAL_ACU, CAU_ACU);// á Á
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AB: // because o (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COL_ACU, COU_ACU);// ó Ó
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AC: // because e (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CEL_ACU, CEU_ACU);// é É
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AD: // because u (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CUL_ACU, CUU_ACU);// ú Ú
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AE: // because i (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CIL_ACU, CIU_ACU);// í Í
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AF: // Because near Y
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CYL_ACU, CYU_ACU);// ý Ý
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AG: // because near Y
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CIJL_BI, CIJU_BI);// ij IJ
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AH: // because c (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CCL_CDL, CCU_CDL);// ç Ç
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AI: // because ring-finger left is o (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COL_STK, COU_STK);// ø Ø
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_AJ: // because pinky finger left is a
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAL_RNG, CAU_RNG);// å Å
|
||
}
|
||
break;
|
||
|
||
// ------------------------- row 3
|
||
case XP_ACC_BA: // because a
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAL_DIA, CAU_DIA);// ä Ä
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BB: // because o (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COL_DIA, COU_DIA);// ö Ö
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BC: // because e (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CEL_DIA, CEU_DIA);// ë Ë
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BD: // because u (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CUL_DIA, CUU_DIA);// ü Ü
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BE: // because i
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CIL_DIA, CIU_DIA);// ï Ï
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BF: // because near y
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CYL_DIA, CYU_DIA);// ÿ Ÿ
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BG: // because vague logic about other hand having ae near on similar fingers
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COEL_BI, COEU_BI);// œ Œ
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BH: // because near œ, toward the side of a (pinky)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAEL_BI, CAEU_BI);// æ Æ
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BI: // because n
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CNL_TLD, CNU_TLD);// ñ Ñ
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BJ: // because s
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CSL_SHP);// ß ß
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_BK: // because roughly the location on French keyboard
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (C_MU_L);// μ
|
||
}
|
||
break;
|
||
|
||
// ------------------------- row 2
|
||
case XP_ACC_CA: // because a
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAL_GRA, CAU_GRA);//à À
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CB: // because o (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COL_GRA, COU_GRA);// ò Ò
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CC: // because e (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CEL_GRA, CEU_GRA);// è È
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CD: // because u (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CUL_GRA, CUU_GRA);// ù Ù
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CE: // because i (Dvorak)
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CIL_GRA, CIU_GRA);// ì Ì
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CF: // because other hand same finger i
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CIL_CAR, CIU_CAR);// î Î
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CG: // because other hand same finger u
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CUL_CAR, CUU_CAR);// û Û
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CH: // because other hand same finger e
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CEL_CAR, CEU_CAR);// ê Ê
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CI: // because other hand same finger o
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (COL_CAR, COU_CAR);// ô Ô
|
||
}
|
||
break;
|
||
|
||
case XP_ACC_CJ: // because other hand same finger a
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CAL_CAR, CAU_CAR);// â Â
|
||
}
|
||
break;
|
||
|
||
# endif // REMOVE_ACC // This cuts out the whole _ACC layer.
|
||
|
||
|
||
/* _DRA layer definitions. */
|
||
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer
|
||
// ------------------------- row 4
|
||
case XP_DRA_AA: // because '", the opening „“ at the ‛open’ of the keyboard (left/up)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_DQUHR, CS_DQUL);// “ „
|
||
# else
|
||
unicode_hex2output_single (CS_DQUHR);// “
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AB: // because to the right of opening “, ≤ on <
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_DQUH, CS_ELTHAN);// ” ≤
|
||
# else
|
||
unicode_hex2output_single (CS_DQUH);// ”
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AC: // because this is where the £ is on an English keyboard, on 'any' money symbols ¤; ≥ on >
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_POUND, CS_EGTHAN);// £ ≥
|
||
# else
|
||
unicode_hex2output_single (CS_POUND);// £
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AD: // because ∅ looks like ¢, and ¢ (cent) is on $ (money) ?
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_NONE, CS_CENT);// ∅ ¢
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AE: // because percentages %‰‱ and money ƒ are numerical ?
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_PLMI, CS_LGULDEN);// ± ƒ
|
||
# else
|
||
unicode_hex2output_single (CS_PLMI);// ±
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AF: // Because left of 🙂, on top of ★
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_FLEUR, CS_HEART);// ❦ ♥
|
||
# else
|
||
unicode_hex2output_single (CS_HEART);// ♥
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AG: // because 😊 ⍨
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_SMIL, CS_SAD_);// 🙂 🙁
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AH: // because «no reason», next to 😊 (emoticons)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_THUP, CS_THDN);// 👍 👎
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AI: // because (
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_OPSUP, CS_OPSUB);// ⁽ ₍
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_AJ: // because )
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_4THROW
|
||
unicode_hex2output (CS_CPSUP, CS_CPSUB);// ⁾ ₎
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
// ------------------------- row 3
|
||
case XP_DRA_BA: // because 1
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_1SUP, CN_1SUB);// ¹ ₁
|
||
# else
|
||
unicode_hex2output_single (CN_1SUP);// ¹
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BB: // because 2
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_2SUP, CN_2SUB);// ² ₂
|
||
# else
|
||
unicode_hex2output_single (CN_2SUP);// ²
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BC: // because 3
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_3SUP, CN_3SUB);// ³ ₃
|
||
# else
|
||
unicode_hex2output_single (CN_3SUP);// ³
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BD: // because 4
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_4SUP, CN_4SUB);// ⁴ ₄
|
||
# else
|
||
unicode_hex2output_single (CN_4SUP);// ⁴
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BE: // because 5
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_5SUP, CN_5SUB);// ⁵ ₅
|
||
# else
|
||
unicode_hex2output_single (CN_5SUP);// ⁵
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BF: // because 6
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_6SUP, CN_6SUB);// ⁶ ₆
|
||
# else
|
||
unicode_hex2output_single (CN_6SUP);// ⁶
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BG: // because 7
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_7SUP, CN_7SUB);// ⁷ ₇
|
||
# else
|
||
unicode_hex2output_single (CN_7SUP);// ⁷
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BH: // because 8
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_8SUP, CN_8SUB);// ⁸ ₈
|
||
# else
|
||
unicode_hex2output_single (CN_8SUP);// ⁸
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BI: // because 9
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_9SUP, CN_9SUB);// ⁹ ₉
|
||
# else
|
||
unicode_hex2output_single (CN_9SUP);// ⁹
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_BJ: // because 0
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef SUB_SCRIPT_NUMS
|
||
unicode_hex2output (CN_0SUP, CN_0SUB);// ⁰ ₀
|
||
# else
|
||
unicode_hex2output_single (CN_0SUP);// ⁰
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
// ------------------------- row 2
|
||
case XP_DRA_CA: // because [
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_OCBRA, CB_HHORI);// 「 ━
|
||
# else
|
||
unicode_hex2output_single (CB_HHORI);// ━
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CB: // because ]
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_CCBRA, CB_LHORI);// 」 ─
|
||
# else
|
||
unicode_hex2output_single (CB_LHORI);// ─
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CC: // because «no reason»
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_DEGREE, CS_CIRCLE);// ° 〇
|
||
# else
|
||
unicode_hex2output_single (CS_DEGREE);// °
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CD: // because «no reason»
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_BULLET, CS_PARA);// • §
|
||
# else
|
||
unicode_hex2output_single (CS_BULLET);// •
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CE: // because «no reason»
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_ELLIPS, CS_MIDDOT);// … ·
|
||
# else
|
||
unicode_hex2output_single (CS_ELLIPS);// …
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CF: // because «no reason» (+ resembles ‛☒’ ?), ✗
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CS_CHECK_B, CS_CHECK_N);// ☐ ☒
|
||
}
|
||
break;
|
||
# endif
|
||
|
||
// This one must be included for _RAR layer
|
||
case XP_DRA_CG: // because next to ✗ ☐ ☒
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_CHECK_Y, CS_CHECK_H);// ☑ 🗹
|
||
# else
|
||
unicode_hex2output_single (CS_CHECK_Y);// ☑
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
# ifndef REMOVE_DRA // This cuts out the whole _DRA layer
|
||
case XP_DRA_CH: // because ?
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CQU_INV, CEX_INV);// ¿ ¡
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CI: // because {, ┄ «no reason» (opposite side from ━)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_ODABRA, CB_LHORID);// 《 ┄
|
||
# else
|
||
unicode_hex2output_single (CB_LHORID);// ┄
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_DRA_CJ: // because }, ┅ «no reason» (opposite side from ─)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_DRA_2NDROW
|
||
unicode_hex2output (CS_CDABRA, CB_HHORID);// 》 ┅
|
||
# else
|
||
unicode_hex2output_single (CB_HHORID);// ┅
|
||
# endif
|
||
}
|
||
break;
|
||
# endif // REMOVE_DRA
|
||
|
||
|
||
/* _BON layer definitions. Due to running out of X(…), XP(…) space.*/
|
||
|
||
// ------------------------- row 4
|
||
# ifndef REMOVE_BON // Removes this layer entirely, if set.
|
||
case XP_BON_AA: // because of ' "
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_HQUOSB, CS_USER_DEFINED);// ‛ 🛠
|
||
# else
|
||
unicode_hex2output_single (CS_HQUOSB);// ‛
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AB: // because of <, because "WASD" on _MOV
|
||
// 0x2019, single quotation mark: ’
|
||
// 0x2B06 arrow up: ⬆
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CS_HQUOSE, CS_ARR_UP);// ’ ⬆
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AC: // because of >
|
||
// 0x00A4 any currency symbol: ¤
|
||
// 0x1F12F Copyleft: 🄯 (means free to copy, see also © for not free to copy.)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_CURREN, CS_COPYL);// ¤ 🄯
|
||
# else
|
||
unicode_hex2output_single (CS_CURREN);// ¤
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AD: // because $ and ¢ can be about money, and money is often added together
|
||
// because … no reason, left over space.
|
||
// 0x2211, summation: ∑
|
||
// 0xA9, copyright: ©
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_CUMMU, CS_COPY);// ∑ ©
|
||
# else
|
||
unicode_hex2output_single (CS_CUMMU);// ∑
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AE: // because % for percent
|
||
// 0x2030,// promille: ‰
|
||
// 0x2031,// pro ten thousandth: ‱
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_PROM, CS_PROTT);// ‰ ‱
|
||
# else
|
||
unicode_hex2output_single (CS_PROM);// ‰
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AF: // Because ♥ is a star, ❦ and stars can be used as bullet points
|
||
// 0x2605, star: ★
|
||
// 0x066D, star small: ٭
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_STARB, CS_STARL);// ★ ٭
|
||
# else
|
||
unicode_hex2output_single (CS_STARB);// ★
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AG: // because of 🙂 🙁
|
||
// 0x1f60A,// <smile> ^^ 😊
|
||
// 0x2368,// "Squiggly" face <sad> ⍨
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CS_SMILP, CS_SQUIG);// 😊 ⍨
|
||
}
|
||
# endif
|
||
|
||
break;
|
||
|
||
case XP_BON_AH: // because * also for multiply, because asterisk *
|
||
// 0x00D7,// multiply: ×
|
||
// 0x20F0 high asterisk: ⃰(this thing seems to behave a bit weird in vim(1) or terminal)
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output (CS_MULT, CS_ASTL);// × ⃰
|
||
# else
|
||
unicode_hex2output_single (CS_MULT);// ×
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AI: // because ø sort of seems to divide something, and √ also does that, and close to ⁻⁺ (exponential)
|
||
// 0x221A,// square root: √
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
unicode_hex2output_single (CS_SQRT);// √
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_AJ: // because å points in the circle where this exponential minus goes, and it is right/"up" on the board
|
||
// because ⁻⁺ belong together
|
||
// 0x207B,// exponential minus sign: ⁻
|
||
// 0x207A,// exponential plus: ⁺
|
||
|
||
# ifdef FULL_BON_4THROW
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CS_EXPMIN, CS_EXPPLS);// ⁻ ⁺
|
||
}
|
||
# endif
|
||
|
||
break;
|
||
|
||
// ------------------------- row 3
|
||
case XP_BON_BA: // because 1, because "WASD" on _MOV (depending on setup)
|
||
// 0x2460, "1" : ①
|
||
// 0x2B05, arrow left: ⬅
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CN_1CIRC, CS_ARR_LE);// ① ⬅
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BB: // because 2, because "WASD" on _MOV (depending)
|
||
// 0x2461, "2" : ②
|
||
// 0x2B07, arrow down: ⬇
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CN_2CIRC, CS_ARR_DN);// ② ⬇
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BC: // because 3, because "WASD" on _MOV (depending)
|
||
// 0x2462, "3" : ③
|
||
// 0x27A1, arrow right: ➡
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CN_3CIRC, CS_ARR_RI);// ③ ➡
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BD: // because 4, because ┏ forms a box with the other box drawings to the right/down
|
||
// 0x2463, "4" : ④
|
||
// 0x250F, box drawing heavy: ┏
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CN_4CIRC, CB_C_RIDN);// ④ ┏
|
||
# else
|
||
unicode_hex2output_single (CN_4CIRC);// ④
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BE: // because 5, because ┓ forms a box
|
||
// 0x2513,box drawing heavy: ┓
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CN_5CIRC, CB_C_LEDN);// ⑤ ┓
|
||
# else
|
||
unicode_hex2output_single (CN_5CIRC);// ⑤
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BF: // because 6, because ┃ continues box block
|
||
// 0x2465, "6" : ⑥
|
||
// 0x2503, box drawing heavy: ┃
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CN_6CIRC, CB_VE);// ⑥ ┃
|
||
# else
|
||
unicode_hex2output_single (CN_6CIRC);// ⑥
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BG: // because 7, because ┇ continues box block
|
||
// 0x2466, "7" : ⑦
|
||
// 0x2507, dotted line verticle (heavy): ┇
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CN_7CIRC, CB_VE_DOT);// ⑦ ┇
|
||
# else
|
||
unicode_hex2output_single (CN_7CIRC);// ⑦
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BH: // because 8, ╋ because 8 also has a crossing line in it
|
||
// 0x254B, crossing lines: ╋
|
||
// 0x2467, "8" : ⑨
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CN_8CIRC, CB_VE_BI);// ⑧ ╋
|
||
# else
|
||
unicode_hex2output_single (CN_8CIRC);// ⑧
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BI: // because 9
|
||
// 0x2468, "9" : ⑨
|
||
// 0x2513,box drawing heavy: ┓
|
||
if (record->event.pressed) { // key down
|
||
|
||
unicode_hex2output_single (CN_9CIRC);// ⑨
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BJ: // because 0, because a "0" can also be a symbol for infinity, round & round
|
||
// 0x24EA, "0" : ⓪
|
||
// 0x221E,// infinity:∞
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CN_0CIRC, CS_INFIN);// ⓪ ∞
|
||
}
|
||
break;
|
||
|
||
case XP_BON_BK: // because -, because ~
|
||
// 0x2014,// dash: — (might not render differently than a hyphen - in some applications. Dash is longer).
|
||
// 0x2248,// about equal to: ≈
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output (CS_DASH, CS_ABOUT);// — ≈
|
||
}
|
||
break;
|
||
|
||
// ------------------------- row 2
|
||
case XP_BON_CA: // because 1 above, because 「[
|
||
// 0x2039, opening single corner quotation: ‹
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_GUILSLE);// ‹
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CB: // because 2 above, because 」]
|
||
// 0x203A, closing sinle corner quotation: ›
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_GUILSRI);// ›
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CC: // because 3 above, because / (division)
|
||
// 0x00F7,// division: ÷
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_DIVI);// ÷
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CD: // because 4 above, ┗ because forms box
|
||
// 0x261E, hand bullet point: ☞
|
||
// 0x2517, box drawing heavy: ┗
|
||
if (record->event.pressed) { // key down
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CS_FINGER, CB_C_RIUP);// ☞ ┗
|
||
# else
|
||
unicode_hex2output_single (CS_FINGER);// ☞
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CE: // because 5 above, because =, ┛ because forms box
|
||
// 0x2260,// inequal: ≠
|
||
// 0x251B, box drawing heavy: ┛
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CS_UNEQL, CB_C_LEUP);// ≠ ┛
|
||
# else
|
||
unicode_hex2output_single (CS_UNEQL);// ≠
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CF: // because ☒ , ┣ box drawings block, some place
|
||
// 0x2717, cross mark: ✗ (complements ✓)
|
||
// 0x2523, box drawing: ┣
|
||
if (record->event.pressed) { // key down
|
||
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CS_BOTCH, CB_VE_RI);// ✗ ┣
|
||
# else
|
||
unicode_hex2output_single (CS_BOTCH);// ✗
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CG: // because 7 above, because ☑ 🗹 , ┫ complements with key to its left
|
||
// 0x2713, checkmark: ✓
|
||
// 0x252B, box drawing: ┫
|
||
|
||
if (record->event.pressed) { // key down
|
||
# ifdef BOX_DRAWINGS
|
||
unicode_hex2output (CS_CHECK, CB_VE_LE);// ✓ ┫
|
||
# else
|
||
unicode_hex2output_single (CS_CHECK);// ✓
|
||
# endif
|
||
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CH: // because 8 above, because ¡ (inverted exclamation mark)
|
||
// 0x26A0,// alert: ⚠
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_ALERT);// ⚠
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CI: // because 9 above, because 《
|
||
// 0xAB, French quotation opening: «
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_GUILLE);// «
|
||
}
|
||
break;
|
||
|
||
case XP_BON_CJ: // because 0 above, because 》
|
||
// 0xBB, French quotation closing: »
|
||
if (record->event.pressed) { // key down
|
||
unicode_hex2output_single (CS_GUILRI);// »
|
||
}
|
||
break;
|
||
|
||
# endif // REMOVE_BON
|
||
}
|
||
|
||
return true;
|
||
};
|