From 28fecd077d73f03892a9d2a1b586d6e5d1a75c9e Mon Sep 17 00:00:00 2001
From: Daniel Ziltener <dziltener@lyrion.ch>
Date: Tue, 26 Apr 2022 22:01:41 +0200
Subject: [PATCH] Key constants

---
 src/WebDriver/WDKeys.class.st | 349 +++++++++++++++++++++++++++++++++-
 1 file changed, 347 insertions(+), 2 deletions(-)

diff --git a/src/WebDriver/WDKeys.class.st b/src/WebDriver/WDKeys.class.st
index 235a563..8ec1efa 100644
--- a/src/WebDriver/WDKeys.class.st
+++ b/src/WebDriver/WDKeys.class.st
@@ -5,6 +5,351 @@ Class {
 }
 
 { #category : #'accessing - token' }
-WDKeys class >> return [
-	^ Character codePoint: 16rE006
+WDKeys class >> altLeft [
+	^ Character codePoint: 16rE00A asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> altRight [
+	^ Character codePoint: 16rE0052 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> arrowDown [
+	^ Character codePoint: 16rE0015 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> arrowLeft [
+	^ Character codePoint: 16rE0012 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> arrowRight [
+	^ Character codePoint: 16rE0014 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> arrowUp [
+	^ Character codePoint: 16rE0013 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> backspace [
+	^ Character codePoint: 16rE003 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> cancel [
+	^ Character codePoint: 16rE001 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> clear [
+	^ Character codePoint: 16rE005 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> controlLeft [
+	^ Character codePoint: 16rE009 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> controlRight [
+	^ Character codePoint: 16rE0051 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> delete [
+	^ Character codePoint: 16rE0017 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> end [
+	^ Character codePoint: 16rE0010 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> enter [
+	^ Character codePoint: 16rE007 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> equal [
+	^ Character codePoint: 16rE0019 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> escape [
+	^ Character codePoint: 16rE00C asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f1 [
+	^ Character codePoint: 16rE0031 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f10 [
+	^ Character codePoint: 16rE003A asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f11 [
+	^ Character codePoint: 16rE003B asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f12 [
+	^ Character codePoint: 16rE003C asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f2 [
+	^ Character codePoint: 16rE0032 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f3 [
+	^ Character codePoint: 16rE0033 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f4 [
+	^ Character codePoint: 16rE0034 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f5 [
+	^ Character codePoint: 16rE0035 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f6 [
+	^ Character codePoint: 16rE0036 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f7 [
+	^ Character codePoint: 16rE0037 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f8 [
+	^ Character codePoint: 16rE0038 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> f9 [
+	^ Character codePoint: 16rE0039 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> help [
+	^ Character codePoint: 16rE002 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> home [
+	^ Character codePoint: 16rE0011 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> insert [
+	^ Character codePoint: 16rE0016 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> metaLeft [
+	^ Character codePoint: 16rE003D asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> metaRight [
+	^ Character codePoint: 16rE0053 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num0 [
+	^ Character codePoint: 16rE001A asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num1 [
+	^ Character codePoint: 16rE001B asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num2 [
+	^ Character codePoint: 16rE001C asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num3 [
+	^ Character codePoint: 16rE001D asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num4 [
+	^ Character codePoint: 16rE001E asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num5 [
+	^ Character codePoint: 16rE001F asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num6 [
+	^ Character codePoint: 16rE0020 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num7 [
+	^ Character codePoint: 16rE0021 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num8 [
+	^ Character codePoint: 16rE0022 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> num9 [
+	^ Character codePoint: 16rE0023 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numArrowDown [
+	^ Character codePoint: 16rE005B asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numArrowLeft [
+	^ Character codePoint: 16rE0058 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numArrowRight [
+	^ Character codePoint: 16rE005A asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numArrowUp [
+	^ Character codePoint: 16rE0059 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numComma [
+	^ Character codePoint: 16rE0026 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numDelete [
+	^ Character codePoint: 16rE005D asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numDot [
+	^ Character codePoint: 16rE0028 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numEnd [
+	^ Character codePoint: 16rE0056 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numHome [
+	^ Character codePoint: 16rE0057 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numInsert [
+	^ Character codePoint: 16rE005C asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numMinus [
+	^ Character codePoint: 16rE0027 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numPagedown [
+	^ Character codePoint: 16rE0055 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numPageup [
+	^ Character codePoint: 16rE0054 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numPlus [
+	^ Character codePoint: 16rE0025 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numSlash [
+	^ Character codePoint: 16rE0029 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> numStar [
+	^ Character codePoint: 16rE0024 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> pagedown [
+	^ Character codePoint: 16rE00F asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> pageup [
+	^ Character codePoint: 16rE00E asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> pause [
+	^ Character codePoint: 16rE00B asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> return [
+	^ Character codePoint: 16rE006 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> semicolon [
+	^ Character codePoint: 16rE0018 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> shiftLeft [
+	^ Character codePoint: 16rE008 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> shiftRight [
+	^ Character codePoint: 16rE0050 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> space [
+	^ Character codePoint: 16rE00D asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> tab [
+	^ Character codePoint: 16rE004 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> unidentified [
+	^ Character codePoint: 16rE000 asString
+]
+
+{ #category : #'accessing - token' }
+WDKeys class >> zenkakuhankaku [
+	^ Character codePoint: 16rE0040 asString
 ]